BTII - Adventurer's Guild

[Darendor]

BT2 Character Disk
"FILE6095010" PRG Adventurer's Guild?
#$EA | 234 | EOR all bytes against 11101010
15 blocks; 3789 bytes (70EA to 7FB7 Inclusive; 9A00 - A8CD)

The Adventurer's Guild file.

The code at the very beginning has an unclear purpose. $9A78 is when the
code "starts". Or something.

Starting at $A79F, there are 3 text strings with no "DC" end character: "The Princess", "No Cheating!", and "Doppleganger". They aren't referenced anywhere within the file.

Also intriguing is this code snippet:

Code: Select all

.C:9e20  99 00 08    STA $0800,Y
.C:9e23  C8          INY
.C:9e24  D0 FA       BNE $9E20
.C:9e26  EE 22 9E    INC $9E22
.C:9e29  AD 22 9E    LDA $9E22
.C:9e2c  C9 20       CMP #$20
.C:9e2e  D0 05       BNE $9E35
.C:9e30  A9 40       LDA #$40
.C:9e32  8D 22 9E    STA $9E22
.C:9e35  CA          DEX
.C:9e36  D0 E8       BNE $9E20

It appears to modify itself at 9e20 and 9e22. I don't get why.

Code: Select all

.C:9a00  A2 03       LDX #$03
.C:9a02  B5 78       LDA $78,X
.C:9a04  F0 04       BEQ $9A0A
.C:9a06  A9 01       LDA #$01
.C:9a08  95 78       STA $78,X
.C:9a0a  CA          DEX
.C:9a0b  10 F5       BPL $9A02
.C:9a0d  85 CE       STA $CE
.C:9a0f  A9 01       LDA #$01
.C:9a11  85 DA       STA $DA
.C:9a13  A6 7C       LDX $7C
.C:9a15  F0 02       BEQ $9A19
.C:9a17  85 7C       STA $7C
.C:9a19  A9 06       LDA #$06
.C:9a1b  85 44       STA $44
.C:9a1d  A5 44       LDA $44
.C:9a1f  0A          ASL A
.C:9a20  AA          TAX
.C:9a21  BD 81 A7    LDA $A781,X
.C:9a24  85 50       STA $50
.C:9a26  BD 82 A7    LDA $A782,X
.C:9a29  85 51       STA $51
.C:9a2b  A0 00       LDY #$00
.C:9a2d  B1 50       LDA ($50),Y
.C:9a2f  F0 43       BEQ $9A74
.C:9a31  A0 0B       LDY #$0B
.C:9a33  B1 50       LDA ($50),Y
.C:9a35  D9 9F A7    CMP $A79F,Y
.C:9a38  D0 19       BNE $9A53
.C:9a3a  88          DEY
.C:9a3b  10 F6       BPL $9A33
.C:9a3d  A0 14       LDY #$14
.C:9a3f  B1 50       LDA ($50),Y
.C:9a41  10 31       BPL $9A74
.C:9a43  A9 00       LDA #$00
.C:9a45  91 50       STA ($50),Y
.C:9a47  A0 0B       LDY #$0B
.C:9a49  B9 AB A7    LDA $A7AB,Y
.C:9a4c  91 50       STA ($50),Y
.C:9a4e  88          DEY
.C:9a4f  10 F8       BPL $9A49
.C:9a51  30 21       BMI $9A74
.C:9a53  A0 4D       LDY #$4D
.C:9a55  B1 50       LDA ($50),Y
.C:9a57  F0 1B       BEQ $9A74
.C:9a59  A0 0E       LDY #$0E
.C:9a5b  B9 B7 A7    LDA $A7B7,Y
.C:9a5e  91 50       STA ($50),Y
.C:9a60  88          DEY
.C:9a61  10 F8       BPL $9A5B
.C:9a63  A9 00       LDA #$00
.C:9a65  A0 24       LDY #$24
.C:9a67  91 50       STA ($50),Y
.C:9a69  C8          INY
.C:9a6a  C0 30       CPY #$30
.C:9a6c  D0 F9       BNE $9A67
.C:9a6e  A0 50       LDY #$50
.C:9a70  C0 60       CPY #$60
.C:9a72  90 F3       BCC $9A67
.C:9a74  C6 44       DEC $44
.C:9a76  10 A5       BPL $9A1D
.C:9a78  E6 C1       INC $C1		Pause time?
.C:9a7a  A2 19       LDX #$19
.C:9a7c  20 1B 08    JSR $081B		Display picture #$19
.C:9a7f  20 E1 08    JSR $08E1		Clear text window.
.C:9a82  A0 A2       LDY #$A2
.C:9a84  A2 BF       LDX #$BF
.C:9a86  20 06 08    JSR $0806		"Thou art in the Guild of..."
.C:9a89  A9 A2       LDA #$A2
.C:9a8b  85 59       STA $59
.C:9a8d  A9 B5       LDA #$B5
.C:9a8f  85 58       STA $58
.C:9a91  20 0F 08    JSR $080F		Display "The Guild" caption
.C:9a94  20 78 08    JSR $0878		Get keypress
.C:9a97  20 87 08    JSR $0887		Evaluate keypress
.C:9a9a  C9 C3       CMP #$C3
.C:9a9c  F0 71       BEQ $9B0F		Check roster?  Go $9b0f
.C:9a9e  C9 D2       CMP #$D2
.C:9aa0  D0 03       BNE $9AA5		Remove member?  No?  Go $9aa5
.C:9aa2  4C B5 9F    JMP $9FB5
.C:9aa5  C9 C1       CMP #$C1
.C:9aa7  D0 03       BNE $9AAC		Add member?  No?  Go $9aac
.C:9aa9  4C 53 9E    JMP $9E53
.C:9aac  C9 C4       CMP #$C4
.C:9aae  D0 03       BNE $9AB3		Disk options?  No?  Go $9ab3
.C:9ab0  4C 35 9B    JMP $9B35
.C:9ab3  C9 CE       CMP #$CE
.C:9ab5  F0 52       BEQ $9B09		New order?  Go 9b09
.C:9ab7  C9 C5       CMP #$C5
.C:9ab9  D0 3D       BNE $9AF8		Exit?  No?  Go $9af8
.C:9abb  20 05 A2    JSR $A205
.C:9abe  B0 D4       BCS $9A94		Any other key, go back to $9a94
.C:9ac0  A6 24       LDX $24		Begin exit routine
.C:9ac2  BD F4 9A    LDA $9AF4,X
.C:9ac5  85 24       STA $24		Spin party 180 degrees
.C:9ac7  20 DC 9A    JSR $9ADC
.C:9aca  A9 1F       LDA #$1F
.C:9acc  85 EC       STA $EC
.C:9ace  A9 00       LDA #$00
.C:9ad0  85 EB       STA $EB
.C:9ad2  85 42       STA $42
.C:9ad4  85 2F       STA $2F
.C:9ad6  20 E1 08    JSR $08E1		Clear text window.
.C:9ad9  4C 00 90    JMP $9000		Back to main program.
.C:9adc  A5 24       LDA $24
.C:9ade  F0 0B       BEQ $9AEB		Facing north?  Go $9aeb
.C:9ae0  C9 01       CMP #$01
.C:9ae2  F0 0D       BEQ $9AF1		Facing east?  Go $9af1
.C:9ae4  C9 02       CMP #$02
.C:9ae6  F0 06       BEQ $9AEE		Facing south?  Go $9aee
.C:9ae8  C6 29       DEC $29		Move party 1 square west
.C:9aea  60          RTS
.C:9aeb  E6 28       INC $28		Move party 1 square north
.C:9aed  60          RTS
.C:9aee  C6 28       DEC $28		Move party 1 square south
.C:9af0  60          RTS
.C:9af1  E6 29       INC $29		Move party 1 square east
.C:9af3  60          RTS
.C:9af4  02          JAM		Data field...
.C:9af5  03 00       SLO ($00,X)
.C:9af7  01 C9       ORA ($C9,X)
.C:9af9  B0 90       BCS $9A8B
.C:9afb  98          TYA
.C:9afc  C9 B7       CMP #$B7
.C:9afe  B0 94       BCS $9A94
.C:9b00  38          SEC
.C:9b01  E9 B0       SBC #$B0
.C:9b03  20 51 08    JSR $0851
.C:9b06  4C 78 9A    JMP $9A78
.C:9b09  20 4E 08    JSR $084E
.C:9b0c  4C 7F 9A    JMP $9A7F
.C:9b0f  20 1A 9B    JSR $9B1A
.C:9b12  B0 03       BCS $9B17
.C:9b14  20 12 08    JSR $0812
.C:9b17  4C 7F 9A    JMP $9A7F
.C:9b1a  A9 80       LDA #$80
.C:9b1c  20 2F 09    JSR $092F
.C:9b1f  90 10       BCC $9B31
.C:9b21  A0 A3       LDY #$A3
.C:9b23  A2 B8       LDX #$B8
.C:9b25  20 06 08    JSR $0806		"[CR][CR]Insert CHARACTER disk..."
.C:9b28  20 78 08    JSR $0878		Get keypress
.C:9b2b  C9 9B       CMP #$9B
.C:9b2d  F0 04       BEQ $9B33		<- pressed?  Go $9b33
.C:9b2f  D0 E9       BNE $9B1A
.C:9b31  18          CLC
.C:9b32  60          RTS
.C:9b33  38          SEC
.C:9b34  60          RTS
.C:9b35  20 E1 08    JSR $08E1		Clear text window.
.C:9b38  A0 A3       LDY #$A3
.C:9b3a  A2 4C       LDX #$4C
.C:9b3c  20 06 08    JSR $0806		"Disk Options:..."
.C:9b3f  20 78 08    JSR $0878		Get keypress
.C:9b42  20 87 08    JSR $0887		Evaluate keypress
.C:9b45  C9 C3       CMP #$C3
.C:9b47  F0 23       BEQ $9B6C		Create member?  Go $9b6c
.C:9b49  C9 C5       CMP #$C5
.C:9b4b  D0 03       BNE $9B50		Exit?  No?  Go $9b50
.C:9b4d  4C 7F 9A    JMP $9A7F
.C:9b50  C9 CC       CMP #$CC
.C:9b52  D0 03       BNE $9B57		Leave game?  No?  Go $9b57
.C:9b54  4C EA 9D    JMP $9DEA
.C:9b57  C9 D3       CMP #$D3
.C:9b59  D0 03       BNE $9B5E		Save party?  No?  Go 9b5e
.C:9b5b  4C 7D A0    JMP $A07D
.C:9b5e  C9 D2       CMP #$D2
.C:9b60  D0 03       BNE $9B65		Rename member?  No?  Go $9b65
.C:9b62  4C 4F A1    JMP $A14F
.C:9b65  C9 C4       CMP #$C4
.C:9b67  D0 D6       BNE $9B3F		Delete member?  No?  Go $9b3f
.C:9b69  4C 98 9D    JMP $9D98
.C:9b6c  20 E1 08    JSR $08E1		Clear text window.
.C:9b6f  A2 00       LDX #$00
.C:9b71  8A          TXA
.C:9b72  9D 00 B4    STA $B400,X
.C:9b75  E8          INX
.C:9b76  10 FA       BPL $9B72
.C:9b78  A0 A4       LDY #$A4
.C:9b7a  A2 F5       LDX #$F5
.C:9b7c  20 06 08    JSR $0806		"Select a race..."
.C:9b7f  20 78 08    JSR $0878		Get keypress
.C:9b82  C9 9B       CMP #$9B
.C:9b84  F0 AF       BEQ $9B35		<- pressed?  Go $9b35
.C:9b86  C9 B1       CMP #$B1
.C:9b88  90 F5       BCC $9B7F		If number less than 1, go $9b7f
.C:9b8a  C9 B8       CMP #$B8
.C:9b8c  B0 F1       BCS $9B7F		If number more than 8, go $9b7f
.C:9b8e  38          SEC
.C:9b8f  E9 B1       SBC #$B1
.C:9b91  8D 39 B4    STA $B439
.C:9b94  AA          TAX
.C:9b95  BD 77 A7    LDA $A777,X
.C:9b98  85 71       STA $71
.C:9b9a  20 93 08    JSR $0893
.C:9b9d  A0 00       LDY #$00
.C:9b9f  20 90 08    JSR $0890
.C:9ba2  A6 71       LDX $71
.C:9ba4  A5 5A       LDA $5A
.C:9ba6  29 07       AND #$07
.C:9ba8  18          CLC
.C:9ba9  7D C2 A4    ADC $A4C2,X
.C:9bac  C9 13       CMP #$13
.C:9bae  90 02       BCC $9BB2
.C:9bb0  A9 12       LDA #$12
.C:9bb2  99 B0 03    STA $03B0,Y
.C:9bb5  E6 71       INC $71
.C:9bb7  C8          INY
.C:9bb8  C0 05       CPY #$05
.C:9bba  90 E3       BCC $9B9F
.C:9bbc  20 90 08    JSR $0890
.C:9bbf  A5 5B       LDA $5B
.C:9bc1  29 0F       AND #$0F
.C:9bc3  18          CLC
.C:9bc4  69 04       ADC #$04
.C:9bc6  8D 31 B4    STA $B431
.C:9bc9  8D 33 B4    STA $B433
.C:9bcc  8D B5 03    STA $03B5
.C:9bcf  20 E1 08    JSR $08E1		Clear text window.
.C:9bd2  A0 A5       LDY #$A5
.C:9bd4  A2 76       LDX #$76
.C:9bd6  20 06 08    JSR $0806		"Character X"
.C:9bd9  A9 01       LDA #$01
.C:9bdb  20 66 08    JSR $0866
.C:9bde  AE 39 B4    LDX $B439
.C:9be1  8A          TXA
.C:9be2  F0 08       BEQ $9BEC
.C:9be4  A9 00       LDA #$00
.C:9be6  18          CLC
.C:9be7  69 0A       ADC #$0A
.C:9be9  CA          DEX
.C:9bea  D0 FA       BNE $9BE6
.C:9bec  AA          TAX
.C:9bed  85 65       STA $65
.C:9bef  A0 00       LDY #$00
.C:9bf1  BD 7C A4    LDA $A47C,X
.C:9bf4  F0 2B       BEQ $9C21
.C:9bf6  A9 A8       LDA #$A8
.C:9bf8  20 03 08    JSR $0803
.C:9bfb  98          TYA
.C:9bfc  18          CLC
.C:9bfd  69 B0       ADC #$B0
.C:9bff  20 03 08    JSR $0803
.C:9c02  A9 A9       LDA #$A9
.C:9c04  20 03 08    JSR $0803
.C:9c07  E6 55       INC $55
.C:9c09  98          TYA
.C:9c0a  48          PHA
.C:9c0b  8A          TXA
.C:9c0c  48          PHA
.C:9c0d  98          TYA
.C:9c0e  0A          ASL A
.C:9c0f  A8          TAY
.C:9c10  BE 5D A4    LDX $A45D,Y
.C:9c13  B9 5E A4    LDA $A45E,Y
.C:9c16  A8          TAY
.C:9c17  20 06 08    JSR $0806		[CHOSEN RACE]
.C:9c1a  20 0C 08    JSR $080C
.C:9c1d  68          PLA
.C:9c1e  AA          TAX
.C:9c1f  68          PLA
.C:9c20  A8          TAY
.C:9c21  E8          INX
.C:9c22  C8          INY
.C:9c23  C0 0A       CPY #$0A
.C:9c25  90 CA       BCC $9BF1
.C:9c27  A9 0E       LDA #$0E
.C:9c29  85 54       STA $54
.C:9c2b  A0 A5       LDY #$A5
.C:9c2d  A2 67       LDX #$67
.C:9c2f  20 06 08    JSR $0806		"<-  to abort"
.C:9c32  20 78 08    JSR $0878		Get keypress
.C:9c35  C9 9B       CMP #$9B
.C:9c37  D0 03       BNE $9C3C		<- pressed?  No?  Go $9c3c
.C:9c39  4C 6C 9B    JMP $9B6C
.C:9c3c  C9 B0       CMP #$B0
.C:9c3e  90 F2       BCC $9C32
.C:9c40  C9 BA       CMP #$BA
.C:9c42  B0 EE       BCS $9C32
.C:9c44  38          SEC
.C:9c45  E9 B0       SBC #$B0
.C:9c47  A8          TAY
.C:9c48  18          CLC
.C:9c49  65 65       ADC $65
.C:9c4b  AA          TAX
.C:9c4c  BD 7C A4    LDA $A47C,X
.C:9c4f  F0 E1       BEQ $9C32
.C:9c51  8C 38 B4    STY $B438
.C:9c54  B9 71 A4    LDA $A471,Y
.C:9c57  8D 3A B4    STA $B43A
.C:9c5a  C0 03       CPY #$03
.C:9c5c  F0 17       BEQ $9C75
.C:9c5e  C0 04       CPY #$04
.C:9c60  F0 1A       BEQ $9C7C
.C:9c62  C0 05       CPY #$05
.C:9c64  F0 1D       BEQ $9C83
.C:9c66  C0 06       CPY #$06
.C:9c68  F0 26       BEQ $9C90
.C:9c6a  C0 08       CPY #$08
.C:9c6c  D0 27       BNE $9C95
.C:9c6e  A9 05       LDA #$05
.C:9c70  8D 48 B4    STA $B448
.C:9c73  D0 20       BNE $9C95
.C:9c75  A9 01       LDA #$01
.C:9c77  8D 41 B4    STA $B441
.C:9c7a  D0 19       BNE $9C95
.C:9c7c  A9 01       LDA #$01
.C:9c7e  8D 42 B4    STA $B442
.C:9c81  D0 12       BNE $9C95
.C:9c83  A9 14       LDA #$14
.C:9c85  8D 44 B4    STA $B444
.C:9c88  8D 45 B4    STA $B445
.C:9c8b  8D 46 B4    STA $B446
.C:9c8e  D0 05       BNE $9C95
.C:9c90  A9 01       LDA #$01
.C:9c92  8D 49 B4    STA $B449
.C:9c95  20 57 08    JSR $0857
.C:9c98  A2 13       LDX #$13
.C:9c9a  A0 03       LDY #$03
.C:9c9c  B9 B8 03    LDA $03B8,Y
.C:9c9f  9D 00 B4    STA $B400,X
.C:9ca2  CA          DEX
.C:9ca3  88          DEY
.C:9ca4  10 F6       BPL $9C9C
.C:9ca6  20 90 08    JSR $0890
.C:9ca9  A5 5A       LDA $5A
.C:9cab  29 7F       AND #$7F
.C:9cad  18          CLC
.C:9cae  69 64       ADC #$64
.C:9cb0  85 63       STA $63
.C:9cb2  A9 00       LDA #$00
.C:9cb4  69 00       ADC #$00
.C:9cb6  85 64       STA $64
.C:9cb8  20 33 08    JSR $0833
.C:9cbb  A9 B4       LDA #$B4
.C:9cbd  85 68       STA $68
.C:9cbf  A9 24       LDA #$24
.C:9cc1  85 67       STA $67
.C:9cc3  20 39 08    JSR $0839
.C:9cc6  A9 01       LDA #$01
.C:9cc8  8D 21 B4    STA $B421
.C:9ccb  8D 23 B4    STA $B423
.C:9cce  AD 38 B4    LDA $B438
.C:9cd1  C9 03       CMP #$03
.C:9cd3  90 11       BCC $9CE6
.C:9cd5  C9 05       CMP #$05
.C:9cd7  B0 0D       BCS $9CE6
.C:9cd9  A5 5B       LDA $5B
.C:9cdb  29 0F       AND #$0F
.C:9cdd  18          CLC
.C:9cde  69 08       ADC #$08
.C:9ce0  8D 35 B4    STA $B435
.C:9ce3  8D 37 B4    STA $B437
.C:9ce6  20 E1 08    JSR $08E1		Clear text window.
.C:9ce9  A0 A4       LDY #$A4
.C:9ceb  A2 E5       LDX #$E5
.C:9ced  20 06 08    JSR $0806		"Enter name --"
.C:9cf0  20 36 08    JSR $0836		Prompt for keyboard input
.C:9cf3  90 03       BCC $9CF8
.C:9cf5  4C 35 9B    JMP $9B35
.C:9cf8  AD 34 03    LDA $0334
.C:9cfb  C9 AA       CMP #$AA
.C:9cfd  D0 05       BNE $9D04
.C:9cff  A9 D8       LDA #$D8
.C:9d01  8D 34 03    STA $0334
.C:9d04  20 1A 9B    JSR $9B1A
.C:9d07  B0 EC       BCS $9CF5
.C:9d09  20 15 08    JSR $0815
.C:9d0c  B0 14       BCS $9D22
.C:9d0e  A0 A6       LDY #$A6
.C:9d10  A2 52       LDX #$52
.C:9d12  20 06 08    JSR $0806		"[CR][CR]There is already a ..."
.C:9d15  A0 A4       LDY #$A4
.C:9d17  A2 01       LDX #$01
.C:9d19  20 06 08    JSR $0806		"[CR][CR]Press Any Key..."
.C:9d1c  20 78 08    JSR $0878		Get keypress
.C:9d1f  4C E6 9C    JMP $9CE6
.C:9d22  20 18 08    JSR $0818
.C:9d25  90 14       BCC $9D3B
.C:9d27  A0 A5       LDY #$A5
.C:9d29  A2 BF       LDX #$BF
.C:9d2b  20 06 08    JSR $0806		"[CR][CR]The roster is already..."
.C:9d2e  A0 A4       LDY #$A4
.C:9d30  A2 01       LDX #$01
.C:9d32  20 06 08    JSR $0806		"[CR][CR]Press Any Key..."
.C:9d35  20 78 08    JSR $0878		Get keypress
.C:9d38  4C 35 9B    JMP $9B35
.C:9d3b  A0 00       LDY #$00
.C:9d3d  8E 5D 9D    STX $9D5D
.C:9d40  B9 34 03    LDA $0334,Y
.C:9d43  59 CF A7    EOR $A7CF,Y
.C:9d46  9D 00 B5    STA $B500,X
.C:9d49  C8          INY
.C:9d4a  E8          INX
.C:9d4b  C0 10       CPY #$10
.C:9d4d  90 F1       BCC $9D40
.C:9d4f  B9 00 B4    LDA $B400,Y
.C:9d52  59 CF A7    EOR $A7CF,Y
.C:9d55  9D 00 B5    STA $B500,X
.C:9d58  E8          INX
.C:9d59  C8          INY
.C:9d5a  10 F3       BPL $9D4F
.C:9d5c  A2 00       LDX #$00
.C:9d5e  A0 00       LDY #$00
.C:9d60  A9 00       LDA #$00
.C:9d62  5D 34 03    EOR $0334,X
.C:9d65  E8          INX
.C:9d66  C8          INY
.C:9d67  C0 0F       CPY #$0F
.C:9d69  90 F7       BCC $9D62
.C:9d6b  C9 00       CMP #$00
.C:9d6d  D0 0E       BNE $9D7D
.C:9d6f  8A          TXA
.C:9d70  18          CLC
.C:9d71  69 61       ADC #$61
.C:9d73  AA          TAX
.C:9d74  BD 00 B5    LDA $B500,X
.C:9d77  18          CLC
.C:9d78  69 01       ADC #$01
.C:9d7a  9D 00 B5    STA $B500,X
.C:9d7d  AE 5D 9D    LDX $9D5D
.C:9d80  20 38 A1    JSR $A138
.C:9d83  99 00 B5    STA $B500,Y
.C:9d86  20 CC 08    JSR $08CC
.C:9d89  90 0A       BCC $9D95
.C:9d8b  A0 A6       LDY #$A6
.C:9d8d  A2 E1       LDX #$E1
.C:9d8f  20 06 08    JSR $0806		"[CR][CR]There has been a write..."
.C:9d92  20 78 08    JSR $0878		Get keypress
.C:9d95  4C 35 9B    JMP $9B35
.C:9d98  20 E1 08    JSR $08E1		Clear text window.
.C:9d9b  A0 A6       LDY #$A6
.C:9d9d  A2 CE       LDX #$CE
.C:9d9f  20 06 08    JSR $0806		"Delete Character[CR][CR]"
.C:9da2  A0 A4       LDY #$A4
.C:9da4  A2 E5       LDX #$E5
.C:9da6  20 06 08    JSR $0806		"Enter name --"
.C:9da9  20 36 08    JSR $0836		Prompt for keyboard input
.C:9dac  90 03       BCC $9DB1
.C:9dae  4C 35 9B    JMP $9B35
.C:9db1  20 1A 9B    JSR $9B1A
.C:9db4  B0 F8       BCS $9DAE
.C:9db6  20 15 08    JSR $0815
.C:9db9  90 14       BCC $9DCF
.C:9dbb  A0 A6       LDY #$A6
.C:9dbd  A2 8F       LDX #$8F
.C:9dbf  20 06 08    JSR $0806		"[CR][CR]There's no one here..."
.C:9dc2  A0 A4       LDY #$A4
.C:9dc4  A2 01       LDX #$01
.C:9dc6  20 06 08    JSR $0806		"[CR][CR]Press Any Key..."
.C:9dc9  20 78 08    JSR $0878		Get keypress
.C:9dcc  4C 35 9B    JMP $9B35
.C:9dcf  A9 00       LDA #$00
.C:9dd1  9D 00 B5    STA $B500,X
.C:9dd4  A9 B5       LDA #$B5
.C:9dd6  85 5F       STA $5F
.C:9dd8  20 CC 08    JSR $08CC
.C:9ddb  90 0A       BCC $9DE7
.C:9ddd  A0 A6       LDY #$A6
.C:9ddf  A2 E1       LDX #$E1
.C:9de1  20 06 08    JSR $0806		"[CR][CR]There has been a write..."
.C:9de4  20 78 08    JSR $0878		Get keypress
.C:9de7  4C 35 9B    JMP $9B35
.C:9dea  20 E1 08    JSR $08E1		Clear text window.
.C:9ded  A0 A5       LDY #$A5
.C:9def  A2 82       LDX #$82
.C:9df1  20 06 08    JSR $0806		"Press RETURN to save off all..."
.C:9df4  20 78 08    JSR $0878		Get keypress
.C:9df7  C9 8D       CMP #$8D
.C:9df9  F0 03       BEQ $9DFE		RETURN pressed?  Go $9dfe
.C:9dfb  4C 35 9B    JMP $9B35
.C:9dfe  20 1A 9B    JSR $9B1A
.C:9e01  B0 F8       BCS $9DFB
.C:9e03  AD 00 B8    LDA $B800
.C:9e06  F0 08       BEQ $9E10
.C:9e08  A9 00       LDA #$00
.C:9e0a  20 F3 9F    JSR $9FF3
.C:9e0d  4C 03 9E    JMP $9E03
.C:9e10  78          SEI
.C:9e11  A9 31       LDA #$31
.C:9e13  8D 14 03    STA $0314
.C:9e16  A9 EA       LDA #$EA
.C:9e18  8D 15 03    STA $0315
.C:9e1b  A0 00       LDY #$00
.C:9e1d  A2 68       LDX #$68
.C:9e1f  98          TYA
.C:9e20  99 00 08    STA $0800,Y
.C:9e23  C8          INY
.C:9e24  D0 FA       BNE $9E20
.C:9e26  EE 22 9E    INC $9E22
.C:9e29  AD 22 9E    LDA $9E22
.C:9e2c  C9 20       CMP #$20
.C:9e2e  D0 05       BNE $9E35
.C:9e30  A9 40       LDA #$40
.C:9e32  8D 22 9E    STA $9E22
.C:9e35  CA          DEX
.C:9e36  D0 E8       BNE $9E20
.C:9e38  A2 07       LDX #$07
.C:9e3a  BD 4B 9E    LDA $9E4B,X
.C:9e3d  9D 00 08    STA $0800,X
.C:9e40  CA          DEX
.C:9e41  10 F7       BPL $9E3A
.C:9e43  A9 03       LDA #$03
.C:9e45  8D 20 D0    STA $D020
.C:9e48  4C 00 08    JMP $0800		Reset machine???
.C:9e4b  A9 37       LDA #$37
.C:9e4d  85 01       STA $01
.C:9e4f  58          CLI
.C:9e50  6C FC FF    JMP ($FFFC)
.C:9e53  20 C0 08    JSR $08C0
.C:9e56  90 03       BCC $9E5B
.C:9e58  4C 94 9A    JMP $9A94
.C:9e5b  20 E1 08    JSR $08E1		Clear text window.
.C:9e5e  A0 A7       LDY #$A7
.C:9e60  A2 0E       LDX #$0E
.C:9e62  20 06 08    JSR $0806		"Load Character--"
.C:9e65  A0 A4       LDY #$A4
.C:9e67  A2 E5       LDX #$E5
.C:9e69  20 06 08    JSR $0806		"Enter name--"
.C:9e6c  20 36 08    JSR $0836		Prompt for keyboard input
.C:9e6f  90 03       BCC $9E74
.C:9e71  4C 7F 9A    JMP $9A7F
.C:9e74  20 33 A2    JSR $A233
.C:9e77  90 0A       BCC $9E83
.C:9e79  A0 A6       LDY #$A6
.C:9e7b  A2 B1       LDX #$B1
.C:9e7d  20 06 08    JSR $0806		"[CR][CR]He's already in the party."
.C:9e80  4C 94 9E    JMP $9E94
.C:9e83  20 1A 9B    JSR $9B1A
.C:9e86  B0 E9       BCS $9E71
.C:9e88  20 15 08    JSR $0815
.C:9e8b  90 14       BCC $9EA1
.C:9e8d  A0 A6       LDY #$A6
.C:9e8f  A2 8F       LDX #$8F
.C:9e91  20 06 08    JSR $0806		"[CR][CR]There's no one here named..."
.C:9e94  A0 A4       LDY #$A4
.C:9e96  A2 01       LDX #$01
.C:9e98  20 06 08    JSR $0806		[CR][CR]Press Any Key..."
.C:9e9b  20 78 08    JSR $0878		Get keypress
.C:9e9e  4C 7F 9A    JMP $9A7F
.C:9ea1  AD 34 03    LDA $0334
.C:9ea4  C9 AA       CMP #$AA
.C:9ea6  F0 6D       BEQ $9F15
.C:9ea8  20 C0 08    JSR $08C0
.C:9eab  20 38 A1    JSR $A138
.C:9eae  D9 00 B5    CMP $B500,Y
.C:9eb1  D0 DA       BNE $9E8D
.C:9eb3  8E FE 9E    STX $9EFE
.C:9eb6  20 83 A2    JSR $A283
.C:9eb9  B0 0A       BCS $9EC5
.C:9ebb  A0 A6       LDY #$A6
.C:9ebd  A2 1B       LDX #$1B
.C:9ebf  20 06 08    JSR $0806		"[CR][CR]Only one Destiny Knight..."
.C:9ec2  4C 94 9E    JMP $9E94
.C:9ec5  A0 00       LDY #$00
.C:9ec7  BD 00 B5    LDA $B500,X
.C:9eca  59 CF A7    EOR $A7CF,Y
.C:9ecd  91 9B       STA ($9B),Y
.C:9ecf  C0 38       CPY #$38
.C:9ed1  D0 06       BNE $9ED9
.C:9ed3  8D CE A7    STA $A7CE
.C:9ed6  4C F9 9E    JMP $9EF9
.C:9ed9  C0 3E       CPY #$3E
.C:9edb  D0 0C       BNE $9EE9
.C:9edd  AD CE A7    LDA $A7CE
.C:9ee0  C9 0B       CMP #$0B
.C:9ee2  90 15       BCC $9EF9
.C:9ee4  A9 03       LDA #$03
.C:9ee6  4C F3 9E    JMP $9EF3
.C:9ee9  C0 24       CPY #$24
.C:9eeb  90 0C       BCC $9EF9
.C:9eed  C0 30       CPY #$30
.C:9eef  B0 08       BCS $9EF9
.C:9ef1  A9 00       LDA #$00
.C:9ef3  59 CF A7    EOR $A7CF,Y
.C:9ef6  9D 00 B5    STA $B500,X
.C:9ef9  E8          INX
.C:9efa  C8          INY
.C:9efb  10 CA       BPL $9EC7
.C:9efd  A2 00       LDX #$00
.C:9eff  20 38 A1    JSR $A138
.C:9f02  99 00 B5    STA $B500,Y
.C:9f05  20 CC 08    JSR $08CC
.C:9f08  90 05       BCC $9F0F
.C:9f0a  A9 00       LDA #$00
.C:9f0c  A8          TAY
.C:9f0d  91 9B       STA ($9B),Y
.C:9f0f  20 48 08    JSR $0848
.C:9f12  4C 7F 9A    JMP $9A7F
.C:9f15  A0 00       LDY #$00
.C:9f17  BD 00 B5    LDA $B500,X
.C:9f1a  59 CF A7    EOR $A7CF,Y
.C:9f1d  99 00 B4    STA $B400,Y
.C:9f20  E8          INX
.C:9f21  C8          INY
.C:9f22  10 F3       BPL $9F17
.C:9f24  A2 FF       LDX #$FF
.C:9f26  E8          INX
.C:9f27  E0 07       CPX #$07
.C:9f29  F0 E7       BEQ $9F12
.C:9f2b  BC C7 A7    LDY $A7C7,X
.C:9f2e  B9 00 B4    LDA $B400,Y
.C:9f31  F0 F3       BEQ $9F26
.C:9f33  A2 00       LDX #$00
.C:9f35  B9 00 B4    LDA $B400,Y
.C:9f38  9D 34 03    STA $0334,X
.C:9f3b  A9 00       LDA #$00
.C:9f3d  99 00 B4    STA $B400,Y
.C:9f40  C8          INY
.C:9f41  E8          INX
.C:9f42  E0 10       CPX #$10
.C:9f44  90 EF       BCC $9F35
.C:9f46  20 33 A2    JSR $A233
.C:9f49  B0 D9       BCS $9F24
.C:9f4b  20 15 08    JSR $0815
.C:9f4e  B0 D4       BCS $9F24
.C:9f50  20 C0 08    JSR $08C0
.C:9f53  B0 BD       BCS $9F12
.C:9f55  20 38 A1    JSR $A138
.C:9f58  D9 00 B5    CMP $B500,Y
.C:9f5b  D0 C7       BNE $9F24
.C:9f5d  8E 9E 9F    STX $9F9E
.C:9f60  20 83 A2    JSR $A283
.C:9f63  90 AD       BCC $9F12
.C:9f65  A0 00       LDY #$00
.C:9f67  BD 00 B5    LDA $B500,X
.C:9f6a  59 CF A7    EOR $A7CF,Y
.C:9f6d  91 9B       STA ($9B),Y
.C:9f6f  C0 38       CPY #$38
.C:9f71  D0 06       BNE $9F79
.C:9f73  8D CE A7    STA $A7CE
.C:9f76  4C 99 9F    JMP $9F99
.C:9f79  C0 3E       CPY #$3E
.C:9f7b  D0 0C       BNE $9F89
.C:9f7d  AD CE A7    LDA $A7CE
.C:9f80  C9 0B       CMP #$0B
.C:9f82  90 15       BCC $9F99
.C:9f84  A9 03       LDA #$03
.C:9f86  4C 93 9F    JMP $9F93
.C:9f89  C0 24       CPY #$24
.C:9f8b  90 0C       BCC $9F99
.C:9f8d  C0 30       CPY #$30
.C:9f8f  B0 08       BCS $9F99
.C:9f91  A9 00       LDA #$00
.C:9f93  59 CF A7    EOR $A7CF,Y
.C:9f96  9D 00 B5    STA $B500,X
.C:9f99  E8          INX
.C:9f9a  C8          INY
.C:9f9b  10 CA       BPL $9F67
.C:9f9d  A2 00       LDX #$00
.C:9f9f  20 38 A1    JSR $A138
.C:9fa2  99 00 B5    STA $B500,Y
.C:9fa5  20 CC 08    JSR $08CC
.C:9fa8  90 05       BCC $9FAF
.C:9faa  A9 00       LDA #$00
.C:9fac  A8          TAY
.C:9fad  91 9B       STA ($9B),Y
.C:9faf  20 48 08    JSR $0848
.C:9fb2  4C 24 9F    JMP $9F24
.C:9fb5  AD 00 B8    LDA $B800
.C:9fb8  D0 03       BNE $9FBD
.C:9fba  4C 94 9A    JMP $9A94
.C:9fbd  20 E1 08    JSR $08E1		Clear text window.
.C:9fc0  A0 A7       LDY #$A7
.C:9fc2  A2 4A       LDX #$4A
.C:9fc4  20 06 08    JSR $0806		"Drop character number (0-6)..."
.C:9fc7  20 78 08    JSR $0878		Get keypress
.C:9fca  C9 B0       CMP #$B0
.C:9fcc  B0 03       BCS $9FD1
.C:9fce  4C 7F 9A    JMP $9A7F
.C:9fd1  C9 B7       CMP #$B7
.C:9fd3  B0 F2       BCS $9FC7
.C:9fd5  38          SEC
.C:9fd6  E9 B0       SBC #$B0
.C:9fd8  48          PHA
.C:9fd9  A5 F6       LDA $F6
.C:9fdb  F0 03       BEQ $9FE0
.C:9fdd  20 BA 08    JSR $08BA
.C:9fe0  20 1A 9B    JSR $9B1A
.C:9fe3  B0 0A       BCS $9FEF
.C:9fe5  68          PLA
.C:9fe6  20 F3 9F    JSR $9FF3
.C:9fe9  20 48 08    JSR $0848
.C:9fec  4C 7F 9A    JMP $9A7F
.C:9fef  68          PLA
.C:9ff0  4C 7F 9A    JMP $9A7F
.C:9ff3  0A          ASL A
.C:9ff4  48          PHA
.C:9ff5  AA          TAX
.C:9ff6  BD 81 A7    LDA $A781,X
.C:9ff9  85 9B       STA $9B
.C:9ffb  BD 82 A7    LDA $A782,X
.C:9ffe  85 9C       STA $9C
.C:a000  A0 00       LDY #$00
.C:a002  B1 9B       LDA ($9B),Y
.C:a004  D0 04       BNE $A00A
.C:a006  68          PLA
.C:a007  4C 7C A0    JMP $A07C
.C:a00a  B1 9B       LDA ($9B),Y
.C:a00c  99 34 03    STA $0334,Y
.C:a00f  C8          INY
.C:a010  C0 10       CPY #$10
.C:a012  90 F6       BCC $A00A
.C:a014  20 15 08    JSR $0815
.C:a017  90 05       BCC $A01E
.C:a019  20 18 08    JSR $0818
.C:a01c  B0 2C       BCS $A04A
.C:a01e  A0 00       LDY #$00
.C:a020  8E 30 A0    STX $A030
.C:a023  B1 9B       LDA ($9B),Y
.C:a025  59 CF A7    EOR $A7CF,Y
.C:a028  9D 00 B5    STA $B500,X
.C:a02b  E8          INX
.C:a02c  C8          INY
.C:a02d  10 F4       BPL $A023
.C:a02f  A2 00       LDX #$00
.C:a031  20 38 A1    JSR $A138
.C:a034  99 00 B5    STA $B500,Y
.C:a037  A9 B5       LDA #$B5
.C:a039  85 5F       STA $5F
.C:a03b  20 CC 08    JSR $08CC
.C:a03e  90 0A       BCC $A04A
.C:a040  A0 A6       LDY #$A6
.C:a042  A2 E1       LDX #$E1
.C:a044  20 06 08    JSR $0806		"[CR][CR]There has been a write..."
.C:a047  20 78 08    JSR $0878		Get keypress
.C:a04a  68          PLA
.C:a04b  C9 0C       CMP #$0C
.C:a04d  B0 24       BCS $A073
.C:a04f  AA          TAX
.C:a050  BD 81 A7    LDA $A781,X
.C:a053  85 9B       STA $9B
.C:a055  BD 82 A7    LDA $A782,X
.C:a058  85 9C       STA $9C
.C:a05a  BD 83 A7    LDA $A783,X
.C:a05d  85 50       STA $50
.C:a05f  BD 84 A7    LDA $A784,X
.C:a062  85 51       STA $51
.C:a064  A0 00       LDY #$00
.C:a066  B1 50       LDA ($50),Y
.C:a068  91 9B       STA ($9B),Y
.C:a06a  C8          INY
.C:a06b  10 F9       BPL $A066
.C:a06d  E8          INX
.C:a06e  E8          INX
.C:a06f  E0 0C       CPX #$0C
.C:a071  90 DD       BCC $A050
.C:a073  A0 00       LDY #$00
.C:a075  98          TYA
.C:a076  99 00 BB    STA $BB00,Y
.C:a079  C8          INY
.C:a07a  10 FA       BPL $A076
.C:a07c  60          RTS
.C:a07d  20 E1 08    JSR $08E1		Clear text window.
.C:a080  A0 A4       LDY #$A4
.C:a082  A2 E5       LDX #$E5
.C:a084  20 06 08    JSR $0806		"Enter name--"
.C:a087  20 36 08    JSR $0836		Prompt for keyboard input
.C:a08a  90 03       BCC $A08F
.C:a08c  4C 35 9B    JMP $9B35
.C:a08f  A2 FE       LDX #$FE
.C:a091  AD 34 03    LDA $0334
.C:a094  C9 AA       CMP #$AA
.C:a096  F0 10       BEQ $A0A8
.C:a098  BD 34 03    LDA $0334,X
.C:a09b  9D 35 03    STA $0335,X
.C:a09e  CA          DEX
.C:a09f  E0 FF       CPX #$FF
.C:a0a1  D0 F5       BNE $A098
.C:a0a3  A9 AA       LDA #$AA
.C:a0a5  8D 34 03    STA $0334
.C:a0a8  20 1A 9B    JSR $9B1A
.C:a0ab  B0 16       BCS $A0C3
.C:a0ad  20 15 08    JSR $0815
.C:a0b0  B0 14       BCS $A0C6
.C:a0b2  A0 A6       LDY #$A6
.C:a0b4  A2 52       LDX #$52
.C:a0b6  20 06 08    JSR $0806		"[CR][CR]There is already a character..."
.C:a0b9  A0 A4       LDY #$A4
.C:a0bb  A2 01       LDX #$01
.C:a0bd  20 06 08    JSR $0806		"[CR][CR]Press Any Key..."
.C:a0c0  20 78 08    JSR $0878		Get keypress
.C:a0c3  4C 35 9B    JMP $9B35
.C:a0c6  20 18 08    JSR $0818
.C:a0c9  90 14       BCC $A0DF
.C:a0cb  A0 A5       LDY #$A5
.C:a0cd  A2 C0       LDX #$C0
.C:a0cf  20 06 08    JSR $0806		"[CR]The roster is already full..."
.C:a0d2  A0 A4       LDY #$A4
.C:a0d4  A2 01       LDX #$01
.C:a0d6  20 C0 08    JSR $08C0		??????????
.C:a0d9  20 78 08    JSR $0878		Get keypress
.C:a0dc  4C 35 9B    JMP $9B35
.C:a0df  8E 00 A1    STX $A100
.C:a0e2  A0 00       LDY #$00
.C:a0e4  B9 34 03    LDA $0334,Y
.C:a0e7  59 CF A7    EOR $A7CF,Y
.C:a0ea  9D 00 B5    STA $B500,X
.C:a0ed  E8          INX
.C:a0ee  C8          INY
.C:a0ef  C0 10       CPY #$10
.C:a0f1  90 F1       BCC $A0E4
.C:a0f3  A9 00       LDA #$00
.C:a0f5  85 44       STA $44
.C:a0f7  A8          TAY
.C:a0f8  0A          ASL A
.C:a0f9  0A          ASL A
.C:a0fa  0A          ASL A
.C:a0fb  18          CLC
.C:a0fc  69 10       ADC #$10
.C:a0fe  18          CLC
.C:a0ff  69 00       ADC #$00
.C:a101  AA          TAX
.C:a102  B9 81 A7    LDA $A781,Y
.C:a105  85 9B       STA $9B
.C:a107  B9 82 A7    LDA $A782,Y
.C:a10a  85 9C       STA $9C
.C:a10c  A0 00       LDY #$00
.C:a10e  B1 9B       LDA ($9B),Y
.C:a110  5D CF A7    EOR $A7CF,X
.C:a113  9D 00 B5    STA $B500,X
.C:a116  C8          INY
.C:a117  E8          INX
.C:a118  C0 10       CPY #$10
.C:a11a  90 F2       BCC $A10E
.C:a11c  E6 44       INC $44
.C:a11e  E6 44       INC $44
.C:a120  A5 44       LDA $44
.C:a122  C9 0E       CMP #$0E
.C:a124  90 D1       BCC $A0F7
.C:a126  20 CC 08    JSR $08CC
.C:a129  90 0A       BCC $A135
.C:a12b  A0 A6       LDY #$A6
.C:a12d  A2 E1       LDX #$E1
.C:a12f  20 06 08    JSR $0806		"[CR][CR]There has been a write..."
.C:a132  20 78 08    JSR $0878		Get keypress
.C:a135  4C 35 9B    JMP $9B35
.C:a138  8E 4D A1    STX $A14D
.C:a13b  A0 00       LDY #$00
.C:a13d  98          TYA
.C:a13e  5D 00 B5    EOR $B500,X
.C:a141  E8          INX
.C:a142  C8          INY
.C:a143  C0 7E       CPY #$7E
.C:a145  D0 F7       BNE $A13E
.C:a147  E8          INX
.C:a148  48          PHA
.C:a149  8A          TXA
.C:a14a  A8          TAY
.C:a14b  68          PLA
.C:a14c  A2 00       LDX #$00
.C:a14e  60          RTS
.C:a14f  20 E1 08    JSR $08E1
.C:a152  A0 A7       LDY #$A7
.C:a154  A2 1F       LDX #$1F
.C:a156  20 06 08    JSR $0806		"Rename Character[CR][CR]"
.C:a159  A0 A4       LDY #$A4
.C:a15b  A2 E5       LDX #$E5
.C:a15d  20 06 08    JSR $0806		"Enter name--"
.C:a160  20 36 08    JSR $0836		Prompt for keyboard input
.C:a163  90 03       BCC $A168
.C:a165  4C 7F 9A    JMP $9A7F
.C:a168  20 33 A2    JSR $A233
.C:a16b  B0 0A       BCS $A177
.C:a16d  A0 A6       LDY #$A6
.C:a16f  A2 8F       LDX #$8F
.C:a171  20 06 08    JSR $0806		"[CR][CR]There's no one here named that."
.C:a174  4C A4 A1    JMP $A1A4
.C:a177  A5 9B       LDA $9B
.C:a179  85 6E       STA $6E
.C:a17b  A5 9C       LDA $9C
.C:a17d  85 6F       STA $6F
.C:a17f  A0 A7       LDY #$A7
.C:a181  A2 32       LDX #$32
.C:a183  20 06 08    JSR $0806		"[CR][CR]Change his name to:"
.C:a186  20 36 08    JSR $0836		Prompt for keyboard input
.C:a189  B0 DA       BCS $A165
.C:a18b  8E C3 A1    STX $A1C3
.C:a18e  20 33 A2    JSR $A233
.C:a191  B0 0A       BCS $A19D
.C:a193  20 1A 9B    JSR $9B1A
.C:a196  B0 CD       BCS $A165
.C:a198  20 15 08    JSR $0815
.C:a19b  B0 14       BCS $A1B1
.C:a19d  A0 A6       LDY #$A6
.C:a19f  A2 52       LDX #$52
.C:a1a1  20 06 08    JSR $0806		"[CR][CR]There is already a character..."
.C:a1a4  A0 A4       LDY #$A4
.C:a1a6  A2 01       LDX #$01
.C:a1a8  20 06 08    JSR $0806		"[CR][CR]Press Any Key..."
.C:a1ab  20 78 08    JSR $0878		Get keypress
.C:a1ae  4C 7F 9A    JMP $9A7F
.C:a1b1  A0 0F       LDY #$0F
.C:a1b3  B1 6E       LDA ($6E),Y
.C:a1b5  99 8F A7    STA $A78F,Y
.C:a1b8  88          DEY
.C:a1b9  10 F8       BPL $A1B3
.C:a1bb  C8          INY
.C:a1bc  B9 34 03    LDA $0334,Y
.C:a1bf  91 6E       STA ($6E),Y
.C:a1c1  C8          INY
.C:a1c2  C0 00       CPY #$00
.C:a1c4  B0 04       BCS $A1CA
.C:a1c6  C0 0F       CPY #$0F
.C:a1c8  90 F2       BCC $A1BC
.C:a1ca  A9 FF       LDA #$FF
.C:a1cc  91 6E       STA ($6E),Y
.C:a1ce  C8          INY
.C:a1cf  C0 10       CPY #$10
.C:a1d1  90 F7       BCC $A1CA
.C:a1d3  88          DEY
.C:a1d4  B9 8F A7    LDA $A78F,Y
.C:a1d7  99 34 03    STA $0334,Y
.C:a1da  88          DEY
.C:a1db  10 F7       BPL $A1D4
.C:a1dd  20 15 08    JSR $0815
.C:a1e0  B0 1D       BCS $A1FF
.C:a1e2  8A          TXA
.C:a1e3  48          PHA
.C:a1e4  A0 00       LDY #$00
.C:a1e6  B1 6E       LDA ($6E),Y
.C:a1e8  5D CF A7    EOR $A7CF,X
.C:a1eb  9D 00 B5    STA $B500,X
.C:a1ee  E8          INX
.C:a1ef  C8          INY
.C:a1f0  C0 10       CPY #$10
.C:a1f2  90 F2       BCC $A1E6
.C:a1f4  68          PLA
.C:a1f5  AA          TAX
.C:a1f6  20 38 A1    JSR $A138
.C:a1f9  99 00 B5    STA $B500,Y
.C:a1fc  20 CC 08    JSR $08CC
.C:a1ff  20 48 08    JSR $0848
.C:a202  4C 7F 9A    JMP $9A7F
.C:a205  A2 0C       LDX #$0C
.C:a207  BD 81 A7    LDA $A781,X
.C:a20a  85 6E       STA $6E
.C:a20c  BD 82 A7    LDA $A782,X
.C:a20f  85 6F       STA $6F
.C:a211  A0 00       LDY #$00
.C:a213  B1 6E       LDA ($6E),Y
.C:a215  F0 12       BEQ $A229
.C:a217  A0 3E       LDY #$3E
.C:a219  B1 6E       LDA ($6E),Y
.C:a21b  C9 03       CMP #$03
.C:a21d  90 10       BCC $A22F
.C:a21f  C9 06       CMP #$06
.C:a221  B0 0C       BCS $A22F
.C:a223  A0 4D       LDY #$4D
.C:a225  B1 6E       LDA ($6E),Y
.C:a227  D0 06       BNE $A22F
.C:a229  CA          DEX
.C:a22a  CA          DEX
.C:a22b  10 DA       BPL $A207
.C:a22d  38          SEC
.C:a22e  60          RTS
.C:a22f  8A          TXA
.C:a230  4A          LSR A
.C:a231  18          CLC
.C:a232  60          RTS
.C:a233  A9 06       LDA #$06
.C:a235  85 97       STA $97
.C:a237  A9 B8       LDA #$B8
.C:a239  85 9C       STA $9C
.C:a23b  A9 00       LDA #$00
.C:a23d  85 9B       STA $9B
.C:a23f  A0 00       LDY #$00
.C:a241  B9 34 03    LDA $0334,Y
.C:a244  C9 BD       CMP #$BD
.C:a246  F0 17       BEQ $A25F
.C:a248  C9 FF       CMP #$FF
.C:a24a  F0 15       BEQ $A261
.C:a24c  D1 9B       CMP ($9B),Y
.C:a24e  F0 0A       BEQ $A25A
.C:a250  C9 C0       CMP #$C0
.C:a252  90 2D       BCC $A281
.C:a254  09 20       ORA #$20
.C:a256  D1 9B       CMP ($9B),Y
.C:a258  D0 16       BNE $A270
.C:a25a  C8          INY
.C:a25b  C0 0F       CPY #$0F
.C:a25d  90 E2       BCC $A241
.C:a25f  38          SEC
.C:a260  60          RTS
.C:a261  A9 FF       LDA #$FF
.C:a263  D1 9B       CMP ($9B),Y
.C:a265  D0 1A       BNE $A281
.C:a267  E8          INX
.C:a268  C8          INY
.C:a269  C0 0F       CPY #$0F
.C:a26b  90 F6       BCC $A263
.C:a26d  4C 5F A2    JMP $A25F
.C:a270  A5 9B       LDA $9B
.C:a272  18          CLC
.C:a273  69 80       ADC #$80
.C:a275  85 9B       STA $9B
.C:a277  A5 9C       LDA $9C
.C:a279  69 00       ADC #$00
.C:a27b  85 9C       STA $9C
.C:a27d  C6 97       DEC $97
.C:a27f  10 BE       BPL $A23F
.C:a281  18          CLC
.C:a282  60          RTS
.C:a283  8E AD A2    STX $A2AD
.C:a286  A0 00       LDY #$00
.C:a288  A9 00       LDA #$00
.C:a28a  5D 00 B5    EOR $B500,X
.C:a28d  E8          INX
.C:a28e  C8          INY
.C:a28f  C0 0F       CPY #$0F
.C:a291  90 F7       BCC $A28A
.C:a293  48          PHA
.C:a294  8A          TXA
.C:a295  18          CLC
.C:a296  69 61       ADC #$61
.C:a298  AA          TAX
.C:a299  68          PLA
.C:a29a  DD 00 B5    CMP $B500,X
.C:a29d  D0 0D       BNE $A2AC
.C:a29f  A9 06       LDA #$06
.C:a2a1  85 44       STA $44
.C:a2a3  20 3E 09    JSR $093E
.C:a2a6  90 08       BCC $A2B0
.C:a2a8  C6 44       DEC $44
.C:a2aa  10 F7       BPL $A2A3
.C:a2ac  A2 00       LDX #$00
.C:a2ae  38          SEC
.C:a2af  60          RTS
.C:a2b0  AE AD A2    LDX $A2AD
.C:a2b3  18          CLC
.C:a2b4  60          RTS

[CONTINUED NEXT POST]

[Darendor]

Code: Select all

.C:a2b5  D4 E8       NOOP $E8,X		[T][h]
.C:a2b7  E5 A0       SBC $A0		[e][_]
.C:a2b9  C7 F5       DCP $F5		[G][u]
.C:a2bb  E9 EC       SBC #$EC		[i][l]
.C:a2bd  E4 DC       CPX $DC		[d][EOT]
.C:a2bf  D4 E8       NOOP $E8,X		[T][h]
.C:a2c1  EF F5 A0    ISB $A0F5		[o][u][_]
.C:a2c4  E1 F2       SBC ($F2,X)	[a][r]
.C:a2c6  F4 A0       NOOP $A0,X		[t][_]
.C:a2c8  E9 EE       SBC #$EE		[i][n]
.C:a2ca  A0 F4       LDY #$F4		[_][t]
.C:a2cc  E8          INX		[h]
.C:a2cd  E5 A0       SBC $A0		[e][_]
.C:a2cf  C7 F5       DCP $F5		[G][u]
.C:a2d1  E9 EC       SBC #$EC		[i][l]
.C:a2d3  E4 A0       CPX $A0		[d][_]
.C:a2d5  EF E6 A0    ISB $A0E6		[o][f][_]
.C:a2d8  C1 E4       CMP ($E4,X)	[A][d]
.C:a2da  F6 E5       INC $E5,X		[v][e]
.C:a2dc  EE F4 F5    INC $F5F4		[n][t][u]
.C:a2df  F2          JAM		[r]
.C:a2e0  E5 F2       SBC $F2		[e][r]
.C:a2e2  F3 AE       ISB ($AE),Y	[s][.]
.C:a2e4  00          BRK		[CR]
.C:a2e5  00          BRK		[CR]
.C:a2e6  A8          TAY		[(]
.C:a2e7  C3 A9       DCP ($A9,X)	[C][)]
.C:a2e9  E8          INX		[h]
.C:a2ea  E5 E3       SBC $E3		[e][c]
.C:a2ec  EB A0       USBC #$A0		[k][_]
.C:a2ee  D2          JAM		[R]
.C:a2ef  EF F3 F4    ISB $F4F3		[o][s][t]
.C:a2f2  E5 F2       SBC $F2		[e][r]
.C:a2f4  00          BRK		[Cr]
.C:a2f5  A8          TAY		[(]
.C:a2f6  C1 A9       CMP ($A9,X)	[A][)]
.C:a2f8  E4 E4       CPX $E4		[d][d]
.C:a2fa  A0 ED       LDY #$ED		[_][m]
.C:a2fc  E5 ED       SBC $ED		[e][m]
.C:a2fe  E2 E5       NOOP #$E5		[b][e]
.C:a300  F2          JAM		[r]
.C:a301  00          BRK		[CR]
.C:a302  A8          TAY		[(]
.C:a303  D2          JAM		[R]
.C:a304  A9 E5       LDA #$E5		[)][e]
.C:a306  ED EF F6    SBC $F6EF		[m][o][v]
.C:a309  E5 A0       SBC $A0		[e][_]
.C:a30b  ED E5 ED    SBC $EDE5		[m][e][m]
.C:a30e  E2 E5       NOOP #$E5		[b][e]
.C:a310  F2          JAM		[r]
.C:a311  00          BRK		[CR]
.C:a312  A8          TAY		[(]
.C:a313  C4 A9       CPY $A9		[D][)]
.C:a315  E9 F3       SBC #$F3		[i][s]
.C:a317  EB A0       USBC #$A0		[k][_]
.C:a319  CF F0 F4    DCP $F4F0		[O][p][t]
.C:a31c  E9 EF       SBC #$EF		[i][o]
.C:a31e  EE F3 00    INC $00F3		[n][s][CR]
.C:a321  A8          TAY		[(]
.C:a322  CE A9 E5    DEC $E5A9		[N][)][e]
.C:a325  F7 A0       ISB $A0,X		[w][_]
.C:a327  EF F2 E4    ISB $E4F2		[o][r][d]
.C:a32a  E5 F2       SBC $F2		[e][r]
.C:a32c  00          BRK		[CR]
.C:a32d  A8          TAY		[(]
.C:a32e  B0 AD       BCS $A2DD		[0][-]
.C:a330  B6 A9       LDX $A9,Y		[6][)]
.C:a332  A0 D6       LDY #$D6		[_][V]
.C:a334  E9 E5       SBC #$E5		[i][e]
.C:a336  F7 A0       ISB $A0,X		[w][_]
.C:a338  ED E5 ED    SBC $EDE5		[m][e][m]
.C:a33b  E2 E5       NOOP #$E5		[b][e]
.C:a33d  F2          JAM		[r]
.C:a33e  00          BRK		[CR]
.C:a33f  A8          TAY		[(]
.C:a340  C5 A9       CMP $A9		[E][)]
.C:a342  F8          SED		[x]
.C:a343  E9 F4       SBC #$F4		[i][t]
.C:a345  A0 C7       LDY #$C7		[_][G]
.C:a347  F5 E9       SBC $E9,X		[u][i]
.C:a349  EC E4 FF    CPX $FFE4		[l][d][Input]
.C:a34c  C4 E9       CPY $E9		[D][i]
.C:a34e  F3 EB       ISB ($EB),Y	[s][k]
.C:a350  A0 CF       LDY #$CF		[_][O]
.C:a352  F0 F4       BEQ $A348		[p][t]
.C:a354  E9 EF       SBC #$EF		[i][o]
.C:a356  EE F3 BA    INC $BAF3		[n][s][:]
.C:a359  00          BRK		[CR]
.C:a35a  00          BRK		[CR]
.C:a35b  A8          TAY		[(]
.C:a35c  C3 A9       DCP ($A9,X)	[C][)]
.C:a35e  F2          JAM		[r]
.C:a35f  E5 E1       SBC $E1		[e][a]
.C:a361  F4 E5       NOOP $E5,X		[t][e]
.C:a363  A0 ED       LDY #$ED		[_][m]
.C:a365  E5 ED       SBC $ED		[e][m]
.C:a367  E2 E5       NOOP #$E5		[b][e]
.C:a369  F2          JAM		[r]
.C:a36a  00          BRK		[CR]
.C:a36b  A8          TAY		[(]
.C:a36c  D3 A9       DCP ($A9),Y	[S][)]
.C:a36e  E1 F6       SBC ($F6,X)	[a][v]
.C:a370  E5 A0       SBC $A0		[e][_]
.C:a372  F0 E1       BEQ $A355		[p][a]
.C:a374  F2          JAM		[r]
.C:a375  F4 F9       NOOP $F9,X		[t][y]
.C:a377  00          BRK		[CR]
.C:a378  A8          TAY		[(]
.C:a379  C4 A9       CPY $A9		[D][)]
.C:a37b  E5 EC       SBC $EC		[e][l]
.C:a37d  E5 F4       SBC $F4		[e][t]
.C:a37f  E5 A0       SBC $A0		[e][_]
.C:a381  ED E5 ED    SBC $EDE5		[m][e][m]
.C:a384  E2 E5       NOOP #$E5		[b][e]
.C:a386  F2          JAM		[r]
.C:a387  00          BRK		[CR]
.C:a388  A8          TAY		[(]
.C:a389  D2          JAM		[R]
.C:a38a  A9 E5       LDA #$E5		[)][e]
.C:a38c  EE E1 ED    INC $EDE1		[n][a][m]
.C:a38f  E5 A0       SBC $A0		[e][_]
.C:a391  ED E5 ED    SBC $EDE5		[m][e][m]
.C:a394  E2 E5       NOOP #$E5		[b][e]
.C:a396  F2          JAM		[r]
.C:a397  00          BRK		[CR]
.C:a398  A8          TAY		[(]
.C:a399  CC A9 E5    CPY $E5A9		[L][)][e]
.C:a39c  E1 F6       SBC ($F6,X)	[a][v]
.C:a39e  E5 A0       SBC $A0		[e][_]
.C:a3a0  F4 E8       NOOP $E8,X		[t][h]
.C:a3a2  E5 A0       SBC $A0		[e][_]
.C:a3a4  E7 E1       ISB $E1		[g][a]
.C:a3a6  ED E5 00    SBC $00E5		[m][e][CR]
.C:a3a9  A8          TAY		[(]
.C:a3aa  C5 A9       CMP $A9		[E][)]
.C:a3ac  F8          SED		[x]
.C:a3ad  E9 F4       SBC #$F4		[i][t]
.C:a3af  A0 E4       LDY #$E4		[_][d]
.C:a3b1  E9 F3       SBC #$F3		[i][s]
.C:a3b3  EB A0       USBC #$A0		[k][_]
.C:a3b5  EF F0 FF    ISB $FFF0		[o][p][Input]
.C:a3b8  00          BRK		[CR]
.C:a3b9  00          BRK		[CR]
.C:a3ba  C9 EE       CMP #$EE		[I][n]
.C:a3bc  F3 E5       ISB ($E5),Y	[s][e]
.C:a3be  F2          JAM		[r]
.C:a3bf  F4 A0       NOOP $A0,X		[t][_]
.C:a3c1  F4 E8       NOOP $E8,X		[t][h]
.C:a3c3  E5 A0       SBC $A0		[e][_]
.C:a3c5  C3 C8       DCP ($C8,X)	[C][H]
.C:a3c7  C1 D2       CMP ($D2,X)	[A][R]
.C:a3c9  C1 C3       CMP ($C3,X)	[A][C]
.C:a3cb  D4 C5       NOOP $C5,X		[T][E]
.C:a3cd  D2          JAM		[R]
.C:a3ce  A0 E4       LDY #$E4		[_][d]
.C:a3d0  E9 F3       SBC #$F3		[i][s]
.C:a3d2  EB A0       USBC #$A0		[k][_]
.C:a3d4  E9 EE       SBC #$EE		[i][n]
.C:a3d6  A0 F4       LDY #$F4		[_][t]
.C:a3d8  E8          INX		[h]
.C:a3d9  E5 A0       SBC $A0		[e][_]
.C:a3db  E4 F2       CPX $F2		[d][r]
.C:a3dd  E9 F6       SBC #$F6		[i][v]
.C:a3df  E5 A0       SBC $A0		[e][_]
.C:a3e1  E1 EE       SBC ($EE,X)	[a][n]
.C:a3e3  E4 A0       CPX $A0		[d][_]
.C:a3e5  F0 F2       BEQ $A3D9		[p][r]
.C:a3e7  E5 F3       SBC $F3		[e][s]
.C:a3e9  F3 A0       ISB ($A0),Y	[s][_]
.C:a3eb  E1 A0       SBC ($A0,X)	[a][_]
.C:a3ed  EB E5       USBC #$E5		[k][e]
.C:a3ef  F9 AE A0    SBC $A0AE,Y	[y][.][_]
.C:a3f2  DB BC AD    DCP $ADBC,Y	[[][<][-]
.C:a3f5  DD A0 F4    CMP $F4A0,X	[]][_][t]
.C:a3f8  EF A0 E1    ISB $E1A0		[o][_][a]
.C:a3fb  E2 EF       NOOP #$EF		[b][o]
.C:a3fd  F2          JAM		[r]
.C:a3fe  F4 AE       NOOP $AE,X		[t][.]
.C:a400  DC 00 00    NOOP $0000,X	[EOT][CR][CR]
.C:a403  D0 F2       BNE $A3F7		[P][r]
.C:a405  E5 F3       SBC $F3		[e][s]
.C:a407  F3 A0       ISB ($A0),Y	[s][_]
.C:a409  C1 EE       CMP ($EE,X)	[A][n]
.C:a40b  F9 A0 CB    SBC $CBA0,Y	[y][_][K]
.C:a40e  E5 F9       SBC $F9		[e][y]
.C:a410  AE AE AE    LDX $AEAE		[.][.][.]
.C:a413  FF D7 E1    ISB $E1D7,X	[Input][W][a]
.C:a416  F2          JAM		[r]
.C:a417  F2          JAM		[r]
.C:a418  E9 EF       SBC #$EF		[i][o]
.C:a41a  F2          JAM		[r]
.C:a41b  DC D7 E9    NOOP $E9D7,X	[EOT][W][i]
.C:a41e  FA          NOOP		[z]
.C:a41f  E1 F2       SBC ($F2,X)	[a][r]
.C:a421  E4 DC       CPX $DC		[d][EOT]
.C:a423  D3 EF       DCP ($EF),Y	[S][o]
.C:a425  F2          JAM		[r]
.C:a426  E3 E5       ISB ($E5,X)	[c][e]
.C:a428  F2          JAM		[r]
.C:a429  E5 F2       SBC $F2		[e][r]
.C:a42b  DC C3 EF    NOOP $EFC3,X	[EOT][C][o]
.C:a42e  EE EA F5    INC $F5EA		[n][j][u]
.C:a431  F2          JAM		[r]
.C:a432  E5 F2       SBC $F2		[e][r]
.C:a434  DC CD E1    NOOP $E1CD,X	[EOT][M][a]
.C:a437  E7 E9       ISB $E9		[g][i]
.C:a439  E3 E9       ISB ($E9,X)	[c][i]
.C:a43b  E1 EE       SBC ($EE,X)	[a][n]
.C:a43d  DC D2 EF    NOOP $EFD2,X	[EOT][R][o]
.C:a440  E7 F5       ISB $F5		[g][u]
.C:a442  E5 DC       SBC $DC		[e][EOT]
.C:a444  C2 E1       NOOP #$E1		[B][a]
.C:a446  F2          JAM		[r]
.C:a447  E4 DC       CPX $DC		[d][EOT]
.C:a449  D0 E1       BNE $A42C		[P][a]
.C:a44b  EC E1 E4    CPX $E4E1		[l][a][d]
.C:a44e  E9 EE       SBC #$EE		[i][n]
.C:a450  DC C8 F5    NOOP $F5C8,X	[EOT][H][u]
.C:a453  EE F4 E5    INC $E5F4		[n][t][e]
.C:a456  F2          JAM		[r]
.C:a457  DC CD EF    NOOP $EFCD,X	[EOT][M][o]
.C:a45a  EE EB DC    INC $DCEB		[n][k][EOT]
.C:a45d  14 A4       NOOP $A4,X		Data field...
.C:a45f  1C A4 23    NOOP $23A4,X
.C:a462  A4 2C       LDY $2C
.C:a464  A4 35       LDY $35
.C:a466  A4 3E       LDY $3E
.C:a468  A4 44       LDY $44
.C:a46a  A4 49       LDY $49
.C:a46c  A4 51       LDY $51
.C:a46e  A4 58       LDY $58
.C:a470  A4 3B       LDY $3B
.C:a472  21 21       AND ($21,X)
.C:a474  35 35       AND $35,X
.C:a476  3B 19 3B    RLA $3B19,Y
.C:a479  3B 2D 39    RLA $392D,Y
.C:a47c  01 00       ORA ($00,X)
.C:a47e  00          BRK
.C:a47f  01 01       ORA ($01,X)
.C:a481  01 01       ORA ($01,X)
.C:a483  01 01       ORA ($01,X)
.C:a485  01 01       ORA ($01,X)
.C:a487  00          BRK
.C:a488  00          BRK
.C:a489  01 01       ORA ($01,X)
.C:a48b  01 01       ORA ($01,X)
.C:a48d  01 00       ORA ($00,X)
.C:a48f  01 01       ORA ($01,X)
.C:a491  00          BRK
.C:a492  00          BRK
.C:a493  00          BRK
.C:a494  00          BRK
.C:a495  01 01       ORA ($01,X)
.C:a497  01 01       ORA ($01,X)
.C:a499  01 01       ORA ($01,X)
.C:a49b  00          BRK
.C:a49c  00          BRK
.C:a49d  01 01       ORA ($01,X)
.C:a49f  01 01       ORA ($01,X)
.C:a4a1  00          BRK
.C:a4a2  00          BRK
.C:a4a3  01 01       ORA ($01,X)
.C:a4a5  00          BRK
.C:a4a6  00          BRK
.C:a4a7  01 01       ORA ($01,X)
.C:a4a9  01 01       ORA ($01,X)
.C:a4ab  00          BRK
.C:a4ac  00          BRK
.C:a4ad  01 01       ORA ($01,X)
.C:a4af  00          BRK
.C:a4b0  00          BRK
.C:a4b1  01 01       ORA ($01,X)
.C:a4b3  01 00       ORA ($00,X)
.C:a4b5  00          BRK
.C:a4b6  01 00       ORA ($00,X)
.C:a4b8  01 00       ORA ($00,X)
.C:a4ba  00          BRK
.C:a4bb  01 01       ORA ($01,X)
.C:a4bd  01 00       ORA ($00,X)
.C:a4bf  00          BRK
.C:a4c0  01 01       ORA ($01,X)
.C:a4c2  0A          ASL A
.C:a4c3  06 08       ASL $08
.C:a4c5  08          PHP
.C:a4c6  05 08       ORA $08
.C:a4c8  09 09       ORA #$09
.C:a4ca  06 06       ASL $06
.C:a4cc  0C 06 07    NOOP $0706
.C:a4cf  0A          ASL A
.C:a4d0  03 04       SLO ($04,X)
.C:a4d2  06 0C       ASL $0C
.C:a4d4  05 0A       ORA $0A
.C:a4d6  09 08       ORA #$08
.C:a4d8  09 07       ORA #$07
.C:a4da  06 0B       ASL $0B
.C:a4dc  03 08       SLO ($08,X)
.C:a4de  0B 04       ANC #$04
.C:a4e0  09 0A       ORA #$0A
.C:a4e2  07 03       SLO $03
.C:a4e4  04
.C:a4e5  C5          NOOP $C5		[E]
.C:a4e6  EE F4 E5    INC $E5F4		[n][t][e]
.C:a4e9  F2          JAM		[r]
.C:a4ea  A0 E1       LDY #$E1		[_][a]
.C:a4ec  A0 EE       LDY #$EE		[_][n]
.C:a4ee  E1 ED       SBC ($ED,X)	[a][m]
.C:a4f0  E5 AD       SBC $AD		[e][-]
.C:a4f2  AD 00 FF    LDA $FF00		[-][Input]
.C:a4f5  D3 E5       DCP ($E5),Y	[S][e]
.C:a4f7  EC E5 E3    CPX $E3E5		[l][e][c]
.C:a4fa  F4 A0       NOOP $A0,X		[t][_]
.C:a4fc  E1 A0       SBC ($A0,X)	[a][_]
.C:a4fe  F2          JAM		[r]
.C:a4ff  E1 E3       SBC ($E3,X)	[a][c]
.C:a501  E5 A0       SBC $A0		[e][_]
.C:a503  E6 EF       INC $EF		[f][o]
.C:a505  F2          JAM		[r]
.C:a506  A0 F9       LDY #$F9		[_][y]
.C:a508  EF F5 F2    ISB $F2F5		[o][u][r]
.C:a50b  A0 EE       LDY #$EE		[_][n]
.C:a50d  E5 F7       SBC $F7		[e][w]
.C:a50f  A0 E3       LDY #$E3		[_][c]
.C:a511  E8          INX		[h]
.C:a512  E1 F2       SBC ($F2,X)	[a][r]
.C:a514  E1 E3       SBC ($E3,X)	[a][c]
.C:a516  F4 E5       NOOP $E5,X		[t][e]
.C:a518  F2          JAM		[r]
.C:a519  BA          TSX		[:]
.C:a51a  00          BRK		[CR]
.C:a51b  00          BRK		[CR]
.C:a51c  A8          TAY		[(]
.C:a51d  B1 A9       LDA ($A9),Y	[1][)]
.C:a51f  A0 C8       LDY #$C8		[_][H]
.C:a521  F5 ED       SBC $ED,X		[u][m]
.C:a523  E1 EE       SBC ($EE,X)	[a][n]
.C:a525  00          BRK		[CR]
.C:a526  A8          TAY		[(]
.C:a527  B2          JAM		[2]
.C:a528  A9 A0       LDA #$A0		[)][_]
.C:a52a  C5 EC       CMP $EC		[E][l]
.C:a52c  E6 00       INC $00		[f][CR]
.C:a52e  A8          TAY		[(]
.C:a52f  B3 A9       LAX ($A9),Y	[3][)]
.C:a531  A0 C4       LDY #$C4		[_][D]
.C:a533  F7 E1       ISB $E1,X		[w][a]
.C:a535  F2          JAM		[r]
.C:a536  E6 00       INC $00		[f][CR]
.C:a538  A8          TAY		[(]
.C:a539  B4 A9       LDY $A9,X		[4][)]
.C:a53b  A0 C8       LDY #$C8		[_][H]
.C:a53d  EF E2 E2    ISB $E2E2		[o][b][b]
.C:a540  E9 F4       SBC #$F4		[i][t]
.C:a542  00          BRK		[CR]
.C:a543  A8          TAY		[(]
.C:a544  B5 A9       LDA $A9,X		[5][)]
.C:a546  A0 C8       LDY #$C8		[_][H]
.C:a548  E1 EC       SBC ($EC,X)	[a][l]
.C:a54a  E6 AD       INC $AD		[f][-]
.C:a54c  C5 EC       CMP $EC		[E][l]
.C:a54e  E6 00       INC $00		[f][CR]
.C:a550  A8          TAY		[(]
.C:a551  B6 A9       LDX $A9,Y		[6][)]
.C:a553  A0 C8       LDY #$C8		[_][H]
.C:a555  E1 EC       SBC ($EC,X)	[a][l]
.C:a557  E6 AD       INC $AD		[f][-]
.C:a559  CF F2 E3    DCP $E3F2		[O][r][c]
.C:a55c  00          BRK		[CR]
.C:a55d  A8          TAY		[(]
.C:a55e  B7 A9       LAX $A9,Y		[7][)]
.C:a560  A0 C7       LDY #$C7		[_][G]
.C:a562  EE EF ED    INC $EDEF		[n][o][m]
.C:a565  E5 00       SBC $00		[e][CR]
.C:a567  DB BC AD    DCP $ADBC,Y	[[][<][-]
.C:a56a  DD A0 A0    CMP $A0A0,X	[]][_][_]
.C:a56d  F4 EF       NOOP $EF,X		[t][o]
.C:a56f  A0 E1       LDY #$E1		[_][a]
.C:a571  E2 EF       NOOP #$EF		[b][o]
.C:a573  F2          JAM		[r]
.C:a574  F4 DC       NOOP $DC,X		[t][EOT]
.C:a576  C3 E8       DCP ($E8,X)	[C][h]
.C:a578  E1 F2       SBC ($F2,X)	[a][r]
.C:a57a  E1 E3       SBC ($E3,X)	[a][c]
.C:a57c  F4 E5       NOOP $E5,X		[t][e]
.C:a57e  F2          JAM		[r]
.C:a57f  A0 D8       LDY #$D8		[_][X]
.C:a581  DC D0 F2    NOOP $F2D0,X	[EOT][P][r]
.C:a584  E5 F3       SBC $F3		[e][s]
.C:a586  F3 A0       ISB ($A0),Y	[s][_]
.C:a588  A8          TAY		[(]
.C:a589  D2          JAM		[R]
.C:a58a  C5 D4       CMP $D4		[E][T]
.C:a58c  D5 D2       CMP $D2,X		[U][R]
.C:a58e  CE A9 A0    DEC $A0A9		[N][)][_]
.C:a591  F4 EF       NOOP $EF,X		[t][o]
.C:a593  A0 F3       LDY #$F3		[_][s]
.C:a595  E1 F6       SBC ($F6,X)	[a][v]
.C:a597  E5 A0       SBC $A0		[e][_]
.C:a599  EF E6 E6    ISB $E6E6		[o][f][f]
.C:a59c  A0 E1       LDY #$E1		[_][a]
.C:a59e  EC EC A0    CPX $A0EC		[l][l][_]
.C:a5a1  E3 E8       ISB ($E8,X)	[c][h]
.C:a5a3  E1 F2       SBC ($F2,X)	[a][r]
.C:a5a5  E1 E3       SBC ($E3,X)	[a][c]
.C:a5a7  F4 E5       NOOP $E5,X		[t][e]
.C:a5a9  F2          JAM		[r]
.C:a5aa  F3 A0       ISB ($A0),Y	[s][_]
.C:a5ac  E1 EE       SBC ($EE,X)	[a][n]
.C:a5ae  E4 A0       CPX $A0		[d][_]
.C:a5b0  E5 EE       SBC $EE		[e][n]
.C:a5b2  E4 A0       CPX $A0		[d][_]
.C:a5b4  E7 E1       ISB $E1		[g][a]
.C:a5b6  ED E5 A0    SBC $A0E5		[m][e][_]
.C:a5b9  F0 EC       BEQ $A5A7		[p][l]
.C:a5bb  E1 F9       SBC ($F9,X)	[a][y]
.C:a5bd  AE DC 00    LDX $00DC		[.][EOT][CR]
.C:a5c0  00          BRK		[CR]
.C:a5c1  D4 E8       NOOP $E8,X		[T][h]
.C:a5c3  E5 A0       SBC $A0		[e][_]
.C:a5c5  F2          JAM		[r]
.C:a5c6  EF F3 F4    ISB $F4F3		[o][s][t]
.C:a5c9  E5 F2       SBC $F2		[e][r]
.C:a5cb  A0 E9       LDY #$E9		[_][i]
.C:a5cd  F3 A0       ISB ($A0),Y	[s][_]
.C:a5cf  E1 EC       SBC ($EC,X)	[a][l]
.C:a5d1  F2          JAM		[r]
.C:a5d2  E5 E1       SBC $E1		[e][a]
.C:a5d4  E4 F9       CPX $F9		[d][y]
.C:a5d6  A0 E6       LDY #$E6		[_][f]
.C:a5d8  F5 EC       SBC $EC,X		[u][l]
.C:a5da  EC AE A0    CPX $A0AE		[l][.][_]
.C:a5dd  D9 EF F5    CMP $F5EF,Y	[Y][o][u]
.C:a5e0  A0 F7       LDY #$F7		[_][w]
.C:a5e2  E9 EC       SBC #$EC		[i][l]
.C:a5e4  EC A0 EE    CPX $EEA0		[l][_][n]
.C:a5e7  E5 E5       SBC $E5		[e][e]
.C:a5e9  E4 A0       CPX $A0		[d][_]
.C:a5eb  E1 A0       SBC ($A0,X)	[a][_]
.C:a5ed  F3 E5       ISB ($E5),Y	[s][e]
.C:a5ef  E3 EF       ISB ($EF,X)	[c][o]
.C:a5f1  EE E4 A0    INC $A0E4		[n][d][_]
.C:a5f4  F0 EC       BEQ $A5E2		[p][l]
.C:a5f6  E1 F9       SBC ($F9,X)	[a][y]
.C:a5f8  E5 F2       SBC $F2		[e][r]
.C:a5fa  A0 E4       LDY #$E4		[_][d]
.C:a5fc  E9 F3       SBC #$F3		[i][s]
.C:a5fe  EB A0       USBC #$A0		[k][_]
.C:a600  F4 EF       NOOP $EF,X		[t][o]
.C:a602  A0 E3       LDY #$E3		[_][c]
.C:a604  F2          JAM		[r]
.C:a605  E5 E1       SBC $E1		[e][a]
.C:a607  F4 E5       NOOP $E5,X		[t][e]
.C:a609  A0 E1       LDY #$E1		[_][a]
.C:a60b  A0 EE       LDY #$EE		[_][n]
.C:a60d  E5 F7       SBC $F7		[e][w]
.C:a60f  A0 E3       LDY #$E3		[_][c]
.C:a611  E8          INX		[h]
.C:a612  E1 F2       SBC ($F2,X)	[a][r]
.C:a614  E1 E3       SBC ($E3,X)	[a][c]
.C:a616  F4 E5       NOOP $E5,X		[t][e]
.C:a618  F2          JAM		[r]
.C:a619  AE DC 00    LDX $00DC		[.][EOT][CR]
.C:a61c  00          BRK		[CR]
.C:a61d  CF EE EC    DCP $ECEE		[O][n][l]
.C:a620  F9 A0 B1    SBC $B1A0,Y	[y][_][1]
.C:a623  A0 C4       LDY #$C4		[_][D]
.C:a625  E5 F3       SBC $F3		[e][s]
.C:a627  F4 E9       NOOP $E9,X		[t][i]
.C:a629  EE F9 A0    INC $A0F9		[n][y][_]
.C:a62c  CB EE       SBX #$EE		[K][n]
.C:a62e  E9 E7       SBC #$E7		[i][g]
.C:a630  E8          INX		[h]
.C:a631  F4 A0       NOOP $A0,X		[t][_]
.C:a633  E9 F3       SBC #$F3		[i][s]
.C:a635  A0 F0       LDY #$F0		[_][p]
.C:a637  E5 F2       SBC $F2		[e][r]
.C:a639  ED E9 F4    SBC $F4E9		[m][i][t]
.C:a63c  F4 E5       NOOP $E5,X		[t][e]
.C:a63e  E4 A0       CPX $A0		[d][_]
.C:a640  E1 F4       SBC ($F4,X)	[a][t]
.C:a642  A0 E1       LDY #$E1		[_][a]
.C:a644  A0 F4       LDY #$F4		[_][t]
.C:a646  E9 ED       SBC #$ED		[i][m]
.C:a648  E5 AE       SBC $AE		[e][.]
.C:a64a  A0 D3       LDY #$D3		[_][S]
.C:a64c  EF F2 F2    ISB $F2F2		[o][r][r]
.C:a64f  F9 AE DC    SBC $DCAE,Y	[y][.][EOT]
.C:a652  00          BRK		[CR]
.C:a653  00          BRK		[CR]
.C:a654  D4 E8       NOOP $E8,X		[T][h]
.C:a656  E5 F2       SBC $F2		[e][r]
.C:a658  E5 A0       SBC $A0		[e][_]
.C:a65a  E9 F3       SBC #$F3		[i][s]
.C:a65c  A0 E1       LDY #$E1		[_][a]
.C:a65e  EC F2 E5    CPX $E5F2		[l][r][e]
.C:a661  E1 E4       SBC ($E4,X)	[a][d]
.C:a663  F9 A0 E1    SBC $E1A0,Y	[y][_][a]
.C:a666  A0 E3       LDY #$E3		[_][c]
.C:a668  E8          INX		[h]
.C:a669  E1 F2       SBC ($F2,X)	[a][r]
.C:a66b  E1 E3       SBC ($E3,X)	[a][c]
.C:a66d  F4 E5       NOOP $E5,X		[t][e]
.C:a66f  F2          JAM		[r]
.C:a670  A0 F7       LDY #$F7		[_][w]
.C:a672  E9 F4       SBC #$F4		[i][t]
.C:a674  E8          INX		[h]
.C:a675  A0 F4       LDY #$F4		[_][t]
.C:a677  E8          INX		[h]
.C:a678  E1 F4       SBC ($F4,X)	[a][t]
.C:a67a  A0 EE       LDY #$EE		[_][n]
.C:a67c  E1 ED       SBC ($ED,X)	[a][m]
.C:a67e  E5 A0       SBC $A0		[e][_]
.C:a680  E9 EE       SBC #$EE		[i][n]
.C:a682  A0 F4       LDY #$F4		[_][t]
.C:a684  E8          INX		[h]
.C:a685  E5 A0       SBC $A0		[e][_]
.C:a687  F2          JAM		[r]
.C:a688  EF F3 F4    ISB $F4F3		[o][s][t]
.C:a68b  E5 F2       SBC $F2		[e][r]
.C:a68d  AE DC 00    LDX $00DC		[.][EOT][CR]
.C:a690  00          BRK		[CR]
.C:a691  D4 E8       NOOP $E8,X		[T][h]
.C:a693  E5 F2       SBC $F2		[e][r]
.C:a695  E5 A7       SBC $A7		[e][']
.C:a697  F3 A0       ISB ($A0),Y	[s][_]
.C:a699  EE EF A0    INC $A0EF		[n][o][_]
.C:a69c  EF EE E5    ISB $E5EE		[o][n][e]
.C:a69f  A0 E8       LDY #$E8		[_][h]
.C:a6a1  E5 F2       SBC $F2		[e][r]
.C:a6a3  E5 A0       SBC $A0		[e][_]
.C:a6a5  EE E1 ED    INC $EDE1		[n][a][m]
.C:a6a8  E5 E4       SBC $E4		[e][d]
.C:a6aa  A0 F4       LDY #$F4		[_][t]
.C:a6ac  E8          INX		[h]
.C:a6ad  E1 F4       SBC ($F4,X)	[a][t]
.C:a6af  A1 DC       LDA ($DC,X)	[!][EOT]
.C:a6b1  00          BRK		[CR]
.C:a6b2  00          BRK		[CR]
.C:a6b3  C8          INY		[H]
.C:a6b4  E5 A7       SBC $A7		[e][']
.C:a6b6  F3 A0       ISB ($A0),Y	[s][_]
.C:a6b8  E1 EC       SBC ($EC,X)	[a][l]
.C:a6ba  F2          JAM		[r]
.C:a6bb  E5 E1       SBC $E1		[e][a]
.C:a6bd  E4 F9       CPX $F9		[d][y]
.C:a6bf  A0 E9       LDY #$E9		[_][i]
.C:a6c1  EE A0 F4    INC $F4A0		[n][_][t]
.C:a6c4  E8          INX		[h]
.C:a6c5  E5 A0       SBC $A0		[e][_]
.C:a6c7  F0 E1       BEQ $A6AA		[p][a]
.C:a6c9  F2          JAM		[r]
.C:a6ca  F4 F9       NOOP $F9,X		[t][y]
.C:a6cc  AE DC C4    LDX $C4DC		[.][EOT][D]
.C:a6cf  E5 EC       SBC $EC		[e][l]
.C:a6d1  E5 F4       SBC $F4		[e][t]
.C:a6d3  E5 A0       SBC $A0		[e][_]
.C:a6d5  C3 E8       DCP ($E8,X)	[C][h]
.C:a6d7  E1 F2       SBC ($F2,X)	[a][r]
.C:a6d9  E1 E3       SBC ($E3,X)	[a][c]
.C:a6db  F4 E5       NOOP $E5,X		[t][e]
.C:a6dd  F2          JAM		[r]
.C:a6de  00          BRK		[CR]
.C:a6df  00          BRK		[CR]
.C:a6e0  FF 00 00    ISB $0000,X	[Input][CR][CR]
.C:a6e3  D4 E8       NOOP $E8,X		[T][h]
.C:a6e5  E5 F2       SBC $F2		[e][r]
.C:a6e7  E5 A0       SBC $A0		[e][_]
.C:a6e9  E8          INX		[h]
.C:a6ea  E1 F3       SBC ($F3,X)	[a][s]
.C:a6ec  A0 E2       LDY #$E2		[_][b]
.C:a6ee  E5 E5       SBC $E5		[e][e]
.C:a6f0  EE A0 E1    INC $E1A0		[n][_][a]
.C:a6f3  A0 F7       LDY #$F7		[_][w]
.C:a6f5  F2          JAM		[r]
.C:a6f6  E9 F4       SBC #$F4		[i][t]
.C:a6f8  E5 A0       SBC $A0		[e][_]
.C:a6fa  E5 F2       SBC $F2		[e][r]
.C:a6fc  F2          JAM		[r]
.C:a6fd  EF F2 AE    ISB $AEF2		[o][r][.]
.C:a700  A0 D0       LDY #$D0		[_][P]
.C:a702  F2          JAM		[r]
.C:a703  E5 F3       SBC $F3		[e][s]
.C:a705  F3 A0       ISB ($A0),Y	[s][_]
.C:a707  E1 A0       SBC ($A0,X)	[a][_]
.C:a709  EB E5       USBC #$E5		[k][e]
.C:a70b  F9 AE DC    SBC $DCAE,Y	[y][.][EOT]
.C:a70e  CC EF E1    CPY $E1EF		[L][o][a]
.C:a711  E4 A0       CPX $A0		[d][_]
.C:a713  C3 E8       DCP ($E8,X)	[C][h]
.C:a715  E1 F2       SBC ($F2,X)	[a][r]
.C:a717  E1 E3       SBC ($E3,X)	[a][c]
.C:a719  F4 E5       NOOP $E5,X		[t][e]
.C:a71b  F2          JAM		[r]
.C:a71c  00          BRK		[CR]
.C:a71d  00          BRK		[CR]
.C:a71e  FF D2 E5    ISB $E5D2,X	[Input][R][e]
.C:a721  EE E1 ED    INC $EDE1		[n][a][m]
.C:a724  E5 A0       SBC $A0		[e][_]
.C:a726  C3 E8       DCP ($E8,X)	[C][h]
.C:a728  E1 F2       SBC ($F2,X)	[a][r]
.C:a72a  E1 E3       SBC ($E3,X)	[a][c]
.C:a72c  F4 E5       NOOP $E5,X		[t][e]
.C:a72e  F2          JAM		[r]
.C:a72f  00          BRK		[CR]
.C:a730  00          BRK		[CR]
.C:a731  FF 00 00    ISB $0000,X	[Input][CR][CR]
.C:a734  C3 E8       DCP ($E8,X)	[C][h]
.C:a736  E1 EE       SBC ($EE,X)	[a][n]
.C:a738  E7 E5       ISB $E5		[g][e]
.C:a73a  A0 E8       LDY #$E8		[_][h]
.C:a73c  E9 F3       SBC #$F3		[i][s]
.C:a73e  A0 EE       LDY #$EE		[_][n]
.C:a740  E1 ED       SBC ($ED,X)	[a][m]
.C:a742  E5 A0       SBC $A0		[e][_]
.C:a744  F4 EF       NOOP $EF,X		[t][o]
.C:a746  BA          TSX		[:]
.C:a747  00          BRK		[CR]
.C:a748  00          BRK		[CR]
.C:a749  FF C4 F2    ISB $F2C4,X	[Input][D][r]
.C:a74c  EF F0 A0    ISB $A0F0		[o][p][_]
.C:a74f  E3 E8       ISB ($E8,X)	[c][h]
.C:a751  E1 F2       SBC ($F2,X)	[a][r]
.C:a753  E1 E3       SBC ($E3,X)	[a][c]
.C:a755  F4 E5       NOOP $E5,X		[t][e]
.C:a757  F2          JAM		[r]
.C:a758  A0 EE       LDY #$EE		[_][n]
.C:a75a  F5 ED       SBC $ED,X		[u][m]
.C:a75c  E2 E5       NOOP #$E5		[b][e]
.C:a75e  F2          JAM		[r]
.C:a75f  A0 A8       LDY #$A8		[_][(]
.C:a761  B0 AD       BCS $A710		[0][-]
.C:a763  B6 A9       LDX $A9,Y		[6][)]
.C:a765  A0 E6       LDY #$E6		[_][f]
.C:a767  F2          JAM		[r]
.C:a768  EF ED A0    ISB $A0ED		[o][m][_]
.C:a76b  F4 E8       NOOP $E8,X		[t][h]
.C:a76d  E5 A0       SBC $A0		[e][_]
.C:a76f  F0 E1       BEQ $A752		[p][a]
.C:a771  F2          JAM		[r]
.C:a772  F4 F9       NOOP $F9,X		[t][y]
.C:a774  A0 BF       LDY #$BF		[_][?]
.C:a776  DC				[EOT]
.C:a777  00 05       NOOP $0500,X	Data table/field/whatever...
.C:a779  0A          ASL A
.C:a77a  0F 14 19    SLO $1914
.C:a77d  1E 23 28    ASL $2823,X
.C:a780  2D 00 B8    AND $B800
.C:a783  80 B8       NOOP #$B8
.C:a785  00          BRK
.C:a786  B9 80 B9    LDA $B980,Y
.C:a789  00          BRK
.C:a78a  BA          TSX
.C:a78b  80 BA       NOOP #$BA
.C:a78d  00          BRK
.C:a78e  BB 00 00    LAS $0000,Y
.C:a791  00          BRK
.C:a792  00          BRK
.C:a793  00          BRK
.C:a794  00          BRK
.C:a795  00          BRK
.C:a796  00          BRK
.C:a797  00          BRK
.C:a798  00          BRK
.C:a799  00          BRK
.C:a79a  00          BRK
.C:a79b  00          BRK
.C:a79c  00          BRK
.C:a79d  00          BRK
.C:a79e  00          BRK
.C:a79f  D4 E8       NOOP $E8,X		[T][h]
.C:a7a1  E5 A0       SBC $A0		[e][_]
.C:a7a3  D0 F2       BNE $A797		[p][r]
.C:a7a5  E9 EE       SBC #$EE		[i][n]
.C:a7a7  E3 E5       ISB ($E5,X)	[c][e]
.C:a7a9  F3 F3       ISB ($F3),Y	[s][s]
.C:a7ab  CE EF A0    DEC $A0EF		[N][o][_]
.C:a7ae  C3 E8       DCP ($E8,X)	[C][h]
.C:a7b0  E5 E1       SBC $E1		[e][a]
.C:a7b2  F4 E9       NOOP $E9,X		[t][i]
.C:a7b4  EE E7 A1    INC $A1E7		[n][g][!]
.C:a7b7  C4 EF       CPY $EF		[D][o]
.C:a7b9  F0 F0       BEQ $A7AB		[p][p]
.C:a7bb  EC E5 E7    CPX $E7E5		[l][e][g]
.C:a7be  E1 EE       SBC ($EE,X)	[a][n]
.C:a7c0  E7 E5       ISB $E5		[g][e]
.C:a7c2  F2          JAM		[r]
.C:a7c3  DC DC DC    NOOP $DCDC,X	Data field....
.C:a7c6  DC 10 20    NOOP $2010,X
.C:a7c9  30 40       BMI $A80B
.C:a7cb  50 60       BVC $A82D
.C:a7cd  70 00       BVS $A7CF
.C:a7cf  7F 7E 7D    RRA $7D7E,X
.C:a7d2  7C 7B 7A    NOOP $7A7B,X
.C:a7d5  79 78 77    ADC $7778,Y
.C:a7d8  76 75       ROR $75,X
.C:a7da  74 73       NOOP $73,X
.C:a7dc  72          JAM
.C:a7dd  71 70       ADC ($70),Y
.C:a7df  F2          JAM
.C:a7e0  D6 48       DEC $48,X
.C:a7e2  31 9A       AND ($9A),Y
.C:a7e4  AC C3 4E    LDY $4EC3
.C:a7e7  77 28       RRA $28,X
.C:a7e9  31 10       AND ($10),Y
.C:a7eb  DC C4 46    NOOP $46C4,X
.C:a7ee  7A          NOOP
.C:a7ef  F8          SED
.C:a7f0  66 23       ROR $23
.C:a7f2  89 93       NOOP #$93
.C:a7f4  92          JAM
.C:a7f5  91 90       STA ($90),Y
.C:a7f7  87 84       SAX $84
.C:a7f9  33 A5       RLA ($A5),Y
.C:a7fb  C4 C5       CPY $C5
.C:a7fd  6C 72 29    JMP ($2972)
.C:a800  63 44       RRA ($44,X)
.C:a802  10 01       BPL $A805
.C:a804  01 35       ORA ($35,X)
.C:a806  72          JAM
.C:a807  47 23       SRE $23
.C:a809  03 8F       SLO ($8F,X)
.C:a80b  F3 77       ISB ($77),Y
.C:a80d  42          JAM
.C:a80e  40          RTI
.C:a80f  3F 3E 3D    RLA $3D3E,X
.C:a812  42          JAM
.C:a813  74 73       NOOP $73,X
.C:a815  98          TYA
.C:a816  71 F4       ADC ($F4),Y
.C:a818  F5 35       SBC $35,X
.C:a81a  34 02       NOOP $02,X
.C:a81c  D6 D3       DEC $D3,X
.C:a81e  44 97       NOOP $97
.C:a820  85 63       STA $63
.C:a822  33 73       RLA ($73),Y
.C:a824  45 46       EOR $46
.C:a826  49 48       EOR #$48
.C:a828  47 93       SRE $93
.C:a82a  BD B7 42    LDA $42B7,X
.C:a82d  01 30       ORA ($30,X)
.C:a82f  63 1F       RRA ($1F,X)
.C:a831  29 88       AND #$88
.C:a833  56 63       LSR $63,X
.C:a835  19 18 17    ORA $1718,Y
.C:a838  16 54       ASL $54,X
.C:a83a  77 F2       RRA $F2,X
.C:a83c  F0 11       BEQ $A84F
.C:a83e  70 96       BVS $A7D6
.C:a840  82 35       NOOP #$35
.C:a842  44 AD       NOOP $AD
.C:a844  C5 48       CMP $48
.C:a846  53 5A       SRE ($5A),Y
.C:a848  42          JAM
.C:a849  70 09       BVS $A854
.C:a84b  FF 33 00    ISB $0033,X
.C:a84e  00          BRK
.C:a84f  7F 7E 7D    RRA $7D7E,X
.C:a852  7C 7B 7A    NOOP $7A7B,X
.C:a855  79 78 77    ADC $7778,Y
.C:a858  76 75       ROR $75,X
.C:a85a  74 73       NOOP $73,X
.C:a85c  72          JAM
.C:a85d  71 70       ADC ($70),Y
.C:a85f  F2          JAM
.C:a860  D6 48       DEC $48,X
.C:a862  31 9A       AND ($9A),Y
.C:a864  AC C3 4E    LDY $4EC3
.C:a867  77 28       RRA $28,X
.C:a869  31 10       AND ($10),Y
.C:a86b  DC C4 46    NOOP $46C4,X
.C:a86e  7A          NOOP
.C:a86f  F8          SED
.C:a870  66 23       ROR $23
.C:a872  89 93       NOOP #$93
.C:a874  92          JAM
.C:a875  91 90       STA ($90),Y
.C:a877  87 84       SAX $84
.C:a879  33 A5       RLA ($A5),Y
.C:a87b  C4 C5       CPY $C5
.C:a87d  6C 72 29    JMP ($2972)
.C:a880  63 44       RRA ($44,X)
.C:a882  10 01       BPL $A885
.C:a884  01 35       ORA ($35,X)
.C:a886  72          JAM
.C:a887  47 23       SRE $23
.C:a889  03 8F       SLO ($8F,X)
.C:a88b  F3 77       ISB ($77),Y
.C:a88d  42          JAM
.C:a88e  40          RTI
.C:a88f  3F 3E 3D    RLA $3D3E,X
.C:a892  42          JAM
.C:a893  74 73       NOOP $73,X
.C:a895  98          TYA
.C:a896  71 F4       ADC ($F4),Y
.C:a898  F5 35       SBC $35,X
.C:a89a  34 02       NOOP $02,X
.C:a89c  D6 D3       DEC $D3,X
.C:a89e  44 97       NOOP $97
.C:a8a0  85 63       STA $63
.C:a8a2  33 73       RLA ($73),Y
.C:a8a4  45 46       EOR $46
.C:a8a6  49 48       EOR #$48
.C:a8a8  47 93       SRE $93
.C:a8aa  BD B7 42    LDA $42B7,X
.C:a8ad  01 30       ORA ($30,X)
.C:a8af  63 1F       RRA ($1F,X)
.C:a8b1  29 88       AND #$88
.C:a8b3  56 63       LSR $63,X
.C:a8b5  19 18 17    ORA $1718,Y
.C:a8b8  16 54       ASL $54,X
.C:a8ba  77 F2       RRA $F2,X
.C:a8bc  F0 11       BEQ $A8CF
.C:a8be  70 96       BVS $A856
.C:a8c0  82 35       NOOP #$35
.C:a8c2  44 AD       NOOP $AD
.C:a8c4  C5 48       CMP $48
.C:a8c6  53 5A       SRE ($5A),Y
.C:a8c8  42          JAM
.C:a8c9  70 09       BVS $A8D4
.C:a8cb  FF 33 00    ISB $0033,X