home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1987 November / 64er_Magazin_87-11_1987_Markt__Technik_de.d64 / stimme#4 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1987-01-01  |  552 b   |  16 lines
  1. 1 data169,21,141,24,3,169,192,141,25,3,169,129,141,13,221,169,17,141,14,221,96
  2. 2 data72,138,72,152,72,173,13,221,41,1,208,3,76,86,254,165,2,208,8,169,15
  3. 3 data141,24,212,76,188,254,169,15,73,4,141,24,212,141,49,192,76,188,254
  4. 4 data169,71,141,24,3,169,254,141,25,3,96
  5. 9 print"> stimme #4 < ":a=0
  6. 10 forb=0to71:readq:poke49152+b,q:a=a+q:next
  7. 11 ifa<>7897thenprint"> fehler !! <":end
  8. 12 print"> aktiviert <":sys49152
  9. 13 poke56581,7:forb=0to2:poke2,1:fora=0to50:nexta:poke2,0:fora=0to20:nexta,b
  10. 14 sys49213
  11. 15 rem
  12. 16 rem      stimme #4 version 1.0
  13. 17 rem               von
  14. 18 rem         christoph  joch
  15. 19 rem
  16.