home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 42 / 042.d81 / slamball (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  631b  |  19 lines
  1. 10 poke53281,1:poke53280,1
  2. 20 printchr$(142)"[147][213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]";
  3. 30 fora=1to23:print"[221]"spc(38)"[221]";:next
  4. 40 print"[202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203][157][148][192]"
  5. 50 fora=217to242:pokea,peek(a)or128:next
  6. 60 print"          loadstar presents:"
  7. 70 print"                               "
  8. 80 fora=1to8
  9. 90 print"                               [152] "
  10. 100 next
  11. 110 print"                                "
  12. 120 print"[145][145][145][145][145][145][145][145]slamball"
  13. 130 print"by george parker"
  14. 140 print"copyright 1987"
  15. 150 print"        press space to continue."
  16. 160 ifpeek(203)<>60then160
  17. 170 print"[145]   loading slamball -- please wait."
  18. 180 load"slam",8,1
  19.