home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1985 July / 64er_Magazin_85-07_1985_Markt__Technik_de.d64 / cent.listing2 (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  429b  |  13 lines
  1. 10 poke56332,219:rem setzt schluessel
  2. 20 poke822,60:poke823,3:rem setzt zeiger
  3. 30 i=0:restore
  4. 40 reada:ifa<0then100
  5. 50 poke828+i,a:i=i+1
  6. 60 goto40
  7. 100 print"[147]benutzerschnittstelle aktiv!!!"
  8. 110 end
  9. 32000 data104,201,255,240,4,72,76,124,228,72,152,72,160,0,185,91,3,32,183,228
  10. 32001 data200,192,37,208,245,104,168,104,76,142,228,67,54,52,32,67,69,78,84,82
  11. 32002 data79,78,32,77,73,84,32,66,69,78,85,84,90,69,82,83,67,72,78,73,84,84,83
  12. 32003 data84,69,76,76,69,-55
  13.