Kanal oeffnen ($cdd2)

Einsprung von $8BFA, $8C2F, $8C44:

8C0F: A6 67     LDX $67          Parameternummer holen (1 Parameter=1 Byte)
8C11: E6 67     INC $67          auf naechsten Parameter schalten
8C13: BD 9C 02  LDA $029C,X      Wert aus Kommandozeile
8C16: A8        TAY              (SA des Direktzugriffkanals)
8C17: 88        DEY
8C18: 88        DEY              >=2 und <=14 ?
8C19: C0 0D     CPY #$0D
8C1B: 90 05     BCC $8C22        ja, ==>

Einsprung von $8C27:

8C1D: A9 70     LDA #$70
8C1F: 4C 7C 80  JMP $807C        70, No Channel

Einsprung von $8C1B:

8C22: 85 52     STA $52          als aktuelle SA merken
8C24: 20 27 90  JSR $9027        Kanalnummer holen
8C27: B0 F4     BCS $8C1D        Kanal in Ordnung ? nein, ==>
8C29: 20 11 9F  JSR $9F11        aktiven Puffer holen
8C2C: 85 6C     STA $6C          und merken
8C2E: 60        RTS
    Previous Page / Next Page