home *** CD-ROM | disk | FTP | other *** search
/ Publication 18 / Publication_18_19xx_Civitas_de_Side_B.d64 / zeilenmarker.bas (.txt) < prev   
Commodore BASIC  |  2023-02-26  |  384b  |  13 lines
  1. 100 sys57812("zeilenmarker.ass"),8,1:poke780,0:sys65493
  2. 101 poke53272,23:poke53281,6:poke53280,14:
  3. 102 print"[147][154]  [218]eilenmarker v3 by [218]eitgeist/[195]iv/[215]il  "
  4. 103 input" [210]asterfarbe     ";rf
  5. 104 input" [194]ildschirmfarbe ";bf
  6. 105 input" [195]harset         ";n$
  7. 106 print" [201]n [207]rdnung(j/n) ? ";
  8. 107 geta$:ifa$="n"then102
  9. 108 ifa$="j"thenprinta$:goto110
  10. 109 goto107
  11. 110 poke780,.:poke781,.:poke782,32:sys57812(n$),8,1:sys65493
  12. 111 poke49154,rf:poke49155,bf:sys49156
  13.