Kevin Chase (Atari_Ace on AtariAge) disassembled the Atari Pascal Language System Runtime/Monitor (the PASCAL file on diskette #1) and has made it available to the community.
He is also breaking down and explaining the Atari Pascal Language System 6502 assembly language code on his AtariAge blog:
- APX Pascal Architecture - Part One
- APX Pascal Architecture - Part Two
- APX Pascal Architecture - Part Three
- APX Pascal Architecture - Part Four
In addition, he maintains an Atari 8-bit Programming Shrine with copious amounts of Atari goodness.
Maybe we will see a bug-fixed, cartridge version of the Atari Pascal Language System yet!
Here is the disassembly:
; Atari Pascal Runtime/Monitor
;
; $80 contains $1d00
; $82 contains $1f00
; $84 contains MEMTOP
; $92-$B2 Emulator fetch loop
=0092 NEXT_OPA = $92
=009D NEXT_OP1 = $9D
=00A3 NEXT_OP = $A3 ; Jump instruction for returning to emulator from native code
=00A4 IP = $A4 ; PC pseudo program counter
; DR0..DR7 16-bit display registers
=00B6 DR0 = $B6
=00C6 LCLBASE = $C6 ; local base register
=00CA XSAVE = $CA
=00CC TMPBASE = $CC ; used for address calculations
; $80..$87 Emulator permanent page zero vars
; $C0 LCLBASE
; $C2 PRGSP return/variable stack pointer ($C8)
; $C4 EVALSP evaluation/parameter stack ($CA)
; $C6 LEXLEVEL of present executing procedure/function
; $C8 TMPBASE
; $D0..$FF temporaries
=0206 VBREAK = $0206
=02E3 RAMSIZ = $02E3
=02E5 MEMTOP = $02E5
=02E7 MEMLO = $02E7
=02FC CH = $02FC
=0340 ICHID = $0340
=0342 ICCMD = $0342
=0344 ICBAL = $0344
=0345 ICBAH = $0345
=0348 ICBLL = $0348
=0349 ICBLH = $0349
=034A ICAX1 = $034A
=034B ICAX2 = $034B
=0600 EVALPAGE = $0600 ; Parameter/Evaluation stack
=E456 CIOV = $E456
=E474 WARMSV = $E474
;
; 1st stage init
;
*= $3300
3300: A2 00 LDX #0
3302: A9 0C LDA #$0C ; close #0
3304: 9D 42 03 STA ICCMD,X
3307: 20 56 E4 JSR CIOV
330A: AD A7 33 LDA $33A7
330D: 85 F0 STA $F0
330F: AD A8 33 LDA $33A7+1
3312: 85 F1 STA $F0+1
3314: AD A9 33 LDA $33A9
3317: 85 F2 STA $F2
3319: AD AA 33 LDA $33A9+1
331C: 85 F3 STA $F2+1
331E: AD AB 33 LDA $33AB
3321: 85 F4 STA $F4
3323: AD AC 33 LDA $33AB+1
3326: 85 F5 STA $F4+1
3328: 20 73 33 JSR $3373
332B: AD AD 33 LDA $33AD
332E: 85 80 STA $80
3330: AD AE 33 LDA $33AD+1
3333: 85 81 STA $80+1
3335: A9 00 LDA #0
3337: 85 82 STA $82
3339: 85 83 STA $82+1
333B: 20 00 A2 JSR $A200
333E: AD E6 02 LDA MEMTOP+1
3341: 85 6A STA $6A
3343: 8D E4 02 STA RAMSIZ+1
3346: A2 00 LDX #0
3348: A9 03 LDA #3 ; open #0,12,0,'E:'
334A: 9D 42 03 STA ICCMD,X
334D: AD AF 33 LDA $33AF
3350: 9D 44 03 STA ICBAL,X
3353: AD B0 33 LDA $33AF+1
3356: 9D 45 03 STA ICBAH,X
3359: A9 0C LDA #$0C
335B: 9D 4A 03 STA ICAX1,X
335E: A9 00 LDA #0
3360: 9D 4B 03 STA ICAX2,X
3363: 20 56 E4 JSR CIOV
3366: AD E5 02 LDA MEMTOP
3369: 85 84 STA $84
336B: AD E6 02 LDA MEMTOP+1
336E: 85 85 STA $84+1
3370: 4C 00 34 JMP $3400
;
; Block copy routine
;
3373: A0 00 LDY #0
3375: B1 F0 LDA ($F0),Y
3377: 91 F2 STA ($F2),Y
3379: A5 F0 LDA $F0
337B: 18 CLC
337C: 69 01 ADC #1
337E: 85 F0 STA $F0
3380: A5 F1 LDA $F0+1
3382: 69 00 ADC #0
3384: 85 F1 STA $F0+1
3386: A5 F2 LDA $F2
3388: 18 CLC
3389: 69 01 ADC #1
338B: 85 F2 STA $F2
338D: A5 F3 LDA $F2+1
338F: 69 00 ADC #0
3391: 85 F3 STA $F2+1
3393: A5 F4 LDA $F4
3395: 38 SEC
3396: E9 01 SBC #1
3398: 85 F4 STA $F4
339A: A5 F5 LDA $F4+1
339C: E9 00 SBC #0
339E: 85 F5 STA $F4+1
33A0: A5 F4 LDA $F4
33A2: 05 F5 ORA $F4+1
33A4: D0 CF BNE $3375
33A6: 60 RTS
33A7: 00 3A .WORD $3A00 ; source
33A9: 00 A0 .WORD $A000 ; destination
33AB: 00 20 .WORD $2000 ; count
33AD: 00 1D .WORD $1D00
33AF: B1 33 .WORD *+2
33B1: 45 3A 9B .BYTE 'E:',$9B
;
; Junk code?
;
33B4: 20 63 33 JSR $3363
33B7: A0 00 LDY #0
33B9: 91 FE STA ($FE),Y
33BB: CE FC 33 DEC $33FC
33BE: E6 FE INC $FE
33C0: D0 ED BNE $33AF
33C2: E6 FF INC $FF
33C4: 4C AF 33 JMP $33AF
33C7: 20 63 33 JSR $3363
33CA: AD FA 33 LDA $33FA
33CD: F0 03 BEQ $33D2
33CF: 4C E3 33 JMP $33E3
33D2: AD FB 33 LDA $33FA+1
33D5: F0 19 BEQ $33F0
33D7: 20 36 33 JSR $3336
33DA: 20 36 33 JSR $3336
33DD: 4C 90 33 JMP $3390
33E0: 4C F0 33 JMP $33F0
33E3: A2 06 LDX #6
33E5: A9 FD LDA #$FD
33E7: 20 09 33 JSR $3309
33EA: CA DEX
33EB: D0 F8 BNE $33E5
33ED: 4C F0 33 JMP $33F0
33F0: AD 00 A0 LDA $A000
33F3: C9 FF CMP #$FF
33F5: D0 F9 BNE $33F0
33F7: 4C 74 E4 JMP WARMSV
33FA: 00 00 .WORD 0
33FC: 00 F0 .WORD $F000
33FE: 00 00 .WORD 0
;
; 2nd stage init
;
3400: 20 00 1F JSR $1F00
3403: A2 00 LDX #0
3405: EA NOP
3406: EA NOP
3407: EA NOP
3408: EA NOP
3409: EA NOP
340A: EA NOP
340B: EA NOP
340C: EA NOP
340D: EA NOP
340E: EA NOP
340F: EA NOP
3410: 4C 13 34 JMP *+3
3413: 20 03 1F JSR $1F03
3416: 3A 34 .WORD $343A
3418: A2 .BYTE $A2
3419: 21 35 .WORD $3521
341B: FD 09 .BYTE $FD,$09
341D: 25 .BYTE $25
341E: 3A 34 .WORD $343A
3420: F1 .BYTE $F1
3421: 2C .BYTE $2C
3422: 05 44 3A .BYTE 5,'D:MON'
3425: 4D 4F 4E
3428: A2 .BYTE $A2
3429: E0 36 .WORD $36E0
342B: 25 .BYTE $25
342C: 3A 34 .WORD $343A
342E: F1 .BYTE $F1
342F: A2 .BYTE $A2
3430: 7D 35 .WORD $357D
3432: 25 .BYTE $25
3433: 3A 34 .WORD $343A
3435: F1 .BYTE $F1
3436: A2 .BYTE $A2
3437: 64 35 .WORD $3564
3439: D9 .BYTE $D9
343A: 00 00 00 .BYTE $00,$00,$00
343D: 00 00 00 .BYTE $00,$00,$00
3440: 00 00 00 .BYTE $00,$00,$00
3443: 00 00 00 .BYTE $00,$00,$00
3446: 00 00 00 .BYTE $00,$00,$00
3449: 00 00 00 .BYTE $00,$00,$00
344C: 00 00 00 .BYTE $00,$00,$00
344F: 00 00 00 .BYTE $00,$00,$00
3452: 00 00 00 .BYTE $00,$00,$00
3455: 00 00 00 .BYTE $00,$00,$00
3458: 00 00 00 .BYTE $00,$00,$00
345B: 00 00 00 .BYTE $00,$00,$00
345E: 00 00 00 .BYTE $00,$00,$00
3461: 00 00 00 .BYTE $00,$00,$00
3464: 00 00 00 .BYTE $00,$00,$00
3467: 00 00 00 .BYTE $00,$00,$00
346A: 00 00 00 .BYTE $00,$00,$00
346D: 00 00 00 .BYTE $00,$00,$00
3470: 00 00 00 .BYTE $00,$00,$00
3473: 00 00 00 .BYTE $00,$00,$00
3476: 00 00 00 .BYTE $00,$00,$00
3479: 00 00 00 .BYTE $00,$00,$00
347C: 00 00 00 .BYTE $00,$00,$00
347F: 00 00 00 .BYTE $00,$00,$00
3482: 00 00 00 .BYTE $00,$00,$00
3485: 00 00 00 .BYTE $00,$00,$00
3488: 00 00 00 .BYTE $00,$00,$00
348B: 00 00 00 .BYTE $00,$00,$00
348E: 00 00 00 .BYTE $00,$00,$00
3491: 00 00 00 .BYTE $00,$00,$00
3494: 00 00 00 .BYTE $00,$00,$00
3497: 00 00 00 .BYTE $00,$00,$00
349A: 00 00 00 .BYTE $00,$00,$00
349D: 00 00 00 .BYTE $00,$00,$00
34A0: 00 00 00 .BYTE $00,$00,$00
34A3: 00 00 00 .BYTE $00,$00,$00
34A6: 00 00 00 .BYTE $00,$00,$00
34A9: 00 00 00 .BYTE $00,$00,$00
34AC: 00 00 00 .BYTE $00,$00,$00
34AF: 00 00 00 .BYTE $00,$00,$00
34B2: 00 00 00 .BYTE $00,$00,$00
34B5: 00 00 00 .BYTE $00,$00,$00
34B8: 00 00 00 .BYTE $00,$00,$00
34BB: 00 00 00 .BYTE $00,$00,$00
34BE: 00 00 00 .BYTE $00,$00,$00
34C1: 00 00 00 .BYTE $00,$00,$00
34C4: 00 00 00 .BYTE $00,$00,$00
34C7: 00 00 00 .BYTE $00,$00,$00
34CA: 00 00 00 .BYTE $00,$00,$00
34CD: 00 00 00 .BYTE $00,$00,$00
34D0: 00 00 00 .BYTE $00,$00,$00
34D3: 00 00 00 .BYTE $00,$00,$00
34D6: 00 00 00 .BYTE $00,$00,$00
34D9: 00 00 00 .BYTE $00,$00,$00
34DC: 00 00 00 .BYTE $00,$00,$00
34DF: 00 00 00 .BYTE $00,$00,$00
34E2: 00 00 00 .BYTE $00,$00,$00
34E5: 00 00 00 .BYTE $00,$00,$00
34E8: 00 00 00 .BYTE $00,$00,$00
34EB: 00 00 00 .BYTE $00,$00,$00
34EE: 00 00 00 .BYTE $00,$00,$00
34F1: 00 00 00 .BYTE $00,$00,$00
34F4: 00 00 00 .BYTE $00,$00,$00
34F7: 00 00 00 .BYTE $00,$00,$00
34FA: 00 00 00 .BYTE $00,$00,$00
34FD: 00 00 00 .BYTE $00,$00,$00
3500: 00 00 00 .BYTE $00,$00,$00
3503: 00 00 00 .BYTE $00,$00,$00
3506: 00 00 00 .BYTE $00,$00,$00
3509: 00 00 00 .BYTE $00,$00,$00
350C: 00 00 00 .BYTE $00,$00,$00
350F: 00 00 00 .BYTE $00,$00,$00
3512: 00 00 00 .BYTE $00,$00,$00
3515: 00 00 00 .BYTE $00,$00,$00
3518: 00 00 00 .BYTE $00,$00,$00
351B: 00 00 00 .BYTE $00,$00,$00
351E: 4C 00 00 JMP $0000
3521: 4C 24 35 JMP *+3
3524: 20 06 1F JSR $1F06
3527: 00 00 .WORD 0
3529: 25 .BYTE $25
352A: 59 35 .WORD $3559
352C: F1 .BYTE $F1
352D: 28 .BYTE $28
352E: 25 .BYTE $25
352F: 5B 35 .WORD $355B
3531: F2 .BYTE $F2
3532: 29 .BYTE $29
3533: 25 .BYTE $25
3534: 5B 35 .WORD $355B
3536: DC .BYTE $DC
3537: 02 .BYTE $02
3538: F1 .BYTE $F1
3539: 29 .BYTE $29
353A: 25 .BYTE $25
353B: 5F 35 .WORD $355F
353D: F2 .BYTE $F2
353E: 29 .BYTE $29
353F: 25 .BYTE $25
3540: 57 35 .WORD $3557
3542: F1 .BYTE $F1
3543: 29 .BYTE $29
3544: 25 .BYTE $25
3545: 53 35 .WORD $3553
3547: 25 .BYTE $25
3548: C4 39 .WORD $39C4
354A: 29 .BYTE $29
354B: 24 .BYTE $24
354C: 86 .BYTE $86
354D: 25 .BYTE $25
354E: 53 35 .WORD $3553
3550: 21 .BYTE $21
3551: 29 .BYTE $29
3552: A6 .BYTE $A6
3553: 00 00 00 .BYTE $00,$00,$00
3556: 00 00 00 .BYTE $00,$00,$00
3559: 00 00 00 .BYTE $00,$00,$00
355C: 00 00 00 .BYTE $00,$00,$00
355F: 00 00 .BYTE $00,$00
3561: 4C 00 00 JMP $0000
3564: 4C 67 35 JMP *+3
3567: 20 06 1F JSR $1F06
356A: 06 00 .WORD 6
356C: 09 00 .BYTE $09,$00
356E: 09 02 .BYTE $09,$02
3570: E1 .BYTE $E1
3571: DC 15 .BYTE $DC,$15
3573: 20 .BYTE $20
3574: 09 04 .BYTE $09,$04
3576: E2 .BYTE $E2
3577: FD 0A .BYTE $FD,$0A
3579: A6 .BYTE $A6
357A: 4C 00 00 JMP $0000
357D: 4C 83 35 JMP $3583
3580: 4C 2B 36 JMP $362B
3583: 20 06 1F JSR $1F06
3586: 04 00 .WORD 4
3588: 09 00 .BYTE $09,$00
358A: 09 02 .BYTE $09,$02
358C: E1 .BYTE $E1
358D: A2 .BYTE $A2
358E: 56 38 .WORD $3856
3590: E0 .BYTE $E0
3591: F2 .BYTE $F2
3592: 38 .BYTE $38
3593: 60 .BYTE $60
3594: 98 1E .BYTE $98,$1E
3596: E0 .BYTE $E0
3597: 38 .BYTE $38
3598: 09 00 .BYTE $09,$00
359A: E1 .BYTE $E1
359B: DC 17 .BYTE $DC,$17
359D: F2 .BYTE $F2
359E: 28 .BYTE $28
359F: 90 23 .BYTE $90,$23
35A1: E1 .BYTE $E1
35A2: DC 17 .BYTE $DC,$17
35A4: F1 .BYTE $F1
35A5: 28 .BYTE $28
35A6: E1 .BYTE $E1
35A7: DC 1C .BYTE $DC,$1C
35A9: F1 .BYTE $F1
35AA: 28 .BYTE $28
35AB: E1 .BYTE $E1
35AC: DC 1A .BYTE $DC,$1A
35AE: F1 .BYTE $F1
35AF: 28 .BYTE $28
35B0: E1 .BYTE $E1
35B1: DC 16 .BYTE $DC,$16
35B3: F3 .BYTE $F3
35B4: 28 .BYTE $28
35B5: E1 .BYTE $E1
35B6: DC 11 .BYTE $DC,$11
35B8: E0 .BYTE $E0
35B9: 29 .BYTE $29
35BA: E1 .BYTE $E1
35BB: DC 18 .BYTE $DC,$18
35BD: E0 .BYTE $E0
35BE: 29 .BYTE $29
35BF: E1 .BYTE $E1
35C0: DC 1E .BYTE $DC,$1E
35C2: E1 .BYTE $E1
35C3: DC 20 .BYTE $DC,$20
35C5: 29 .BYTE $29
35C6: E1 .BYTE $E1
35C7: 20 .BYTE $20
35C8: F1 .BYTE $F1
35C9: 60 .BYTE $60
35CA: E1 .BYTE $E1
35CB: A2 .BYTE $A2
35CC: 5A 37 .WORD $375A
35CE: 34 .BYTE $34
35CF: 32 .BYTE $32
35D0: 98 55 .BYTE $98,$55
35D2: F2 .BYTE $F2
35D3: A2 .BYTE $A2
35D4: 7C 38 .WORD $387C
35D6: 90 63 .BYTE $90,$63
35D8: E1 .BYTE $E1
35D9: A2 .BYTE $A2
35DA: 57 37 .WORD $3757
35DC: 98 5F .BYTE $98,$5F
35DE: 90 A7 .BYTE $90,$A7
35E0: 90 63 .BYTE $90,$63
35E2: E1 .BYTE $E1
35E3: A4 .BYTE $A4
35E4: 9C FF .WORD $FF9C
35E6: A2 .BYTE $A2
35E7: 90 38 .WORD $3890
35E9: F1 .BYTE $F1
35EA: 60 .BYTE $60
35EB: 98 9D .BYTE $98,$9D
35ED: E1 .BYTE $E1
35EE: DC 1C .BYTE $DC,$1C
35F0: F1 .BYTE $F1
35F1: 28 .BYTE $28
35F2: E1 .BYTE $E1
35F3: DC 1A .BYTE $DC,$1A
35F5: F1 .BYTE $F1
35F6: 28 .BYTE $28
35F7: E1 .BYTE $E1
35F8: DC 11 .BYTE $DC,$11
35FA: E0 .BYTE $E0
35FB: 29 .BYTE $29
35FC: E0 .BYTE $E0
35FD: F1 .BYTE $F1
35FE: 62 .BYTE $62
35FF: 98 9B .BYTE $98,$9B
3601: E1 .BYTE $E1
3602: DC 13 .BYTE $DC,$13
3604: F1 .BYTE $F1
3605: 29 .BYTE $29
3606: E1 .BYTE $E1
3607: DC 18 .BYTE $DC,$18
3609: E0 .BYTE $E0
360A: 29 .BYTE $29
360B: E1 .BYTE $E1
360C: DC 17 .BYTE $DC,$17
360E: 20 .BYTE $20
360F: 98 98 .BYTE $98,$98
3611: E1 .BYTE $E1
3612: E1 .BYTE $E1
3613: DC 11 .BYTE $DC,$11
3615: 21 .BYTE $21
3616: A2 .BYTE $A2
3617: FB 36 .WORD $36FB
3619: 90 9B .BYTE $90,$9B
361B: A2 .BYTE $A2
361C: 06 38 .WORD $3806
361E: 90 A7 .BYTE $90,$A7
3620: E1 .BYTE $E1
3621: DC 1C .BYTE $DC,$1C
3623: F2 .BYTE $F2
3624: 28 .BYTE $28
3625: E1 .BYTE $E1
3626: DC 1A .BYTE $DC,$1A
3628: F2 .BYTE $F2
3629: 28 .BYTE $28
362A: A6 .BYTE $A6
362B: 20 06 1F JSR $1F06
362E: 2A 00 .WORD $2A
3630: 09 00 .BYTE $09,$00
3632: F1 .BYTE $F1
3633: 09 02 .BYTE $09,$02
3635: 25 .BYTE $25
3636: 40 03 .WORD ICHID
3638: E1 .BYTE $E1
3639: D7 .BYTE $D7
363A: 00 00 10 .WORD $0000,$0010
363D: 00
363E: 20 .BYTE $20
363F: 24 FF .BYTE $24,$FF
3641: 62 .BYTE $62
3642: 98 2C .BYTE $98,$2C
3644: E1 .BYTE $E1
3645: F2 .BYTE $F2
3646: 40 .BYTE $40
3647: 09 02 .BYTE $09,$02
3649: E1 .BYTE $E1
364A: 24 07 .BYTE $24,$07
364C: 64 .BYTE $64
364D: 98 2A .BYTE $98,$2A
364F: F2 .BYTE $F2
3650: A2 .BYTE $A2
3651: 7C 38 .WORD $387C
3653: 90 B1 .BYTE $90,$B1
3655: 90 0A .BYTE $90,$0A
3657: 25 .BYTE $25
3658: 40 03 .WORD ICHID
365A: E1 .BYTE $E1
365B: D7 .BYTE $D7
365C: 00 00 10 .WORD $0000,$0010
365F: 00
3660: 09 26 .BYTE $09,$26
3662: E0 .BYTE $E0
3663: 09 28 .BYTE $09,$28
3665: 01 28 .BYTE $01,$28
3667: F1 .BYTE $F1
3668: 40 .BYTE $40
3669: 20 .BYTE $20
366A: 09 04 .BYTE $09,$04
366C: E2 .BYTE $E2
366D: 24 10 .BYTE $24,$10
366F: 64 .BYTE $64
3670: 98 4B .BYTE $98,$4B
3672: 24 10 .BYTE $24,$10
3674: 09 04 .BYTE $09,$04
3676: 01 28 .BYTE $01,$28
3678: E2 .BYTE $E2
3679: F2 .BYTE $F2
367A: 40 .BYTE $40
367B: 40 .BYTE $40
367C: 24 9B .BYTE $24,$9B
367E: 28 .BYTE $28
367F: 01 28 .BYTE $01,$28
3681: DC 15 .BYTE $DC,$15
3683: E1 .BYTE $E1
3684: 24 10 .BYTE $24,$10
3686: 48 .BYTE $48
3687: 28 .BYTE $28
3688: 01 26 .BYTE $01,$26
368A: DC 02 .BYTE $DC,$02
368C: 24 03 .BYTE $24,$03
368E: 28 .BYTE $28
368F: 01 26 .BYTE $01,$26
3691: DC 04 .BYTE $DC,$04
3693: 01 28 .BYTE $01,$28
3695: F2 .BYTE $F2
3696: 40 .BYTE $40
3697: 29 .BYTE $29
3698: 01 26 .BYTE $01,$26
369A: DC 0B .BYTE $DC,$0B
369C: F1 .BYTE $F1
369D: 28 .BYTE $28
369E: 01 28 .BYTE $01,$28
36A0: DC 16 .BYTE $DC,$16
36A2: 20 .BYTE $20
36A3: 90 93 .BYTE $90,$93
36A5: 01 26 .BYTE $01,$26
36A7: DC 0A .BYTE $DC,$0A
36A9: 24 0C .BYTE $24,$0C
36AB: 28 .BYTE $28
36AC: 90 9E .BYTE $90,$9E
36AE: 01 26 .BYTE $01,$26
36B0: DC 0A .BYTE $DC,$0A
36B2: F6 .BYTE $F6
36B3: 28 .BYTE $28
36B4: 90 9E .BYTE $90,$9E
36B6: F2 .BYTE $F2
36B7: A2 .BYTE $A2
36B8: 7C 38 .WORD $387C
36BA: 90 B1 .BYTE $90,$B1
36BC: 90 9E .BYTE $90,$9E
36BE: B4 .BYTE $B4
36BF: 02 00 01 .WORD $0002,$0001
36C2: 00
36C3: 00 7A .BYTE $00,$7A
36C5: 00 83 .BYTE $00,$83
36C7: 00 8B .BYTE $00,$8B
36C9: E1 .BYTE $E1
36CA: A2 .BYTE $A2
36CB: 93 39 .WORD $3993
36CD: 24 80 .BYTE $24,$80
36CF: 68 .BYTE $68
36D0: 98 AD .BYTE $98,$AD
36D2: F2 .BYTE $F2
36D3: A2 .BYTE $A2
36D4: 7C 38 .WORD $387C
36D6: 90 B1 .BYTE $90,$B1
36D8: F1 .BYTE $F1
36D9: A2 .BYTE $A2
36DA: 7C 38 .WORD $387C
36DC: A6 .BYTE $A6
36DD: 4C 00 00 JMP $0000
36E0: 4C E3 36 JMP *+3
36E3: 20 06 1F JSR $1F06
36E6: 56 00 .WORD $56
36E8: A8 00 .BYTE $A8,$00
36EA: D2 .BYTE $D2
36EB: BC 51 .BYTE $BC,$51
36ED: 09 52 .BYTE $09,$52
36EF: 09 54 .BYTE $09,$54
36F1: 01 54 .BYTE $01,$54
36F3: A8 00 .BYTE $A8,$00
36F5: BC 10 .BYTE $BC,$10
36F7: A6 .BYTE $A6
36F8: 4C 00 00 JMP $0000
36FB: 4C FE 36 JMP *+3
36FE: 20 06 1F JSR $1F06
3701: 04 00 .WORD 4
3703: 09 00 .BYTE $09,$00
3705: 09 02 .BYTE $09,$02
3707: E1 .BYTE $E1
3708: A2 .BYTE $A2
3709: 56 38 .WORD $3856
370B: E1 .BYTE $E1
370C: DC 1A .BYTE $DC,$1A
370E: F1 .BYTE $F1
370F: 28 .BYTE $28
3710: E1 .BYTE $E1
3711: DC 18 .BYTE $DC,$18
3713: E0 .BYTE $E0
3714: 29 .BYTE $29
3715: E1 .BYTE $E1
3716: DC 1C .BYTE $DC,$1C
3718: 20 .BYTE $20
3719: 98 24 .BYTE $98,$24
371B: E1 .BYTE $E1
371C: DC 1A .BYTE $DC,$1A
371E: F2 .BYTE $F2
371F: 28 .BYTE $28
3720: 90 55 .BYTE $90,$55
3722: A2 .BYTE $A2
3723: 06 38 .WORD $3806
3725: E1 .BYTE $E1
3726: DC 17 .BYTE $DC,$17
3728: 20 .BYTE $20
3729: 98 55 .BYTE $98,$55
372B: E1 .BYTE $E1
372C: DC 20 .BYTE $DC,$20
372E: F1 .BYTE $F1
372F: 40 .BYTE $40
3730: 20 .BYTE $20
3731: 24 9B .BYTE $24,$9B
3733: 60 .BYTE $60
3734: E1 .BYTE $E1
3735: DC 1C .BYTE $DC,$1C
3737: 20 .BYTE $20
3738: 32 .BYTE $32
3739: 98 42 .BYTE $98,$42
373B: E1 .BYTE $E1
373C: DC 1A .BYTE $DC,$1A
373E: F2 .BYTE $F2
373F: 28 .BYTE $28
3740: E1 .BYTE $E1
3741: DC 1C .BYTE $DC,$1C
3743: 20 .BYTE $20
3744: E1 .BYTE $E1
3745: DC 1A .BYTE $DC,$1A
3747: 20 .BYTE $20
3748: 32 .BYTE $32
3749: 98 55 .BYTE $98,$55
374B: E1 .BYTE $E1
374C: DC 20 .BYTE $DC,$20
374E: F1 .BYTE $F1
374F: 40 .BYTE $40
3750: 24 20 .BYTE $24,$20
3752: 28 .BYTE $28
3753: A6 .BYTE $A6
3754: 4C 00 00 JMP $0000
3757: 4C 5D 37 JMP $375D
375A: 4C BA 37 JMP *+3
375D: 20 06 1F JSR $1F06
3760: 0C 00 .WORD $0C
3762: 09 0A .BYTE $09,$0A
3764: F1 .BYTE $F1
3765: 08 00 .BYTE $08,$00
3767: E5 .BYTE $E5
3768: 2C .BYTE $2C
3769: 04 43 4F .BYTE 4,'CON:'
376C: 4E 3A
376E: 81 .BYTE $81
376F: 01 .BYTE $01
3770: 98 20 .BYTE $98,$20
3772: E5 .BYTE $E5
3773: DC 16 .BYTE $DC,$16
3775: 24 05 .BYTE $24,$05
3777: 28 .BYTE $28
3778: F2 .BYTE $F2
3779: 08 00 .BYTE $08,$00
377B: 90 5A .BYTE $90,$5A
377D: E5 .BYTE $E5
377E: 2C .BYTE $2C
377F: 04 4C 53 .BYTE 4,'LST:'
3782: 54 3A
3784: 81 01 .BYTE $81,$01
3786: 98 3D .BYTE $98,$3D
3788: E5 .BYTE $E5
3789: 2C .BYTE $2C
378A: 02 50 3A .BYTE 2,'P:'
378D: BC 10 .BYTE $BC,$10
378F: E5 .BYTE $E5
3790: DC 16 .BYTE $DC,$16
3792: 24 07 .BYTE $24,$07
3794: 28 .BYTE $28
3795: F2 .BYTE $F2
3796: 08 00 .BYTE $08,$00
3798: 90 5A .BYTE $90,$5A
379A: E5 .BYTE $E5
379B: 2C .BYTE $2C
379C: 04 4B 42 .BYTE 4,'KBD:'
379F: 44 3A
37A1: 81 01 .BYTE $81,$01
37A3: E5 .BYTE $E5
37A4: 2C .BYTE $2C
37A5: 04 54 52 .BYTE 4,'TRM:'
37A8: 4D 3A
37AA: 81 01 .BYTE $81,$01
37AC: 32 .BYTE $32
37AD: 98 5A .BYTE $98,$5A
37AF: E5 .BYTE $E5
37B0: DC 16 .BYTE $DC,$16
37B2: F5 .BYTE $F5
37B3: 28 .BYTE $28
37B4: F2 .BYTE $F2
37B5: 08 00 .BYTE $08,$00
37B7: 00 00 .BYTE $00,$00
37B9: A6 .BYTE $A6
37BA: 20 06 1F JSR $1F06
37BD: 30 00 .WORD $30
37BF: 09 0A .BYTE $09,$0A
37C1: F1 .BYTE $F1
37C2: 08 00 .BYTE $08,$00
37C4: A8 0E .BYTE $A8,$0E
37C6: 24 20 .BYTE $24,$20
37C8: 24 7E .BYTE $24,$7E
37CA: CD 20 .BYTE $CD,$20
37CC: 2B 0F .BYTE $2B,$0F
37CE: E5 .BYTE $E5
37CF: 20 .BYTE $20
37D0: 24 0F .BYTE $24,$0F
37D2: 64 .BYTE $64
37D3: E5 .BYTE $E5
37D4: 20 .BYTE $20
37D5: F2 .BYTE $F2
37D6: 66 .BYTE $66
37D7: 32 .BYTE $32
37D8: 98 22 .BYTE $98,$22
37DA: 90 46 .BYTE $90,$46
37DC: F2 .BYTE $F2
37DD: E5 .BYTE $E5
37DE: 20 .BYTE $20
37DF: D3 12 0C .BYTE $D3,$12,$0C,$00,$2E,$00
37E2: 00 2E 00
37E5: D5 12 0C .BYTE $D5,$12,$0C,$00,$2E,$00,$00,$43
37E8: 00 2E 00
37EB: 00 43
37ED: E5 .BYTE $E5
37EE: E6 .BYTE $E6
37EF: 40 .BYTE $40
37F0: 20 .BYTE $20
37F1: 03 0F 0E .BYTE $03,$0F,$0E
37F4: CB 20 .BYTE $CB,$20
37F6: 34 .BYTE $34
37F7: 98 41 .BYTE $98,$41
37F9: 90 46 .BYTE $90,$46
37FB: 90 2B .BYTE $90,$2B
37FD: F2 .BYTE $F2
37FE: 08 00 .BYTE $08,$00
3800: 00 00 .BYTE $00,$00
3802: A6 .BYTE $A6
3803: 4C 00 00 JMP $0000
3806: 4C 09 38 JMP *+3
3809: 20 06 1F JSR $1F06
380C: 04 00 .WORD 4
380E: A2 .BYTE $A2
380F: 69 38 .WORD $3869
3811: 09 02 .BYTE $09,$02
3813: E1 .BYTE $E1
3814: DC 1E .BYTE $DC,$1E
3816: A8 00 .BYTE $A8,$00
3818: F3 .BYTE $F3
3819: A2 .BYTE $A2
381A: A3 38 .WORD $38A3
381C: E1 .BYTE $E1
381D: DC 16 .BYTE $DC,$16
381F: 20 .BYTE $20
3820: 90 31 .BYTE $90,$31
3822: E0 .BYTE $E0
3823: A2 .BYTE $A2
3824: 74 39 .WORD $3974
3826: 90 44 .BYTE $90,$44
3828: E0 .BYTE $E0
3829: A2 .BYTE $A2
382A: 85 39 .WORD $3985
382C: 90 44 .BYTE $90,$44
382E: A2 .BYTE $A2
382F: FF 38 .WORD $38FF
3831: 90 44 .BYTE $90,$44
3833: 24 03 .BYTE $24,$03
3835: A2 .BYTE $A2
3836: 7C 38 .WORD $387C
3838: 90 44 .BYTE $90,$44
383A: B4 .BYTE $B4
383B: 01 00 05 .WORD $0001,$0005
383E: 00
383F: 00 25 .BYTE $00,$25
3841: 00 25 .BYTE $00,$25
3843: 00 2A .BYTE $00,$2A
3845: 00 25 .BYTE $00,$25
3847: 00 19 .BYTE $00,$19
3849: 00 1F .BYTE $00,$1F
384B: 00 2A .BYTE $00,$2A
384D: E1 .BYTE $E1
384E: DC 13 .BYTE $DC,$13
3850: F1 .BYTE $F1
3851: 29 .BYTE $29
3852: A6 .BYTE $A6
3853: 4C 00 00 JMP $0000
3856: 4C 59 38 JMP $3859
3859: 20 06 1F JSR $1F06
385C: 02 00 .WORD 2
385E: 09 00 .BYTE $09,$00
3860: 25 .BYTE $25
3861: 55 35 .WORD $3555
3863: E0 .BYTE $E0
3864: 29 .BYTE $29
3865: A6 .BYTE $A6
3866: 4C 00 00 JMP $0000
3869: 4C 6C 38 JMP $386C
386C: 20 06 1F JSR $1F06
386F: 0A 00 .WORD $0A
3871: 25 .BYTE $25
3872: 55 35 .WORD $3555
3874: 21 .BYTE $21
3875: 09 00 .BYTE $09,$00
3877: E0 .BYTE $E0
3878: A6 .BYTE $A6
3879: 4C 00 00 JMP $0000
387C: 4C 7F 38 JMP $387F
387F: 20 06 1F JSR $1F06
3882: 02 00 .WORD $0002
3884: 08 00 .BYTE $08,$00
3886: 25 .BYTE $25
3887: 57 35 .WORD $3557
3889: 00 00 .BYTE $00,$00
388B: 28 .BYTE $28
388C: A6 .BYTE $A6
388D: 4C 00 00 JMP $0000
3890: 4C 93 38 JMP $3893
3893: 20 06 1F JSR $1F06
3896: 0A 00 .WORD $0A
3898: 25 .BYTE $25
3899: 57 35 .WORD $3557
389B: 20 .BYTE $20
389C: 09 00 .BYTE $09,$00
389E: E0 .BYTE $E0
389F: A6 .BYTE $A6
38A0: 4C 00 00 JMP $0000
38A3: 4C AF 38 JMP $38AF
38A6: 4C BF 38 JMP $38BF
38A9: 4C CF 38 JMP $38CF
38AC: 4C DF 38 JMP $38DF
38AF: 20 06 1F JSR $1F06
38B2: 06 00 .WORD 6
38B4: 09 00 .BYTE $09,$00
38B6: 09 02 .BYTE $09,$02
38B8: 09 04 .BYTE $09,$04
38BA: E1 .BYTE $E1
38BB: E2 .BYTE $E2
38BC: E0 .BYTE $E0
38BD: C0 .BYTE $C0
38BE: A6 .BYTE $A6
38BF: 20 06 1F JSR $1F06
38C2: 06 00 .WORD 6
38C4: 09 00 .BYTE $09,$00
38C6: 09 02 .BYTE $09,$02
38C8: 09 04 .BYTE $09,$04
38CA: E1 .BYTE $E1
38CB: E2 .BYTE $E2
38CC: E0 .BYTE $E0
38CD: C0 .BYTE $C0
38CE: A6 .BYTE $A6
38CF: 20 06 1F JSR $1F06
38D2: 06 00 .WORD 6
38D4: 09 00 .BYTE $09,$00
38D6: 09 02 .BYTE $09,$02
38D8: 09 04 .BYTE $09,$04
38DA: E1 .BYTE $E1
38DB: E2 .BYTE $E2
38DC: E0 .BYTE $E0
38DD: C4 .BYTE $C4
38DE: A6 .BYTE $A6
38DF: 20 06 1F JSR $1F06
38E2: 08 00 .WORD 8
38E4: 08 00 .BYTE $08,$00
38E6: 09 02 .BYTE $09,$02
38E8: 09 04 .BYTE $09,$04
38EA: A8 00 .BYTE $A8,$00
38EC: E2 .BYTE $E2
38ED: F2 .BYTE $F2
38EE: A4 .BYTE $A4
38EF: B4 FF .WORD $FFB4
38F1: E2 .BYTE $E2
38F2: F2 .BYTE $F2
38F3: 40 .BYTE $40
38F4: 09 06 .BYTE $09,$06
38F6: E2 .BYTE $E2
38F7: E3 .BYTE $E3
38F8: E1 .BYTE $E1
38F9: F2 .BYTE $F2
38FA: 44 .BYTE $44
38FB: A4 .BYTE $A4
38FC: A7 FF .WORD $FFA7
38FE: A6 .BYTE $A6
38FF: 20 B0 39 JSR $39B0
3902: 86 CA STX XSAVE
3904: A0 15 LDY #$15
3906: B1 8E LDA ($8E),Y
3908: AA TAX
3909: A9 07 LDA #7
390B: 9D 42 03 STA ICCMD,X
390E: A0 1E LDY #$1E
3910: B1 8E LDA ($8E),Y
3912: 9D 44 03 STA ICBAL,X
3915: C8 INY
3916: B1 8E LDA ($8E),Y
3918: 9D 45 03 STA ICBAH,X
391B: A0 18 LDY #$18
391D: B1 8E LDA ($8E),Y
391F: 9D 48 03 STA ICBLL,X
3922: C8 INY
3923: B1 8E LDA ($8E),Y
3925: 9D 49 03 STA ICBLH,X
3928: 20 56 E4 JSR CIOV
392B: C0 00 CPY #0
392D: 10 34 BPL $3963
392F: C0 88 CPY #$88
3931: D0 35 BNE $3968
3933: A0 15 LDY #$15
3935: B1 8E LDA ($8E),Y
3937: AA TAX
3938: BD 48 03 LDA ICBLL,X
393B: A0 18 LDY #$18
393D: 91 8E STA ($8E),Y
393F: BD 49 03 LDA ICBLH,X
3942: C8 INY
3943: 91 8E STA ($8E),Y
3945: 88 DEY
3946: 11 8E ORA ($8E),Y
3948: D0 19 BNE $3963
394A: A0 1C LDY #$1C
394C: A9 01 LDA #1
394E: 91 8E STA ($8E),Y
3950: C8 INY
3951: A9 00 LDA #0
3953: 91 8E STA ($8E),Y
3955: A0 1A LDY #$1A
3957: A9 01 LDA #1
3959: 91 8E STA ($8E),Y
395B: C8 INY
395C: A9 00 LDA #0
395E: 91 8E STA ($8E),Y
3960: 4C 63 39 JMP $3963
3963: A9 00 LDA #0
3965: 18 CLC
3966: 90 03 BCC $396B
3968: A9 03 LDA #3
396A: 38 SEC
396B: 20 BD 39 JSR $39BD
396E: A6 CA LDX XSAVE
3970: 60 RTS
3971: 4C 00 00 JMP $0000
3974: 4C 77 39 JMP $3977
3977: 20 06 1F JSR $1F06
397A: 02 .BYTE $02
397B: 00 09 .BYTE $00,$09
397D: 00 E0 .BYTE $00,$E0
397F: FD 01 .BYTE $FD,$01
3981: A6 .BYTE $A6
3982: 4C 00 00 JMP $0000
3985: 4C 88 39 JMP $3988
3988: 20 06 1F JSR $1F06
398B: 02 00 .WORD 2
398D: 09 00 .BYTE $09,$00
398F: E0 .BYTE $E0
3990: FD 00 .BYTE $FD,$00
3992: A6 .BYTE $A6
3993: BD 00 06 LDA EVALPAGE,X
3996: E8 INX
3997: E8 INX
3998: 86 CA STX XSAVE
399A: 0A ASL A
399B: 0A ASL A
399C: 0A ASL A
399D: 0A ASL A
399E: AA TAX
399F: 20 56 E4 JSR CIOV
39A2: A9 00 LDA #0
39A4: A6 CA LDX XSAVE
39A6: CA DEX
39A7: 9D 00 06 STA EVALPAGE,X
39AA: 98 TYA
39AB: CA DEX
39AC: 9D 00 06 STA EVALPAGE,X
39AF: 60 RTS
39B0: AD 55 35 LDA $3555
39B3: 85 8E STA $8E
39B5: A0 01 LDY #1
39B7: B9 55 35 LDA $3555,Y
39BA: 85 8F STA $8E+1
39BC: 60 RTS
39BD: 8D BD 39 STA $39BD
39C0: 60 RTS
39C1: 4C 00 00 JMP $0000
39C4: 4C C7 39 JMP $39C7
39C7: 20 06 1F JSR $1F06
39CA: 00 00 .BYTE $00,$00
39CC: A6 .BYTE $A6
39CD: 00 00 00 .BYTE $00,$00,$00
39D0: 00 00 00 .BYTE $00,$00,$00
39D3: 00 00 00 .BYTE $00,$00,$00
39D6: 00 00 00 .BYTE $00,$00,$00
39D9: 00 00 00 .BYTE $00,$00,$00
39DC: 00 00 00 .BYTE $00,$00,$00
39DF: 00 00 00 .BYTE $00,$00,$00
39E2: 00 00 00 .BYTE $00,$00,$00
39E5: 00 00 00 .BYTE $00,$00,$00
39E8: 00 00 00 .BYTE $00,$00,$00
39EB: 00 00 00 .BYTE $00,$00,$00
39EE: 00 00 00 .BYTE $00,$00,$00
39F1: 00 00 00 .BYTE $00,$00,$00
39F4: 00 00 00 .BYTE $00,$00,$00
39F7: 00 00 00 .BYTE $00,$00,$00
39FA: 00 00 00 .BYTE $00,$00,$00
39FD: 00 00 00 .BYTE $00,$00,$00
*= $A000
; Relocated from $3A00
; Then moved to $1D00
; $0x
A000: 08 A3 .WORD $A308 ; 00 - 2 bytes
A002: 36 A3 .WORD $A336 ; 01 - 2 bytes
A004: 66 A3 .WORD $A366 ; 02 - 2 bytes
A006: 92 A3 .WORD $A392 ; 03 - 3 bytes
A008: 1E A3 .WORD $A31E ; 04 - 3 bytes
A00A: 4D A3 .WORD $A34D ; 05 - 3 bytes
A00C: 7C A3 .WORD $A37C ; 06 - 3 bytes
A00E: C4 A3 .WORD $A3C4 ; 07 - 4 bytes
A010: F6 A3 .WORD $A3F6 ; 08 - 2 bytes
A012: 1A A4 .WORD $A41A ; 09 - 2 bytes
A014: 4A A4 .WORD $A44A ; 0A - 2 bytes
A016: 8C A4 .WORD $A48C ; 0B - 3 bytes
A018: 07 A4 .WORD $A407 ; 0C - 3 bytes
A01A: 31 A4 .WORD $A431 ; 0D - 3 bytes
A01C: 6B A4 .WORD $A46B ; 0E - 3 bytes
A01E: B6 A4 .WORD $A4B6 ; 0F - 4 bytes
; $1x
A020: 08 A5 .WORD $A508 ; 10 - 3 bytes
A022: 34 A5 .WORD $A534 ; 11 - 4 bytes
A024: 62 A5 .WORD $A562 ; 12 - 3 bytes
A026: 8A A5 .WORD $A58A ; 13 - 3 bytes
A028: 1E A5 .WORD $A51E ; 14 - 4 bytes
A02A: 4B A5 .WORD $A54B ; 15 - 4 bytes
A02C: 76 A5 .WORD $A576 ; 16 - 4 bytes
A02E: BA A5 .WORD $A5BA ; 17 - 4 bytes
A030: EA A5 .WORD $A5EA ; 18 - 3 bytes
A032: 0C A6 .WORD $A60C ; 19 - 3 bytes
A034: 3A A6 .WORD $A63A ; 1A - 3 bytes
A036: 78 A6 .WORD $A678 ; 1B - 3 bytes
A038: FB A5 .WORD $A5FB ; 1C - 4 bytes
A03A: 23 A6 .WORD $A623 ; 1D - 4 bytes
A03C: 59 A6 .WORD $A659 ; 1E - 4 bytes
A03E: A0 A6 .WORD $A6A0 ; 1F - 4 bytes
; $2x
A040: C8 A6 .WORD $A6C8 ; 20 - 1 byte
A042: E5 A6 .WORD $A6E5 ; 21 - 1 byte
A044: 03 A7 .WORD $A703 ; 22 - 1 byte
A046: 1E A7 .WORD $A71E ; 23 - 2 bytes
A048: 23 A8 .WORD $A823 ; 24 - 2 bytes LOAD 1-byte
A04A: 36 A8 .WORD $A836 ; 25 - 3 bytes LOAD 2-byte
A04C: 4A A8 .WORD $A84A ; 26 - 5 bytes LOAD 4-byte
A04E: 61 A8 .WORD $A861 ; 27 - variable
A050: 44 A7 .WORD $A744 ; 28 - 1 byte
A052: 60 A7 .WORD $A760 ; 29 - 1 byte
A054: 86 A7 .WORD $A786 ; 2A - 1 byte
A056: B2 A7 .WORD $A7B2 ; 2B - 2 bytes
A058: 8F A8 .WORD $A88F ; 2C - n bytes LOAD string
A05A: A8 A2 .WORD $A2A8 ; 2D - 3 bytes
A05C: C8 A2 .WORD $A2C8 ; 2E - 3 bytes
A05E: B5 B9 .WORD $B9B5
; $3x
A060: 15 B1 .WORD $B115 ; 30 - 1 byte - AND
A062: B5 B9 .WORD $B9B5
A064: 2C B1 .WORD $B12C ; 32 - 1 byte - ORA
A066: B5 B9 .WORD $B9B5
A068: 5A B1 .WORD $B15A ; 34 - 1 byte - NOT - 1's Complement
A06A: B5 B9 .WORD $B9B5
A06C: 43 B1 .WORD $B143 ; 36 - 1 byte - EOR
A06E: B5 B9 .WORD $B9B5
A070: 6D B1 .WORD $B16D ; 38 - 1 byte - NEG - 2's Complement
A072: B5 B9 .WORD $B9B5
A074: B5 B9 .WORD $B9B5
A076: B5 B9 .WORD $B9B5
A078: B5 B9 .WORD $B9B5
A07A: B5 B9 .WORD $B9B5
A07C: B5 B9 .WORD $B9B5
A07E: B5 B9 .WORD $B9B5
; $4x
A080: 31 B0 .WORD $B031 ; 40 - 1 byte
A082: B5 B9 .WORD $B9B5
A084: B5 B9 .WORD $B9B5
A086: B5 B9 .WORD $B9B5
A088: 49 B0 .WORD $B049 ; 44 - 1 byte
A08A: B5 B9 .WORD $B9B5
A08C: B5 B9 .WORD $B9B5
A08E: B5 B9 .WORD $B9B5
A090: 9A B0 .WORD $B09A ; 48 - 1 byte
A092: B5 B9 .WORD $B9B5
A094: B5 B9 .WORD $B9B5
A096: B5 B9 .WORD $B9B5
A098: A0 B0 .WORD $B0A0 ; 4C - 1 byte
A09A: B5 B9 .WORD $B9B5
A09C: B5 B9 .WORD $B9B5
A09E: B5 B9 .WORD $B9B5
; $5x
A0A0: DF B0 .WORD $B0DF ; 50
A0A2: B5 B9 .WORD $B9B5
A0A4: B5 B9 .WORD $B9B5
A0A6: B5 B9 .WORD $B9B5
A0A8: E5 B0 .WORD $B0E5 ; 54
A0AA: B5 B9 .WORD $B9B5
A0AC: B5 B9 .WORD $B9B5
A0AE: B5 B9 .WORD $B9B5
A0B0: 09 B1 .WORD $B109 ; 58
A0B2: B5 B9 .WORD $B9B5
A0B4: B5 B9 .WORD $B9B5
A0B6: B5 B9 .WORD $B9B5
A0B8: 0F B1 .WORD $B10F ; 5C
A0BA: B5 B9 .WORD $B9B5
A0BC: B5 B9 .WORD $B9B5
A0BE: B5 B9 .WORD $B9B5
; $6x
A0C0: 85 B1 .WORD $B185 ; 60 - 1 byte
A0C2: B5 B9 .WORD $B9B5
A0C4: 97 B1 .WORD $B197 ; 62 - 1 byte
A0C6: B5 B9 .WORD $B9B5
A0C8: A9 B1 .WORD $B1A9 ; 64 - 1 byte
A0CA: B5 B9 .WORD $B9B5
A0CC: B2 B1 .WORD $B1B2 ; 66 - 1 byte
A0CE: B5 B9 .WORD $B9B5
A0D0: B9 B1 .WORD $B1B9 ; 68 - 1 byte
A0D2: B5 B9 .WORD $B9B5
A0D4: C0 B1 .WORD $B1C0 ; 6A - 1 byte
A0D6: B5 B9 .WORD $B9B5
A0D8: FF A8 .WORD $A8FF ; 6C
A0DA: 1D A9 .WORD $A91D ; 6D
A0DC: 3C A9 .WORD $A93C ; 6E
A0DE: 58 A9 .WORD $A958 ; 6F
; $7x
A0E0: 85 B1 .WORD $B185 ; 70 - 1 byte
A0E2: B5 B9 .WORD $B9B5
A0E4: 97 B1 .WORD $B197 ; 72
A0E6: B5 B9 .WORD $B9B5
A0E8: C9 B1 .WORD $B1C9 ; 74
A0EA: B5 B9 .WORD $B9B5
A0EC: D2 B1 .WORD $B1D2 ; 76
A0EE: B5 B9 .WORD $B9B5
A0F0: D9 B1 .WORD $B1D9 ; 78
A0F2: B5 B9 .WORD $B9B5
A0F4: E0 B1 .WORD $B1E0 ; 7A
A0F6: B5 B9 .WORD $B9B5
A0F8: 7B A9 .WORD $A97B ; 7C - 3 bytes
A0FA: 94 A9 .WORD $A994 ; 7D
A0FC: B3 A9 .WORD $A9B3 ; 7E
A0FE: DA A9 .WORD $A9DA ; 7F
; $8x
A100: B5 B9 .WORD $B9B5
A102: 05 B2 .WORD $B205 ; 81 - 2 bytes
A104: B5 B9 .WORD $B9B5
A106: 1E B2 .WORD $B21E ; 83 - 2 bytes
A108: B5 B9 .WORD $B9B5
A10A: 37 B2 .WORD $B237 ; 85 - 2 bytes
A10C: B5 B9 .WORD $B9B5
A10E: 50 B2 .WORD $B250 ; 87 - 2 bytes
A110: B5 B9 .WORD $B9B5
A112: 69 B2 .WORD $B269 ; 89 - 2 bytes
A114: B5 B9 .WORD $B9B5
A116: 82 B2 .WORD $B282 ; 8B - 2 bytes
A118: B5 B9 .WORD $B9B5
A11A: B5 B9 .WORD $B9B5
A11C: B5 B9 .WORD $B9B5
A11E: B5 B9 .WORD $B9B5
; $9x
A120: 65 AA .WORD $AA65 ; 90 - 2 bytes?
A122: 65 AA .WORD $AA65
A124: 65 AA .WORD $AA65
A126: 65 AA .WORD $AA65
A128: 65 AA .WORD $AA65
A12A: 65 AA .WORD $AA65
A12C: 65 AA .WORD $AA65
A12E: 65 AA .WORD $AA65
A130: 7A AA .WORD $AA7A ; 98 - 2 bytes
A132: 7A AA .WORD $AA7A
A134: 7A AA .WORD $AA7A
A136: 7A AA .WORD $AA7A
A138: 7A AA .WORD $AA7A
A13A: 7A AA .WORD $AA7A
A13C: 7A AA .WORD $AA7A
A13E: 7A AA .WORD $AA7A
; $Ax
A140: B5 B9 .WORD $B9B5
A142: A3 AB .WORD $ABA3 ; A1
A144: 2C AB .WORD $AB2C ; A2 - 3 bytes?
A146: 5A AB .WORD $AB5A ; A3
A148: F9 AA .WORD $AAF9 ; A4 - 3 bytes? (relative branch?)
A14A: B5 B9 .WORD $B9B5
A14C: 96 AC .WORD $AC96 ; A6 - 6 bytes
A14E: B5 B9 .WORD $B9B5
A150: 7C A2 .WORD $A27C ; A8 - 2 bytes
A152: 92 A2 .WORD $A292 ; A9 - 3 bytes
A154: B1 A8 .WORD $A8B1 ; AA
A156: CB A8 .WORD $A8CB ; AB
A158: E0 A4 .WORD $A4E0 ; AC - 3 bytes
A15A: F4 A4 .WORD $A4F4 ; AD - 4 bytes
A15C: B5 B9 .WORD $B9B5
A15E: B5 B9 .WORD $B9B5
; $Bx
A160: 08 AA .WORD $AA08 ; B0 - 3 bytes - JUMP
A162: 18 AA .WORD $AA18 ; B1 - 3 bytes - Conditional JUMP
A164: 25 AA .WORD $AA25 ; B2 - 3 bytes - JUMP_EQ
A166: 45 AA .WORD $AA45 ; B3 - 3 bytes - JUMP_NE
A168: 8B AA .WORD $AA8B ; B4 - 5 bytes
A16A: B5 B9 .WORD $B9B5
A16C: B5 B9 .WORD $B9B5
A16E: 22 B0 .WORD $B022 ; B7
A170: 7E B7 .WORD $B77E ; B8
A172: 69 B7 .WORD $B769 ; B9
A174: 54 B7 .WORD $B754 ; BA
A176: DE B7 .WORD $B7DE ; BB
A178: 3E B7 .WORD $B73E ; BC - 2 bytes
A17A: 0A B8 .WORD $B80A ; BD
A17C: B5 B9 .WORD $B9B5
A17E: B5 B9 .WORD $B9B5
; $Cx
A180: EC AE .WORD $AEEC ; C0 - 1 byte
A182: B5 B9 .WORD $B9B5
A184: B5 B9 .WORD $B9B5
A186: B5 B9 .WORD $B9B5
A188: FD AE .WORD $AEFD ; C4 - 1 byte
A18A: B5 B9 .WORD $B9B5
A18C: B5 B9 .WORD $B9B5
A18E: B5 B9 .WORD $B9B5
A190: 64 B6 .WORD $B664 ; C8
A192: 70 B6 .WORD $B670 ; C9
A194: 7C B6 .WORD $B67C ; CA - 2 bytes
A196: 88 B6 .WORD $B688 ; CB - 2 bytes
A198: C4 B6 .WORD $B6C4 ; CC
A19A: D0 B6 .WORD $B6D0 ; CD - 2 bytes
A19C: B5 B9 .WORD $B9B5
A19E: B5 B9 .WORD $B9B5
; $Dx
A1A0: 03 AF .WORD $AF03
A1A2: 1C AF .WORD $AF1C
A1A4: 5F AF .WORD $AF5F ; D2 - 1 byte
A1A6: D8 AC .WORD $ACD8 ; D3 - 6 bytes
A1A8: 40 AD .WORD $AD40 ; D4
A1AA: B9 AD .WORD $ADB9 ; D5 - 8 bytes
A1AC: 1F AE .WORD $AE1F ; D6
A1AE: A2 AF .WORD $AFA2 ; D7 - 5 bytes
A1B0: DE AF .WORD $AFDE ; D8
A1B2: 1F B0 .WORD $B01F ; D9 - 1 byte
A1B4: 8C AF .WORD $AF8C ; DA
A1B6: 9D AF .WORD $AF9D ; DB
A1B8: 35 AF .WORD $AF35 ; DC - 2 bytes
A1BA: 4A AF .WORD $AF4A ; DD
A1BC: 7C AF .WORD $AF7C ; DE
A1BE: B5 B9 .WORD $B9B5
; $Ex
A1C0: F5 A2 .WORD $A2F5 ; E0 - 1 byte
A1C2: F5 A2 .WORD $A2F5
A1C4: F5 A2 .WORD $A2F5
A1C6: F5 A2 .WORD $A2F5
A1C8: F5 A2 .WORD $A2F5
A1CA: F5 A2 .WORD $A2F5
A1CC: F5 A2 .WORD $A2F5
A1CE: F5 A2 .WORD $A2F5
A1D0: EC A8 .WORD $A8EC ; E8 - 1 byte
A1D2: EC A8 .WORD $A8EC
A1D4: EC A8 .WORD $A8EC
A1D6: EC A8 .WORD $A8EC
A1D8: EC A8 .WORD $A8EC
A1DA: EC A8 .WORD $A8EC
A1DC: EC A8 .WORD $A8EC
A1DE: EC A8 .WORD $A8EC
; $Fx
A1E0: EA A7 .WORD $A7EA ; F0 - load constant -1 - 1 byte
A1E2: FA A7 .WORD $A7FA ; F1 - load constant 0 - 1 byte
A1E4: FE A7 .WORD $A7FE ; F2 - load constant 1 - 1 byte
A1E6: 02 A8 .WORD $A802 ; F3 - load constant 2 - 1 byte
A1E8: 06 A8 .WORD $A806 ; F4 - load constant 4 - 1 byte
A1EA: 0A A8 .WORD $A80A ; F5 - load constant 6 - 1 byte
A1EC: 0E A8 .WORD $A80E ; F6 - load constant 8 - 1 byte
A1EE: 12 A8 .WORD $A812 ; F7 - load constant 10 - 1 byte
A1F0: B5 B9 .WORD $B9B5
A1F2: B5 B9 .WORD $B9B5
A1F4: B5 B9 .WORD $B9B5
A1F6: B5 B9 .WORD $B9B5
A1F8: B5 B9 .WORD $B9B5
A1FA: 1A BA .WORD $BA1A ; FD
A1FC: C3 B9 .WORD $B9C3 ; FE - BRK
A1FE: C0 B9 .WORD $B9C0 ; FF - NOP
;
; Interpreter vectors, relocated to $1F00
;
A200: 4C 12 B8 JMP $B812 ; 00 INITIALIZE
A203: 4C B1 AB JMP $ABB1 ; 01 BEGIN 0
A206: 4C B6 AB JMP $ABB6 ; 02 BEGIN 1
A209: 4C BB AB JMP $ABBB ; 03
A20C: 4C C0 AB JMP $ABC0 ; 04
A20F: 4C C5 AB JMP $ABC5 ; 05
A212: 4C CA AB JMP $ABCA ; 06
A215: 4C CF AB JMP $ABCF ; 07
A218: 4C D4 AB JMP $ABD4 ; 08 BEGIN 7
A21B: 4C 85 B0 JMP $B085 ; 09
A21E: 4C 7C B0 JMP $B07C ; 0A
A221: 4C CA B0 JMP $B0CA ; 0B
A224: 4C C1 B0 JMP $B0C1 ; 0C
A227: 4C F4 B0 JMP $B0F4 ; 0D
A22A: 4C EB B0 JMP $B0EB ; 0E
A22D: 4C 2F BE JMP $BE2F ; 0F - COMPARE INT16
A230: 4C 50 BE JMP $BE50 ; 10 - COMPARE BOOL
A233: 4C 5F BE JMP $BE5F ; 11 - COMPARE STRING
A236: 4C 9D BE JMP $BE9D ; 12 - COMPARE BYTES?
A239: 4C 4F B4 JMP $B44F ; 13 - OR BYTES?
A23C: 4C 62 B4 JMP $B462 ; 14 - AND BYTES?
A23F: 4C 75 B4 JMP $B475 ; 15 - NOT BYTES?
A242: 4C 8A B4 JMP $B48A ; 16
A245: 4C EA B4 JMP $B4EA ; 17
A248: 4C E3 B4 JMP $B4E3 ; 18
A24B: 4C 1B B5 JMP $B51B ; 19
A24E: 4C 3D B5 JMP $B53D ; 1A
A251: 4C 5F B5 JMP $B55F ; 1B
A254: 4C 99 B5 JMP $B599 ; 1C
A257: 4C E1 AE JMP $AEE1 ; 1D
A25A: 4C F2 AE JMP $AEF2 ; 1E
A25D: 4C DC B6 JMP $B6DC ; 1F
A260: 4C 84 B7 JMP $B784 ; 20
A263: 4C E4 B7 JMP $B7E4 ; 21
A266: 4C 5A B7 JMP $B75A ; 22
A269: 4C 4A B7 JMP $B74A ; 23
A26C: 4C 0C BD JMP $BD0C ; 24
A26F: 4C F5 B8 JMP $B8F5 ; 25
A272: 4C 87 B8 JMP $B887 ; 26
A275: 4C 5F BC JMP $BC5F ; 27
A278: 00 A0 .WORD $A000
A27A: 78 02 .WORD $0278
;
; Opcode A8 - Load LCLBASE
;
A27C: A0 01 LDY #1
A27E: 20 CA BE JSR $BECA
A281: A5 CC LDA TMPBASE
A283: CA DEX
A284: CA DEX
A285: 9D 00 06 STA EVALPAGE,X
A288: A5 CD LDA TMPBASE+1
A28A: 9D 01 06 STA EVALPAGE+1,X
A28D: A9 02 LDA #2
A28F: 4C 92 00 JMP NEXT_OPA
;
; Opcode A9
;
A292: A0 01 LDY #1
A294: 20 D8 BE JSR $BED8
A297: A5 CC LDA TMPBASE
A299: CA DEX
A29A: CA DEX
A29B: 9D 00 06 STA EVALPAGE,X
A29E: A5 CD LDA TMPBASE+1
A2A0: 9D 01 06 STA EVALPAGE+1,X
A2A3: A9 03 LDA #3
A2A5: 4C 92 00 JMP NEXT_OPA
;
; Opcode 2D
;
A2A8: A0 01 LDY #1
A2AA: 20 CA BE JSR $BECA
A2AD: A0 00 LDY #0
A2AF: B1 CC LDA (TMPBASE),Y
A2B1: A0 02 LDY #2
A2B3: 18 CLC
A2B4: 71 A4 ADC (IP),Y
A2B6: CA DEX
A2B7: CA DEX
A2B8: 9D 00 06 STA EVALPAGE,X
A2BB: 88 DEY
A2BC: B1 CC LDA (TMPBASE),Y
A2BE: 69 00 ADC #0
A2C0: 9D 01 06 STA EVALPAGE+1,X
A2C3: A9 03 LDA #3
A2C5: 4C 92 00 JMP NEXT_OPA
;
; Opcode 2E
;
A2C8: A0 01 LDY #1
A2CA: 20 CA BE JSR $BECA
A2CD: A0 00 LDY #0
A2CF: B1 CC LDA (TMPBASE),Y
A2D1: A0 02 LDY #2
A2D3: 18 CLC
A2D4: 71 A4 ADC (IP),Y
A2D6: 48 PHA
A2D7: 88 DEY
A2D8: B1 CC LDA (TMPBASE),Y
A2DA: 69 00 ADC #0
A2DC: 85 CD STA TMPBASE+1
A2DE: 68 PLA
A2DF: 85 CC STA TMPBASE
A2E1: A0 00 LDY #0
A2E3: B1 CC LDA (TMPBASE),Y
A2E5: C8 INY
A2E6: CA DEX
A2E7: CA DEX
A2E8: 9D 00 06 STA EVALPAGE,X
A2EB: B1 CC LDA (TMPBASE),Y
A2ED: 9D 01 06 STA EVALPAGE+1,X
A2F0: A9 03 LDA #3
A2F2: 4C 92 00 JMP NEXT_OPA
;
; Opcode E0 - Load16 reg.
; Opcode E1
; Opcode E2
; Opcode E3
; Opcode E4
; Opcode E5
; Opcode E6
; Opcode E7
;
A2F5: 29 0F AND #$0F
A2F7: A8 TAY
A2F8: B1 C6 LDA (LCLBASE),Y
A2FA: C8 INY
A2FB: CA DEX
A2FC: CA DEX
A2FD: 9D 00 06 STA EVALPAGE,X
A300: B1 C6 LDA (LCLBASE),Y
A302: 9D 01 06 STA EVALPAGE+1,X
A305: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 00 - Load8 reg.
;
A308: A0 01 LDY #1
A30A: B1 A4 LDA (IP),Y
A30C: A8 TAY
A30D: B1 C6 LDA (LCLBASE),Y
A30F: CA DEX
A310: CA DEX
A311: 9D 00 06 STA EVALPAGE,X
A314: A9 00 LDA #0
A316: 9D 01 06 STA EVALPAGE+1,X
A319: A9 02 LDA #2
A31B: 4C 92 00 JMP NEXT_OPA
;
; Opcode 04
;
A31E: A0 01 LDY #1
A320: 20 D8 BE JSR $BED8
A323: A0 00 LDY #0
A325: B1 CC LDA (TMPBASE),Y
A327: CA DEX
A328: CA DEX
A329: 9D 00 06 STA EVALPAGE,X
A32C: A9 00 LDA #0
A32E: 9D 01 06 STA EVALPAGE+1,X
A331: A9 03 LDA #3
A333: 4C 92 00 JMP NEXT_OPA
;
; Opcode 01 - Load16 reg.
;
A336: A0 01 LDY #1
A338: B1 A4 LDA (IP),Y
A33A: A8 TAY
A33B: B1 C6 LDA (LCLBASE),Y
A33D: C8 INY
A33E: CA DEX
A33F: CA DEX
A340: 9D 00 06 STA EVALPAGE,X
A343: B1 C6 LDA (LCLBASE),Y
A345: 9D 01 06 STA EVALPAGE+1,X
A348: A9 02 LDA #2
A34A: 4C 92 00 JMP NEXT_OPA
;
; Opcode 05
;
A34D: A0 01 LDY #1
A34F: 20 D8 BE JSR $BED8
A352: A0 00 LDY #0
A354: B1 CC LDA (TMPBASE),Y
A356: C8 INY
A357: CA DEX
A358: CA DEX
A359: 9D 00 06 STA EVALPAGE,X
A35C: B1 CC LDA (TMPBASE),Y
A35E: 9D 01 06 STA EVALPAGE+1,X
A361: A9 03 LDA #3
A363: 4C 92 00 JMP NEXT_OPA
;
; Opcode 02
;
A366: A0 01 LDY #1
A368: 20 CA BE JSR $BECA
A36B: A0 04 LDY #4
A36D: 88 DEY
A36E: CA DEX
A36F: B1 CC LDA (TMPBASE),Y
A371: 9D 00 06 STA EVALPAGE,X
A374: 98 TYA
A375: D0 F6 BNE $A36D
A377: A9 02 LDA #2
A379: 4C 92 00 JMP NEXT_OPA
;
; Opcode 06
;
A37C: A0 01 LDY #1
A37E: 20 D8 BE JSR $BED8
A381: A0 04 LDY #4
A383: 88 DEY
A384: CA DEX
A385: B1 CC LDA (TMPBASE),Y
A387: 9D 00 06 STA EVALPAGE,X
A38A: 98 TYA
A38B: D0 F6 BNE $A383
A38D: A9 03 LDA #3
A38F: 4C 92 00 JMP NEXT_OPA
;
; Opcode 03
;
A392: A0 02 LDY #2
A394: 20 CA BE JSR $BECA
A397: A0 01 LDY #1
A399: B1 A4 LDA (IP),Y
A39B: 10 11 BPL $A3AE
A39D: A5 CC LDA TMPBASE
A39F: CA DEX
A3A0: CA DEX
A3A1: 9D 00 06 STA EVALPAGE,X
A3A4: A5 CD LDA TMPBASE+1
A3A6: 9D 01 06 STA EVALPAGE+1,X
A3A9: A9 03 LDA #3
A3AB: 4C 92 00 JMP NEXT_OPA
A3AE: 29 0F AND #$0F
A3B0: 18 CLC
A3B1: 69 01 ADC #1
A3B3: 0A ASL A
A3B4: A8 TAY
A3B5: 88 DEY
A3B6: CA DEX
A3B7: B1 CC LDA (TMPBASE),Y
A3B9: 9D 00 06 STA EVALPAGE,X
A3BC: 98 TYA
A3BD: D0 F6 BNE $A3B5
A3BF: A9 03 LDA #3
A3C1: 4C 92 00 JMP NEXT_OPA
;
; Opcode 07
;
A3C4: A0 02 LDY #2
A3C6: 20 D8 BE JSR $BED8
A3C9: A0 01 LDY #1
A3CB: B1 A4 LDA (IP),Y
A3CD: 10 11 BPL $A3E0
A3CF: A5 CC LDA TMPBASE
A3D1: CA DEX
A3D2: CA DEX
A3D3: 9D 00 06 STA EVALPAGE,X
A3D6: A5 CD LDA TMPBASE+1
A3D8: 9D 01 06 STA EVALPAGE+1,X
A3DB: A9 04 LDA #4
A3DD: 4C 92 00 JMP NEXT_OPA
A3E0: 29 0F AND #$0F
A3E2: 18 CLC
A3E3: 69 01 ADC #1
A3E5: 0A ASL A
A3E6: A8 TAY
A3E7: 88 DEY
A3E8: CA DEX
A3E9: B1 CC LDA (TMPBASE),Y
A3EB: 9D 00 06 STA EVALPAGE,X
A3EE: 98 TYA
A3EF: D0 F6 BNE $A3E7
A3F1: A9 04 LDA #4
A3F3: 4C 92 00 JMP NEXT_OPA
;
; Opcode 08
;
A3F6: A0 01 LDY #1
A3F8: B1 A4 LDA (IP),Y
A3FA: A8 TAY
A3FB: BD 00 06 LDA EVALPAGE,X
A3FE: E8 INX
A3FF: 91 C6 STA (LCLBASE),Y
A401: E8 INX
A402: A9 02 LDA #2
A404: 4C 92 00 JMP NEXT_OPA
;
; Opcode 0C
;
A407: A0 01 LDY #1
A409: 20 D8 BE JSR $BED8
A40C: A0 00 LDY #0
A40E: BD 00 06 LDA EVALPAGE,X
A411: E8 INX
A412: 91 CC STA (TMPBASE),Y
A414: E8 INX
A415: A9 03 LDA #3
A417: 4C 92 00 JMP NEXT_OPA
;
; Opcode 09
;
A41A: A0 01 LDY #1
A41C: B1 A4 LDA (IP),Y
A41E: A8 TAY
A41F: BD 00 06 LDA EVALPAGE,X
A422: E8 INX
A423: 91 C6 STA (LCLBASE),Y
A425: C8 INY
A426: BD 00 06 LDA EVALPAGE,X
A429: E8 INX
A42A: 91 C6 STA (LCLBASE),Y
A42C: A9 02 LDA #2
A42E: 4C 92 00 JMP NEXT_OPA
;
; Opcode 0D
;
A431: A0 01 LDY #1
A433: 20 D8 BE JSR $BED8
A436: A0 00 LDY #0
A438: BD 00 06 LDA EVALPAGE,X
A43B: E8 INX
A43C: 91 CC STA (TMPBASE),Y
A43E: C8 INY
A43F: BD 00 06 LDA EVALPAGE,X
A442: E8 INX
A443: 91 CC STA (TMPBASE),Y
A445: A9 03 LDA #3
A447: 4C 92 00 JMP NEXT_OPA
;
; Opcode 0A
;
A44A: A0 01 LDY #1
A44C: 20 CA BE JSR $BECA
A44F: A0 04 LDY #4
A451: 86 CA STX XSAVE
A453: 98 TYA
A454: 18 CLC
A455: 65 CA ADC XSAVE
A457: 85 CA STA XSAVE
A459: AA TAX
A45A: 88 DEY
A45B: CA DEX
A45C: BD 00 06 LDA EVALPAGE,X
A45F: 91 CC STA (TMPBASE),Y
A461: 98 TYA
A462: D0 F6 BNE $A45A
A464: A6 CA LDX XSAVE
A466: A9 02 LDA #2
A468: 4C 92 00 JMP NEXT_OPA
;
; Opcode 0E
;
A46B: A0 01 LDY #1
A46D: 20 D8 BE JSR $BED8
A470: A0 04 LDY #4
A472: 86 CA STX XSAVE
A474: 98 TYA
A475: 18 CLC
A476: 65 CA ADC XSAVE
A478: 85 CA STA XSAVE
A47A: AA TAX
A47B: 88 DEY
A47C: CA DEX
A47D: BD 00 06 LDA EVALPAGE,X
A480: 91 CC STA (TMPBASE),Y
A482: 98 TYA
A483: D0 F6 BNE $A47B
A485: A6 CA LDX XSAVE
A487: A9 03 LDA #3
A489: 4C 92 00 JMP NEXT_OPA
;
; Opcode 0B
;
A48C: A0 02 LDY #2
A48E: 20 CA BE JSR $BECA
A491: A0 01 LDY #1
A493: B1 A4 LDA (IP),Y
A495: 29 0F AND #$0F
A497: 18 CLC
A498: 69 01 ADC #1
A49A: 0A ASL A
A49B: A8 TAY
A49C: 86 CA STX XSAVE
A49E: 98 TYA
A49F: 18 CLC
A4A0: 65 CA ADC XSAVE
A4A2: 85 CA STA XSAVE
A4A4: AA TAX
A4A5: 88 DEY
A4A6: CA DEX
A4A7: BD 00 06 LDA EVALPAGE,X
A4AA: 91 CC STA (TMPBASE),Y
A4AC: 98 TYA
A4AD: D0 F6 BNE $A4A5
A4AF: A6 CA LDX XSAVE
A4B1: A9 03 LDA #3
A4B3: 4C 92 00 JMP NEXT_OPA
;
; Opcode 0F
;
A4B6: A0 02 LDY #2
A4B8: 20 D8 BE JSR $BED8
A4BB: A0 01 LDY #1
A4BD: B1 A4 LDA (IP),Y
A4BF: 29 0F AND #$0F
A4C1: 18 CLC
A4C2: 69 01 ADC #1
A4C4: 0A ASL A
A4C5: A8 TAY
A4C6: 86 CA STX XSAVE
A4C8: 98 TYA
A4C9: 18 CLC
A4CA: 65 CA ADC XSAVE
A4CC: 85 CA STA XSAVE
A4CE: AA TAX
A4CF: 88 DEY
A4D0: CA DEX
A4D1: BD 00 06 LDA EVALPAGE,X
A4D4: 91 CC STA (TMPBASE),Y
A4D6: 98 TYA
A4D7: D0 F6 BNE $A4CF
A4D9: A6 CA LDX XSAVE
A4DB: A9 04 LDA #4
A4DD: 4C 92 00 JMP NEXT_OPA
;
; Opcode AC
;
A4E0: 20 E7 BE JSR $BEE7
A4E3: A5 CC LDA TMPBASE
A4E5: CA DEX
A4E6: CA DEX
A4E7: 9D 00 06 STA EVALPAGE,X
A4EA: A5 CD LDA TMPBASE+1
A4EC: 9D 01 06 STA EVALPAGE+1,X
A4EF: A9 03 LDA #3
A4F1: 4C 92 00 JMP NEXT_OPA
;
; Opcode AD
;
A4F4: 20 05 BF JSR $BF05
A4F7: A5 CC LDA TMPBASE
A4F9: CA DEX
A4FA: CA DEX
A4FB: 9D 00 06 STA EVALPAGE,X
A4FE: A5 CD LDA TMPBASE+1
A500: 9D 01 06 STA EVALPAGE+1,X
A503: A9 04 LDA #4
A505: 4C 92 00 JMP NEXT_OPA
;
; Opcode 10
;
A508: 20 E7 BE JSR $BEE7
A50B: A0 00 LDY #0
A50D: B1 CC LDA (TMPBASE),Y
A50F: CA DEX
A510: CA DEX
A511: 9D 00 06 STA EVALPAGE,X
A514: A9 00 LDA #0
A516: 9D 01 06 STA EVALPAGE+1,X
A519: A9 03 LDA #3
A51B: 4C 92 00 JMP NEXT_OPA
;
; Opcode 14
;
A51E: 20 05 BF JSR $BF05
A521: A0 00 LDY #0
A523: B1 CC LDA (TMPBASE),Y
A525: CA DEX
A526: CA DEX
A527: 9D 00 06 STA EVALPAGE,X
A52A: A9 00 LDA #0
A52C: 9D 01 06 STA EVALPAGE+1,X
A52F: A9 04 LDA #4
A531: 4C 92 00 JMP NEXT_OPA
;
; Opcode 11
;
A534: 20 E7 BE JSR $BEE7
A537: A0 00 LDY #0
A539: B1 CC LDA (TMPBASE),Y
A53B: C8 INY
A53C: CA DEX
A53D: CA DEX
A53E: 9D 00 06 STA EVALPAGE,X
A541: B1 CC LDA (TMPBASE),Y
A543: 9D 01 06 STA EVALPAGE+1,X
A546: A9 03 LDA #3
A548: 4C 92 00 JMP NEXT_OPA
;
; Opcode 15
;
A54B: 20 05 BF JSR $BF05
A54E: A0 00 LDY #0
A550: B1 CC LDA (TMPBASE),Y
A552: C8 INY
A553: CA DEX
A554: CA DEX
A555: 9D 00 06 STA EVALPAGE,X
A558: B1 CC LDA (TMPBASE),Y
A55A: 9D 01 06 STA EVALPAGE+1,X
A55D: A9 04 LDA #4
A55F: 4C 92 00 JMP NEXT_OPA
;
; Opcode 12
;
A562: 20 E7 BE JSR $BEE7
A565: A0 04 LDY #4
A567: 88 DEY
A568: CA DEX
A569: B1 CC LDA (TMPBASE),Y
A56B: 9D 00 06 STA EVALPAGE,X
A56E: 98 TYA
A56F: D0 F6 BNE $A567
A571: A9 03 LDA #3
A573: 4C 92 00 JMP NEXT_OPA
;
; Opcode 16
;
A576: 20 05 BF JSR $BF05
A579: A0 04 LDY #4
A57B: 88 DEY
A57C: CA DEX
A57D: B1 CC LDA (TMPBASE),Y
A57F: 9D 00 06 STA EVALPAGE,X
A582: 98 TYA
A583: D0 F6 BNE $A57B
A585: A9 04 LDA #4
A587: 4C 92 00 JMP NEXT_OPA
;
; Opcode 13
;
A58A: 20 E7 BE JSR $BEE7
A58D: A0 01 LDY #1
A58F: B1 A4 LDA (IP),Y
A591: 10 11 BPL $A5A4
A593: A5 CC LDA TMPBASE
A595: CA DEX
A596: CA DEX
A597: 9D 00 06 STA EVALPAGE,X
A59A: A5 CD LDA TMPBASE+1
A59C: 9D 01 06 STA EVALPAGE+1,X
A59F: A9 03 LDA #3
A5A1: 4C 92 00 JMP NEXT_OPA
A5A4: 29 0F AND #$0F
A5A6: 18 CLC
A5A7: 69 01 ADC #1
A5A9: 0A ASL A
A5AA: A8 TAY
A5AB: 88 DEY
A5AC: CA DEX
A5AD: B1 CC LDA (TMPBASE),Y
A5AF: 9D 00 06 STA EVALPAGE,X
A5B2: 98 TYA
A5B3: D0 F6 BNE $A5AB
A5B5: A9 03 LDA #3
A5B7: 4C 92 00 JMP NEXT_OPA
;
; Opcode 17
;
A5BA: 20 05 BF JSR $BF05
A5BD: A0 01 LDY #1
A5BF: B1 A4 LDA (IP),Y
A5C1: 10 11 BPL $A5D4
A5C3: A5 CC LDA TMPBASE
A5C5: CA DEX
A5C6: CA DEX
A5C7: 9D 00 06 STA EVALPAGE,X
A5CA: A5 CD LDA TMPBASE+1
A5CC: 9D 01 06 STA EVALPAGE+1,X
A5CF: A9 04 LDA #4
A5D1: 4C 92 00 JMP NEXT_OPA
A5D4: 29 0F AND #$0F
A5D6: 18 CLC
A5D7: 69 01 ADC #1
A5D9: 0A ASL A
A5DA: A8 TAY
A5DB: 88 DEY
A5DC: CA DEX
A5DD: B1 CC LDA (TMPBASE),Y
A5DF: 9D 00 06 STA EVALPAGE,X
A5E2: 98 TYA
A5E3: D0 F6 BNE $A5DB
A5E5: A9 04 LDA #4
A5E7: 4C 92 00 JMP NEXT_OPA
;
; Opcode 18
;
A5EA: 20 E7 BE JSR $BEE7
A5ED: A0 00 LDY #0
A5EF: BD 00 06 LDA EVALPAGE,X
A5F2: E8 INX
A5F3: 91 CC STA (TMPBASE),Y
A5F5: E8 INX
A5F6: A9 03 LDA #3
A5F8: 4C 92 00 JMP NEXT_OPA
;
; Opcode 1C
;
A5FB: 20 05 BF JSR $BF05
A5FE: A0 00 LDY #0
A600: BD 00 06 LDA EVALPAGE,X
A603: E8 INX
A604: 91 CC STA (TMPBASE),Y
A606: E8 INX
A607: A9 04 LDA #4
A609: 4C 92 00 JMP NEXT_OPA
;
; Opcode 19
;
A60C: 20 E7 BE JSR $BEE7
A60F: A0 00 LDY #0
A611: BD 00 06 LDA EVALPAGE,X
A614: E8 INX
A615: 91 CC STA (TMPBASE),Y
A617: C8 INY
A618: BD 00 06 LDA EVALPAGE,X
A61B: E8 INX
A61C: 91 CC STA (TMPBASE),Y
A61E: A9 03 LDA #3
A620: 4C 92 00 JMP NEXT_OPA
;
; Opcode 1D
;
A623: 20 05 BF JSR $BF05
A626: A0 00 LDY #0
A628: BD 00 06 LDA EVALPAGE,X
A62B: E8 INX
A62C: 91 CC STA (TMPBASE),Y
A62E: C8 INY
A62F: BD 00 06 LDA EVALPAGE,X
A632: E8 INX
A633: 91 CC STA (TMPBASE),Y
A635: A9 04 LDA #4
A637: 4C 92 00 JMP NEXT_OPA
;
; Opcode 1A
;
A63A: 20 E7 BE JSR $BEE7
A63D: A0 04 LDY #4
A63F: 86 CA STX XSAVE
A641: 98 TYA
A642: 18 CLC
A643: 65 CA ADC XSAVE
A645: 85 CA STA XSAVE
A647: AA TAX
A648: 88 DEY
A649: CA DEX
A64A: BD 00 06 LDA EVALPAGE,X
A64D: 91 CC STA (TMPBASE),Y
A64F: 98 TYA
A650: D0 F6 BNE $A648
A652: A6 CA LDX XSAVE
A654: A9 03 LDA #3
A656: 4C 92 00 JMP NEXT_OPA
;
; Opcode 1E
;
A659: 20 05 BF JSR $BF05
A65C: A0 04 LDY #4
A65E: 86 CA STX XSAVE
A660: 98 TYA
A661: 18 CLC
A662: 65 CA ADC XSAVE
A664: 85 CA STA XSAVE
A666: AA TAX
A667: 88 DEY
A668: CA DEX
A669: BD 00 06 LDA EVALPAGE,X
A66C: 91 CC STA (TMPBASE),Y
A66E: 98 TYA
A66F: D0 F6 BNE $A667
A671: A6 CA LDX XSAVE
A673: A9 04 LDA #4
A675: 4C 92 00 JMP NEXT_OPA
;
; Opcode 1B
;
A678: 20 E7 BE JSR $BEE7
A67B: A0 01 LDY #1
A67D: B1 A4 LDA (IP),Y
A67F: 29 0F AND #$0F
A681: 18 CLC
A682: 69 01 ADC #1
A684: 0A ASL A
A685: A8 TAY
A686: 86 CA STX XSAVE
A688: 98 TYA
A689: 18 CLC
A68A: 65 CA ADC XSAVE
A68C: 85 CA STA XSAVE
A68E: AA TAX
A68F: 88 DEY
A690: CA DEX
A691: BD 00 06 LDA EVALPAGE,X
A694: 91 CC STA (TMPBASE),Y
A696: 98 TYA
A697: D0 F6 BNE $A68F
A699: A6 CA LDX XSAVE
A69B: A9 03 LDA #3
A69D: 4C 92 00 JMP NEXT_OPA
;
; Opcode 1F
;
A6A0: 20 05 BF JSR $BF05
A6A3: A0 01 LDY #1
A6A5: B1 A4 LDA (IP),Y
A6A7: 29 0F AND #$0F
A6A9: 18 CLC
A6AA: 69 01 ADC #1
A6AC: 0A ASL A
A6AD: A8 TAY
A6AE: 86 CA STX XSAVE
A6B0: 98 TYA
A6B1: 18 CLC
A6B2: 65 CA ADC XSAVE
A6B4: 85 CA STA XSAVE
A6B6: AA TAX
A6B7: 88 DEY
A6B8: CA DEX
A6B9: BD 00 06 LDA EVALPAGE,X
A6BC: 91 CC STA (TMPBASE),Y
A6BE: 98 TYA
A6BF: D0 F6 BNE $A6B7
A6C1: A6 CA LDX XSAVE
A6C3: A9 04 LDA #4
A6C5: 4C 92 00 JMP NEXT_OPA
;
; Opcode 20
;
A6C8: BD 00 06 LDA EVALPAGE,X
A6CB: E8 INX
A6CC: 85 CC STA TMPBASE
A6CE: BD 00 06 LDA EVALPAGE,X
A6D1: E8 INX
A6D2: 85 CD STA TMPBASE+1
A6D4: A0 00 LDY #0
A6D6: B1 CC LDA (TMPBASE),Y
A6D8: CA DEX
A6D9: CA DEX
A6DA: 9D 00 06 STA EVALPAGE,X
A6DD: A9 00 LDA #0
A6DF: 9D 01 06 STA EVALPAGE+1,X
A6E2: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 21
;
A6E5: BD 00 06 LDA EVALPAGE,X
A6E8: E8 INX
A6E9: 85 CC STA TMPBASE
A6EB: BD 00 06 LDA EVALPAGE,X
A6EE: E8 INX
A6EF: 85 CD STA TMPBASE+1
A6F1: A0 00 LDY #0
A6F3: B1 CC LDA (TMPBASE),Y
A6F5: C8 INY
A6F6: CA DEX
A6F7: CA DEX
A6F8: 9D 00 06 STA EVALPAGE,X
A6FB: B1 CC LDA (TMPBASE),Y
A6FD: 9D 01 06 STA EVALPAGE+1,X
A700: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 22
;
A703: BD 00 06 LDA EVALPAGE,X
A706: E8 INX
A707: 85 CC STA TMPBASE
A709: BD 00 06 LDA EVALPAGE,X
A70C: E8 INX
A70D: 85 CD STA TMPBASE+1
A70F: A0 04 LDY #4
A711: 88 DEY
A712: CA DEX
A713: B1 CC LDA (TMPBASE),Y
A715: 9D 00 06 STA EVALPAGE,X
A718: 98 TYA
A719: D0 F6 BNE $A711
A71B: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 23
;
A71E: BD 00 06 LDA EVALPAGE,X
A721: E8 INX
A722: 85 CC STA TMPBASE
A724: BD 00 06 LDA EVALPAGE,X
A727: E8 INX
A728: 85 CD STA TMPBASE+1
A72A: A0 01 LDY #1
A72C: B1 A4 LDA (IP),Y
A72E: 29 0F AND #$0F
A730: 18 CLC
A731: 69 01 ADC #1
A733: 0A ASL A
A734: A8 TAY
A735: 88 DEY
A736: CA DEX
A737: B1 CC LDA (TMPBASE),Y
A739: 9D 00 06 STA EVALPAGE,X
A73C: 98 TYA
A73D: D0 F6 BNE $A735
A73F: A9 02 LDA #2
A741: 4C 92 00 JMP NEXT_OPA
;
; Opcode 28
;
A744: BD 00 06 LDA EVALPAGE,X
A747: E8 INX
A748: 85 DE STA $DE
A74A: E8 INX
A74B: BD 00 06 LDA EVALPAGE,X
A74E: E8 INX
A74F: 85 CC STA TMPBASE
A751: BD 00 06 LDA EVALPAGE,X
A754: E8 INX
A755: 85 CD STA TMPBASE+1
A757: A0 00 LDY #0
A759: A5 DE LDA $DE
A75B: 91 CC STA (TMPBASE),Y
A75D: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 29
;
A760: BD 00 06 LDA EVALPAGE,X
A763: E8 INX
A764: 85 CE STA $CE
A766: BD 00 06 LDA EVALPAGE,X
A769: E8 INX
A76A: 85 CF STA $CE+1
A76C: BD 00 06 LDA EVALPAGE,X
A76F: E8 INX
A770: 85 CC STA TMPBASE
A772: BD 00 06 LDA EVALPAGE,X
A775: E8 INX
A776: 85 CD STA TMPBASE+1
A778: A5 CE LDA $CE
A77A: A0 00 LDY #0
A77C: 91 CC STA (TMPBASE),Y
A77E: A5 CF LDA $CE+1
A780: C8 INY
A781: 91 CC STA (TMPBASE),Y
A783: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 2A
;
A786: 8A TXA
A787: 18 CLC
A788: 69 04 ADC #4
A78A: A8 TAY
A78B: B9 00 06 LDA EVALPAGE,Y
A78E: 85 CC STA TMPBASE
A790: C8 INY
A791: B9 00 06 LDA EVALPAGE,Y
A794: 85 CD STA TMPBASE+1
A796: A0 04 LDY #4
A798: 86 CA STX XSAVE
A79A: 98 TYA
A79B: 18 CLC
A79C: 65 CA ADC XSAVE
A79E: 85 CA STA XSAVE
A7A0: AA TAX
A7A1: 88 DEY
A7A2: CA DEX
A7A3: BD 00 06 LDA EVALPAGE,X
A7A6: 91 CC STA (TMPBASE),Y
A7A8: 98 TYA
A7A9: D0 F6 BNE $A7A1
A7AB: A6 CA LDX XSAVE
A7AD: E8 INX
A7AE: E8 INX
A7AF: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 2B
;
A7B2: A0 01 LDY #1
A7B4: B1 A4 LDA (IP),Y
A7B6: 18 CLC
A7B7: 69 01 ADC #1
A7B9: 0A ASL A
A7BA: 85 DE STA $DE
A7BC: 8A TXA
A7BD: 18 CLC
A7BE: 65 DE ADC $DE
A7C0: A8 TAY
A7C1: B9 00 06 LDA EVALPAGE,Y
A7C4: 85 CC STA TMPBASE
A7C6: C8 INY
A7C7: B9 00 06 LDA EVALPAGE,Y
A7CA: 85 CD STA TMPBASE+1
A7CC: A4 DE LDY $DE
A7CE: 86 CA STX XSAVE
A7D0: 98 TYA
A7D1: 18 CLC
A7D2: 65 CA ADC XSAVE
A7D4: 85 CA STA XSAVE
A7D6: AA TAX
A7D7: 88 DEY
A7D8: CA DEX
A7D9: BD 00 06 LDA EVALPAGE,X
A7DC: 91 CC STA (TMPBASE),Y
A7DE: 98 TYA
A7DF: D0 F6 BNE $A7D7
A7E1: A6 CA LDX XSAVE
A7E3: E8 INX
A7E4: E8 INX
A7E5: A9 02 LDA #2
A7E7: 4C 92 00 JMP NEXT_OPA
;
; Opcode F0
;
A7EA: A9 FF LDA #$FF
A7EC: A0 FF LDY #$FF
A7EE: CA DEX
A7EF: CA DEX
A7F0: 9D 01 06 STA EVALPAGE+1,X
A7F3: 98 TYA
A7F4: 9D 00 06 STA EVALPAGE,X
A7F7: 4C 9D 00 JMP NEXT_OP1
;
; Opcode F1
;
A7FA: A9 00 LDA #0
A7FC: F0 18 BEQ $A816
;
; Opcode F2
;
A7FE: A9 01 LDA #1
A800: D0 14 BNE $A816
;
; Opcode F3
;
A802: A9 02 LDA #2
A804: D0 10 BNE $A816
;
; Opcode F4
;
A806: A9 04 LDA #4
A808: D0 0C BNE $A816
;
; Opcode F5
;
A80A: A9 06 LDA #6
A80C: D0 08 BNE $A816
;
; Opcode F6
;
A80E: A9 08 LDA #8
A810: D0 04 BNE $A816
;
; Opcode F7
;
A812: A9 0A LDA #$0A
A814: D0 00 BNE $A816
A816: CA DEX
A817: CA DEX
A818: 9D 00 06 STA EVALPAGE,X
A81B: A9 00 LDA #0
A81D: 9D 01 06 STA EVALPAGE+1,X
A820: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 24
;
A823: A0 01 LDY #1
A825: B1 A4 LDA (IP),Y
A827: CA DEX
A828: CA DEX
A829: 9D 00 06 STA EVALPAGE,X
A82C: A9 00 LDA #0
A82E: 9D 01 06 STA EVALPAGE+1,X
A831: A9 02 LDA #2
A833: 4C 92 00 JMP NEXT_OPA
;
; Opcode 25
;
A836: A0 01 LDY #1
A838: B1 A4 LDA (IP),Y
A83A: C8 INY
A83B: CA DEX
A83C: CA DEX
A83D: 9D 00 06 STA EVALPAGE,X
A840: B1 A4 LDA (IP),Y
A842: 9D 01 06 STA EVALPAGE+1,X
A845: A9 03 LDA #3
A847: 4C 92 00 JMP NEXT_OPA
;
; Opcode 26
;
A84A: E6 A4 INC IP
A84C: D0 02 BNE $A850
A84E: E6 A5 INC IP+1
A850: A0 04 LDY #4
A852: 88 DEY
A853: CA DEX
A854: B1 A4 LDA (IP),Y
A856: 9D 00 06 STA EVALPAGE,X
A859: 98 TYA
A85A: D0 F6 BNE $A852
A85C: A9 04 LDA #4
A85E: 4C 92 00 JMP NEXT_OPA
;
; Opcode 27
;
A861: A0 01 LDY #1
A863: B1 A4 LDA (IP),Y
A865: 29 0F AND #$0F
A867: 18 CLC
A868: 69 01 ADC #1
A86A: 0A ASL A
A86B: A8 TAY
A86C: 48 PHA
A86D: A9 02 LDA #2
A86F: 18 CLC
A870: 65 A4 ADC IP
A872: 85 A4 STA IP
A874: 90 02 BCC $A878
A876: E6 A5 INC IP+1
A878: 88 DEY
A879: CA DEX
A87A: B1 A4 LDA (IP),Y
A87C: 9D 00 06 STA EVALPAGE,X
A87F: 98 TYA
A880: D0 F6 BNE $A878
A882: 68 PLA
A883: 18 CLC
A884: 65 A4 ADC IP
A886: 85 A4 STA IP
A888: 90 02 BCC $A88C
A88A: E6 A5 INC IP+1
A88C: 4C A3 00 JMP NEXT_OP
;
; Opcode 2C - Load string
;
A88F: E6 A4 INC IP
A891: D0 02 BNE $A895
A893: E6 A5 INC IP+1
A895: A5 A4 LDA IP
A897: CA DEX
A898: CA DEX
A899: 9D 00 06 STA EVALPAGE,X
A89C: A5 A5 LDA IP+1
A89E: 9D 01 06 STA EVALPAGE+1,X
A8A1: A0 00 LDY #0
A8A3: B1 A4 LDA (IP),Y
A8A5: 18 CLC
A8A6: 65 A4 ADC IP
A8A8: 85 A4 STA IP
A8AA: 90 02 BCC $A8AE
A8AC: E6 A5 INC IP+1
A8AE: 4C 9D 00 JMP NEXT_OP1
;
; Opcode AA
;
A8B1: A0 01 LDY #1
A8B3: B1 A4 LDA (IP),Y
A8B5: 18 CLC
A8B6: 65 B6 ADC DR0
A8B8: A8 TAY
A8B9: A9 00 LDA #0
A8BB: 65 B7 ADC DR0+1
A8BD: CA DEX
A8BE: CA DEX
A8BF: 9D 01 06 STA EVALPAGE+1,X
A8C2: 98 TYA
A8C3: 9D 00 06 STA EVALPAGE,X
A8C6: A9 02 LDA #2
A8C8: 4C 92 00 JMP NEXT_OPA
;
; Opcode AB
;
A8CB: A0 01 LDY #1
A8CD: B1 A4 LDA (IP),Y
A8CF: 18 CLC
A8D0: 65 B6 ADC DR0
A8D2: 85 CC STA TMPBASE
A8D4: C8 INY
A8D5: B1 A4 LDA (IP),Y
A8D7: 65 B7 ADC DR0+1
A8D9: 85 CD STA TMPBASE+1
A8DB: A5 CC LDA TMPBASE
A8DD: CA DEX
A8DE: CA DEX
A8DF: 9D 00 06 STA EVALPAGE,X
A8E2: A5 CD LDA TMPBASE+1
A8E4: 9D 01 06 STA EVALPAGE+1,X
A8E7: A9 03 LDA #3
A8E9: 4C 92 00 JMP NEXT_OPA
;
; Opcode E8
; Opcode E9
; Opcode EA
; Opcode EB
; Opcode EC
; Opcode ED
; Opcode EE
; Opcode EF
;
A8EC: 29 0F AND #$0F
A8EE: A8 TAY
A8EF: B1 B6 LDA (DR0),Y
A8F1: C8 INY
A8F2: CA DEX
A8F3: CA DEX
A8F4: 9D 00 06 STA EVALPAGE,X
A8F7: B1 B6 LDA (DR0),Y
A8F9: 9D 01 06 STA EVALPAGE+1,X
A8FC: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 6C
;
A8FF: A0 01 LDY #1
A901: B1 A4 LDA (IP),Y
A903: 85 CC STA TMPBASE
A905: C8 INY
A906: B1 A4 LDA (IP),Y
A908: 85 CD STA TMPBASE+1
A90A: A0 00 LDY #0
A90C: B1 CC LDA (TMPBASE),Y
A90E: CA DEX
A90F: CA DEX
A910: 9D 00 06 STA EVALPAGE,X
A913: A9 00 LDA #0
A915: 9D 01 06 STA EVALPAGE+1,X
A918: A9 03 LDA #3
A91A: 4C 92 00 JMP NEXT_OPA
;
; Opcode 6D
;
A91D: A0 01 LDY #1
A91F: B1 A4 LDA (IP),Y
A921: 85 CC STA TMPBASE
A923: C8 INY
A924: B1 A4 LDA (IP),Y
A926: 85 CD STA TMPBASE+1
A928: A0 00 LDY #0
A92A: B1 CC LDA (TMPBASE),Y
A92C: C8 INY
A92D: CA DEX
A92E: CA DEX
A92F: 9D 00 06 STA EVALPAGE,X
A932: B1 CC LDA (TMPBASE),Y
A934: 9D 01 06 STA EVALPAGE+1,X
A937: A9 03 LDA #3
A939: 4C 92 00 JMP NEXT_OPA
;
; Opcode 6E
;
A93C: A0 01 LDY #1
A93E: B1 A4 LDA (IP),Y
A940: 85 CC STA TMPBASE
A942: C8 INY
A943: B1 A4 LDA (IP),Y
A945: 85 CD STA TMPBASE+1
A947: A0 04 LDY #4
A949: 88 DEY
A94A: CA DEX
A94B: B1 CC LDA (TMPBASE),Y
A94D: 9D 00 06 STA EVALPAGE,X
A950: 98 TYA
A951: D0 F6 BNE $A949
A953: A9 03 LDA #3
A955: 4C 92 00 JMP NEXT_OPA
;
; Opcode 6F
;
A958: A0 02 LDY #2
A95A: B1 A4 LDA (IP),Y
A95C: 85 CC STA TMPBASE
A95E: C8 INY
A95F: B1 A4 LDA (IP),Y
A961: 85 CD STA TMPBASE+1
A963: A0 01 LDY #1
A965: B1 A4 LDA (IP),Y
A967: 18 CLC
A968: 69 01 ADC #1
A96A: 0A ASL A
A96B: A8 TAY
A96C: 88 DEY
A96D: CA DEX
A96E: B1 CC LDA (TMPBASE),Y
A970: 9D 00 06 STA EVALPAGE,X
A973: 98 TYA
A974: D0 F6 BNE $A96C
A976: A9 04 LDA #4
A978: 4C 92 00 JMP NEXT_OPA
;
; Opcode 7C
;
A97B: A0 01 LDY #1
A97D: B1 A4 LDA (IP),Y
A97F: 85 CC STA TMPBASE
A981: C8 INY
A982: B1 A4 LDA (IP),Y
A984: 85 CD STA TMPBASE+1
A986: A0 00 LDY #0
A988: BD 00 06 LDA EVALPAGE,X
A98B: E8 INX
A98C: 91 CC STA (TMPBASE),Y
A98E: E8 INX
A98F: A9 03 LDA #3
A991: 4C 92 00 JMP NEXT_OPA
;
; Opcode 7D
;
A994: A0 01 LDY #1
A996: B1 A4 LDA (IP),Y
A998: 85 CC STA TMPBASE
A99A: C8 INY
A99B: B1 A4 LDA (IP),Y
A99D: 85 CD STA TMPBASE+1
A99F: A0 00 LDY #0
A9A1: BD 00 06 LDA EVALPAGE,X
A9A4: E8 INX
A9A5: 91 CC STA (TMPBASE),Y
A9A7: C8 INY
A9A8: BD 00 06 LDA EVALPAGE,X
A9AB: E8 INX
A9AC: 91 CC STA (TMPBASE),Y
A9AE: A9 03 LDA #3
A9B0: 4C 92 00 JMP NEXT_OPA
;
; Opcode 7E
;
A9B3: A0 01 LDY #1
A9B5: B1 A4 LDA (IP),Y
A9B7: 85 CC STA TMPBASE
A9B9: C8 INY
A9BA: B1 A4 LDA (IP),Y
A9BC: 85 CD STA TMPBASE+1
A9BE: A0 04 LDY #4
A9C0: 86 CA STX XSAVE
A9C2: 98 TYA
A9C3: 18 CLC
A9C4: 65 CA ADC XSAVE
A9C6: 85 CA STA XSAVE
A9C8: AA TAX
A9C9: 88 DEY
A9CA: CA DEX
A9CB: BD 00 06 LDA EVALPAGE,X
A9CE: 91 CC STA (TMPBASE),Y
A9D0: 98 TYA
A9D1: D0 F6 BNE $A9C9
A9D3: A6 CA LDX XSAVE
A9D5: A9 03 LDA #3
A9D7: 4C 92 00 JMP NEXT_OPA
;
; Opcode 7F
;
A9DA: A0 02 LDY #2
A9DC: B1 A4 LDA (IP),Y
A9DE: 85 CC STA TMPBASE
A9E0: C8 INY
A9E1: B1 A4 LDA (IP),Y
A9E3: 85 CD STA TMPBASE+1
A9E5: A0 01 LDY #1
A9E7: B1 A4 LDA (IP),Y
A9E9: 18 CLC
A9EA: 69 01 ADC #1
A9EC: 0A ASL A
A9ED: A8 TAY
A9EE: 86 CA STX XSAVE
A9F0: 98 TYA
A9F1: 18 CLC
A9F2: 65 CA ADC XSAVE
A9F4: 85 CA STA XSAVE
A9F6: AA TAX
A9F7: 88 DEY
A9F8: CA DEX
A9F9: BD 00 06 LDA EVALPAGE,X
A9FC: 91 CC STA (TMPBASE),Y
A9FE: 98 TYA
A9FF: D0 F6 BNE $A9F7
AA01: A6 CA LDX XSAVE
AA03: A9 04 LDA #4
AA05: 4C 92 00 JMP NEXT_OPA
;
; Opcode B0 - JUMP
;
AA08: A0 01 LDY #1
AA0A: B1 A4 LDA (IP),Y
AA0C: 48 PHA
AA0D: C8 INY
AA0E: B1 A4 LDA (IP),Y
AA10: 85 A5 STA IP+1
AA12: 68 PLA
AA13: 85 A4 STA IP
AA15: 4C A3 00 JMP NEXT_OP
;
; Opcode B1 - Conditional JUMP
;
AA18: BD 00 06 LDA EVALPAGE,X
AA1B: E8 INX
AA1C: E8 INX
AA1D: 4A LSR A
AA1E: 90 E8 BCC $AA08
AA20: A9 03 LDA #3
AA22: 4C 92 00 JMP NEXT_OPA
;
; Opcode B2 - JUMP_EQ
;
AA25: BD 01 06 LDA EVALPAGE+1,X
AA28: DD 03 06 CMP EVALPAGE+3,X
AA2B: D0 0F BNE $AA3C
AA2D: BD 00 06 LDA EVALPAGE,X
AA30: DD 02 06 CMP EVALPAGE+2,X
AA33: D0 07 BNE $AA3C
AA35: E8 INX
AA36: E8 INX
AA37: E8 INX
AA38: E8 INX
AA39: 4C 08 AA JMP $AA08
AA3C: E8 INX
AA3D: E8 INX
AA3E: E8 INX
AA3F: E8 INX
AA40: A9 03 LDA #3
AA42: 4C 92 00 JMP NEXT_OPA
;
; Opcode B3 - JUMP_NE
;
AA45: BD 01 06 LDA EVALPAGE+1,X
AA48: DD 03 06 CMP EVALPAGE+3,X
AA4B: D0 08 BNE $AA55
AA4D: BD 00 06 LDA EVALPAGE,X
AA50: DD 02 06 CMP EVALPAGE+2,X
AA53: F0 07 BEQ $AA5C
AA55: E8 INX
AA56: E8 INX
AA57: E8 INX
AA58: E8 INX
AA59: 4C 08 AA JMP $AA08
AA5C: E8 INX
AA5D: E8 INX
AA5E: E8 INX
AA5F: E8 INX
AA60: A9 03 LDA #3
AA62: 4C 92 00 JMP NEXT_OPA
;
; Opcode 90
; Opcode 91
; Opcode 92
; Opcode 93
; Opcode 94
; Opcode 95
; Opcode 96
; Opcode 97
;
AA65: 4A LSR A
AA66: 29 07 AND #7
AA68: 48 PHA
AA69: A0 01 LDY #1
AA6B: B1 A4 LDA (IP),Y
AA6D: 18 CLC
AA6E: 65 C8 ADC $C8
AA70: 85 A4 STA IP
AA72: 68 PLA
AA73: 65 C9 ADC $C8+1
AA75: 85 A5 STA IP+1
AA77: 4C A3 00 JMP NEXT_OP
;
; Opcode 98
; Opcode 99
; Opcode 9A
; Opcode 9B
; Opcode 9C
; Opcode 9D
; Opcode 9E
; Opcode 9F
;
AA7A: A8 TAY
AA7B: BD 00 06 LDA EVALPAGE,X
AA7E: E8 INX
AA7F: E8 INX
AA80: 4A LSR A
AA81: B0 03 BCS $AA86
AA83: 98 TYA
AA84: 90 DF BCC $AA65
AA86: A9 02 LDA #2
AA88: 4C 92 00 JMP NEXT_OPA
;
; Opcode B4
;
AA8B: BD 00 06 LDA EVALPAGE,X
AA8E: E8 INX
AA8F: 85 CE STA $CE
AA91: BD 00 06 LDA EVALPAGE,X
AA94: E8 INX
AA95: 85 CF STA $CE+1
AA97: A5 CE LDA $CE
AA99: A0 01 LDY #1
AA9B: 38 SEC
AA9C: F1 A4 SBC (IP),Y
AA9E: 85 CE STA $CE
AAA0: A5 CF LDA $CE+1
AAA2: C8 INY
AAA3: F1 A4 SBC (IP),Y
AAA5: 85 CF STA $CE+1
AAA7: 90 0E BCC $AAB7
AAA9: A5 CE LDA $CE
AAAB: A0 03 LDY #3
AAAD: 18 CLC
AAAE: F1 A4 SBC (IP),Y
AAB0: A5 CF LDA $CE+1
AAB2: C8 INY
AAB3: F1 A4 SBC (IP),Y
AAB5: 90 11 BCC $AAC8
AAB7: A0 03 LDY #3
AAB9: B1 A4 LDA (IP),Y
AABB: 85 CE STA $CE
AABD: C8 INY
AABE: B1 A4 LDA (IP),Y
AAC0: 85 CF STA $CE+1
AAC2: E6 CE INC $CE
AAC4: D0 02 BNE $AAC8
AAC6: E6 CF INC $CE+1
AAC8: 06 CE ASL $CE
AACA: 26 CF ROL $CE+1
AACC: A5 A4 LDA IP
AACE: 18 CLC
AACF: 65 CE ADC $CE
AAD1: 85 CE STA $CE
AAD3: A5 A5 LDA IP+1
AAD5: 65 CF ADC $CE+1
AAD7: 85 CF STA $CE+1
AAD9: A9 05 LDA #5
AADB: 18 CLC
AADC: 65 CE ADC $CE
AADE: 85 CE STA $CE
AAE0: 90 02 BCC $AAE4
AAE2: E6 CF INC $CE+1
AAE4: A0 01 LDY #1
AAE6: B1 CE LDA ($CE),Y
AAE8: 18 CLC
AAE9: 65 C8 ADC $C8
AAEB: 85 A4 STA IP
AAED: 88 DEY
AAEE: B1 CE LDA ($CE),Y
AAF0: 29 07 AND #7
AAF2: 65 C9 ADC $C8+1
AAF4: 85 A5 STA IP+1
AAF6: 4C A3 00 JMP NEXT_OP
;
; Opcode A4
;
AAF9: A5 84 LDA $84
AAFB: 38 SEC
AAFC: E9 02 SBC #2
AAFE: 85 84 STA $84
AB00: B0 02 BCS $AB04
AB02: C6 85 DEC $84+1
AB04: A5 A4 LDA IP
AB06: 18 CLC
AB07: 69 03 ADC #3
AB09: A0 00 LDY #0
AB0B: 91 84 STA ($84),Y
AB0D: A5 A5 LDA IP+1
AB0F: 69 00 ADC #0
AB11: C8 INY
AB12: 91 84 STA ($84),Y
AB14: A0 01 LDY #1
AB16: B1 A4 LDA (IP),Y
AB18: 38 SEC
AB19: 65 A4 ADC IP
AB1B: 48 PHA
AB1C: C8 INY
AB1D: B1 A4 LDA (IP),Y
AB1F: 65 A5 ADC IP+1
AB21: 85 A5 STA IP+1
AB23: 68 PLA
AB24: 85 A4 STA IP
AB26: 20 87 AB JSR $AB87
AB29: 4C 8A AB JMP $AB8A
;
; Opcode A2
;
AB2C: A5 84 LDA $84
AB2E: 38 SEC
AB2F: E9 02 SBC #2
AB31: 85 84 STA $84
AB33: B0 02 BCS $AB37
AB35: C6 85 DEC $84+1
AB37: A5 A4 LDA IP
AB39: 18 CLC
AB3A: 69 03 ADC #3
AB3C: A0 00 LDY #0
AB3E: 91 84 STA ($84),Y
AB40: A5 A5 LDA IP+1
AB42: 69 00 ADC #0
AB44: C8 INY
AB45: 91 84 STA ($84),Y
AB47: A0 01 LDY #1
AB49: B1 A4 LDA (IP),Y
AB4B: 48 PHA
AB4C: C8 INY
AB4D: B1 A4 LDA (IP),Y
AB4F: 85 A5 STA IP+1
AB51: 68 PLA
AB52: 85 A4 STA IP
AB54: 20 87 AB JSR $AB87
AB57: 4C 8A AB JMP $AB8A
;
; Opcode A3
;
AB5A: A5 84 LDA $84
AB5C: 38 SEC
AB5D: E9 02 SBC #2
AB5F: 85 84 STA $84
AB61: B0 02 BCS $AB65
AB63: C6 85 DEC $84+1
AB65: A5 A4 LDA IP
AB67: 18 CLC
AB68: 69 01 ADC #1
AB6A: A0 00 LDY #0
AB6C: 91 84 STA ($84),Y
AB6E: A5 A5 LDA IP+1
AB70: 69 00 ADC #0
AB72: C8 INY
AB73: 91 84 STA ($84),Y
AB75: BD 00 06 LDA EVALPAGE,X
AB78: E8 INX
AB79: 85 A4 STA IP
AB7B: BD 00 06 LDA EVALPAGE,X
AB7E: E8 INX
AB7F: 85 A5 STA IP+1
AB81: 20 87 AB JSR $AB87
AB84: 4C 8A AB JMP $AB8A
AB87: 6C A4 00 JMP (IP)
AB8A: A0 00 LDY #0
AB8C: B1 84 LDA ($84),Y
AB8E: 85 A4 STA IP
AB90: C8 INY
AB91: B1 84 LDA ($84),Y
AB93: 85 A5 STA IP+1
AB95: A9 02 LDA #2
AB97: 18 CLC
AB98: 65 84 ADC $84
AB9A: 85 84 STA $84
AB9C: 90 02 BCC $ABA0
AB9E: E6 85 INC $84+1
ABA0: 4C A3 00 JMP NEXT_OP
;
; Opcode A1
;
ABA3: A9 02 LDA #2
ABA5: 18 CLC
ABA6: 65 84 ADC $84
ABA8: 85 84 STA $84
ABAA: 90 02 BCC $ABAE
ABAC: E6 85 INC $84+1
ABAE: 4C 9D 00 JMP NEXT_OP1
;
; Vector 01
;
ABB1: A9 00 LDA #0
ABB3: 4C D6 AB JMP $ABD6
;
; Vector 02
;
ABB6: A9 01 LDA #1
ABB8: 4C D6 AB JMP $ABD6
;
; Vector 03
;
ABBB: A9 02 LDA #2
ABBD: 4C D6 AB JMP $ABD6
;
; Vector 04
;
ABC0: A9 03 LDA #3
ABC2: 4C D6 AB JMP $ABD6
;
; Vector 05
;
ABC5: A9 04 LDA #4
ABC7: 4C D6 AB JMP $ABD6
;
; Vector 06
;
ABCA: A9 05 LDA #5
ABCC: 4C D6 AB JMP $ABD6
;
; Vector 07
;
ABCF: A9 06 LDA #6
ABD1: 4C D6 AB JMP $ABD6
;
; Vector 08
;
ABD4: A9 07 LDA #7
ABD6: 86 CA STX XSAVE
ABD8: A8 TAY
ABD9: 68 PLA
ABDA: 85 A4 STA IP
ABDC: 68 PLA
ABDD: 85 A5 STA IP+1
ABDF: A5 A4 LDA IP
ABE1: 38 SEC
ABE2: E9 02 SBC #2
ABE4: 85 A4 STA IP
ABE6: B0 02 BCS $ABEA
ABE8: C6 A5 DEC IP+1
ABEA: 98 TYA
ABEB: 48 PHA
ABEC: A5 84 LDA $84
ABEE: 85 CE STA $CE
ABF0: A5 85 LDA $84+1
ABF2: 85 CF STA $CE+1
ABF4: 68 PLA
ABF5: 48 PHA
ABF6: C9 00 CMP #0
ABF8: F0 20 BEQ $AC1A
ABFA: A0 03 LDY #3
ABFC: A5 84 LDA $84
ABFE: 38 SEC
ABFF: F1 A4 SBC (IP),Y
AC01: 85 D0 STA $D0
AC03: C8 INY
AC04: A5 85 LDA $84+1
AC06: F1 A4 SBC (IP),Y
AC08: 85 D1 STA $D0+1
AC0A: A5 D0 LDA $D0
AC0C: 38 SEC
AC0D: E9 0A SBC #$0A
AC0F: 85 84 STA $84
AC11: A5 D1 LDA $D0+1
AC13: E9 00 SBC #0
AC15: 85 85 STA $84+1
AC17: 4C 30 AC JMP $AC30
AC1A: A0 03 LDY #3
AC1C: B1 A4 LDA (IP),Y
AC1E: 85 D0 STA $D0
AC20: C8 INY
AC21: B1 A4 LDA (IP),Y
AC23: 85 D1 STA $D0+1
AC25: A5 84 LDA $84
AC27: 38 SEC
AC28: E9 0A SBC #$0A
AC2A: 85 84 STA $84
AC2C: B0 02 BCS $AC30
AC2E: C6 85 DEC $84+1
AC30: A0 04 LDY #4
AC32: A5 CE LDA $CE
AC34: 38 SEC
AC35: E5 84 SBC $84
AC37: 91 84 STA ($84),Y
AC39: A5 CF LDA $CE+1
AC3B: E5 85 SBC $84+1
AC3D: C8 INY
AC3E: 91 84 STA ($84),Y
AC40: A0 02 LDY #2
AC42: A5 CB LDA $CB
AC44: 91 84 STA ($84),Y
AC46: C8 INY
AC47: A9 00 LDA #0
AC49: 91 84 STA ($84),Y
AC4B: 68 PLA
AC4C: 85 CB STA $CB
AC4E: A5 CB LDA $CB
AC50: 0A ASL A
AC51: AA TAX
AC52: A0 00 LDY #0
AC54: B5 B6 LDA DR0,X
AC56: 91 84 STA ($84),Y
AC58: C8 INY
AC59: B5 B7 LDA DR0+1,X
AC5B: 91 84 STA ($84),Y
AC5D: A5 D0 LDA $D0
AC5F: 95 B6 STA DR0,X
AC61: 85 C6 STA LCLBASE
AC63: A5 D1 LDA $D0+1
AC65: 95 B7 STA DR0+1,X
AC67: 85 C7 STA LCLBASE+1
AC69: A5 C8 LDA $C8
AC6B: A0 06 LDY #6
AC6D: 91 84 STA ($84),Y
AC6F: A5 C9 LDA $C8+1
AC71: C8 INY
AC72: 91 84 STA ($84),Y
AC74: A5 A4 LDA IP
AC76: 85 C8 STA $C8
AC78: A5 A5 LDA IP+1
AC7A: 85 C9 STA $C8+1
AC7C: A5 84 LDA $84
AC7E: 38 SEC
AC7F: E5 86 SBC $86
AC81: A5 85 LDA $84+1
AC83: E5 87 SBC $86+1
AC85: B0 08 BCS $AC8F
AC87: 38 SEC
AC88: A0 00 LDY #0
AC8A: A9 68 LDA #$68
AC8C: 20 EA B8 JSR $B8EA
AC8F: A6 CA LDX XSAVE
AC91: A9 05 LDA #5
AC93: 4C 92 00 JMP NEXT_OPA
;
; Opcode A6
;
AC96: 86 CA STX XSAVE
AC98: A0 00 LDY #0
AC9A: A5 CB LDA $CB
AC9C: 0A ASL A
AC9D: AA TAX
AC9E: B1 84 LDA ($84),Y
ACA0: 95 B6 STA DR0,X
ACA2: C8 INY
ACA3: B1 84 LDA ($84),Y
ACA5: 95 B7 STA DR0+1,X
ACA7: A0 02 LDY #2
ACA9: B1 84 LDA ($84),Y
ACAB: 85 CB STA $CB
ACAD: A0 06 LDY #6
ACAF: B1 84 LDA ($84),Y
ACB1: 85 C8 STA $C8
ACB3: C8 INY
ACB4: B1 84 LDA ($84),Y
ACB6: 85 C9 STA $C8+1
ACB8: A5 CB LDA $CB
ACBA: 0A ASL A
ACBB: AA TAX
ACBC: B5 B6 LDA DR0,X
ACBE: 85 C6 STA LCLBASE
ACC0: B5 B7 LDA DR0+1,X
ACC2: 85 C7 STA LCLBASE+1
ACC4: A0 04 LDY #4
ACC6: B1 84 LDA ($84),Y
ACC8: 18 CLC
ACC9: 65 84 ADC $84
ACCB: AA TAX
ACCC: C8 INY
ACCD: B1 84 LDA ($84),Y
ACCF: 65 85 ADC $84+1
ACD1: 85 85 STA $84+1
ACD3: 86 84 STX $84
ACD5: A6 CA LDX XSAVE
ACD7: 60 RTS
;
; Opcode D3
;
ACD8: A0 04 LDY #4
ACDA: 20 D8 BE JSR $BED8
ACDD: 20 2F BE JSR $BE2F
ACE0: F0 12 BEQ $ACF4
ACE2: 30 10 BMI $ACF4
ACE4: A9 00 LDA #0
ACE6: A0 00 LDY #0
ACE8: 91 CC STA (TMPBASE),Y
ACEA: C8 INY
ACEB: 91 CC STA (TMPBASE),Y
ACED: E8 INX
ACEE: E8 INX
ACEF: E8 INX
ACF0: E8 INX
ACF1: 4C 3B AD JMP $AD3B
ACF4: BD 00 06 LDA EVALPAGE,X
ACF7: 38 SEC
ACF8: FD 02 06 SBC EVALPAGE+2,X
ACFB: A0 00 LDY #0
ACFD: 91 CC STA (TMPBASE),Y
ACFF: BD 01 06 LDA EVALPAGE+1,X
AD02: FD 03 06 SBC EVALPAGE+3,X
AD05: C8 INY
AD06: 91 CC STA (TMPBASE),Y
AD08: 20 A6 AD JSR $ADA6
AD0B: E8 INX
AD0C: E8 INX
AD0D: 20 05 BF JSR $BF05
AD10: A0 01 LDY #1
AD12: B1 A4 LDA (IP),Y
AD14: 29 03 AND #3
AD16: C9 01 CMP #1
AD18: D0 0D BNE $AD27
AD1A: BD 00 06 LDA EVALPAGE,X
AD1D: 38 SEC
AD1E: E9 01 SBC #1
AD20: A0 00 LDY #0
AD22: 91 CC STA (TMPBASE),Y
AD24: 4C 39 AD JMP $AD39
AD27: BD 00 06 LDA EVALPAGE,X
AD2A: 38 SEC
AD2B: E9 01 SBC #1
AD2D: A0 00 LDY #0
AD2F: 91 CC STA (TMPBASE),Y
AD31: BD 01 06 LDA EVALPAGE+1,X
AD34: E9 00 SBC #0
AD36: C8 INY
AD37: 91 CC STA (TMPBASE),Y
AD39: E8 INX
AD3A: E8 INX
AD3B: A9 06 LDA #6
AD3D: 4C 92 00 JMP NEXT_OPA
;
; Opcode D4
;
AD40: A0 04 LDY #4
AD42: 20 D8 BE JSR $BED8
AD45: 20 2F BE JSR $BE2F
AD48: 10 10 BPL $AD5A
AD4A: A9 00 LDA #0
AD4C: A0 00 LDY #0
AD4E: 91 CC STA (TMPBASE),Y
AD50: C8 INY
AD51: 91 CC STA (TMPBASE),Y
AD53: E8 INX
AD54: E8 INX
AD55: E8 INX
AD56: E8 INX
AD57: 4C A1 AD JMP $ADA1
AD5A: BD 02 06 LDA EVALPAGE+2,X
AD5D: 38 SEC
AD5E: FD 00 06 SBC EVALPAGE,X
AD61: A0 00 LDY #0
AD63: 91 CC STA (TMPBASE),Y
AD65: BD 03 06 LDA EVALPAGE+3,X
AD68: FD 01 06 SBC EVALPAGE+1,X
AD6B: C8 INY
AD6C: 91 CC STA (TMPBASE),Y
AD6E: 20 A6 AD JSR $ADA6
AD71: E8 INX
AD72: E8 INX
AD73: 20 05 BF JSR $BF05
AD76: A0 01 LDY #1
AD78: B1 A4 LDA (IP),Y
AD7A: 29 03 AND #3
AD7C: C9 01 CMP #1
AD7E: D0 0D BNE $AD8D
AD80: BD 00 06 LDA EVALPAGE,X
AD83: 18 CLC
AD84: 69 01 ADC #1
AD86: A0 00 LDY #0
AD88: 91 CC STA (TMPBASE),Y
AD8A: 4C 9F AD JMP $AD9F
AD8D: BD 00 06 LDA EVALPAGE,X
AD90: 18 CLC
AD91: 69 01 ADC #1
AD93: A0 00 LDY #0
AD95: 91 CC STA (TMPBASE),Y
AD97: BD 01 06 LDA EVALPAGE+1,X
AD9A: 69 00 ADC #0
AD9C: C8 INY
AD9D: 91 CC STA (TMPBASE),Y
AD9F: E8 INX
ADA0: E8 INX
ADA1: A9 06 LDA #6
ADA3: 4C 92 00 JMP NEXT_OPA
ADA6: A0 00 LDY #0
ADA8: B1 CC LDA (TMPBASE),Y
ADAA: 18 CLC
ADAB: 69 01 ADC #1
ADAD: 91 CC STA (TMPBASE),Y
ADAF: 90 07 BCC $ADB8
ADB1: C8 INY
ADB2: B1 CC LDA (TMPBASE),Y
ADB4: 69 00 ADC #0
ADB6: 91 CC STA (TMPBASE),Y
ADB8: 60 RTS
;
; Opcode D5
;
ADB9: A0 04 LDY #4
ADBB: 20 D8 BE JSR $BED8
ADBE: A0 00 LDY #0
ADC0: B1 CC LDA (TMPBASE),Y
ADC2: C8 INY
ADC3: 11 CC ORA (TMPBASE),Y
ADC5: F0 3E BEQ $AE05
ADC7: A0 00 LDY #0
ADC9: B1 CC LDA (TMPBASE),Y
ADCB: 38 SEC
ADCC: E9 01 SBC #1
ADCE: 91 CC STA (TMPBASE),Y
ADD0: C8 INY
ADD1: B1 CC LDA (TMPBASE),Y
ADD3: E9 00 SBC #0
ADD5: 91 CC STA (TMPBASE),Y
ADD7: 20 05 BF JSR $BF05
ADDA: A0 01 LDY #1
ADDC: B1 A4 LDA (IP),Y
ADDE: 29 03 AND #3
ADE0: C9 01 CMP #1
ADE2: D0 0C BNE $ADF0
ADE4: A0 00 LDY #0
ADE6: B1 CC LDA (TMPBASE),Y
ADE8: 18 CLC
ADE9: 69 01 ADC #1
ADEB: 91 CC STA (TMPBASE),Y
ADED: 4C 00 AE JMP $AE00
ADF0: A0 00 LDY #0
ADF2: B1 CC LDA (TMPBASE),Y
ADF4: 18 CLC
ADF5: 69 01 ADC #1
ADF7: 91 CC STA (TMPBASE),Y
ADF9: C8 INY
ADFA: B1 CC LDA (TMPBASE),Y
ADFC: 69 00 ADC #0
ADFE: 91 CC STA (TMPBASE),Y
AE00: A9 08 LDA #8
AE02: 4C 92 00 JMP NEXT_OPA
AE05: 86 CA STX XSAVE
AE07: A0 07 LDY #7
AE09: B1 A4 LDA (IP),Y
AE0B: 18 CLC
AE0C: 65 C8 ADC $C8
AE0E: AA TAX
AE0F: 88 DEY
AE10: B1 A4 LDA (IP),Y
AE12: 29 07 AND #7
AE14: 65 C9 ADC $C8+1
AE16: 85 A5 STA IP+1
AE18: 86 A4 STX IP
AE1A: A6 CA LDX XSAVE
AE1C: 4C A3 00 JMP NEXT_OP
;
; Opcode D6
;
AE1F: A0 04 LDY #4
AE21: 20 D8 BE JSR $BED8
AE24: A0 00 LDY #0
AE26: B1 CC LDA (TMPBASE),Y
AE28: C8 INY
AE29: 11 CC ORA (TMPBASE),Y
AE2B: F0 D8 BEQ $AE05
AE2D: A0 00 LDY #0
AE2F: B1 CC LDA (TMPBASE),Y
AE31: 38 SEC
AE32: E9 01 SBC #1
AE34: 91 CC STA (TMPBASE),Y
AE36: C8 INY
AE37: B1 CC LDA (TMPBASE),Y
AE39: E9 00 SBC #0
AE3B: 91 CC STA (TMPBASE),Y
AE3D: 20 05 BF JSR $BF05
AE40: A0 01 LDY #1
AE42: B1 A4 LDA (IP),Y
AE44: 29 03 AND #3
AE46: C9 01 CMP #1
AE48: D0 0C BNE $AE56
AE4A: A0 00 LDY #0
AE4C: B1 CC LDA (TMPBASE),Y
AE4E: 38 SEC
AE4F: E9 01 SBC #1
AE51: 91 CC STA (TMPBASE),Y
AE53: 4C 66 AE JMP $AE66
AE56: A0 00 LDY #0
AE58: B1 CC LDA (TMPBASE),Y
AE5A: 38 SEC
AE5B: E9 01 SBC #1
AE5D: 91 CC STA (TMPBASE),Y
AE5F: C8 INY
AE60: B1 CC LDA (TMPBASE),Y
AE62: E9 00 SBC #0
AE64: 91 CC STA (TMPBASE),Y
AE66: A9 08 LDA #8
AE68: 4C 92 00 JMP NEXT_OPA
AE6B: A0 00 LDY #0
AE6D: A6 D3 LDX $D3
AE6F: F0 0E BEQ $AE7F
AE71: B1 CE LDA ($CE),Y
AE73: 91 D0 STA ($D0),Y
AE75: C8 INY
AE76: D0 F9 BNE $AE71
AE78: E6 CF INC $CE+1
AE7A: E6 D1 INC $D0+1
AE7C: CA DEX
AE7D: D0 F2 BNE $AE71
AE7F: A6 D2 LDX $D2
AE81: F0 08 BEQ $AE8B
AE83: B1 CE LDA ($CE),Y
AE85: 91 D0 STA ($D0),Y
AE87: C8 INY
AE88: CA DEX
AE89: D0 F8 BNE $AE83
AE8B: 60 RTS
AE8C: A5 D3 LDA $D3
AE8E: 18 CLC
AE8F: 65 CF ADC $CE+1
AE91: 85 CF STA $CE+1
AE93: A5 D3 LDA $D3
AE95: 18 CLC
AE96: 65 D1 ADC $D1
AE98: 85 D1 STA $D1
AE9A: A4 D2 LDY $D2
AE9C: F0 09 BEQ $AEA7
AE9E: 88 DEY
AE9F: B1 CE LDA ($CE),Y
AEA1: 91 D0 STA ($D0),Y
AEA3: C0 00 CPY #0
AEA5: D0 F7 BNE $AE9E
AEA7: A6 D3 LDX $D3
AEA9: F0 10 BEQ $AEBB
AEAB: C6 CF DEC $CE+1
AEAD: C6 D1 DEC $D1
AEAF: 88 DEY
AEB0: B1 CE LDA ($CE),Y
AEB2: 91 D0 STA ($D0),Y
AEB4: C0 00 CPY #0
AEB6: D0 F7 BNE $AEAF
AEB8: CA DEX
AEB9: D0 F0 BNE $AEAB
AEBB: 60 RTS
AEBC: BD 00 06 LDA EVALPAGE,X
AEBF: E8 INX
AEC0: 85 D2 STA $D2
AEC2: BD 00 06 LDA EVALPAGE,X
AEC5: E8 INX
AEC6: 85 D3 STA $D2+1
AEC8: BD 00 06 LDA EVALPAGE,X
AECB: E8 INX
AECC: 85 CE STA $CE
AECE: BD 00 06 LDA EVALPAGE,X
AED1: E8 INX
AED2: 85 CF STA $CE+1
AED4: BD 00 06 LDA EVALPAGE,X
AED7: E8 INX
AED8: 85 D0 STA $D0
AEDA: BD 00 06 LDA EVALPAGE,X
AEDD: E8 INX
AEDE: 85 D1 STA $D0+1
AEE0: 60 RTS
;
; Vector 1D
;
AEE1: 20 BC AE JSR $AEBC
AEE4: 86 CA STX XSAVE
AEE6: 20 6B AE JSR $AE6B
AEE9: A6 CA LDX XSAVE
AEEB: 60 RTS
;
; Opcode C0
;
AEEC: 20 E1 AE JSR $AEE1
AEEF: 4C 9D 00 JMP NEXT_OP1
;
; Vector 1E
;
AEF2: 20 BC AE JSR $AEBC
AEF5: 86 CA STX XSAVE
AEF7: 20 8C AE JSR $AE8C
AEFA: A6 CA LDX XSAVE
AEFC: 60 RTS
;
; Opcode C4
;
AEFD: 20 F2 AE JSR $AEF2
AF00: 4C 9D 00 JMP NEXT_OP1
AF03: BD 00 06 LDA EVALPAGE,X
AF06: A0 01 LDY #1
AF08: 18 CLC
AF09: 71 A4 ADC (IP),Y
AF0B: 9D 00 06 STA EVALPAGE,X
AF0E: BD 01 06 LDA EVALPAGE+1,X
AF11: C8 INY
AF12: 71 A4 ADC (IP),Y
AF14: 9D 01 06 STA EVALPAGE+1,X
AF17: A9 03 LDA #3
AF19: 4C 92 00 JMP NEXT_OPA
AF1C: BD 00 06 LDA EVALPAGE,X
AF1F: A0 01 LDY #1
AF21: 38 SEC
AF22: F1 A4 SBC (IP),Y
AF24: 9D 00 06 STA EVALPAGE,X
AF27: BD 01 06 LDA EVALPAGE+1,X
AF2A: C8 INY
AF2B: F1 A4 SBC (IP),Y
AF2D: 9D 01 06 STA EVALPAGE+1,X
AF30: A9 03 LDA #3
AF32: 4C 92 00 JMP NEXT_OPA
;
; Opcode DC
;
AF35: BD 00 06 LDA EVALPAGE,X
AF38: A0 01 LDY #1
AF3A: 18 CLC
AF3B: 71 A4 ADC (IP),Y
AF3D: 9D 00 06 STA EVALPAGE,X
AF40: 90 03 BCC $AF45
AF42: FE 01 06 INC EVALPAGE+1,X
AF45: A9 02 LDA #2
AF47: 4C 92 00 JMP NEXT_OPA
;
; Opcode DD
;
AF4A: BD 00 06 LDA EVALPAGE,X
AF4D: A0 01 LDY #1
AF4F: 38 SEC
AF50: F1 A4 SBC (IP),Y
AF52: 9D 00 06 STA EVALPAGE,X
AF55: B0 03 BCS $AF5A
AF57: DE 01 06 DEC EVALPAGE+1,X
AF5A: A9 02 LDA #2
AF5C: 4C 92 00 JMP NEXT_OPA
;
; Opcode D2
;
AF5F: BC 00 06 LDY EVALPAGE,X
AF62: BD 02 06 LDA EVALPAGE+2,X
AF65: 9D 00 06 STA EVALPAGE,X
AF68: 98 TYA
AF69: 9D 02 06 STA EVALPAGE+2,X
AF6C: BC 01 06 LDY EVALPAGE+1,X
AF6F: BD 03 06 LDA EVALPAGE+3,X
AF72: 9D 01 06 STA EVALPAGE+1,X
AF75: 98 TYA
AF76: 9D 03 06 STA EVALPAGE+3,X
AF79: 4C 9D 00 JMP NEXT_OP1
;
; Opcode DE
;
AF7C: BC 00 06 LDY EVALPAGE,X
AF7F: BD 01 06 LDA EVALPAGE+1,X
AF82: 9D 00 06 STA EVALPAGE,X
AF85: 98 TYA
AF86: 9D 01 06 STA EVALPAGE+1,X
AF89: 4C 9D 00 JMP NEXT_OP1
;
; Opcode DA
;
AF8C: CA DEX
AF8D: CA DEX
AF8E: BD 03 06 LDA EVALPAGE+3,X
AF91: 9D 01 06 STA EVALPAGE+1,X
AF94: BD 02 06 LDA EVALPAGE+2,X
AF97: 9D 00 06 STA EVALPAGE,X
AF9A: 4C 9D 00 JMP NEXT_OP1
;
; Opcode DB
;
AF9D: E8 INX
AF9E: E8 INX
AF9F: 4C 9D 00 JMP NEXT_OP1
;
; Opcode D7
;
AFA2: BD 00 06 LDA EVALPAGE,X
AFA5: 38 SEC
AFA6: A0 01 LDY #1
AFA8: F1 A4 SBC (IP),Y
AFAA: 85 D0 STA $D0
AFAC: BD 01 06 LDA EVALPAGE+1,X
AFAF: C8 INY
AFB0: F1 A4 SBC (IP),Y
AFB2: 85 D1 STA $D0+1
AFB4: E8 INX
AFB5: E8 INX
AFB6: 86 CA STX XSAVE
AFB8: A0 03 LDY #3
AFBA: B1 A4 LDA (IP),Y
AFBC: 85 CE STA $CE
AFBE: C8 INY
AFBF: B1 A4 LDA (IP),Y
AFC1: 85 CF STA $CE+1
AFC3: 20 0C BD JSR $BD0C
AFC6: A6 CA LDX XSAVE
AFC8: BD 00 06 LDA EVALPAGE,X
AFCB: 18 CLC
AFCC: 65 D2 ADC $D2
AFCE: 9D 00 06 STA EVALPAGE,X
AFD1: BD 01 06 LDA EVALPAGE+1,X
AFD4: 65 D3 ADC $D2+1
AFD6: 9D 01 06 STA EVALPAGE+1,X
AFD9: A9 05 LDA #5
AFDB: 4C 92 00 JMP NEXT_OPA
;
; Opcode D8
;
AFDE: BD 00 06 LDA EVALPAGE,X
AFE1: 38 SEC
AFE2: A0 01 LDY #1
AFE4: F1 A4 SBC (IP),Y
AFE6: BD 01 06 LDA EVALPAGE+1,X
AFE9: C8 INY
AFEA: F1 A4 SBC (IP),Y
AFEC: 70 04 BVS $AFF2
AFEE: 30 1E BMI $B00E
AFF0: 10 02 BPL $AFF4
AFF2: 10 1A BPL $B00E
AFF4: BD 00 06 LDA EVALPAGE,X
AFF7: 18 CLC
AFF8: C8 INY
AFF9: F1 A4 SBC (IP),Y
AFFB: BD 01 06 LDA EVALPAGE+1,X
AFFE: C8 INY
AFFF: F1 A4 SBC (IP),Y
B001: 70 04 BVS $B007
B003: 10 09 BPL $B00E
B005: 30 02 BMI $B009
B007: 30 05 BMI $B00E
B009: A9 00 LDA #0
B00B: 4C 10 B0 JMP $B010
B00E: A9 01 LDA #1
B010: CA DEX
B011: CA DEX
B012: 9D 00 06 STA EVALPAGE,X
B015: A9 00 LDA #0
B017: 9D 01 06 STA EVALPAGE+1,X
B01A: A9 05 LDA #5
B01C: 4C 92 00 JMP NEXT_OPA
;
; Opcode D9
;
B01F: 4C 80 B8 JMP $B880
;
; Opcode B7
;
B022: A5 8B LDA $8B
B024: CA DEX
B025: CA DEX
B026: 9D 00 06 STA EVALPAGE,X
B029: A9 00 LDA #0
B02B: 9D 01 06 STA EVALPAGE+1,X
B02E: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 40
;
B031: BD 02 06 LDA EVALPAGE+2,X
B034: 18 CLC
B035: 7D 00 06 ADC EVALPAGE,X
B038: 9D 02 06 STA EVALPAGE+2,X
B03B: BD 03 06 LDA EVALPAGE+3,X
B03E: 7D 01 06 ADC EVALPAGE+1,X
B041: 9D 03 06 STA EVALPAGE+3,X
B044: E8 INX
B045: E8 INX
B046: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 44
;
B049: BD 02 06 LDA EVALPAGE+2,X
B04C: 38 SEC
B04D: FD 00 06 SBC EVALPAGE,X
B050: 9D 02 06 STA EVALPAGE+2,X
B053: BD 03 06 LDA EVALPAGE+3,X
B056: FD 01 06 SBC EVALPAGE+1,X
B059: 9D 03 06 STA EVALPAGE+3,X
B05C: E8 INX
B05D: E8 INX
B05E: 4C 9D 00 JMP NEXT_OP1
B061: BD 00 06 LDA EVALPAGE,X
B064: E8 INX
B065: 85 CE STA $CE
B067: BD 00 06 LDA EVALPAGE,X
B06A: E8 INX
B06B: 85 CF STA $CE+1
B06D: BD 00 06 LDA EVALPAGE,X
B070: E8 INX
B071: 85 D0 STA $D0
B073: BD 00 06 LDA EVALPAGE,X
B076: E8 INX
B077: 85 D1 STA $D0+1
B079: 86 CA STX XSAVE
B07B: 60 RTS
;
; Vector 0A
;
B07C: 20 61 B0 JSR $B061
B07F: 20 36 BD JSR $BD36
B082: 4C 8B B0 JMP $B08B
;
; Vector 09
;
B085: 20 61 B0 JSR $B061
B088: 20 0C BD JSR $BD0C
B08B: A6 CA LDX XSAVE
B08D: A5 D2 LDA $D2
B08F: CA DEX
B090: CA DEX
B091: 9D 00 06 STA EVALPAGE,X
B094: A5 D3 LDA $D2+1
B096: 9D 01 06 STA EVALPAGE+1,X
B099: 60 RTS
;
; Opcode 48
;
B09A: 20 7C B0 JSR $B07C
B09D: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 4C
;
B0A0: 20 85 B0 JSR $B085
B0A3: 4C 9D 00 JMP NEXT_OP1
B0A6: BD 00 06 LDA EVALPAGE,X
B0A9: E8 INX
B0AA: 85 D0 STA $D0
B0AC: BD 00 06 LDA EVALPAGE,X
B0AF: E8 INX
B0B0: 85 D1 STA $D0+1
B0B2: BD 00 06 LDA EVALPAGE,X
B0B5: E8 INX
B0B6: 85 CE STA $CE
B0B8: BD 00 06 LDA EVALPAGE,X
B0BB: E8 INX
B0BC: 85 CF STA $CE+1
B0BE: 86 CA STX XSAVE
B0C0: 60 RTS
;
; Vector 0C
;
B0C1: 20 A6 B0 JSR $B0A6
B0C4: 20 D1 BD JSR $BDD1
B0C7: 4C D0 B0 JMP $B0D0
;
; Vector 0B
;
B0CA: 20 A6 B0 JSR $B0A6
B0CD: 20 84 BD JSR $BD84
B0D0: A6 CA LDX XSAVE
B0D2: A5 D2 LDA $D2
B0D4: CA DEX
B0D5: CA DEX
B0D6: 9D 00 06 STA EVALPAGE,X
B0D9: A5 D3 LDA $D2+1
B0DB: 9D 01 06 STA EVALPAGE+1,X
B0DE: 60 RTS
;
; Opcode 50
;
B0DF: 20 C1 B0 JSR $B0C1
B0E2: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 54
;
B0E5: 20 CA B0 JSR $B0CA
B0E8: 4C 9D 00 JMP NEXT_OP1
;
; Vector 0E
;
B0EB: 20 A6 B0 JSR $B0A6
B0EE: 20 D1 BD JSR $BDD1
B0F1: 4C FA B0 JMP $B0FA
;
; Vector 0D
;
B0F4: 20 A6 B0 JSR $B0A6
B0F7: 20 84 BD JSR $BD84
B0FA: A6 CA LDX XSAVE
B0FC: A5 CE LDA $CE
B0FE: CA DEX
B0FF: CA DEX
B100: 9D 00 06 STA EVALPAGE,X
B103: A5 CF LDA $CE+1
B105: 9D 01 06 STA EVALPAGE+1,X
B108: 60 RTS
;
; Opcode 58
;
B109: 20 EB B0 JSR $B0EB
B10C: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 5C
;
B10F: 20 F4 B0 JSR $B0F4
B112: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 30
;
B115: BD 02 06 LDA EVALPAGE+2,X
B118: 3D 00 06 AND EVALPAGE,X
B11B: 9D 02 06 STA EVALPAGE+2,X
B11E: BD 03 06 LDA EVALPAGE+3,X
B121: 3D 01 06 AND EVALPAGE+1,X
B124: 9D 03 06 STA EVALPAGE+3,X
B127: E8 INX
B128: E8 INX
B129: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 32
;
B12C: BD 02 06 LDA EVALPAGE+2,X
B12F: 1D 00 06 ORA EVALPAGE,X
B132: 9D 02 06 STA EVALPAGE+2,X
B135: BD 03 06 LDA EVALPAGE+3,X
B138: 1D 01 06 ORA EVALPAGE+1,X
B13B: 9D 03 06 STA EVALPAGE+3,X
B13E: E8 INX
B13F: E8 INX
B140: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 36
;
B143: BD 02 06 LDA EVALPAGE+2,X
B146: 5D 00 06 EOR EVALPAGE,X
B149: 9D 02 06 STA EVALPAGE+2,X
B14C: BD 03 06 LDA EVALPAGE+3,X
B14F: 5D 01 06 EOR EVALPAGE+1,X
B152: 9D 03 06 STA EVALPAGE+3,X
B155: E8 INX
B156: E8 INX
B157: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 34
;
B15A: BD 00 06 LDA EVALPAGE,X
B15D: 49 FF EOR #$FF
B15F: 9D 00 06 STA EVALPAGE,X
B162: BD 01 06 LDA EVALPAGE+1,X
B165: 49 FF EOR #$FF
B167: 9D 01 06 STA EVALPAGE+1,X
B16A: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 38
;
B16D: BD 00 06 LDA EVALPAGE,X
B170: 49 FF EOR #$FF
B172: 18 CLC
B173: 69 01 ADC #1
B175: 9D 00 06 STA EVALPAGE,X
B178: BD 01 06 LDA EVALPAGE+1,X
B17B: 49 FF EOR #$FF
B17D: 69 00 ADC #0
B17F: 9D 01 06 STA EVALPAGE+1,X
B182: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 60
; Opcode 70
;
B185: BD 01 06 LDA EVALPAGE+1,X
B188: DD 03 06 CMP EVALPAGE+3,X
B18B: D0 5C BNE $B1E9
B18D: BD 00 06 LDA EVALPAGE,X
B190: DD 02 06 CMP EVALPAGE+2,X
B193: D0 54 BNE $B1E9
B195: F0 5F BEQ $B1F6
;
; Opcode 62
; Opcode 72
;
B197: BD 01 06 LDA EVALPAGE+1,X
B19A: DD 03 06 CMP EVALPAGE+3,X
B19D: D0 57 BNE $B1F6
B19F: BD 00 06 LDA EVALPAGE,X
B1A2: DD 02 06 CMP EVALPAGE+2,X
B1A5: D0 4F BNE $B1F6
B1A7: F0 40 BEQ $B1E9
;
; Opcode 64
;
B1A9: 20 2F BE JSR $BE2F
B1AC: F0 3B BEQ $B1E9
B1AE: 30 39 BMI $B1E9
B1B0: 10 44 BPL $B1F6
;
; Opcode 66
;
B1B2: 20 2F BE JSR $BE2F
B1B5: 10 32 BPL $B1E9
B1B7: 30 3D BMI $B1F6
;
; Opcode 68
;
B1B9: 20 2F BE JSR $BE2F
B1BC: 30 2B BMI $B1E9
B1BE: 10 36 BPL $B1F6
;
; Opcode 6A
;
B1C0: 20 2F BE JSR $BE2F
B1C3: F0 31 BEQ $B1F6
B1C5: 30 2F BMI $B1F6
B1C7: 10 20 BPL $B1E9
;
; Opcode 74
;
B1C9: 20 2F BE JSR $BE2F
B1CC: F0 1B BEQ $B1E9
B1CE: 90 19 BCC $B1E9
B1D0: B0 24 BCS $B1F6
;
; Opcode 76
;
B1D2: 20 2F BE JSR $BE2F
B1D5: B0 12 BCS $B1E9
B1D7: 90 1D BCC $B1F6
;
; Opcode 78
;
B1D9: 20 2F BE JSR $BE2F
B1DC: 90 0B BCC $B1E9
B1DE: B0 16 BCS $B1F6
;
; Opcode 7A
;
B1E0: 20 2F BE JSR $BE2F
B1E3: F0 11 BEQ $B1F6
B1E5: 90 0F BCC $B1F6
B1E7: B0 00 BCS $B1E9
B1E9: E8 INX
B1EA: E8 INX
B1EB: A9 00 LDA #0
B1ED: 9D 00 06 STA EVALPAGE,X
B1F0: 9D 01 06 STA EVALPAGE+1,X
B1F3: 4C 9D 00 JMP NEXT_OP1
B1F6: E8 INX
B1F7: E8 INX
B1F8: A9 01 LDA #1
B1FA: 9D 00 06 STA EVALPAGE,X
B1FD: A9 00 LDA #0
B1FF: 9D 01 06 STA EVALPAGE+1,X
B202: 4C 9D 00 JMP NEXT_OP1
;
; Opcode 81
;
B205: AD 1C B2 LDA $B21C
B208: 85 D4 STA $D4
B20A: AD 1D B2 LDA $B21C+1
B20D: 85 D5 STA $D4+1
B20F: 4C 9B B2 JMP $B29B
B212: B4 B2 .WORD $B2B4
B214: 04 B3 .WORD $B304
B216: 7B B3 .WORD $B37B
B218: F4 B3 .WORD $B3F4
B21A: 94 B6 .WORD $B694
B21C: 12 B2 .WORD $B212
;
; Opcode 83
;
B21E: AD 35 B2 LDA $B235
B221: 85 D4 STA $D4
B223: AD 36 B2 LDA $B235+1
B226: 85 D5 STA $D4+1
B228: 4C 9B B2 JMP $B29B
B22B: BB B2 .WORD $B2BB
B22D: 0B B3 .WORD $B30B
B22F: 82 B3 .WORD $B382
B231: FB B3 .WORD $B3FB
B233: A0 B6 .WORD $B6A0
B235: 2B B2 .WORD $B22B
;
; Opcode 85
;
B237: AD 4E B2 LDA $B24E
B23A: 85 D4 STA $D4
B23C: AD 4F B2 LDA $B24E+1
B23F: 85 D5 STA $D4+1
B241: 4C 9B B2 JMP $B29B
B244: C2 B2 .WORD $B2C2
B246: 12 B3 .WORD $B312
B248: 89 B3 .WORD $B389
B24A: 02 B4 .WORD $B402
B24C: 02 B4 .WORD $B402
B24E: 44 B2 .WORD $B244
;
; Opcode 87
;
B250: AD 67 B2 LDA $B267
B253: 85 D4 STA $D4
B255: AD 68 B2 LDA $B267+1
B258: 85 D5 STA $D4+1
B25A: 4C 9B B2 JMP $B29B
B25D: CB B2 .WORD $B2CB
B25F: 1B B3 .WORD $B31B
B261: 92 B3 .WORD $B392
B263: 02 B4 .WORD $B402
B265: 02 B4 .WORD $B402
B267: 5D B2 .WORD $B25D
;
; Opcode 89
;
B269: AD 80 B2 LDA $B280
B26C: 85 D4 STA $D4
B26E: AD 81 B2 LDA $B280+1
B271: 85 D5 STA $D4+1
B273: 4C 9B B2 JMP $B29B
B276: D2 B2 .WORD $B2D2
B278: 22 B3 .WORD $B322
B27A: 99 B3 .WORD $B399
B27C: 02 B4 .WORD $B402
B27E: AC B6 .WORD $B6AC
B280: 76 B2 .WORD $B276
;
; Opcode 8B
;
B282: AD 99 B2 LDA $B299
B285: 85 D4 STA $D4
B287: AD 9A B2 LDA $B299+1
B28A: 85 D5 STA $D4+1
B28C: 4C 9B B2 JMP $B29B
B28F: D9 B2 .WORD $B2D9
B291: 29 B3 .WORD $B329
B293: A0 B3 .WORD $B3A0
B295: 02 B4 .WORD $B402
B297: B8 B6 .WORD $B6B8
B299: 8F B2 .WORD $B28F
B29B: A0 01 LDY #1
B29D: B1 A4 LDA (IP),Y
B29F: C9 06 CMP #6
B2A1: 30 03 BMI $B2A6
B2A3: 4C 02 B4 JMP $B402
B2A6: 0A ASL A
B2A7: A8 TAY
B2A8: B1 D4 LDA ($D4),Y
B2AA: 85 D6 STA $D6
B2AC: C8 INY
B2AD: B1 D4 LDA ($D4),Y
B2AF: 85 D7 STA $D6+1
B2B1: 6C D6 00 JMP ($00D6)
B2B4: 20 50 BE JSR $BE50
B2B7: F0 29 BEQ $B2E2
B2B9: D0 38 BNE $B2F3
B2BB: 20 50 BE JSR $BE50
B2BE: D0 22 BNE $B2E2
B2C0: F0 31 BEQ $B2F3
B2C2: 20 50 BE JSR $BE50
B2C5: F0 2C BEQ $B2F3
B2C7: 90 2A BCC $B2F3
B2C9: B0 17 BCS $B2E2
B2CB: 20 50 BE JSR $BE50
B2CE: B0 23 BCS $B2F3
B2D0: 90 10 BCC $B2E2
B2D2: 20 50 BE JSR $BE50
B2D5: B0 0B BCS $B2E2
B2D7: 90 1A BCC $B2F3
B2D9: 20 50 BE JSR $BE50
B2DC: F0 04 BEQ $B2E2
B2DE: 90 02 BCC $B2E2
B2E0: B0 11 BCS $B2F3
B2E2: E8 INX
B2E3: E8 INX
B2E4: A9 01 LDA #1
B2E6: 9D 00 06 STA EVALPAGE,X
B2E9: A9 00 LDA #0
B2EB: 9D 01 06 STA EVALPAGE+1,X
B2EE: A9 02 LDA #2
B2F0: 4C 92 00 JMP NEXT_OPA
B2F3: E8 INX
B2F4: E8 INX
B2F5: A9 00 LDA #0
B2F7: 9D 00 06 STA EVALPAGE,X
B2FA: A9 00 LDA #0
B2FC: 9D 01 06 STA EVALPAGE+1,X
B2FF: A9 02 LDA #2
B301: 4C 92 00 JMP NEXT_OPA
B304: 20 5F BE JSR $BE5F
B307: F0 29 BEQ $B332
B309: D0 38 BNE $B343
B30B: 20 5F BE JSR $BE5F
B30E: D0 22 BNE $B332
B310: F0 31 BEQ $B343
B312: 20 5F BE JSR $BE5F
B315: F0 2C BEQ $B343
B317: 90 2A BCC $B343
B319: B0 17 BCS $B332
B31B: 20 5F BE JSR $BE5F
B31E: B0 23 BCS $B343
B320: 90 10 BCC $B332
B322: 20 5F BE JSR $BE5F
B325: B0 0B BCS $B332
B327: 90 1A BCC $B343
B329: 20 5F BE JSR $BE5F
B32C: F0 04 BEQ $B332
B32E: 90 02 BCC $B332
B330: B0 11 BCS $B343
B332: A9 01 LDA #1
B334: CA DEX
B335: CA DEX
B336: 9D 00 06 STA EVALPAGE,X
B339: A9 00 LDA #0
B33B: 9D 01 06 STA EVALPAGE+1,X
B33E: A9 02 LDA #2
B340: 4C 92 00 JMP NEXT_OPA
B343: A9 00 LDA #0
B345: CA DEX
B346: CA DEX
B347: 9D 00 06 STA EVALPAGE,X
B34A: A9 00 LDA #0
B34C: 9D 01 06 STA EVALPAGE+1,X
B34F: A9 02 LDA #2
B351: 4C 92 00 JMP NEXT_OPA
B354: BD 00 06 LDA EVALPAGE,X
B357: E8 INX
B358: 85 D0 STA $D0
B35A: BD 00 06 LDA EVALPAGE,X
B35D: E8 INX
B35E: 85 D1 STA $D0+1
B360: BD 00 06 LDA EVALPAGE,X
B363: E8 INX
B364: 85 CE STA $CE
B366: BD 00 06 LDA EVALPAGE,X
B369: E8 INX
B36A: 85 CF STA $CE+1
B36C: A0 02 LDY #2
B36E: B1 A4 LDA (IP),Y
B370: 85 D2 STA $D2
B372: C8 INY
B373: B1 A4 LDA (IP),Y
B375: 85 D3 STA $D3
B377: 20 9D BE JSR $BE9D
B37A: 60 RTS
B37B: 20 54 B3 JSR $B354
B37E: F0 29 BEQ $B3A9
B380: D0 38 BNE $B3BA
B382: 20 54 B3 JSR $B354
B385: D0 22 BNE $B3A9
B387: F0 31 BEQ $B3BA
B389: 20 54 B3 JSR $B354
B38C: F0 2C BEQ $B3BA
B38E: 90 2A BCC $B3BA
B390: B0 17 BCS $B3A9
B392: 20 54 B3 JSR $B354
B395: B0 23 BCS $B3BA
B397: 90 10 BCC $B3A9
B399: 20 54 B3 JSR $B354
B39C: B0 0B BCS $B3A9
B39E: 90 1A BCC $B3BA
B3A0: 20 54 B3 JSR $B354
B3A3: F0 04 BEQ $B3A9
B3A5: 90 02 BCC $B3A9
B3A7: B0 11 BCS $B3BA
B3A9: A9 01 LDA #1
B3AB: CA DEX
B3AC: CA DEX
B3AD: 9D 00 06 STA EVALPAGE,X
B3B0: A9 00 LDA #0
B3B2: 9D 01 06 STA EVALPAGE+1,X
B3B5: A9 04 LDA #4
B3B7: 4C 92 00 JMP NEXT_OPA
B3BA: A9 00 LDA #0
B3BC: CA DEX
B3BD: CA DEX
B3BE: 9D 00 06 STA EVALPAGE,X
B3C1: A9 00 LDA #0
B3C3: 9D 01 06 STA EVALPAGE+1,X
B3C6: A9 04 LDA #4
B3C8: 4C 92 00 JMP NEXT_OPA
B3CB: BD 00 06 LDA EVALPAGE,X
B3CE: E8 INX
B3CF: 85 D0 STA $D0
B3D1: BD 00 06 LDA EVALPAGE,X
B3D4: E8 INX
B3D5: 85 D1 STA $D0+1
B3D7: BD 00 06 LDA EVALPAGE,X
B3DA: E8 INX
B3DB: 85 CE STA $CE
B3DD: BD 00 06 LDA EVALPAGE,X
B3E0: E8 INX
B3E1: 85 CF STA $CE+1
B3E3: A0 02 LDY #2
B3E5: B1 A4 LDA (IP),Y
B3E7: 85 D2 STA $D2
B3E9: C8 INY
B3EA: B1 A4 LDA (IP),Y
B3EC: 85 D3 STA $D2+1
B3EE: 0A ASL A
B3EF: 2A ROL A
B3F0: 20 9D BE JSR $BE9D
B3F3: 60 RTS
B3F4: 20 CB B3 JSR $B3CB
B3F7: F0 B0 BEQ $B3A9
B3F9: D0 BF BNE $B3BA
B3FB: 20 CB B3 JSR $B3CB
B3FE: D0 A9 BNE $B3A9
B400: F0 B8 BEQ $B3BA
B402: 38 SEC
B403: A9 66 LDA #$66
B405: A0 00 LDY #0
B407: 20 EA B8 JSR $B8EA
B40A: 4C 02 B4 JMP $B402
B40D: 85 DE STA $DE
B40F: 8A TXA
B410: 18 CLC
B411: 65 DE ADC $DE
B413: A8 TAY
B414: 60 RTS
B415: 85 D0 STA $D0
B417: A9 00 LDA #0
B419: 85 D1 STA $D0+1
B41B: 06 D0 ASL $D0
B41D: 26 D1 ROL $D0+1
B41F: 06 D0 ASL $D0
B421: 26 D1 ROL $D0+1
B423: 06 D0 ASL $D0
B425: 26 D1 ROL $D0+1
B427: A5 CE LDA $CE
B429: 38 SEC
B42A: E5 D0 SBC $D0
B42C: A5 CF LDA $CE+1
B42E: E5 D1 SBC $D0+1
B430: B0 18 BCS $B44A
B432: A5 CE LDA $CE
B434: 29 07 AND #7
B436: A8 TAY
B437: 46 CF LSR $CE+1
B439: 66 CE ROR $CE
B43B: 46 CF LSR $CE+1
B43D: 66 CE ROR $CE
B43F: 46 CF LSR $CE+1
B441: 66 CE ROR $CE
B443: 8A TXA
B444: 18 CLC
B445: 65 CE ADC $CE
B447: 4C 4D B4 JMP $B44D
B44A: 38 SEC
B44B: B0 01 BCS $B44E
B44D: 18 CLC
B44E: 60 RTS
;
; Vector 13
;
B44F: 20 0D B4 JSR $B40D
B452: BD 00 06 LDA EVALPAGE,X
B455: 19 00 06 ORA EVALPAGE,Y
B458: 99 00 06 STA EVALPAGE,Y
B45B: E8 INX
B45C: C8 INY
B45D: C6 DE DEC $DE
B45F: D0 F1 BNE $B452
B461: 60 RTS
;
; Vector 14
;
B462: 20 0D B4 JSR $B40D
B465: BD 00 06 LDA EVALPAGE,X
B468: 39 00 06 AND EVALPAGE,Y
B46B: 99 00 06 STA EVALPAGE,Y
B46E: E8 INX
B46F: C8 INY
B470: C6 DE DEC $DE
B472: D0 F1 BNE $B465
B474: 60 RTS
;
; Vector 15
;
B475: 20 0D B4 JSR $B40D
B478: BD 00 06 LDA EVALPAGE,X
B47B: 49 FF EOR #$FF
B47D: 39 00 06 AND EVALPAGE,Y
B480: 99 00 06 STA EVALPAGE,Y
B483: E8 INX
B484: C8 INY
B485: C6 DE DEC $DE
B487: D0 EF BNE $B478
B489: 60 RTS
;
; Vector 16
;
B48A: 86 CA STX XSAVE
B48C: 20 0D B4 JSR $B40D
B48F: B9 00 06 LDA EVALPAGE,Y
B492: 85 CE STA $CE
B494: C8 INY
B495: B9 00 06 LDA EVALPAGE,Y
B498: 85 CF STA $CE+1
B49A: A5 DE LDA $DE
B49C: 20 15 B4 JSR $B415
B49F: B0 09 BCS $B4AA
B4A1: AA TAX
B4A2: BD 00 06 LDA EVALPAGE,X
B4A5: 39 5C B6 AND $B65C,Y
B4A8: D0 05 BNE $B4AF
B4AA: A9 00 LDA #0
B4AC: 4C B1 B4 JMP $B4B1
B4AF: A9 01 LDA #1
B4B1: 48 PHA
B4B2: A6 CA LDX XSAVE
B4B4: 8A TXA
B4B5: 18 CLC
B4B6: 65 DE ADC $DE
B4B8: AA TAX
B4B9: E8 INX
B4BA: E8 INX
B4BB: 68 PLA
B4BC: CA DEX
B4BD: CA DEX
B4BE: 9D 00 06 STA EVALPAGE,X
B4C1: A9 00 LDA #0
B4C3: 9D 01 06 STA EVALPAGE+1,X
B4C6: 60 RTS
B4C7: 86 CA STX XSAVE
B4C9: 48 PHA
B4CA: 20 0D B4 JSR $B40D
B4CD: BD 00 06 LDA EVALPAGE,X
B4D0: D9 00 06 CMP EVALPAGE,Y
B4D3: D0 09 BNE $B4DE
B4D5: E8 INX
B4D6: C8 INY
B4D7: C6 DE DEC $DE
B4D9: D0 F2 BNE $B4CD
B4DB: 18 CLC
B4DC: 90 01 BCC $B4DF
B4DE: 38 SEC
B4DF: 68 PLA
B4E0: A6 CA LDX XSAVE
B4E2: 60 RTS
;
; Vector 18
;
B4E3: 20 C7 B4 JSR $B4C7
B4E6: 90 09 BCC $B4F1
B4E8: B0 1C BCS $B506
;
; Vector 17
;
B4EA: 20 C7 B4 JSR $B4C7
B4ED: B0 02 BCS $B4F1
B4EF: 90 15 BCC $B506
B4F1: 0A ASL A
B4F2: 85 DE STA $DE
B4F4: 8A TXA
B4F5: 18 CLC
B4F6: 65 DE ADC $DE
B4F8: AA TAX
B4F9: A9 01 LDA #1
B4FB: CA DEX
B4FC: CA DEX
B4FD: 9D 00 06 STA EVALPAGE,X
B500: A9 00 LDA #0
B502: 9D 01 06 STA EVALPAGE+1,X
B505: 60 RTS
B506: 0A ASL A
B507: 85 DE STA $DE
B509: 8A TXA
B50A: 18 CLC
B50B: 65 DE ADC $DE
B50D: AA TAX
B50E: A9 00 LDA #0
B510: CA DEX
B511: CA DEX
B512: 9D 00 06 STA EVALPAGE,X
B515: A9 00 LDA #0
B517: 9D 01 06 STA EVALPAGE+1,X
B51A: 60 RTS
;
; Vector 19
;
B51B: 86 CA STX XSAVE
B51D: 48 PHA
B51E: 20 0D B4 JSR $B40D
B521: BD 00 06 LDA EVALPAGE,X
B524: 49 FF EOR #$FF
B526: 39 00 06 AND EVALPAGE,Y
B529: D0 0C BNE $B537
B52B: E8 INX
B52C: C8 INY
B52D: C6 DE DEC $DE
B52F: D0 F0 BNE $B521
B531: 68 PLA
B532: A6 CA LDX XSAVE
B534: 4C F1 B4 JMP $B4F1
B537: 68 PLA
B538: A6 CA LDX XSAVE
B53A: 4C 06 B5 JMP $B506
;
; Vector 1A
;
B53D: 86 CA STX XSAVE
B53F: 48 PHA
B540: 20 0D B4 JSR $B40D
B543: B9 00 06 LDA EVALPAGE,Y
B546: 49 FF EOR #$FF
B548: 3D 00 06 AND EVALPAGE,X
B54B: D0 0C BNE $B559
B54D: E8 INX
B54E: C8 INY
B54F: C6 DE DEC $DE
B551: D0 F0 BNE $B543
B553: 68 PLA
B554: A6 CA LDX XSAVE
B556: 4C F1 B4 JMP $B4F1
B559: 68 PLA
B55A: A6 CA LDX XSAVE
B55C: 4C 06 B5 JMP $B506
;
; Vector 1B
;
B55F: 85 DE STA $DE
B561: A9 00 LDA #0
B563: 85 8B STA $8B
B565: BD 00 06 LDA EVALPAGE,X
B568: E8 INX
B569: 85 CE STA $CE
B56B: BD 00 06 LDA EVALPAGE,X
B56E: E8 INX
B56F: 85 CF STA $CE+1
B571: A4 DE LDY $DE
B573: A9 00 LDA #0
B575: CA DEX
B576: 9D 00 06 STA EVALPAGE,X
B579: 88 DEY
B57A: D0 F9 BNE $B575
B57C: 86 CA STX XSAVE
B57E: A5 DE LDA $DE
B580: 20 15 B4 JSR $B415
B583: 90 07 BCC $B58C
B585: A9 02 LDA #2
B587: 85 8B STA $8B
B589: 4C 98 B5 JMP $B598
B58C: AA TAX
B58D: BD 00 06 LDA EVALPAGE,X
B590: 19 5C B6 ORA $B65C,Y
B593: 9D 00 06 STA EVALPAGE,X
B596: A6 CA LDX XSAVE
B598: 60 RTS
;
; Vector 1C
;
B599: 85 DE STA $DE
B59B: A9 00 LDA #0
B59D: 85 8B STA $8B
B59F: BD 00 06 LDA EVALPAGE,X
B5A2: E8 INX
B5A3: 85 D4 STA $D4
B5A5: BD 00 06 LDA EVALPAGE,X
B5A8: E8 INX
B5A9: 85 D5 STA $D4+1
B5AB: BD 00 06 LDA EVALPAGE,X
B5AE: E8 INX
B5AF: 85 D2 STA $D2
B5B1: BD 00 06 LDA EVALPAGE,X
B5B4: E8 INX
B5B5: 85 D3 STA $D2+1
B5B7: A4 DE LDY $DE
B5B9: A9 00 LDA #0
B5BB: CA DEX
B5BC: 9D 00 06 STA EVALPAGE,X
B5BF: 88 DEY
B5C0: D0 F9 BNE $B5BB
B5C2: 86 CA STX XSAVE
B5C4: A5 D4 LDA $D4
B5C6: 38 SEC
B5C7: E5 D2 SBC $D2
B5C9: 85 D6 STA $D6
B5CB: A5 D5 LDA $D4+1
B5CD: E5 D3 SBC $D2+1
B5CF: 85 D7 STA $D6+1
B5D1: 90 7A BCC $B64D
B5D3: E6 D6 INC $D6
B5D5: D0 02 BNE $B5D9
B5D7: E6 D7 INC $D6+1
B5D9: A5 D4 LDA $D4
B5DB: 85 CE STA $CE
B5DD: A5 D5 LDA $D4+1
B5DF: 85 CF STA $CE+1
B5E1: A5 DE LDA $DE
B5E3: 20 15 B4 JSR $B415
B5E6: B0 65 BCS $B64D
B5E8: A5 D2 LDA $D2
B5EA: 85 CE STA $CE
B5EC: A5 D3 LDA $D2+1
B5EE: 85 CF STA $CE+1
B5F0: A5 DE LDA $DE
B5F2: 20 15 B4 JSR $B415
B5F5: B0 56 BCS $B64D
B5F7: AA TAX
B5F8: C0 00 CPY #0
B5FA: F0 20 BEQ $B61C
B5FC: B9 5C B6 LDA $B65C,Y
B5FF: 1D 00 06 ORA EVALPAGE,X
B602: 9D 00 06 STA EVALPAGE,X
B605: A5 D6 LDA $D6
B607: 38 SEC
B608: E9 01 SBC #1
B60A: 85 D6 STA $D6
B60C: B0 02 BCS $B610
B60E: C6 D7 DEC $D7
B610: A5 D6 LDA $D6
B612: 05 D7 ORA $D7
B614: F0 3B BEQ $B651
B616: C8 INY
B617: C0 08 CPY #8
B619: D0 E1 BNE $B5FC
B61B: E8 INX
B61C: A5 D6 LDA $D6
B61E: 29 07 AND #7
B620: A8 TAY
B621: 46 D7 LSR $D7
B623: 66 D6 ROR $D6
B625: 46 D7 LSR $D7
B627: 66 D6 ROR $D6
B629: 46 D7 LSR $D7
B62B: 66 D6 ROR $D6
B62D: A5 D6 LDA $D6
B62F: 05 D7 ORA $D7
B631: F0 0A BEQ $B63D
B633: A9 FF LDA #$FF
B635: 9D 00 06 STA EVALPAGE,X
B638: E8 INX
B639: C6 D6 DEC $D6
B63B: D0 F8 BNE $B635
B63D: C0 00 CPY #0
B63F: F0 10 BEQ $B651
B641: BD 00 06 LDA EVALPAGE,X
B644: 19 54 B6 ORA $B654,Y
B647: 9D 00 06 STA EVALPAGE,X
B64A: 4C 51 B6 JMP $B651
B64D: A9 02 LDA #2
B64F: 85 8B STA $8B
B651: A6 CA LDX XSAVE
B653: 60 RTS
B654: 00 01 03 .BYTE 0,1,3,7,$0F,$1F,$3F,$7F
B657: 07 0F 1F
B65A: 3F 7F
B65C: 01 02 04 .BYTE 1,2,4,8,$10,$20,$40,$80
B65F: 08 10 20
B662: 40 80
;
; Opcode C8
;
B664: A0 01 LDY #1
B666: B1 A4 LDA (IP),Y
B668: 20 4F B4 JSR $B44F
B66B: A9 02 LDA #2
B66D: 4C 92 00 JMP NEXT_OPA
;
; Opcode C9
;
B670: A0 01 LDY #1
B672: B1 A4 LDA (IP),Y
B674: 20 62 B4 JSR $B462
B677: A9 02 LDA #2
B679: 4C 92 00 JMP NEXT_OPA
;
; Opcode CA
;
B67C: A0 01 LDY #1
B67E: B1 A4 LDA (IP),Y
B680: 20 75 B4 JSR $B475
B683: A9 02 LDA #2
B685: 4C 92 00 JMP NEXT_OPA
;
; Opcode CB
;
B688: A0 01 LDY #1
B68A: B1 A4 LDA (IP),Y
B68C: 20 8A B4 JSR $B48A
B68F: A9 02 LDA #2
B691: 4C 92 00 JMP NEXT_OPA
B694: A0 02 LDY #2
B696: B1 A4 LDA (IP),Y
B698: 20 E3 B4 JSR $B4E3
B69B: A9 03 LDA #3
B69D: 4C 92 00 JMP NEXT_OPA
B6A0: A0 02 LDY #2
B6A2: B1 A4 LDA (IP),Y
B6A4: 20 EA B4 JSR $B4EA
B6A7: A9 03 LDA #3
B6A9: 4C 92 00 JMP NEXT_OPA
B6AC: A0 02 LDY #2
B6AE: B1 A4 LDA (IP),Y
B6B0: 20 3D B5 JSR $B53D
B6B3: A9 03 LDA #3
B6B5: 4C 92 00 JMP NEXT_OPA
B6B8: A0 02 LDY #2
B6BA: B1 A4 LDA (IP),Y
B6BC: 20 1B B5 JSR $B51B
B6BF: A9 03 LDA #3
B6C1: 4C 92 00 JMP NEXT_OPA
;
; Opcode CC
;
B6C4: A0 01 LDY #1
B6C6: B1 A4 LDA (IP),Y
B6C8: 20 5F B5 JSR $B55F
B6CB: A9 02 LDA #2
B6CD: 4C 92 00 JMP NEXT_OPA
;
; Opcode CD
;
B6D0: A0 01 LDY #1
B6D2: B1 A4 LDA (IP),Y
B6D4: 20 99 B5 JSR $B599
B6D7: A9 02 LDA #2
B6D9: 4C 92 00 JMP NEXT_OPA
;
; Vector 1F
;
B6DC: 85 DE STA $DE
B6DE: BD 00 06 LDA EVALPAGE,X
B6E1: E8 INX
B6E2: 85 CE STA $CE
B6E4: BD 00 06 LDA EVALPAGE,X
B6E7: E8 INX
B6E8: 85 CF STA $CE+1
B6EA: BD 00 06 LDA EVALPAGE,X
B6ED: E8 INX
B6EE: 85 D0 STA $D0
B6F0: BD 00 06 LDA EVALPAGE,X
B6F3: E8 INX
B6F4: 85 D1 STA $D0+1
B6F6: 86 CA STX XSAVE
B6F8: A9 00 LDA #0
B6FA: 85 8A STA $8A
B6FC: A5 CF LDA $CE+1
B6FE: D0 1B BNE $B71B
B700: A5 DE LDA $DE
B702: D0 08 BNE $B70C
B704: A9 01 LDA #1
B706: 85 8A STA $8A
B708: A9 00 LDA #0
B70A: F0 08 BEQ $B714
B70C: A5 CE LDA $CE
B70E: A0 01 LDY #1
B710: 91 D0 STA ($D0),Y
B712: A9 01 LDA #1
B714: A0 00 LDY #0
B716: 91 D0 STA ($D0),Y
B718: 4C 3B B7 JMP $B73B
B71B: A0 00 LDY #0
B71D: B1 CE LDA ($CE),Y
B71F: C5 DE CMP $DE
B721: F0 08 BEQ $B72B
B723: 90 06 BCC $B72B
B725: A9 01 LDA #1
B727: 85 8A STA $8A
B729: A5 DE LDA $DE
B72B: A0 00 LDY #0
B72D: 91 D0 STA ($D0),Y
B72F: C8 INY
B730: AA TAX
B731: F0 08 BEQ $B73B
B733: B1 CE LDA ($CE),Y
B735: 91 D0 STA ($D0),Y
B737: C8 INY
B738: CA DEX
B739: D0 F8 BNE $B733
B73B: A6 CA LDX XSAVE
B73D: 60 RTS
;
; Opcode BC
;
B73E: A0 01 LDY #1
B740: B1 A4 LDA (IP),Y
B742: 20 DC B6 JSR $B6DC
B745: A9 02 LDA #2
B747: 4C 92 00 JMP NEXT_OPA
;
; Vector 23
;
B74A: A9 00 LDA #0
B74C: 85 8A STA $8A
B74E: A9 00 LDA #0
B750: 8D 80 04 STA $0480
B753: 60 RTS
;
; Opcode BA
;
B754: 20 4A B7 JSR $B74A
B757: 4C 9D 00 JMP NEXT_OP1
;
; Vector 22
;
B75A: AD 6F B7 LDA $B76F
B75D: CA DEX
B75E: CA DEX
B75F: 9D 00 06 STA EVALPAGE,X
B762: AD 70 B7 LDA $B76F+1
B765: 9D 01 06 STA EVALPAGE+1,X
B768: 60 RTS
;
; Opcode B9
;
B769: 20 5A B7 JSR $B75A
B76C: 4C 9D 00 JMP NEXT_OP1
B76F: 80 04 .WORD $0480
B771: A5 8A LDA $8A
B773: CA DEX
B774: CA DEX
B775: 9D 00 06 STA EVALPAGE,X
B778: A9 00 LDA #0
B77A: 9D 01 06 STA EVALPAGE+1,X
B77D: 60 RTS
;
; Opcode B8
;
B77E: 20 71 B7 JSR $B771
B781: 4C 9D 00 JMP NEXT_OP1
;
; Vector 20
;
B784: BD 00 06 LDA EVALPAGE,X
B787: E8 INX
B788: 85 CE STA $CE
B78A: BD 00 06 LDA EVALPAGE,X
B78D: E8 INX
B78E: 85 CF STA $CE+1
B790: 86 CA STX XSAVE
B792: AD 80 04 LDA $0480
B795: 85 DE STA $DE
B797: A0 00 LDY #0
B799: B1 CE LDA ($CE),Y
B79B: 18 CLC
B79C: 6D 80 04 ADC $0480
B79F: B0 06 BCS $B7A7
B7A1: C9 FF CMP #$FF
B7A3: F0 16 BEQ $B7BB
B7A5: 90 14 BCC $B7BB
B7A7: A9 01 LDA #1
B7A9: 85 8A STA $8A
B7AB: A9 FF LDA #$FF
B7AD: 38 SEC
B7AE: ED 80 04 SBC $0480
B7B1: 85 DF STA $DF
B7B3: A9 FF LDA #$FF
B7B5: 8D 80 04 STA $0480
B7B8: 4C C8 B7 JMP $B7C8
B7BB: 8D 80 04 STA $0480
B7BE: A9 00 LDA #0
B7C0: 85 8A STA $8A
B7C2: A0 00 LDY #0
B7C4: B1 CE LDA ($CE),Y
B7C6: 85 DF STA $DF
B7C8: A5 DF LDA $DF
B7CA: F0 0F BEQ $B7DB
B7CC: A0 01 LDY #1
B7CE: A6 DE LDX $DE
B7D0: B1 CE LDA ($CE),Y
B7D2: 9D 81 04 STA $0481,X
B7D5: E8 INX
B7D6: C8 INY
B7D7: C6 DF DEC $DF
B7D9: D0 F5 BNE $B7D0
B7DB: A6 CA LDX XSAVE
B7DD: 60 RTS
;
; Opcode BB
;
B7DE: 20 84 B7 JSR $B784
B7E1: 4C 9D 00 JMP NEXT_OP1
;
; Vector 21
;
B7E4: AD 80 04 LDA $0480
B7E7: C9 FF CMP #$FF
B7E9: 90 0C BCC $B7F7
B7EB: A9 01 LDA #1
B7ED: 85 8A STA $8A
B7EF: BD 00 06 LDA EVALPAGE,X
B7F2: E8 INX
B7F3: E8 INX
B7F4: 4C 09 B8 JMP $B809
B7F7: EE 80 04 INC $0480
B7FA: BD 00 06 LDA EVALPAGE,X
B7FD: E8 INX
B7FE: E8 INX
B7FF: AC 80 04 LDY $0480
B802: 99 80 04 STA $0480,Y
B805: A9 00 LDA #0
B807: 85 8A STA $8A
B809: 60 RTS
;
; Opcode BD
;
B80A: 20 E4 B7 JSR $B7E4
B80D: 4C 9D 00 JMP NEXT_OP1
B810: 00 00 .WORD 0
;
; Vector 00
;
B812: 20 7F B8 JSR $B87F ; no-op
B815: 20 53 BA JSR $BA53 ; open keyboard
B818: A4 80 LDY $80
B81A: F0 0C BEQ $B828
B81C: A9 FF LDA #$FF
B81E: A0 00 LDY #0
B820: 38 SEC
B821: 20 EA B8 JSR $B8EA
B824: A0 00 LDY #0
B826: 84 80 STY $80
B828: C4 82 CPY $82
B82A: D0 08 BNE $B834
B82C: A4 81 LDY $80+1
B82E: C8 INY
B82F: C8 INY
B830: C4 83 CPY $82+1
B832: F0 3A BEQ $B86E
B834: A5 80 LDA $80
B836: 85 D0 STA $D0
B838: A5 81 LDA $80+1
B83A: 85 D1 STA $D0+1
B83C: AD 78 A2 LDA $A278
B83F: 85 CE STA $CE
B841: AD 79 A2 LDA $A278+1
B844: 85 CF STA $CE+1
B846: AD 7A A2 LDA $A27A
B849: 85 D2 STA $D2
B84B: AD 7B A2 LDA $A27A+1
B84E: 85 D3 STA $D2+1
B850: 20 6B AE JSR $AE6B
B853: A5 80 LDA $80
B855: 85 82 STA $82
B857: A5 81 LDA $80+1
B859: 85 83 STA $82+1
B85B: E6 83 INC $82+1
B85D: E6 83 INC $82+1
B85F: 20 EB B9 JSR $B9EB
B862: AD 7D B8 LDA $B87D
B865: 8D E5 02 STA MEMTOP
B868: AD 7E B8 LDA $B87E
B86B: 8D E6 02 STA MEMTOP+1
B86E: AD E5 02 LDA MEMTOP
B871: 85 84 STA $84
B873: AD E6 02 LDA MEMTOP+1
B876: 85 85 STA $84+1
B878: A2 00 LDX #0
B87A: 86 CA STX XSAVE
B87C: 60 RTS
B87D: 00 A0 .WORD $A000
B87F: 60 RTS
B880: A9 72 LDA #$72
B882: 85 D8 STA $D8
B884: 4C D6 B8 JMP $B8D6
;
; Vector 26
;
B887: A9 08 LDA #8
B889: 85 DE STA $DE
B88B: A9 00 LDA #0
B88D: 85 DF STA $DF
B88F: A6 DF LDX $DF
B891: A9 0C LDA #$0C ; close #0, 1, 2, ..., 7
B893: 9D 42 03 STA ICCMD,X
B896: 20 56 E4 JSR CIOV
B899: A5 DF LDA $DF
B89B: 18 CLC
B89C: 69 10 ADC #$10
B89E: 85 DF STA $DF
B8A0: C6 DE DEC $DE
B8A2: D0 EB BNE $B88F
B8A4: A2 00 LDX #0
B8A6: A9 03 LDA #3 ; open #0,12,0,"E:"
B8A8: 9D 42 03 STA ICCMD,X
B8AB: AD D4 B8 LDA $B8D4
B8AE: 9D 44 03 STA ICBAL,X
B8B1: AD D5 B8 LDA $B8D4+1
B8B4: 9D 45 03 STA ICBAH,X
B8B7: A9 0C LDA #$0C
B8B9: 9D 4A 03 STA ICAX1,X
B8BC: A9 00 LDA #0
B8BE: 9D 4B 03 STA ICAX2,X
B8C1: 20 56 E4 JSR CIOV
B8C4: A5 8C LDA $8C
B8C6: 8D 06 02 STA VBREAK
B8C9: A5 8D LDA $8C+1
B8CB: 8D 07 02 STA VBREAK+1
B8CE: 4C 74 E4 JMP WARMSV
B8D1: 45 3A 9B .BYTE 'E:'
B8D4: D1 B8 .WORD $B8D1
B8D6: 08 PHP
B8D7: 48 PHA
B8D8: A5 D8 LDA $D8
B8DA: 18 CLC
B8DB: 65 82 ADC $82
B8DD: 85 D8 STA $D8
B8DF: A5 83 LDA $82+1
B8E1: 69 00 ADC #0
B8E3: 85 D9 STA $D8+1
B8E5: 68 PLA
B8E6: 28 PLP
B8E7: 6C D8 00 JMP ($00D8)
B8EA: 08 PHP
B8EB: 48 PHA
B8EC: A9 6F LDA #$6F
B8EE: 85 D8 STA $D8
B8F0: 68 PLA
B8F1: 28 PLP
B8F2: 4C D6 B8 JMP $B8D6
;
; Vector 25
;
B8F5: 86 CA STX XSAVE
B8F7: AA TAX
B8F8: 98 TYA
B8F9: 48 PHA
B8FA: 8A TXA
B8FB: 48 PHA
B8FC: 90 3B BCC $B939
B8FE: 20 89 BB JSR $BB89
B901: AD 68 B9 LDA $B968
B904: AC 67 B9 LDY $B967
B907: 18 CLC
B908: 20 67 BB JSR $BB67
B90B: 68 PLA
B90C: 20 A2 B9 JSR $B9A2
B90F: A9 2E LDA #$2E
B911: 20 D5 BA JSR $BAD5
B914: 68 PLA
B915: 20 A2 B9 JSR $B9A2
B918: 20 89 BB JSR $BB89
B91B: AD 7B B9 LDA $B97B
B91E: AC 7A B9 LDY $B97A
B921: 18 CLC
B922: 20 67 BB JSR $BB67
B925: 20 AC BA JSR $BAAC
B928: 20 D5 BA JSR $BAD5
B92B: C9 59 CMP #$59
B92D: F0 27 BEQ $B956
B92F: C9 4E CMP #$4E
B931: D0 03 BNE $B936
B933: 4C 80 B8 JMP $B880
B936: 4C 18 B9 JMP $B918
B939: 20 89 BB JSR $BB89
B93C: AD 8F B9 LDA $B98F
B93F: AC 8E B9 LDY $B98E
B942: 18 CLC
B943: 20 67 BB JSR $BB67
B946: 68 PLA
B947: 20 A2 B9 JSR $B9A2
B94A: A9 2E LDA #$2E
B94C: 20 D5 BA JSR $BAD5
B94F: 68 PLA
B950: 20 A2 B9 JSR $B9A2
B953: 20 89 BB JSR $BB89
B956: A6 CA LDX XSAVE
B958: 60 RTS
B959: 46 41 LSR $41
B95B: 54 .BYTE $54
B95C: 41 4C EOR ($4C,X)
B95E: 20 45 52 JSR $5245
B961: 52 .BYTE $52
B962: 4F .BYTE $4F
B963: 52 .BYTE $52
B964: 3A .BYTE $3A
B965: 20 00 59 JSR $5900
B968: B9 43 4F LDA $4F43,Y
B96B: 4E 54 49 LSR $4954
B96E: 4E 55 45 LSR $4555
B971: 20 28 59 JSR $5928
B974: 2F .BYTE $2F
B975: 4E 29 3F LSR $3F29
B978: 20 00 69 JSR $6900
B97B: B9 4E 4F LDA $4F4E,Y
B97E: 4E 2D 46 LSR $462D
B981: 41 54 EOR ($54,X)
B983: 41 4C EOR ($4C,X)
B985: 20 45 52 JSR $5245
B988: 52 .BYTE $52
B989: 4F .BYTE $4F
B98A: 52 .BYTE $52
B98B: 3A .BYTE $3A
B98C: 20 00 7C JSR $7C00
B98F: B9 08 48 LDA $4808,Y
B992: C9 0A CMP #$0A
B994: 90 03 BCC $B999
B996: 18 CLC
B997: 69 07 ADC #7
B999: 18 CLC
B99A: 69 30 ADC #$30
B99C: 20 D5 BA JSR $BAD5
B99F: 68 PLA
B9A0: 28 PLP
B9A1: 60 RTS
B9A2: 08 PHP
B9A3: 48 PHA
B9A4: 4A LSR A
B9A5: 4A LSR A
B9A6: 4A LSR A
B9A7: 4A LSR A
B9A8: 20 90 B9 JSR $B990
B9AB: 68 PLA
B9AC: 48 PHA
B9AD: 29 0F AND #$0F
B9AF: 20 90 B9 JSR $B990
B9B2: 68 PLA
B9B3: 28 PLP
B9B4: 60 RTS
B9B5: 38 SEC
B9B6: A0 00 LDY #0
B9B8: A9 67 LDA #$67
B9BA: 20 EA B8 JSR $B8EA
B9BD: 4C B5 B9 JMP $B9B5
;
; Opcode FF - NOP
;
B9C0: 4C 9D 00 JMP NEXT_OP1
;
; Opcode FE - BRK
;
B9C3: 00 BRK
B9C4: 20 7F B8 JSR $B87F
B9C7: 4C A3 00 JMP NEXT_OP
; This code is copied to $0092
B9CA: 18 CLC ; $0092
B9CB: 65 A4 ADC IP
B9CD: 85 A4 STA IP
B9CF: 90 0A BCC $B9DB
B9D1: E6 A5 INC IP+1
B9D3: B0 06 BCS $B9DB
B9D5: E6 A4 INC IP ; $009D
B9D7: D0 02 BNE $B9DB
B9D9: E6 A5 INC IP+1
B9DB: AD FF FF LDA $FFFF ; $00A3
B9DE: 0A ASL A
B9DF: B0 05 BCS $B9E6
B9E1: 85 AC STA $AC
B9E3: 6C 00 A0 JMP ($A000)
B9E6: 85 B1 STA $B1
B9E8: 6C 00 A1 JMP ($A100)
B9EB: A2 21 LDX #$21
B9ED: A0 00 LDY #0
B9EF: B9 CA B9 LDA $B9CA,Y
B9F2: 99 92 00 STA $0092,Y
B9F5: C8 INY
B9F6: CA DEX
B9F7: D0 F6 BNE $B9EF
B9F9: A5 81 LDA $81
B9FB: 85 AD STA $AD
B9FD: 85 B2 STA $B2
B9FF: E6 B2 INC $B2
BA01: 60 RTS
;
; p-code FD 07
;
BA02: BD 00 06 LDA EVALPAGE,X
BA05: E8 INX
BA06: E8 INX
BA07: A9 02 LDA #2
BA09: 4C 92 00 JMP NEXT_OPA
;
; p-code FD 09
;
BA0C: A9 07 LDA #7
BA0E: A9 02 LDA #2
BA10: 4C 92 00 JMP NEXT_OPA
;
; p-code FD 08
;
BA13: A9 02 LDA #2
BA15: 4C 92 00 JMP NEXT_OPA
BA18: 00 00 .WORD 0
;
; Opcode FD
;
BA1A: A0 01 LDY #1
BA1C: B1 A4 LDA (IP),Y
BA1E: C9 0B CMP #$0B
BA20: 90 0B BCC $BA2D
BA22: A0 00 LDY #0
BA24: A9 65 LDA #$65
BA26: 38 SEC
BA27: 20 EA B8 JSR $B8EA
BA2A: 4C 22 BA JMP $BA22
BA2D: 0A ASL A
BA2E: A8 TAY
BA2F: B9 3D BA LDA $BA3D,Y
BA32: 85 CE STA $CE
BA34: C8 INY
BA35: B9 3D BA LDA $BA3D,Y
BA38: 85 CF STA $CE+1
BA3A: 6C CE 00 JMP ($00CE)
BA3D: B8 BB .WORD $BBB8 ; 00
BA3F: D9 BB .WORD $BBD9 ; 01
BA41: 0A BC .WORD $BC0A ; 02
BA43: 20 BC .WORD $BC20 ; 03
BA45: 48 BC .WORD $BC48 ; 04
BA47: 02 BC .WORD $BC02 ; 05
BA49: 50 BC .WORD $BC50 ; 06
BA4B: 02 BA .WORD $BA02 ; 07
BA4D: 13 BA .WORD $BA13 ; 08
BA4F: 0C BA .WORD $BA0C ; 09
BA51: 58 BC .WORD $BC58 ; 0A
BA53: 98 TYA
BA54: 48 PHA
BA55: 8A TXA
BA56: 48 PHA
BA57: A9 00 LDA #0
BA59: 85 89 STA $89
BA5B: A2 10 LDX #$10
BA5D: A9 0C LDA #$0C ; close #1
BA5F: 9D 42 03 STA ICCMD,X
BA62: 20 56 E4 JSR CIOV
BA65: A2 10 LDX #$10
BA67: A9 03 LDA #3 ; open #1,4,0,'K:'
BA69: 9D 42 03 STA ICCMD,X
BA6C: AD 8B BA LDA $BA8B
BA6F: 9D 44 03 STA ICBAL,X
BA72: AD 8C BA LDA $BA8B+1
BA75: 9D 45 03 STA ICBAH,X
BA78: A9 04 LDA #4
BA7A: 9D 4A 03 STA ICAX1,X
BA7D: A9 00 LDA #0
BA7F: 9D 4B 03 STA ICAX2,X
BA82: 20 56 E4 JSR CIOV
BA85: 4C 8D BA JMP $BA8D
BA88: 4B 3A 9B .BYTE 'K:'
BA8B: 88 BA .WORD $BA88
BA8D: 68 PLA
BA8E: AA TAX
BA8F: 68 PLA
BA90: A8 TAY
BA91: 60 RTS
BA92: 08 PHP
BA93: 98 TYA
BA94: 48 PHA
BA95: 8A TXA
BA96: 48 PHA
BA97: AD FC 02 LDA CH
BA9A: C9 FF CMP #$FF
BA9C: 18 CLC
BA9D: F0 01 BEQ $BAA0
BA9F: 38 SEC
BAA0: 08 PHP
BAA1: 68 PLA
BAA2: BA TSX
BAA3: 9D 03 01 STA $0103,X
BAA6: 68 PLA
BAA7: AA TAX
BAA8: 68 PLA
BAA9: A8 TAY
BAAA: 28 PLP
BAAB: 60 RTS
BAAC: 48 PHA
BAAD: 98 TYA
BAAE: 48 PHA
BAAF: 8A TXA
BAB0: 48 PHA
BAB1: A2 10 LDX #$10
BAB3: A9 07 LDA #7 ; get
BAB5: 9D 42 03 STA ICCMD,X
BAB8: A9 00 LDA #0
BABA: 9D 48 03 STA ICBLL,X
BABD: 9D 49 03 STA ICBLH,X
BAC0: 20 56 E4 JSR CIOV
BAC3: C0 00 CPY #0
BAC5: 10 02 BPL $BAC9
BAC7: 30 E8 BMI $BAB1
BAC9: 85 89 STA $89
BACB: BA TSX
BACC: 9D 03 01 STA $0103,X
BACF: 68 PLA
BAD0: AA TAX
BAD1: 68 PLA
BAD2: A8 TAY
BAD3: 68 PLA
BAD4: 60 RTS
BAD5: 48 PHA
BAD6: 98 TYA
BAD7: 48 PHA
BAD8: 8A TXA
BAD9: 48 PHA
BADA: BA TSX
BADB: BD 03 01 LDA $0103,X
BADE: 48 PHA
BADF: A2 00 LDX #0
BAE1: A9 0B LDA #$0B ; put
BAE3: 9D 42 03 STA ICCMD,X
BAE6: A9 00 LDA #0
BAE8: 9D 48 03 STA ICBLL,X
BAEB: 9D 49 03 STA ICBLH,X
BAEE: 68 PLA
BAEF: 20 56 E4 JSR CIOV
BAF2: 68 PLA
BAF3: AA TAX
BAF4: 68 PLA
BAF5: A8 TAY
BAF6: 68 PLA
BAF7: 60 RTS
BAF8: 85 CF STA $CE+1
BAFA: 84 CE STY $CE
BAFC: 86 DE STX $DE
BAFE: A2 00 LDX #0
BB00: A9 05 LDA #5 ; get record
BB02: 9D 42 03 STA ICCMD,X
BB05: A5 CE LDA $CE
BB07: 18 CLC
BB08: 69 01 ADC #1
BB0A: 9D 44 03 STA ICBAL,X
BB0D: A5 CF LDA $CE+1
BB0F: 69 00 ADC #0
BB11: 9D 45 03 STA ICBAH,X
BB14: A5 DE LDA $DE
BB16: 9D 48 03 STA ICBLL,X
BB19: A9 00 LDA #0
BB1B: 9D 49 03 STA ICBLH,X
BB1E: 20 56 E4 JSR CIOV
BB21: C0 00 CPY #0
BB23: 30 14 BMI $BB39
BB25: A2 00 LDX #0
BB27: BD 48 03 LDA ICBLL,X
BB2A: F0 06 BEQ $BB32
BB2C: DE 48 03 DEC ICBLL,X
BB2F: BD 48 03 LDA ICBLL,X
BB32: A0 00 LDY #0
BB34: 91 CE STA ($CE),Y
BB36: 4C 46 BB JMP $BB46
BB39: 98 TYA
BB3A: 48 PHA
BB3B: A9 00 LDA #0
BB3D: A0 00 LDY #0
BB3F: 91 CE STA ($CE),Y
BB41: 68 PLA
BB42: A8 TAY
BB43: 4C 46 BB JMP $BB46
BB46: A9 9B LDA #$9B
BB48: 85 89 STA $89
BB4A: 60 RTS
BB4B: 08 PHP
BB4C: 48 PHA
BB4D: 98 TYA
BB4E: 48 PHA
BB4F: 8A TXA
BB50: 48 PHA
BB51: A9 1E LDA #$1E
BB53: 20 D5 BA JSR $BAD5
BB56: A9 20 LDA #$20
BB58: 20 D5 BA JSR $BAD5
BB5B: A9 1E LDA #$1E
BB5D: 20 D5 BA JSR $BAD5
BB60: 68 PLA
BB61: AA TAX
BB62: 68 PLA
BB63: A8 TAY
BB64: 68 PLA
BB65: 28 PLP
BB66: 60 RTS
BB67: 85 CF STA $CE+1
BB69: 84 CE STY $CE
BB6B: B0 0D BCS $BB7A
BB6D: A0 00 LDY #0
BB6F: B1 CE LDA ($CE),Y
BB71: F0 15 BEQ $BB88
BB73: 20 D5 BA JSR $BAD5
BB76: C8 INY
BB77: 4C 6F BB JMP $BB6F
BB7A: 8A TXA
BB7B: F0 0B BEQ $BB88
BB7D: A0 00 LDY #0
BB7F: B1 CE LDA ($CE),Y
BB81: 20 D5 BA JSR $BAD5
BB84: C8 INY
BB85: CA DEX
BB86: D0 F7 BNE $BB7F
BB88: 60 RTS
BB89: A9 9B LDA #$9B
BB8B: 20 D5 BA JSR $BAD5
BB8E: 60 RTS
BB8F: A5 89 LDA $89
BB91: C9 9B CMP #$9B
BB93: F0 0A BEQ $BB9F
BB95: 20 AC BA JSR $BAAC
BB98: C9 9B CMP #$9B
BB9A: D0 F9 BNE $BB95
BB9C: 20 89 BB JSR $BB89
BB9F: A9 00 LDA #0
BBA1: 85 89 STA $89
BBA3: 60 RTS
BBA4: BD 00 06 LDA EVALPAGE,X
BBA7: E8 INX
BBA8: 85 CE STA $CE
BBAA: BD 00 06 LDA EVALPAGE,X
BBAD: E8 INX
BBAE: 85 CF STA $CE+1
BBB0: 20 AC BA JSR $BAAC
BBB3: A0 00 LDY #0
BBB5: 91 CE STA ($CE),Y
BBB7: 60 RTS
;
; p-code FD 00
;
BBB8: 20 A4 BB JSR $BBA4
BBBB: A9 02 LDA #2
BBBD: 4C 92 00 JMP NEXT_OPA
;
; p-code FD 01
;
BBC0: BD 00 06 LDA EVALPAGE,X
BBC3: E8 INX
BBC4: 85 CE STA $CE
BBC6: BD 00 06 LDA EVALPAGE,X
BBC9: E8 INX
BBCA: 85 CF STA $CE+1
BBCC: 20 AC BA JSR $BAAC
BBCF: 48 PHA
BBD0: 20 D5 BA JSR $BAD5
BBD3: 68 PLA
BBD4: A0 00 LDY #0
BBD6: 91 CE STA ($CE),Y
BBD8: 60 RTS
BBD9: 20 C0 BB JSR $BBC0
BBDC: A9 02 LDA #2
BBDE: 4C 92 00 JMP NEXT_OPA
BBE1: BD 00 06 LDA EVALPAGE,X
BBE4: E8 INX
BBE5: 85 DF STA $DF
BBE7: E8 INX
BBE8: BD 00 06 LDA EVALPAGE,X
BBEB: E8 INX
BBEC: 85 D0 STA $D0
BBEE: BD 00 06 LDA EVALPAGE,X
BBF1: E8 INX
BBF2: 85 D1 STA $D0+1
BBF4: 86 CA STX XSAVE
BBF6: A5 D1 LDA $D0+1
BBF8: A4 D0 LDY $D0
BBFA: A6 DF LDX $DF
BBFC: 20 F8 BA JSR $BAF8
BBFF: A6 CA LDX XSAVE
BC01: 60 RTS
;
; p-code FD 05
;
BC02: 20 E1 BB JSR $BBE1
BC05: A9 02 LDA #2
BC07: 4C 92 00 JMP NEXT_OPA
;
; p-code FD 02
;
BC0A: 20 8F BB JSR $BB8F
BC0D: A9 02 LDA #2
BC0F: 4C 92 00 JMP NEXT_OPA
BC12: 8A TXA
BC13: 18 CLC
BC14: 69 04 ADC #4
BC16: AA TAX
BC17: BD 00 06 LDA EVALPAGE,X
BC1A: E8 INX
BC1B: E8 INX
BC1C: 20 D5 BA JSR $BAD5
BC1F: 60 RTS
;
; p-code FD 03
;
BC20: 20 12 BC JSR $BC12
BC23: A9 02 LDA #2
BC25: 4C 92 00 JMP NEXT_OPA
BC28: 8A TXA
BC29: 18 CLC
BC2A: 69 04 ADC #4
BC2C: AA TAX
BC2D: BD 00 06 LDA EVALPAGE,X
BC30: E8 INX
BC31: 85 DE STA $DE
BC33: E8 INX
BC34: BD 00 06 LDA EVALPAGE,X
BC37: A8 TAY
BC38: E8 INX
BC39: BD 00 06 LDA EVALPAGE,X
BC3C: E8 INX
BC3D: 86 CA STX XSAVE
BC3F: A6 DE LDX $DE
BC41: 38 SEC
BC42: 20 67 BB JSR $BB67
BC45: A6 CA LDX XSAVE
BC47: 60 RTS
;
; p-code FD 04
;
BC48: 20 28 BC JSR $BC28
BC4B: A9 02 LDA #2
BC4D: 4C 92 00 JMP NEXT_OPA
;
; p-code FD 06
;
BC50: 20 89 BB JSR $BB89
BC53: A9 02 LDA #2
BC55: 4C 92 00 JMP NEXT_OPA
;
; p-code FD 0A
;
BC58: A9 75 LDA #$75
BC5A: 85 D8 STA $D8
BC5C: 4C D6 B8 JMP $B8D6
;
; Vector 27
;
BC5F: BD 00 06 LDA EVALPAGE,X
BC62: E8 INX
BC63: 85 DE STA $DE
BC65: E8 INX
BC66: 86 CA STX XSAVE
BC68: 20 E0 BC JSR $BCE0
BC6B: B0 4B BCS $BCB8
BC6D: 20 E0 BC JSR $BCE0
BC70: B0 42 BCS $BCB4
BC72: 85 CF STA $CE+1
BC74: 84 CE STY $CE
BC76: 20 E0 BC JSR $BCE0
BC79: B0 39 BCS $BCB4
BC7B: 85 D1 STA $D1
BC7D: 84 D0 STY $D0
BC7F: A5 D0 LDA $D0
BC81: 38 SEC
BC82: E5 CE SBC $CE
BC84: 85 D0 STA $D0
BC86: A5 D1 LDA $D0+1
BC88: E5 CF SBC $CE+1
BC8A: 85 D1 STA $D0+1
BC8C: E6 D0 INC $D0
BC8E: D0 02 BNE $BC92
BC90: E6 D1 INC $D0+1
BC92: A6 DE LDX $DE
BC94: A9 07 LDA #7 ; get
BC96: 9D 42 03 STA ICCMD,X
BC99: A5 CE LDA $CE
BC9B: 9D 44 03 STA ICBAL,X
BC9E: A5 CF LDA $CE+1
BCA0: 9D 45 03 STA ICBAH,X
BCA3: A5 D0 LDA $D0
BCA5: 9D 48 03 STA ICBLL,X
BCA8: A5 D1 LDA $D0+1
BCAA: 9D 49 03 STA ICBLH,X
BCAD: 20 56 E4 JSR CIOV
BCB0: C0 00 CPY #0
BCB2: 10 B9 BPL $BC6D
BCB4: C0 88 CPY #$88
BCB6: F0 06 BEQ $BCBE
BCB8: 38 SEC
BCB9: A9 64 LDA #$64
BCBB: 20 EA B8 JSR $B8EA
BCBE: A5 CE LDA $CE
BCC0: 38 SEC
BCC1: E9 01 SBC #1
BCC3: 85 CE STA $CE
BCC5: B0 02 BCS $BCC9
BCC7: C6 CF DEC $CE+1
BCC9: A5 CF LDA $CE+1
BCCB: 48 PHA
BCCC: A5 CE LDA $CE
BCCE: 48 PHA
BCCF: A6 DE LDX $DE
BCD1: A9 0C LDA #$0C ; close
BCD3: 9D 42 03 STA ICCMD,X
BCD6: 20 56 E4 JSR CIOV
BCD9: C0 00 CPY #0
BCDB: 30 DB BMI $BCB8
BCDD: A6 CA LDX XSAVE
BCDF: 60 RTS
BCE0: A6 DE LDX $DE
BCE2: A9 07 LDA #7 ; get
BCE4: 9D 42 03 STA ICCMD,X
BCE7: A9 D2 LDA #$D2
BCE9: 9D 44 03 STA ICBAL,X
BCEC: A9 00 LDA #0
BCEE: 9D 45 03 STA ICBAH,X
BCF1: A9 02 LDA #2
BCF3: 9D 48 03 STA ICBLL,X
BCF6: A9 00 LDA #0
BCF8: 9D 49 03 STA ICBLH,X
BCFB: 20 56 E4 JSR CIOV
BCFE: C0 00 CPY #0
BD00: 38 SEC
BD01: 30 05 BMI $BD08
BD03: A5 D3 LDA $D3
BD05: A4 D2 LDY $D2
BD07: 18 CLC
BD08: 60 RTS
BD09: 00 00 00 .BYTE 0,0,0
;
; Vector 24
;
BD0C: A9 00 LDA #0
BD0E: A2 03 LDX #3
BD10: 95 D2 STA $D2,X
BD12: CA DEX
BD13: D0 FB BNE $BD10
BD15: A2 10 LDX #$10
BD17: 66 D1 ROR $D1
BD19: 66 D0 ROR $D0
BD1B: 90 0D BCC $BD2A
BD1D: 18 CLC
BD1E: A5 D4 LDA $D4
BD20: 65 CE ADC $CE
BD22: 85 D4 STA $D4
BD24: A5 D5 LDA $D4+1
BD26: 65 CF ADC $CE+1
BD28: 85 D5 STA $D4+1
BD2A: 66 D5 ROR $D4+1
BD2C: 66 D4 ROR $D4
BD2E: 66 D3 ROR $D2+1
BD30: 66 D2 ROR $D2
BD32: CA DEX
BD33: D0 E2 BNE $BD17
BD35: 60 RTS
BD36: A9 00 LDA #0
BD38: 85 DE STA $DE
BD3A: A2 03 LDX #3
BD3C: 95 D2 STA $D2,X
BD3E: CA DEX
BD3F: D0 FB BNE $BD3C
BD41: A2 10 LDX #$10
BD43: A5 DE LDA $DE
BD45: 45 D0 EOR $D0
BD47: 6A ROR A
BD48: 90 22 BCC $BD6C
BD4A: A5 D0 LDA $D0
BD4C: 6A ROR A
BD4D: B0 10 BCS $BD5F
BD4F: A5 D4 LDA $D4
BD51: 18 CLC
BD52: 65 CE ADC $CE
BD54: 85 D4 STA $D4
BD56: A5 D5 LDA $D4+1
BD58: 65 CF ADC $CE+1
BD5A: 85 D5 STA $D4+1
BD5C: 4C 6C BD JMP $BD6C
BD5F: A5 D4 LDA $D4
BD61: 38 SEC
BD62: E5 CE SBC $CE
BD64: 85 D4 STA $D4
BD66: A5 D5 LDA $D4+1
BD68: E5 CF SBC $CE+1
BD6A: 85 D5 STA $D4+1
BD6C: 18 CLC
BD6D: A5 D5 LDA $D4+1
BD6F: 10 01 BPL $BD72
BD71: 38 SEC
BD72: 66 D5 ROR $D4+1
BD74: 66 D4 ROR $D4
BD76: 66 D3 ROR $D2+1
BD78: 66 D2 ROR $D2
BD7A: 46 D1 LSR $D0+1
BD7C: 66 D0 ROR $D0
BD7E: 26 DE ROL $DE
BD80: CA DEX
BD81: D0 C0 BNE $BD43
BD83: 60 RTS
BD84: A9 00 LDA #0
BD86: 85 D2 STA $D2
BD88: 85 D3 STA $D3
BD8A: A5 D0 LDA $D0
BD8C: 05 D1 ORA $D1
BD8E: D0 13 BNE $BDA3
BD90: A9 FF LDA #$FF
BD92: 85 D2 STA $D2
BD94: A9 7F LDA #$7F
BD96: 85 D3 STA $D3
BD98: A9 00 LDA #0
BD9A: 85 CE STA $CE
BD9C: 85 CF STA $CE+1
BD9E: A9 01 LDA #1
BDA0: 85 8B STA $8B
BDA2: 60 RTS
BDA3: A2 00 LDX #0
BDA5: 24 D1 BIT $D1
BDA7: 30 07 BMI $BDB0
BDA9: E8 INX
BDAA: 06 D0 ASL $D0
BDAC: 26 D1 ROL $D1
BDAE: 10 F9 BPL $BDA9
BDB0: E8 INX
BDB1: A5 CE LDA $CE
BDB3: 38 SEC
BDB4: E5 D0 SBC $D0
BDB6: A8 TAY
BDB7: A5 CF LDA $CE+1
BDB9: E5 D1 SBC $D1
BDBB: 90 04 BCC $BDC1
BDBD: 85 CF STA $CE+1
BDBF: 84 CE STY $CE
BDC1: 26 D2 ROL $D2
BDC3: 26 D3 ROL $D3
BDC5: 46 D1 LSR $D1
BDC7: 66 D0 ROR $D0
BDC9: CA DEX
BDCA: D0 E5 BNE $BDB1
BDCC: A9 00 LDA #0
BDCE: 85 8B STA $8B
BDD0: 60 RTS
BDD1: A5 D1 LDA $D1
BDD3: 45 CF EOR $CE+1
BDD5: 08 PHP
BDD6: A5 CF LDA $CE+1
BDD8: 08 PHP
BDD9: 24 D1 BIT $D1
BDDB: 10 11 BPL $BDEE
BDDD: A5 D0 LDA $D0
BDDF: 49 FF EOR #$FF
BDE1: 18 CLC
BDE2: 69 01 ADC #1
BDE4: 85 D0 STA $D0
BDE6: A5 D1 LDA $D1
BDE8: 49 FF EOR #$FF
BDEA: 69 00 ADC #0
BDEC: 85 D1 STA $D1
BDEE: 24 CF BIT $CE+1
BDF0: 10 11 BPL $BE03
BDF2: A5 CE LDA $CE
BDF4: 49 FF EOR #$FF
BDF6: 18 CLC
BDF7: 69 01 ADC #1
BDF9: 85 CE STA $CE
BDFB: A5 CF LDA $CE+1
BDFD: 49 FF EOR #$FF
BDFF: 69 00 ADC #0
BE01: 85 CF STA $CE+1
BE03: 20 84 BD JSR $BD84
BE06: 28 PLP
BE07: 10 11 BPL $BE1A
BE09: A5 CE LDA $CE
BE0B: 49 FF EOR #$FF
BE0D: 18 CLC
BE0E: 69 01 ADC #1
BE10: 85 CE STA $CE
BE12: A5 CF LDA $CE+1
BE14: 49 FF EOR #$FF
BE16: 69 00 ADC #0
BE18: 85 CF STA $CE+1
BE1A: 28 PLP
BE1B: 10 11 BPL $BE2E
BE1D: A5 D2 LDA $D2
BE1F: 49 FF EOR #$FF
BE21: 18 CLC
BE22: 69 01 ADC #1
BE24: 85 D2 STA $D2
BE26: A5 D3 LDA $D3
BE28: 49 FF EOR #$FF
BE2A: 69 00 ADC #0
BE2C: 85 D3 STA $D3
BE2E: 60 RTS
;
; Vector 0F - COMPARE INT16
;
BE2F: BD 02 06 LDA EVALPAGE+2,X
BE32: DD 00 06 CMP EVALPAGE,X
BE35: F0 0B BEQ $BE42
BE37: BD 03 06 LDA EVALPAGE+3,X
BE3A: FD 01 06 SBC EVALPAGE+1,X
BE3D: 09 01 ORA #1
BE3F: 70 0A BVS $BE4B
BE41: 60 RTS
BE42: BD 03 06 LDA EVALPAGE+3,X
BE45: FD 01 06 SBC EVALPAGE+1,X
BE48: 70 01 BVS $BE4B
BE4A: 60 RTS
BE4B: 49 80 EOR #$80
BE4D: 09 01 ORA #1
BE4F: 60 RTS
;
; Vector 10 - COMPARE BOOL
;
BE50: BD 00 06 LDA EVALPAGE,X
BE53: 29 01 AND #1
BE55: 85 DE STA $DE
BE57: BD 02 06 LDA EVALPAGE+2,X
BE5A: 29 01 AND #1
BE5C: C5 DE CMP $DE
BE5E: 60 RTS
;
; Vector 11
;
BE5F: BD 00 06 LDA EVALPAGE,X
BE62: E8 INX
BE63: 85 D0 STA $D0
BE65: BD 00 06 LDA EVALPAGE,X
BE68: E8 INX
BE69: 85 D1 STA $D0+1
BE6B: BD 00 06 LDA EVALPAGE,X
BE6E: E8 INX
BE6F: 85 CE STA $CE
BE71: BD 00 06 LDA EVALPAGE,X
BE74: E8 INX
BE75: 85 CF STA $CE+1
BE77: 86 CA STX XSAVE
BE79: A0 00 LDY #0
BE7B: B1 CE LDA ($CE),Y
BE7D: D1 D0 CMP ($D0),Y
BE7F: 90 02 BCC $BE83
BE81: B1 D0 LDA ($D0),Y
BE83: AA TAX
BE84: F0 0C BEQ $BE92
BE86: A0 01 LDY #1
BE88: B1 CE LDA ($CE),Y
BE8A: D1 D0 CMP ($D0),Y
BE8C: D0 0A BNE $BE98
BE8E: C8 INY
BE8F: CA DEX
BE90: D0 F6 BNE $BE88
BE92: A0 00 LDY #0
BE94: B1 CE LDA ($CE),Y
BE96: D1 D0 CMP ($D0),Y
BE98: 08 PHP
BE99: A6 CA LDX XSAVE
BE9B: 28 PLP
BE9C: 60 RTS
;
; Vector 12
;
BE9D: 86 CA STX XSAVE
BE9F: A0 00 LDY #0
BEA1: A6 D3 LDX $D3
BEA3: F0 10 BEQ $BEB5
BEA5: B1 CE LDA ($CE),Y
BEA7: D1 D0 CMP ($D0),Y
BEA9: D0 18 BNE $BEC3
BEAB: C8 INY
BEAC: D0 F7 BNE $BEA5
BEAE: E6 CF INC $CE+1
BEB0: E6 D1 INC $D1
BEB2: CA DEX
BEB3: D0 F0 BNE $BEA5
BEB5: A6 D2 LDX $D2
BEB7: F0 0A BEQ $BEC3
BEB9: B1 CE LDA ($CE),Y
BEBB: D1 D0 CMP ($D0),Y
BEBD: D0 04 BNE $BEC3
BEBF: C8 INY
BEC0: CA DEX
BEC1: D0 F6 BNE $BEB9
BEC3: 08 PHP
BEC4: A6 CA LDX XSAVE
BEC6: 28 PLP
BEC7: 60 RTS
BEC8: 00 00 .WORD 0
;
; ADD8 to LCLBASE -> CC
;
BECA: B1 A4 LDA (IP),Y
BECC: 18 CLC
BECD: 65 C6 ADC LCLBASE
BECF: 85 CC STA TMPBASE
BED1: A9 00 LDA #0
BED3: 65 C7 ADC LCLBASE+1
BED5: 85 CD STA TMPBASE+1
BED7: 60 RTS
;
; ADD16 to LCLBASE -> CC
;
BED8: B1 A4 LDA (IP),Y
BEDA: 18 CLC
BEDB: 65 C6 ADC LCLBASE
BEDD: 85 CC STA TMPBASE
BEDF: C8 INY
BEE0: B1 A4 LDA (IP),Y
BEE2: 65 C7 ADC LCLBASE+1
BEE4: 85 CD STA TMPBASE+1
BEE6: 60 RTS
BEE7: A0 01 LDY #1
BEE9: B1 A4 LDA (IP),Y
BEEB: 29 70 AND #$70
BEED: 4A LSR A
BEEE: 4A LSR A
BEEF: 4A LSR A
BEF0: 86 CA STX XSAVE
BEF2: AA TAX
BEF3: A0 02 LDY #2
BEF5: B1 A4 LDA (IP),Y
BEF7: 18 CLC
BEF8: 75 B6 ADC DR0,X
BEFA: 85 CC STA TMPBASE
BEFC: A9 00 LDA #0
BEFE: 75 B7 ADC DR0+1,X
BF00: 85 CD STA TMPBASE+1
BF02: A6 CA LDX XSAVE
BF04: 60 RTS
;
;
;
BF05: A0 01 LDY #1
BF07: B1 A4 LDA (IP),Y
BF09: 29 70 AND #$70
BF0B: 4A LSR A
BF0C: 4A LSR A
BF0D: 4A LSR A
BF0E: 86 CA STX XSAVE
BF10: AA TAX
BF11: A0 02 LDY #2
BF13: B1 A4 LDA (IP),Y
BF15: 18 CLC
BF16: 75 B6 ADC DR0,X
BF18: 85 CC STA TMPBASE
BF1A: C8 INY
BF1B: B1 A4 LDA (IP),Y
BF1D: 75 B7 ADC DR0+1,X
BF1F: 85 CD STA TMPBASE+1
BF21: A6 CA LDX XSAVE
BF23: 60 RTS
;
; Dead code
;
BF24: 00 00 .WORD 0
BF26: 65 CF ADC $CE+1
BF28: 85 D5 STA $D4+1
BF2A: 66 D5 ROR $D4+1
BF2C: 66 D4 ROR $D4
BF2E: 66 D3 ROR $D2+1
BF30: 66 D2 ROR $D2
BF32: CA DEX
BF33: D0 E2 BNE $BF17
BF35: 60 RTS
BF36: A9 00 LDA #0
BF38: 85 DE STA $DE
BF3A: A2 03 LDX #3
BF3C: 95 D2 STA $D2,X
BF3E: CA DEX
BF3F: D0 FB BNE $BF3C
BF41: A2 10 LDX #$10
BF43: A5 DE LDA $DE
BF45: 45 D0 EOR $D0
BF47: 6A ROR A
BF48: 90 22 BCC $BF6C
BF4A: A5 D0 LDA $D0
BF4C: 6A ROR A
BF4D: B0 10 BCS $BF5F
BF4F: A5 D4 LDA $D4
BF51: 18 CLC
BF52: 65 CE ADC $CE
BF54: 85 D4 STA $D4
BF56: A5 D5 LDA $D4+1
BF58: 65 CF ADC $CE+1
BF5A: 85 D5 STA $D4+1
BF5C: 4C 6C BD JMP $BD6C
BF5F: A5 D4 LDA $D4
BF61: 38 SEC
BF62: E5 CE SBC $CE
BF64: 85 D4 STA $D4
BF66: A5 D5 LDA $D4+1
BF68: E5 CF SBC $CE+1
BF6A: 85 D5 STA $D4+1
BF6C: 18 CLC
BF6D: A5 D5 LDA $D4+1
BF6F: 10 01 BPL $BF72
BF71: 38 SEC
BF72: 66 D5 ROR $D4+1
BF74: 66 D4 ROR $D4
BF76: 66 D3 ROR $D2+1
BF78: 66 D2 ROR $D2
BF7A: 46 D1 LSR $D0+1
BF7C: 66 D0 ROR $D0
BF7E: 26 DE ROL $DE
BF80: CA DEX
BF81: D0 C0 BNE $BF43
BF83: 60 RTS
BF84: A9 00 LDA #0
BF86: 85 D2 STA $D2
BF88: 85 D3 STA $D2+1
BF8A: A5 D0 LDA $D0
BF8C: 05 D1 ORA $D0+1
BF8E: D0 13 BNE $BFA3
BF90: A9 FF LDA #<$7FFF
BF92: 85 D2 STA $D2
BF94: A9 7F LDA #>$7FFF
BF96: 85 D3 STA $D2+1
BF98: A9 00 LDA #0
BF9A: 85 CE STA $CE
BF9C: 85 CF STA $CE+1
BF9E: A9 01 LDA #1
BFA0: 85 8B STA $8B
BFA2: 60 RTS
BFA3: A2 00 LDX #0
BFA5: 24 D1 BIT $D1
BFA7: 30 07 BMI $BFB0
BFA9: E8 INX
BFAA: 06 D0 ASL $D0
BFAC: 26 D1 ROL $D1
BFAE: 10 F9 BPL $BFA9
BFB0: E8 INX
BFB1: A5 CE LDA $CE
BFB3: 38 SEC
BFB4: E5 D0 SBC $D0
BFB6: A8 TAY
BFB7: A5 CF LDA $CE+1
BFB9: E5 D1 SBC $D1
BFBB: 90 04 BCC $BFC1
BFBD: 85 CF STA $CE+1
BFBF: 84 CE STY $CE
BFC1: 26 D2 ROL $D2
BFC3: 26 D3 ROL $D2+1
BFC5: 46 D1 LSR $D0+1
BFC7: 66 D0 ROR $D0
BFC9: CA DEX
BFCA: D0 E5 BNE $BFB1
BFCC: A9 00 LDA #0
BFCE: 85 8B STA $8B
BFD0: 60 RTS
BFD1: A5 D1 LDA $D1
BFD3: 45 CF EOR $CE+1
BFD5: 08 PHP
BFD6: A5 CF LDA $CE+1
BFD8: 08 PHP
BFD9: 24 D1 BIT $D1
BFDB: 10 11 BPL $BFEE
BFDD: A5 D0 LDA $D0
BFDF: 49 FF EOR #$FF
BFE1: 18 CLC
BFE2: 69 01 ADC #1
BFE4: 85 D0 STA $D0
BFE6: A5 D1 LDA $D0+1
BFE8: 49 FF EOR #$FF
BFEA: 69 00 ADC #0
BFEC: 85 D1 STA $D0+1
BFEE: 24 CF BIT $CE+1
BFF0: 10 11 BPL $C003
BFF2: A5 CE LDA $CE
BFF4: 49 FF EOR #$FF
BFF6: 18 CLC
BFF7: 69 01 ADC #1
;
; Cartridge vectors
;
BFF9: 60 RTS
BFFA: F9 BF .WORD $BFF9
BFFC: 00 01 .BYTE 0,1
BFFE: F9 BF .WORD $BFF9
No comments:
Post a Comment