## Keyboard shortcuts

Press `←` or `→` to navigate between chapters

Press `S` or `/` to search in the book

Press `?` to show this help

Press `Esc` to hide this help

# M740

Assembler Code

    seg000:81D8
    seg000:81D8 ; =============== S U B R O U T I N E =======================================
    seg000:81D8
    seg000:81D8
    seg000:81D8 sub_81D8:                               ; CODE XREF: seg000:8F8C↓p
    seg000:81D8                 lda     3, X
    seg000:81DA                 pha
    seg000:81DB                 jsr     sub_815F
    seg000:81DE                 jsr     sub_818C
    seg000:81E1                 lda     $FB, X
    seg000:81E3                 sta     0, X
    seg000:81E5                 lda     $FC, X
    seg000:81E7                 sta     1, X
    seg000:81E9                 pla
    seg000:81EA                 bpl     locret_81FD
    seg000:81EC                 lda     0, X
    seg000:81EE                 eor     #$FF
    seg000:81F0                 clc
    seg000:81F1                 adc     #1
    seg000:81F3                 sta     0, X
    seg000:81F5                 lda     1, X
    seg000:81F7                 eor     #$FF
    seg000:81F9                 adc     #0
    seg000:81FB                 sta     1, X
    seg000:81FD
    seg000:81FD locret_81FD:                            ; CODE XREF: sub_81D8+12↑j
    seg000:81FD                 rts
    seg000:81FD ; End of function sub_81D8
    seg000:81FD
    seg000:81FE
    seg000:81FE ; =============== S U B R O U T I N E =======================================
    seg000:81FE
    seg000:81FE
    seg000:81FE sub_81FE:                               ; CODE XREF: seg000:8C2B↓p
    seg000:81FE                                         ; sub_9D0C+1↓j
    seg000:81FE                 lda     3, X