There is a free Pascal to 8051 compiler on my page at

http://www.geocities.com/SiliconVa...index.html

However it does not produce very good code - a much better (but not free) one is at

http://users.iafrica.com/r/ra/rainier/