home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 84
/
Tiger_Disk_084_20xx_Tiger-Crew-Disk_de_Side_D.d64
/
basicbuz-demo_tz
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
8KB
|
360 lines
1 print"[147][149]"
2 poke53280,0:poke53281,0:poke53272,21:goto316
3 print"":gosub233:goto224
4 print"[149] [197] "
5 print" "
6 print" "
7 print" "
8 print" [176][192][192][192][174] "
9 print" [221] [221] "
10 print" [221] [221] "
11 print" [221] [221] "
12 print" [173][192][192][192][189] "
13 print"[145][145][145][145][145][145][145][145][145][145]":return
14 print" [196] "
15 print" "
16 print" "
17 print" "
18 print" [176][192][192][192][174] "
19 print" [221] [221] "
20 print" [221] [221] "
21 print" [221] [221] "
22 print" [173][192][192][192][189] "
23 print"[145][145][145][145][145][145][145][145][145][145]":return
24 print" [195] "
25 print" "
26 print" "
27 print" "
28 print" [176][192][192][192][174] "
29 print" [221] [221] "
30 print" [221] [221] "
31 print" [221] [221] "
32 print" [173][192][192][192][189] "
33 print"[145][145][145][145][145][145][145][145][145][145]":return
34 print" [198] "
35 print" "
36 print" "
37 print" "
38 print" [176][192][192][192][174] "
39 print" [221] [221] "
40 print" [221] [221] "
41 print" [221] [221] "
42 print" [173][192][192][192][189] "
43 print"[145][145][145][145][145][145][145][145][145][145]":return
44 print" [210] "
45 print" "
46 print" "
47 print" "
48 print" [176][192][192][192][174] "
49 print" [221] [221] "
50 print" [221] [221] "
51 print" [221] [221] "
52 print" [173][192][192][192][189] "
53 print"[145][145][145][145][145][145][145][145][145][145]":return
54 print" [175] "
55 print" "
56 print" "
57 print" "
58 print" [176][192][192][192][174] "
59 print" [221] [221] "
60 print" [221] [221] "
61 print" [221] [221] "
62 print" [173][192][192][192][189] "
63 print"[145][145][145][145][145][145][145][145][145][145]":return
64 print" [164] "
65 print" [163] "
66 print" "
67 print" "
68 print" [176][192][192][192][174] "
69 print" [221] [221] "
70 print" [221] [221] "
71 print" [221] [221] "
72 print" [173][192][192][192][189] "
73 print"[145][145][145][145][145][145][145][145][145][145]":return
74 print" "
75 print" [197] "
76 print" "
77 print" "
78 print" [176][192][192][192][174] "
79 print" [221] [221] "
80 print" [221] [221] "
81 print" [221] [221] "
82 print" [173][192][192][192][189] "
83 print"[145][145][145][145][145][145][145][145][145][145]":return
84 print" "
85 print" [195] "
86 print" "
87 print" "
88 print" [176][192][192][192][174] "
89 print" [221] [221] "
90 print" [221] [221] "
91 print" [221] [221] "
92 print" [173][192][192][192][189] "
93 print"[145][145][145][145][145][145][145][145][145][145]":return
94 print" "
95 print"[149] [210] "
96 print" "
97 print" "
98 print" [176][192][192][192][174] "
99 print" [221] [221] "
100 print" [221] [221] "
101 print" [221] [221] "
102 print" [173][192][192][192][189] "
103 print"[145][145][145][145][145][145][145][145][145][145]":return
104 print" "
105 print" "
106 print"[151] [197] "
107 print" "
108 print" [176][192][192][192][174] "
109 print" [221] [221] "
110 print" [221] [221] "
111 print" [221] [221] "
112 print" [173][192][192][192][189] "
113 print"[145][145][145][145][145][145][145][145][145][145]":return
114 print" "
115 print" "
116 print"[129] [210] "
117 print" "
118 print" [176][192][192][192][174] "
119 print" [221] [221] "
120 print" [221] [221] "
121 print" [221] [221] "
122 print" [173][192][192][192][189] "
123 print"[145][145][145][145][145][145][145][145][145][145]":return
124 print" "
125 print" "
126 print" "
127 print"[152] [198] "
128 print" [176][192][192][192][174] "
129 print" [221] [221] "
130 print" [221] [221] "
131 print" [221] [221] "
132 print" [173][192][192][192][189] "
133 print"[145][145][145][145][145][145][145][145][145][145]":return
134 print" "
135 print" "
136 print" "
137 print" "
138 print"[155] [176][198][185][198][174] "
139 print" [221] [221] "
140 print" [199] [200] "
141 print" [221] [221] "
142 print" [173][192][192][192][189] "
143 print"[145][145][145][145][145][145][145][145][145][145]":return
144 print" "
145 print" "
146 print" "
147 print" "
148 print"[153] [176][210] [210][174] "
149 print" [212] [184] [217] "
150 print"[167] [165] "
151 print" [212] [217] "
152 print" [173][192][192][192][189] "
153 print"[145][145][145][145][145][145][145][145][145][145]":return
154 print" "
155 print" "
156 print" "
157 print" "
158 print" [176] [174] "
159 print" [217] [183][185][183] [212] "
160 print" [221] [221] "
161 print" [217] [212] "
162 print" [173][192][192][192][189] "
163 print"[145][145][145][145][145][145][145][145][145][145]":return
164 print" "
165 print" "
166 print" "
167 print"[152] [198] "
168 print" [176][196][197][196][174] "
169 print" [221] [221] "
170 print" [200] [199] "
171 print" [221] [221] "
172 print" [173][192][192][192][189] "
173 print"[145][145][145][145][145][145][145][145][145][145]":return
174 print" "
175 print" "
176 print"[129] [210] "
177 print" [175] "
178 print" [176][183] [183][174] "
179 print" [217] [212] "
180 print" [212] [217] "
181 print" [217] [212] "
182 print" [173][192][192][192][189] "
183 print"[145][145][145][145][145][145][145][145][145][145]":return
184 print" "
185 print" "
186 print"[151] [197] "
187 print" "
188 print" [176][196][197][196][174] "
189 print" [200] [199] "
190 print" [167] [165] "
191 print" [200] [199] "
192 print" [173][192][192][192][189] "
193 print"[145][145][145][145][145][145][145][145][145][145]":return
194 print" "
195 print"[149] [210] "
196 print" "
197 print" "
198 print" [176][192][196][192][174] "
199 print" [221] [221] "
200 print" [200] [199] "
201 print" [221] [221] "
202 print" [173][192][192][192][189] "
203 print"[145][145][145][145][145][145][145][145][145][145]":return
204 print" "
205 print" [210] "
206 print" "
207 print" "
208 print" [176][198][210][198][174] "
209 print" [199] [200] "
210 print" [212] [217] "
211 print" [199] [200] "
212 print" [173][192][192][192][189] "
213 print"[145][145][145][145][145][145][145][145][145][145]":return
214 print" "
215 print" [197] "
216 print" "
217 print" "
218 print" [176][192][210][192][174] "
219 print" [221] [221] "
220 print" [200] [199] "
221 print" [221] [221] "
222 print" [173][192][192][192][189] "
223 print"[145][145][145][145][145][145][145][145][145][145]":return
224 ford=0to20
225 gosub4:gosub14:gosub24:gosub34:gosub44:gosub54:gosub64:gosub74:gosub84
226 gosub94:gosub104:gosub114:gosub124:gosub134:gosub144:gosub154
227 gosub144:gosub134:gosub164:gosub174:gosub184:gosub194:gosub204:gosub214
228 gosub64:gosub54:gosub44:gosub34:gosub24:gosub14
229 nextd
230 goto335
231 end
232 fora=0to0:nexta:return
233 fora=0to0:nexta:return
235 print"
236 [129]a[178]0[164]30:[130]a:[142]
237 [129]a[178]0[164]30:[130]a:[142]
238 [129]a[178]0[164]800:[130]a:[142]
239 [129]a[178]0[164]400:[130]a:[142]
267 [153][163]9)" manipulation of basic ":[141]236
268 [153][163]9)"oncont manipulation of basic ":[141]236
269 [153][163]9)"onopen manipulation of basic ":[141]236
270 [153][163]9)"onprint manipulation of basic ":[141]236
271 [153][163]9)"on manipulation of basic ":[141]236
272 [153][163]9)"onprint manipulation of basic ":[141]236
273 [153][163]9)"onopen manipulation of basic ":[141]236
274 [153][163]9)"oncont manipulation of basic ":[141]236
275 [153][163]9)"on manipulation of basic ":[141]236
276 [153][163]9)" flexible line vectors":[141]236
277 [153][163]9)"oncont flexible line vectors":[141]236
278 [153][163]9)"onopen flexible line vectors":[141]236
279 [153][163]9)"onprint flexible line vectors":[141]236
280 [153][163]9)"on flexible line vectors":[141]236
281 [153][163]9)"onprint flexible line vectors":[141]236
282 [153][163]9)"onopen flexible line vectors":[141]236
283 [153][163]9)"oncont flexible line vectors":[141]236
284 [153][163]9)"on flexible line vectors":[141]236
285 [151]1785,112:[141]237
286 [129]x[178]1786[164]1788:[151]x,64:[141]237:[130]x
287 [151]1789,110:[141]237
288 [129]x[178]1829[164]1948[169]40:[151]x,93:[141]237:[130]x
289 [151]1949,125:[141]237
290 [129]x[178]1948[164]1946[169][171]1:[151]x,64:[141]237:[130]x
291 [151]1945,109:[141]237
292 [129]x[178]1905[164]1825[169][171]40:[151]x,93:[141]237:[130]x
293 [153]"":[137]3
294 [153][163]13)"clr ^(NULL)str$right$(NULL)str$right$(NULL)right$ "
295 [153][163]13)" (NULL)left$chr$closeleft$chr$closeleft$mid$(NULL) "
296 [153][163]13)" (NULL)(NULL) (NULL)(NULL)close(NULL) (NULL)right$ "
297 [153][163]13)" chr$mid$asc(NULL)mid$asc(NULL) mid$(NULL) "
298 [153][163]13)" "
299 [153][163]13)" "
300 [153][163]13)" realtime "
301 [153][163]13)" "
302 [153][163]13)" "
303 [153]"ononononononononononon":[142]
304 [153][163]13)" right$(NULL)tanright$(NULL)valright$(NULL)right$ "
305 [153][163]13)" /left$(NULL)close(NULL)(NULL)close(NULL)mid$exp/ "
306 [153][163]13)" left$(NULL) chr$chr$closeleft$ /orright$ "
307 [153][163]13)" (NULL)mid$tan(NULL)mid$(NULL)(NULL) mid$(NULL) "
308 [153]"ononononononononononon":[142]
309 [153][163]13)" .(NULL)ascright$(NULL)usrright$(NULL)right$ "
310 [153][163]13)" left$left$closechr$fnclose+/exp(NULL) "
311 [153][163]13)" (NULL)then sgn(NULL)close(NULL) (NULL)or^ "
312 [153][163]13)" left$mid$str$(NULL)mid$and(NULL) mid$(NULL) "
313 [153]"ononononononononononon":[142]
314 [128]
315 [129]i[178]0[164]100:[130]i:[153]"":[137]240
316 [153][163]12)" ":[141]239
317 [153][163]13)"basicbuzwait a demo":[141]238
318 [153][163]13)"on ":[141]239
319 [153][163]13)"on by't0mz'in 2000 ":[141]238
320 [153][163]13)"on ":[141]239:[153]""
321 [141]294:[141]304:[141]309:[141]304
322 [141]294:[141]304:[141]309:[141]304
323 [141]294:[141]304:[141]309:[141]304
324 [141]294:[141]304:[141]309:[141]304
325 [141]294:[141]304:[141]309:[141]304
326 [141]294:[141]304:[141]309:[141]304
327 [141]294:[141]304:[141]309:[141]304
328 [141]294:[141]304:[141]309:[141]304
329 [141]294:[141]304:[141]309:[141]304:[153]"load"
330 [153][163]12)" ":[141]239
331 [153][163]11)"onverify lets start with ":[141]238
333 [153][163]12)"onverify the impossible! ":[141]238:[153]"load":[141]238
334 [153]"":[137]267
335 [129]z[178]1833[164]1953[169]40:[151]z,32:[130]
336 [129]z[178]1834[164]1954[169]40:[151]z,32:[130]
337 [129]z[178]1835[164]1955[169]40:[151]z,32:[130]
338 [129]z[178]1836[164]1956[169]40:[151]z,32:[130]
339 [129]z[178]1837[164]1957[169]40:[151]z,32:[130]
340 [129]z[178]1838[164]1958[169]40:[151]z,32:[130]
341 [129]z[178]1839[164]1959[169]40:[151]z,32:[130]
342 [129]z[178]1840[164]1960[169]40:[151]z,32:[130]
343 [129]z[178]1841[164]1961[169]40:[151]z,32:[130]
344 [129]z[178]1842[164]1962[169]40:[151]z,32:[130]
345 [129]z[178]1843[164]1963[169]40:[151]z,32:[130]
346 [129]z[178]1844[164]1964[169]40:[151]z,32:[130]
347 [129]z[178]1845[164]1965[169]40:[151]z,32:[130]
348 [129]z[178]1846[164]1966[169]40:[151]z,32:[130]
349 [129]z[178]1847[164]1967[169]40:[151]z,32:[130]
350 [129]z[178]1848[164]1968[169]40:[151]z,32:[130]
351 [129]z[178]1849[164]1969[169]40:[151]z,32:[130]
352 [129]z[178]1850[164]1970[169]40:[151]z,32:[130]
353 [129]z[178]1851[164]1971[169]40:[151]z,32:[130]
354 [129]z[178]1742[164]1727[169][171]1:[141]236:[151]z,32:[130]
355 [129]x[178]1905[164]1825[169][171]40:[151]x,32:[141]237:[130]x
356 [151]1945,32:[141]237
357 [129]x[178]1948[164]1946[169][171]1:[151]x,32:[141]237:[130]x
358 [151]1949,32:[141]237
359 [129]x[178]1829[164]1948[169]40:[151]x,32:[141]237:[130]x
360 [151]1789,32:[141]237
361 [129]x[178]1786[164]1788:[151]x,32:[141]237:[130]x
362 [151]1785,32:[141]237
363 [153]"loadlist":[136]q[178]9
364 [153][163]q)" ":[141]394
365 [153][163]q)"onow ":[141]394
366 [153][163]q)"onnow ":[141]394
367 [153][163]q)"on now ":[141]394
368 [153][163]q)"ond now ":[141]394
369 [153][163]q)"oned now ":[141]394
370 [153][163]q)"onted now ":[141]394
371 [153][163]q)"onated now ":[141]394
372 [153][163]q)"on part now ":[141]394
373 [153][163]q)"ont part now ":[141]394
374 [153][163]q)"onxt part now ":[141]394
375 [153][163]q)"onext part now ":[141]394
376 [153][163]q)"onnext part now ":[141]394
377 [153][163]q)"on next part now ":[141]394
378 [153][163]q)"ong next part now ":[141]394
379 [153][163]q)"onng next part now ":[141]394
380 [153][163]q)"oning next part now ":[141]394
381 [153][163]q)"onking next part now ":[141]394
382 [153][163]q)"onaking next part now ":[141]394
383 [153][163]q)"onmaking next part now ":[141]394
384 [153][163]q)"on making next part now ":[141]394
385 [153][163]q)"on making next part now ":[137]395
390 [129]x[178]0[164]39
394 [129]t[178]1[164]70:[130]t:[142]
395 [147]"02.*",8,1:[138]