home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh9x / sh96b.d64 / vali (.txt) < prev   
Commodore BASIC  |  1995-03-30  |  2KB  |  40 lines
  1. 1 PRINTCHR$(14):POKE53280,0:POKE53281,0:PRINT"[147]"TAB(17)"[214]ALI"
  2. 2 PRINTTAB(6)"[214]ON [200]ANS-[202]UERGEN [218]IETHMANN":PRINT"1 IST [211]YSTEMDISKETTE RETTEN"
  3. 4 PRINT"2 IST [211]ICHERUNGSSYSTEM RETTEN"
  4. 5 GETA$:IF A$="1" THEN SY = 0:PRINT"[211]YSTEMDISKETTE [146]": GOTO 8
  5. 6 IF A$="2" THEN SY = 1:PRINT"[211]ICHERUNGSSYSTEM [146]":GOTO 8
  6. 7 GOTO 5
  7. 8 OPEN15,8,15,"I":OPEN1,8,2,"#":RESTORE
  8. 9 READ N:IFN<0THEN11
  9. 10 PRINT#15,"M-W"CHR$(LB)CHR$(05)CHR$(1)CHR$(N):LB=LB+1:GOTO9
  10. 11 ON ABS(N) GOTO 12,13,17
  11. 12 READ LB:GOTO 9
  12. 13 IFSI=1THENPRINT#15,"U2";2;0;T;S
  13. 14 READ T:READ S
  14. 15 PRINT#15,"U1"2;0;T;S:SI=1
  15. 16 GOTO9
  16. 17 PRINT#15,"U2"2;0;T;S:IFSY=1THENSY=2:GOTO9
  17. 18 CLOSE2::CLOSE15:PRINT"[199][197][207][211] [210]EPARATUR BEENDET[146]":OPEN15,8,15,"I":CLOSE1:END
  18. 19 DATA-2,18,0,-1,0
  19. 20 DATA18,1,65,0,7,41,41,1,2,2,64,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,12
  20. 21 DATA109,45,13,21,255,255,31,21,255,255,31,6,18,82,2,5,72,8,9,21,255,255,31
  21. 22 DATA9,35,107,4,11,77,141,13,2,0,16,16,11,131,115,19,15,244,253,7,0,0,0,0
  22. 23 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,,9,180,180,4,0,0,0,0,10,135,62,2,0,0,0,0
  23. 24 DATA0,0,0,0,11,78,47,3,18,255,255,3,17,255,255,1,17,255,255,1,17,255,255,1
  24. 25 DATA17,255,255,1,17,255,255,1,83,121,115,116,101,109,160,160,160,160,160
  25. 26 DATA160,160,160,160,160,160,160,76,74,160,50,65,160,160,160,160,19,8,71,69
  26. 27 DATA79,83,32,102,111,114,109,97,116,32,86,49,46,48,66,128,0,0,0,0,0,0,0,0,0
  27. 28 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,,0,0
  28. 29 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-2,18,1,-1,0,18,9,194,19,17
  29. 30 DATA71,69,79,83,160,160,160,160,160,160,160,160,160,160,160,160,19,9,0,12
  30. 31 DATA86,4,7,12,0,2,0,0,0,194,19,15,71,69,79,83,32,66,79,79,84,160,160,160,160
  31. 32 DATA160,160,160,19,7,0,12,88,7,6,13,0,6,0,0,0,195,19,0,71,69,79,83,32,75
  32. 33 DATA69,82,78,65,76,160,160,160,160,160,19,11,1,12,88,7,6,13,0,91,0,0,0,131
  33. 34 DATA2,2,68,69,83,75,32,84,79,80,160,160,160,160,160,160,160,160,2,15,1
  34. 35 DATA4,88,10,11,17,2,119,0,0,0,131,1,17,74,79,89,83,84,73,67,75,160,160,160
  35. 36 DATA160,160,160,160,160,1,9,0,10,86,10,2,12,0,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  36. 37 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  37. 38 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,131,14,3,75,79,78,70,73,71,85,82
  38. 39 DATA73,69,82,69,78,160,160,160,8,1,1,14,88,9,21,17,11,78,0,-3,-2,18,0,-1,145
  39. 40 DATA105,99,104,101,114,104,101,105,116,115,121,115,116,121,109,-3
  40.