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 >
Commodore BASIC  |  2023-02-26  |  8KB  |  360 lines

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