home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Game Programming for Teens
/
GameProgrammingForTeens.iso
/
Source
/
chapter03
/
demo03-03.bb
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Text File
|
2003-04-06
|
250 b
|
7 lines
;demo03-03.bb.bb - Counts using step amounts
;loop backwards, from 5.0 to 0.0 by -1.2
For counter# = 5.0 To 0.0 Step -1.2
;print out 3 digits of counter, so 5.000000 becomes 5.0 - decimal is a digit
Print Left$( Str counter, 3)
Next
WaitKey