home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
No Fragments Archive 10: Diskmags
/
nf_archive_10.iso
/
MAGS
/
ST_USER
/
1990
/
USERMY90.MSA
/
LISTINGS_PROG4.BAS
(
.txt
)
< prev
next >
Wrap
Atari STOS Basic
|
1990-03-02
|
5KB
|
37 lines
21000 REM hiscore2
21010 MODE
21020 WINDOPEN
21030 CURS
21040 DIM
21050 FOR
21055 VARNAME
21060 LOCATE
21070 FOR
21080 PRINT
21090 NEXT
21100 GOTO
21200 IF
21210 GOSUB
21220 VARNAME
21230 FOR
21240 IF
21250 NEXT
22000 REM hiscore 4
22010 CLW
22020 CURS
22030 FOR
22040 BOX
22050 NEXT
22060 VARNAME
22070 FOR
22080 VARNAME
22090 SPRITE
22100 IF
22110 IF
22120 IF
22130 IF
22140 IF
22150 WAIT
22160 NEXT
22170 RETURN