home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 89xx / 8907a.d64 / nummernspeicher (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1995-03-30  |  262 b   |  19 lines
  1. 5 A=4
  2. 10 DIMA$(4)
  3. 15 DIM B$(4)
  4. 20 FORI=1TO4
  5. 30 READ A$(I)
  6. 35 READB$(I)
  7. 40 NEXT
  8. 45 INPUT "DATEINAME";R$
  9. 50 OPEN1,8,2,R$+",S,W"
  10. 60 FOR I=1TOA
  11. 70 PRINT#1,A$(I)
  12. 75 PRINT#1,B$(I)
  13. 80 NEXT
  14. 90 CLOSE1
  15. 500 DATA PETER, 0123/45678
  16. 510 DATA TANJA, 0123/98765
  17. 520 DATA JAMES, 0123/007
  18. 530 DATA KATJA, 0123/76543
  19.