home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh2x / sh24b.d64 / tastaturabfr. (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  266b  |  14 lines
  1. 100 REM TASTATURABFRAGE MIT SPRUNG
  2. 200 REM:
  3. 300 REM VORHER:
  4. 400 :
  5. 410 GETA$:IFA$=""THEN410
  6. 420 IFA$="A"THEN2000:REM PROGRAMMTEIL A
  7. 430 IFA$="B"THEN3000:REM PROGRAMMTEIL B
  8. 440 IFA$="X"THEN END:REM ENDE
  9. 450 GOTO410
  10. 499 :
  11. 500 REM NACHHER:
  12. 600 :
  13. 610 GETA$:ON1-(A$="A")-2*(A$="B")-3*(A$="X"GOTO610,2000,3000:END
  14.