home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_95-06_1995_-_de_Side_A.d64 / vektor-reset (.txt) < prev   
Commodore BASIC  |  2023-02-26  |  848b  |  26 lines

  1. 50 poke53280,12:poke53281,11
  2. 100 print"[147]              [214][197][203][212][207][210]-[210][197][211][197][212]              [146]"
  3. 110 print"[196]ieses [208]rogramm setzt die [196]atei"
  4. 120 print"'[214][197][203][212][207][210].[207][194][202]' wieder in ihren [213]rsprungs-"
  5. 130 print"[218]ustand zurueck, indem es sie mit den"
  6. 140 print"[196]aten von '[214][197][203][212][207][210].[207][204][196]' ueberschreibt."
  7. 150 print"[215]enden [211]ie dieses [208]rogramm nur bei in-"
  8. 160 print"korrekter [198]unktion von '[214]ektorrechnung'"
  9. 170 print"an. [200]ierbei gehen ggf. gemachte [196]rucker-";
  10. 180 print"[197]instellungen [150]unwiederruflich verloren!"
  11. 190 print:print"[153][205]oechten [211]ie das [208]rogramm wirklich"
  12. 200 print"zuruecksetzen ([202]=[202]a, [206]=[206]ein) ? ";
  13. 210 geta$:ifa$=""then210
  14. 220 printa$:ifa$="j"then300
  15. 230 print:print"[150]*** [208]rogramm abgebrochen!"
  16. 240 end
  17. 300 print:print"[211]etze [208]arameterfile zurueck...";
  18. 305 open1,8,15
  19. 310 print#1,"s:vektor      .obj"
  20. 320 print#1,"c:vektor      .obj=vektor      .old"
  21. 330 close1
  22. 340 print"fertig!"
  23. 350 print:print"[194]itte laden und starten [211]ie '[214]ektor-"
  24. 360 print"[210]echnung' nun von neuem."
  25. 370 end
  26.