home *** CD-ROM | disk | FTP | other *** search
/ C64'er / C64'er.iso / sh6x / sh69b.d64 / on.letters (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  617b  |  22 lines
  1. 10 PRINT"[147]":FL=0
  2. 20 FORI=1TO9
  3. 30 PRINTTAB(10)""CHR$(I+96);
  4. 40 PRINT"[146] [205]ENUEPUNKT"I:PRINT
  5. 50 NEXT
  6. 60 GETT$:IFT$<"A"THEN60
  7. 70 ONASC(T$)-64GOSUB1000,2000,3000,4000,5000,6000,7000,8000,9000
  8. 80 IFFL=0THEN60
  9. 85 IFFL=1THEN10
  10. 100 PRINT:PRINT:PRINTTAB(5)"[205]IT <[211][208][193][195][197]> ZURUECK ZUM [205]ENUE!
  11. 110 [151]198,0:[146]198,1
  12. 120 FL[178]1:[142]
  13. 1000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 1":[141]100:[142]
  14. 2000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 2":[141]100:[142]
  15. 3000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 3":[141]100:[142]
  16. 4000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 4":[141]100:[142]
  17. 5000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 5":[141]100:[142]
  18. 6000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 6":[141]100:[142]
  19. 7000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 7":[141]100:[142]
  20. 8000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 8":[141]100:[142]
  21. 9000 [153]"LOAD(null)NTERPRG. ZU (null)ENUPUNKT 9":[141]100:[142]
  22.