04-10-2006, 11:44 AM
thanks antoni...it worked, and now it's much less to write too
it didn't work at once thought..had to make some few changes..not much look:
it didn't work at once thought..had to make some few changes..not much look:
Code:
COLOR 9, 0
CLS
CONST delay = .5 'change this constant to suit your needs
LOCATE 11, 35: PRINT "loading..."
c$ = "[______________]"
FOR i = 2 TO 16
t! = TIMER + delay
DO: LOOP UNTIL TIMER > t!
LOCATE 12, 34: PRINT c$;
MID$(c$, i) = "#"
NEXT
LOCATE 11, 46: PRINT "done"
color=darkred]Imperishable flames are mine to controll![/color]