Listschutz

Es gibt 41 Antworten in diesem Thema, welches 7.497 mal aufgerufen wurde. Der letzte Beitrag (29. Juli 2011 um 08:30) ist von Paradroid.

  • hi,

    also einfach und banal ist folgendes :

    lade dein programm und füge folgende zeilen ein:

    Code
    0 sys 2062::::::::::::::: 
    hier folgt dein Programm 
    am Programmende folgende Zeilen (zb.60000) 
    60000 poke2077,0:poke2078,0:poke2049,12 
    60001 for i=0 to 14:read a:poke 2059+i,a:next 
    60002 data 0,0,0,169,27,133,43,169,234,141,40,3,76,113,168

    wichtig! gib die Zeile 0 so ein wie sie da steht die : sind als platzhalter für das kurze maschinenprg

    in den datazeilen gedacht!

    starte das ganze mir run 60000

    nach list erscheint nur noch die syszeile

    jetzt kannst du das programm speichern am besten unter einem neuen namen und starten.

    kurz erklärt:

    poke 2077,0:poke 2078,0 ändern die 1.Zeilennr. deines Programms in Zeilennr.0 !

    poke 2049,12 ändert den Zeilenlink der sys-Zeile, damit nur noch die syszeile beim listen sichtbar ist.

    die folgende schleife schreibt das maschinenprogramm in den speicher, wo jetzt die doppelpunkte sind

    das maschinenprogramm :

    Code
    $080b: 00 brk ; geben das 
    $080c: 00 brk ;ende des 
    $080d: 00 brk ;programms vor 
    $080e: a9 1b lda #$1b ;neuen basicanfang 
    $0810: 85 2b sta #$2b ;setzen 
    $0812: a9 ea lda #$ea ;run-stop restore 
    $0814: 8d 28 03 sta $0328 ;sperren 
    $0817: 4c 71 a8 jmp $a871 ;run routine