$E07C/57468:   Write a byte in a record

E07C: 20 05 E1  JSR $E105
E07F: 20 93 DF  JSR $DF93
E082: 0A        ASL
E083: AA        TAX
E084: A5 85     LDA $85
E086: 81 99     STA ($99,X)
E088: B4 99     LDY $99,X
E08A: C8        INY
E08B: D0 09     BNE $E096
E08D: A4 82     LDY $82
E08F: B9 C1 00  LDA $C1,Y
E092: F0 0A     BEQ $E09E
E094: A0 02     LDY #$02
E096: 98        TYA
E097: A4 82     LDY $82
E099: D9 C1 00  CMP $C1,Y
E09C: D0 05     BNE $E0A3
E09E: A9 20     LDA #$20
E0A0: 4C 97 DD  JMP $DD97
E0A3: F6 99     INC $99,X
E0A5: D0 03     BNE $E0AA
E0A7: 20 3C E0  JSR $E03C
E0AA: 60        RTS

    Previous Page / Next Page