home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
No Fragments Archive 10: Diskmags
/
nf_archive_10.iso
/
MAGS
/
STOSSER
/
STOSSE22.MSA
/
GIVEAWAY._22
/
BIG.BAS
(
.txt
)
next >
Wrap
Atari STOS Basic
|
1987-04-22
|
34KB
|
95 lines
1 REM ***********************************
10 HIDE
100 SCREEN COPY
1000 MUSIC
1010 FOR
1020 FOR
1030 STOP
11 DIM
110 REM wait vbl
12 FOR
120 SCREEN$
121 INK
122 FOR
123 VARNAME
124 VARNAME
125 VARNAME
126 NEXT
127 INK
13 VARNAME
130 IF
14 VARNAME
148 WAIT VBL
149 NEXT
15 NEXT
150 NEXT
160 UNTIL
170 GOTO
19 ERASE
2 REM * COMPILE IT FOR BEST RESULTS *
20 ERASE
21 DIM
22 GET PALETTE
26 VARNAME
27 LOCATE
3 REM ***********************************
30 FOR
40 FOR
5 REM Checked GFF א™
50 ZOOM
5000 VARNAME
5001 VARNAME
5002 VARNAME
5003 VARNAME
5004 VARNAME
5005 VARNAME
5006 VARNAME
5007 VARNAME
5008 VARNAME
5009 VARNAME
5010 VARNAME
5011 VARNAME
5012 VARNAME
5013 VARNAME
5014 VARNAME
5015 VARNAME
5016 VARNAME
5017 VARNAME
5018 VARNAME
5019 VARNAME
5020 VARNAME
5021 VARNAME
5022 VARNAME
5023 VARNAME
5024 VARNAME
5025 VARNAME
5026 VARNAME
5027 VARNAME
5028 VARNAME
5029 VARNAME
5030 VARNAME
5031 VARNAME
5032 VARNAME
5033 VARNAME
5034 VARNAME
5035 VARNAME
5036 VARNAME
5037 VARNAME
5038 VARNAME
5039 VARNAME
5099 RETURN
51 INC
6 VARNAME
60 NEXT
7 TIMER
70 NEXT
72 CLS
73 ERASE
80 GOSUB
81 AUTO BACK
82 MUSIC
83 GET PALETTE
85 REPEAT
90 FOR
95 FOR