home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1987 June / 64er_Magazin_87-06_1987_Markt__Technik_de_Side_B.d64 / basicstart-mache (.txt) next >
Commodore BASIC  |  2022-10-26  |  609b  |  21 lines
  1. 1 rem basicstart-macher
  2. 2 rem         *
  3. 3 rem  germano caronni
  4. 4 rem  greubstelstr.10
  5. 5 rem ch-5430 wettingen
  6. 6 rem tel.0041/56262574
  7. 7 rem         *
  8. 10 poke53281,0:poke53280,0:print"[147]"
  9. 20 print"dieses programm erzeugt ein file"
  10. 30 print"das von 820 - 827 geladen werden"
  11. 40 print"kann und mit sys 820 ein basic-"
  12. 50 print"run simuliert."
  13. 60 print"dazu gedacht auch basic-prg. und"
  14. 70 print"maschinenenspr. gemischt zusammen-"
  15. 80 print"zusetzen"
  16. 90 print"                                g.c"
  17. 100 input"taste";a$
  18. 110 open2,8,2,"basic-start,p,w"
  19. 120 print#2,chr$(820and255);chr$(820/256);chr$(169);chr$(0);chr$(32);
  20. 130 print#2,chr$(113);chr$(168);chr$(76);chr$(174);chr$(167);:close2:print"[147]"
  21.