Here is a money coversion program I made and it is only 15 lines!
have fun!!!!
`Conversion Program
disable escapekey
set text font "comic sans MS":set text size 48
center text 320,200,"Conversion Program"
wait 3000:cls
set text size 14
set text font "Arial"
start:
cls
input "Please enter the exchange rate:",exchange#:cls
input "Please enter foriegn amount:",amount#:cls
print amount#/exchange#
wait key:print "Would you like to start again?"
input choose$
if choose$ = "yes" then gosub start else if choose$ = "no" then end
You Don't know the power of the Dark Side!!
Oh but I do!!