home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 91xx / 9112a.d64 / &-tester (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  447b  |  23 lines
  1. 0 POKE198,1:POKE631,29
  2. 1 INPUT"[147]FILENAME   &[157][157][157]";F$
  3. 2 OPEN2,8,2,F$+",U,R
  4. 4 CK[178]0:[153]
  5. 6 [141]100:[139]ST[167][153]"FILE NOT FOUND!":[128]
  6. 8 CK[178]CK[170]A:B[178]A:[141]200
  7. 10 [141]100
  8. 12 CK[178]CK[170]A:[141]200:[153]"STARTADRESSE"A[172]256[170]B
  9. 14 [141]100
  10. 16 CK[178]CK[170]A:[141]200:[153]"LAENGE ="A:L[178]A
  11. 18 [129]I[178]1[164]L
  12. 20 [141]100:CK[178]CK[170]A:[141]200
  13. 22 [130]
  14. 24 [153]"ERRECHNETE PRUEFSUMME:"CK
  15. 26 [141]100:[153]"GELESENE PRUEFSUMME:"A
  16. 28 [139]A[179][177]CK[167][153]"   FEHLER   "
  17. 30 [153]
  18. 32 [139]ST[178]0[167]4
  19. 34 [160]2:[128]
  20. 100 [161]#2,A$:A[178][198](A$[170][199](0)):[142]
  21. 200 [139]CK[177]255[167]CK[178]CK[171]255:[137]200
  22. 210 [142]
  23.