home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 119 / 119.d81 / star (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  1KB  |  44 lines
  1. 1 dv=peek(186):ifdv<8thendv=8
  2. 2 ifdv>9thengosub200:dv=8
  3. 5 poke32767,13
  4. 10 poke53281,0:poke53280,0:print"[147][159]":gosub100
  5. 13 sys57812"unpacker.89",dv,0:poke780,0:poke781,0:poke782,201:sys65493
  6. 14 sys57812"intro.shp",dv,0:poke780,0:poke781,0:poke782,32:sys65493
  7. 16 poke251,32:poke252,64:poke253,96
  8. 18 poke53280,0:sys51456:sys51459
  9. 20 sys57812"sid player",dv,0:poke780,0:poke781,0:poke782,192:sys65493
  10. 30 sys57812"font",dv,0:poke780,0:poke781,0:poke782,100:sys65493
  11. 40 sys57812"music",dv,0:poke780,0:poke781,0:poke782,108:sys65493:poke198,0
  12. 50 poke157,0:load"presenter",dv
  13. 100 print"[129]       [204] [207] [193] [196] [211] [212] [193] [210]    [204] [207] [214] [197]
  14. 110 [153]"       atn (NULL)ypical str$ay at the (NULL)ower
  15. 130 print"[155]        [208]icture by [215]alt [200]arned.
  16. 150 [153]"         (NULL)he music is '(NULL)enuett'
  17. 152 print"           from '[209]uintet in [197]'
  18. 160 [153]"           by (NULL)uigi peekoccherini
  19. 170 print"      transcribed by [196]ave [205]arquis.
  20. 190 [142]
  21. 200 [153]"loadlenhanging device number to 8..."
  22. 201 [159]15,dv,15,"cp":[132]15,a:[139]a[178]2[167][152]15,"s-8":[129]i[178]1[164]500:[130]
  23. 202 [139]a[178]2[167][160]15:[142]
  24. 205 [160]15:[159]15,8,15:[160]15:[139]st[167][141]500:[142]
  25. 210 [159]15,8,15:[152]15,"m-w:"[199](119)[199](0)[199](2)[199](13[170]32)[199](13[170]64)
  26. 220 [141]600:[160]15
  27. 221 [159]15,8,15:[160]15:[139]st[167]230
  28. 224 [159]15,8,15:[152]15,"u0>"[170][199](13):[141]600:[160]15
  29. 230 [159]15,dv,15:[152]15,"m-w:"[199](119)[199](0)[199](2)[199](08[170]32)[199](08[170]64)
  30. 240 [141]600:[160]15
  31. 241 [159]15,dv,15:[160]15:[139]st[167]250
  32. 244 [159]15,dv,15:[152]15,"u0>"[170][199](8):[141]600:[160]15
  33. 250 [159]15,13,15:[152]15,"m-w:"[199](119)[199](0)[199](2)[199](dv[170]32)[199](dv[170]64)
  34. 260 [141]600:[160]15
  35. 261 [159]15,13,15:[160]15:[139]st[167]270
  36. 264 [159]15,13,15:[152]15,"u0>"[170][199](dv):[141]600:[160]15
  37. 270 [142]
  38. 500 [159]15,dv,15:[152]15,"m-w:"[199](119)[199](0)[199](2)[199](08[170]32)[199](08[170]64)
  39. 510 [141]600:[160]15
  40. 520 [159]15,dv,15:[160]15:[139]st[167]540
  41. 530 [159]15,dv,15:[152]15,"u0>"[170][199](8):[141]600:[160]15
  42. 600 [129]i[178]1[164]700:[130]:[142]
  43. 10000 [159]15,8,15,"s0:star":[160]15:[148]"star",8:[128]
  44.