$CB20/52000:   M-R memory read

Jump from $CB10:

CB20: B1 6F     LDA ($6F),Y     ; read byte
CB22: 85 85     STA $85
CB24: AD 74 02  LDA $0274       ; length of command line
CB27: C9 06     CMP #$06        ; less than 6?
CB29: 90 1A     BCC $CB45       ; yes
CB2B: AE 05 02  LDX $0205       ; number
CB2E: CA        DEX
CB2F: F0 14     BEQ $CB45       ; only one byte?
CB31: 8A        TXA             ; number of bytes
CB32: 18        CLC
CB33: 65 6F     ADC $6F         ; plus start address
CB35: E6 6F     INC $6F
CB37: 8D 49 02  STA $0249       ; end pointer
CB3A: A5 6F     LDA $6F
CB3C: 85 A5     STA $A5         ; buffer pointer for error message
CB3E: A5 70     LDA $70         ; set to start address for 'M-R'
CB40: 85 A6     STA $A6
CB42: 4C 43 D4  JMP $D443       ; byte out

Jump from $CB29, $CB2F:

CB45: 20 EB D0  JSR $D0EB       ; open read channel
CB48: 4C 3A D4  JMP $D43A       ; byte out

Jump from $CAFD, $CB1B:

CB4B: A9 31     LDA #$31
CB4D: 4C C8 C1  JMP $C1C8       ; 31, 'syntax error'

    Previous Page / Next Page