$DCDA/56538:   Construct a new block

DCDA: 20 A9 F1  JSR $F1A9
DCDD: A9 01     LDA #$01
DCDF: 20 DF D1  JSR $D1DF
DCE2: 20 D0 D6  JSR $D6D0
DCE5: 20 B6 DC  JSR $DCB6
DCE8: A6 82     LDX $82
DCEA: AD 4A 02  LDA $024A
DCED: 48        PHA
DCEE: 0A        ASL
DCEF: 05 7F     ORA $7F
DCF1: 95 EC     STA $EC,X
DCF3: 68        PLA
DCF4: C9 04     CMP #$04
DCF6: F0 05     BEQ $DCFD
DCF8: A9 01     LDA #$01
DCFA: 95 F2     STA $F2,X
DCFC: 60        RTS
DCFD: A4 83     LDY $83
DCFF: B9 2B 02  LDA $022B,Y
DD02: 29 3F     AND #$3F
DD04: 09 40     ORA #$40
DD06: 99 2B 02  STA $022B,Y
DD09: AD 58 02  LDA $0258
DD0C: 95 C7     STA $C7,X
DD0E: 20 8E D2  JSR $D28E
DD11: 10 03     BPL $DD16
DD13: 4C 0F D2  JMP $D20F
DD16: A6 82     LDX $82
DD18: 95 CD     STA $CD,X
DD1A: 20 C1 DE  JSR $DEC1
DD1D: 20 1E F1  JSR $F11E
DD20: A5 80     LDA $80
DD22: 8D 59 02  STA $0259
DD25: A5 81     LDA $81
DD27: 8D 5A 02  STA $025A
DD2A: A6 82     LDX $82
DD2C: B5 CD     LDA $CD,X
DD2E: 20 D3 D6  JSR $D6D3
DD31: A9 00     LDA #$00
DD33: 20 E9 DE  JSR $DEE9
DD36: A9 00     LDA #$00
DD38: 20 8D DD  JSR $DD8D
DD3B: A9 11     LDA #$11
DD3D: 20 8D DD  JSR $DD8D
DD40: A9 00     LDA #$00
DD42: 20 8D DD  JSR $DD8D
DD45: AD 58 02  LDA $0258
DD48: 20 8D DD  JSR $DD8D
DD4B: A5 80     LDA $80
DD4D: 20 8D DD  JSR $DD8D
DD50: A5 81     LDA $81
DD52: 20 8D DD  JSR $DD8D
DD55: A9 10     LDA #$10
DD57: 20 E9 DE  JSR $DEE9
DD5A: 20 3E DE  JSR $DE3E
DD5D: A5 80     LDA $80
DD5F: 20 8D DD  JSR $DD8D
DD62: A5 81     LDA $81
DD64: 20 8D DD  JSR $DD8D
DD67: 20 6C DE  JSR $DE6C
DD6A: 20 99 D5  JSR $D599
DD6D: A9 02     LDA #$02
DD6F: 20 C8 D4  JSR $D4C8
DD72: A6 82     LDX $82
DD74: 38        SEC
DD75: A9 00     LDA #$00
DD77: F5 C7     SBC $C7,X
DD79: 95 C1     STA $C1,X
DD7B: 20 E2 E2  JSR $E2E2
DD7E: 20 19 DE  JSR $DE19
DD81: 20 5E DE  JSR $DE5E
DD84: 20 99 D5  JSR $D599
DD87: 20 F4 EE  JSR $EEF4
DD8A: 4C 98 DC  JMP $DC98

    Previous Page / Next Page