home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 123 / Tiger_Disk_123_20xx_Tiger-Crew-Disk_de_Side_B.d64 / ladeprogramm (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  540b  |  24 lines
  1. 10 print"[147]"
  2. 20 open2,8,2,"tiger-disk.title"
  3. 30 input#2,bo,ba,sp
  4. 40 input#2,l1$,l2$,l3$,l4$
  5. 50 close2
  6. 60 open2,8,2,"bringt.title"
  7. 70 input#2,uw,uw,s1
  8. 80 input#2,l5$,l6$,l7$,l8$
  9. 90 close2
  10. 100 open2,8,2,"quick.title"
  11. 110 input#2,uw,uw,s2
  12. 120 input#2,l9$,la$,lb$,lc$
  13. 130 close2
  14. 140 open2,8,2,"title.title"
  15. 150 input#2,uw,uw,s3
  16. 160 input#2,ld$,le$,lf$,lg$
  17. 170 close2:poke53265,11
  18. 180 poke53280,bo:poke53281,ba
  19. 190 printspc(sp)l1$:printspc(sp)l2$:printspc(sp)l3$:printspc(sp)l4$
  20. 200 print:printspc(s1)l5$:printspc(s1)l6$:printspc(s1)l7$:printspc(s1)l8$
  21. 210 print:printspc(s2)l9$:printspc(s2)la$:printspc(s2)lb$:printspc(s2)lc$
  22. 220 print:printspc(s3)ld$:printspc(s3)le$:printspc(s3)lf$:printspc(s3)lg$
  23. 230 poke53265,27:poke198,0:wait198,1:poke198,0:end
  24.