home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 65 / 64er_Magazin_Sonderheft_65_19xx_Markt__Technik_de_Side_B.d64 / find_repl.bas (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  1.2 KB  |  21 lines
  1. 0 fort=0to297:reada:poke50000+t,a:next
  2. 1 input"speichern ";a$:ifa$<>"j"thenend
  3. 2 poke44,195:poke43,80:poke46,196:poke45,134:save"find/replace",8,1:sys64763
  4. 3 :
  5. 4 data169,0,133,95,133,90,133,88,169,160,133,96,169,192,133,91,133,89,32
  6. 5 data191,163,169,96,141,14,167,169,144,141,64,167,169,230,141,79,168,169
  7. 6 data1,141,80,168,32,253,174,32,158,173,32,163,182,32,128,180,141,15,196
  8. 7 data168,177,98,153,122,196,136,16,248,132,169,132,170,169,0,133,167,133
  9. 8 data168,133,172,133,173,141,53,196,32,121,0,201,44,208,59,32,115,0,32
  10. 9 data158,173,165,13,16,22,32,163,182,205,15,196,208,9,142,58,196,140,59
  11. 10 data196,76,159,195,162,23,76,58,164,32,247,183,132,167,133,168,32,121
  12. 11 data0,201,44,208,13,32,115,0,32,138,173,32,247,183,132,169,133,170,169
  13. 12 data54,133,1,165,44,166,43,133,96,134,95,160,1,177,95,240,90,162,0,160
  14. 13 data4,177,95,240,74,189,122,196,201,63,240,7,209,95,240,3,162,0,36,232
  15. 14 data200,224,0,208,232,140,51,196,160,2,32,8,167,197,168,144,42,208,4
  16. 15 data228,167,144,36,197,170,240,4,176,30,144,6,228,169,240,2,176,22,160
  17. 16 data0,162,0,240,10,202,189,255,255,136,145,95,202,16,247,32,195,166,32
  18. 17 data219,252,160,0,32,8,167,76,236,195,230,1,169,13,32,71,171,32,71,171
  19. 18 data166,172,165,173,32,205,189,169,104,160,196,76,30,171,32,69,78,84
  20. 19 data82,73,69,83,32,70,79,85,78,68,46,13,13,0
  21.