Difference between revisions of "Disassembly:Videocart 23"

From veswiki
Jump to: navigation, search
 
m (1 revision)
 
(No difference)

Latest revision as of 21:23, 16 November 2012

Template:Incomplete Disassembly

This is the complete disassembly of the Channel F Videocart 23 made with Peter Trauner's f8tool. Original code is copyright © 1978 (?) Zircon International.

Reset: equ $0000

org $0800

CartridgeStart: LR   $5,A                ; 0800 55
                NOP                      ; 0801 2b
CartridgeEntry: JMP  A0c61               ; 0802 29 0c 61
A0805:          LI   $40                 ; 0805 20 40
                OUTS 0                   ; 0807 b0
                LR   A,$4                ; 0808 44
                COM                      ; 0809 18
                NI   $c0                 ; 080a 21 c0
                AS   $5                  ; 080c c5
                LR   $4,A                ; 080d 54
                LR   $6,A                ; 080e 56
                LIS  $0                  ; 080f 70
                LR   $5,A                ; 0810 55
                LIS  $1                  ; 0811 71
                LR   $a,A                ; 0812 5a
A0813:          LI   $ff                 ; 0813 20 ff
                LR   $9,A                ; 0815 59
                LR   A,$0                ; 0816 40
                COM                      ; 0817 18
                OUTS 4                   ; 0818 b4
                LR   A,$2                ; 0819 42
                LR   $7,A                ; 081a 57
A081b:          LIS  $0                  ; 081b 70
                AS   $5                  ; 081c c5
                BF   $4,A082b            ; 081d 94 0d
                LIS  $8                  ; 081f 78
                LR   $5,A                ; 0820 55
                LI   $ff                 ; 0821 20 ff
                LR   $8,A                ; 0823 58
                LI   $20                 ; 0824 20 20
                NS   $4                  ; 0826 f4
                BF   $4,A082b            ; 0827 94 03
                LM                       ; 0829 16
                LR   $8,A                ; 082a 58
A082b:          LR   A,$6                ; 082b 46
                OUTS 1                   ; 082c b1
                LIS  $0                  ; 082d 70
                AS   $8                  ; 082e c8
                BF   $1,A0838            ; 082f 91 08
                LI   $ff                 ; 0831 20 ff
                OUTS 1                   ; 0833 b1
                LIS  $1                  ; 0834 71
                NS   $4                  ; 0835 f4
                BF   $4,A084a            ; 0836 94 13
A0838:          INS  5                   ; 0838 a5
                COM                      ; 0839 18
                NI   $c0                 ; 083a 21 c0
                AS   $1                  ; 083c c1
                COM                      ; 083d 18
                OUTS 5                   ; 083e b5
                LI   $60                 ; 083f 20 60
                OUTS 0                   ; 0841 b0
                LI   $40                 ; 0842 20 40
                OUTS 0                   ; 0844 b0
                LIS  $4                  ; 0845 74
A0846:          AI   $ff                 ; 0846 24 ff
                BF   $4,A0846            ; 0848 94 fd
A084a:          INS  4                   ; 084a a4
                AS   $9                  ; 084b c9
                OUTS 4                   ; 084c b4
                DS   $5                  ; 084d 35
                LR   A,$8                ; 084e 48
                SL   1                   ; 084f 13
                LR   $8,A                ; 0850 58
                DS   $7                  ; 0851 37
                BF   $4,A081b            ; 0852 94 c8
                LR   A,$1                ; 0854 41
                AS   $a                  ; 0855 ca
                LR   $1,A                ; 0856 51
                DS   $3                  ; 0857 33
                BF   $4,A0813            ; 0858 94 ba
                LIS  $0                  ; 085a 70
                OUTS 0                   ; 085b b0
                POP                      ; 085c 1c
A085d:          LI   $20                 ; 085d 20 20
                LR   $2,A                ; 085f 52
A0860:          DS   $2                  ; 0860 32
                BF   $4,A0860            ; 0861 94 fe
                DS   $0                  ; 0863 30
                BF   $4,A085d            ; 0864 94 f8
                POP                      ; 0866 1c
A0867:          LISU 2                   ; 0867 62
                LISL 7                   ; 0868 6f
                LR   A,(IS)              ; 0869 4c
                SL   1                   ; 086a 13
                SL   1                   ; 086b 13
                SL   1                   ; 086c 13
                AS   (IS)                ; 086d cc
                AI   $59                 ; 086e 24 59
                LR   (IS),A              ; 0870 5c
                POP                      ; 0871 1c
A0872:          LR   A,IS                ; 0872 0a
A0873:          LR   $a,A                ; 0873 5a
                LR   KL,A                ; 0874 05
                DS   $0                  ; 0875 30
A0876:          NS   $0                  ; 0876 f0
                LR   A,KL                ; 0877 01
                LR   A,KL                ; 0878 01
                db   $ff                 
                LI   $e0                 ; 087a 20 e0
                LR   A,KU                ; 087c 00
A087d:          LR   A,QU                ; 087d 02
                NS   $0                  ; 087e f0
                LR   DC,H                ; 087f 10
                LR   A,KU                ; 0880 00
A0881:          LR   A,$0                ; 0881 40
                LR   A,$5                ; 0882 45
                LR   A,QL                ; 0883 03
                LR   A,KU                ; 0884 00
A0885:          LR   A,KL                ; 0885 01
                LR   A,$0                ; 0886 40
                LR   A,$0                ; 0887 40
                DS   $0                  ; 0888 30
                db   $ff                 
                NS   (IS)-               ; 088a fe
                LR   A,KU                ; 088b 00
A088c:          LR   $0,A                ; 088c 50
                LR   A,QU                ; 088d 02
                NS   (IS)                ; 088e fc
                LR   A,KU                ; 088f 00
A0890:          INC                      ; 0890 1f
                XI   $00                 ; 0891 23 00
                DS   $2                  ; 0893 32
                ST                       ; 0894 17
                BT   0,A08e0             ; 0895 80 4a
                ASD  $4                  ; 0897 d4
                BT   0,51                ; 0898 80 33
                DS   $b                  ; 089a 3b
                LR   A,$0                ; 089b 40
A089c:          LI   $40                 ; 089c 20 40
                OUTS 0                   ; 089e b0
                LR   A,$0                ; 089f 40
                COM                      ; 08a0 18
                OUTS 4                   ; 08a1 b4
                LR   A,$2                ; 08a2 42
                COM                      ; 08a3 18
                OUTS 1                   ; 08a4 b1
                INS  5                   ; 08a5 a5
                COM                      ; 08a6 18
                NI   $c0                 ; 08a7 21 c0
                AS   $1                  ; 08a9 c1
                COM                      ; 08aa 18
                OUTS 5                   ; 08ab b5
                LI   $60                 ; 08ac 20 60
                OUTS 0                   ; 08ae b0
                LI   $40                 ; 08af 20 40
                OUTS 0                   ; 08b1 b0
                LIS  $8                  ; 08b2 78
A08b3:          AI   $ff                 ; 08b3 24 ff
                BF   $4,A08b3            ; 08b5 94 fd
                LIS  $0                  ; 08b7 70
                OUTS 0                   ; 08b8 b0
                POP                      ; 08b9 1c
A08ba:          LIS  $0                  ; 08ba 70
                OUTS 1                   ; 08bb b1
                OUTS 4                   ; 08bc b4
                INS  1                   ; 08bd a1
                COM                      ; 08be 18
                LISU 7                   ; 08bf 67
                LISL 6                   ; 08c0 6e
                LR   (IS)+,A             ; 08c1 5d
                INS  4                   ; 08c2 a4
                COM                      ; 08c3 18
                LR   (IS),A              ; 08c4 5c
                POP                      ; 08c5 1c
A08c6:          BT   0,20                ; 08c6 80 14
                DS   $6                  ; 08c8 36
                AS   $0                  ; 08c9 c0
                PI   $3680               ; 08ca 28 36 80
                DS   (IS)                ; 08cd 3c
                DS   $6                  ; 08ce 36
A08cf:          LR   DC,H                ; 08cf 10
                LR   $4,A                ; 08d0 54
                LR   A,KU                ; 08d1 00
                LR   A,$0                ; 08d2 40
                LR   $0,A                ; 08d3 50
                DS   $6                  ; 08d4 36
A08d5:          LR   K,P                 ; 08d5 08
                PI   $0107               ; 08d6 28 01 07
                DCI  A08c6               ; 08d9 2a 08 c6
                LR   A,$0                ; 08dc 40
                ADC                      ; 08dd 8e
                ADC                      ; 08de 8e
                ADC                      ; 08df 8e
A08e0:          AI   $38                 ; 08e0 24 38
                LR   IS,A                ; 08e2 0b
                LR   A,(IS)              ; 08e3 4c
                SR   4                   ; 08e4 14
                AM                       ; 08e5 88
                LR   $0,A                ; 08e6 50
                LR   $3,A                ; 08e7 53
                LM                       ; 08e8 16
                LR   $1,A                ; 08e9 51
                LM                       ; 08ea 16
                LR   $2,A                ; 08eb 52
                PI   $0679               ; 08ec 28 06 79
                LR   A,$3                ; 08ef 43
                NI   $c0                 ; 08f0 21 c0
                LR   $0,A                ; 08f2 50
                LR   A,(IS)              ; 08f3 4c
                NI   $0f                 ; 08f4 21 0f
                AS   $0                  ; 08f6 c0
                LR   $0,A                ; 08f7 50
                PI   $0679               ; 08f8 28 06 79
                PI   $011e               ; 08fb 28 01 1e
                PK                       ; 08fe 0c
A08ff:          LIS  $0                  ; 08ff 70
                AS   $0                  ; 0900 c0
                BT   1,A090b             ; 0901 81 09
                AI   $02                 ; 0903 24 02
                LIS  $0                  ; 0905 70
                BT   1,A090a             ; 0906 81 03
                LI   $ff                 ; 0908 20 ff
A090a:          POP                      ; 090a 1c
A090b:          AI   $fe                 ; 090b 24 fe
                LIS  $0                  ; 090d 70
                BF   $1,A0911            ; 090e 91 02
                LIS  $1                  ; 0910 71
A0911:          POP                      ; 0911 1c
A0912:          LR   A,$1                ; 0912 41
                COM                      ; 0913 18
                INC                      ; 0914 1f
                AS   $0                  ; 0915 c0
                BT   1,A091a             ; 0916 81 03
                COM                      ; 0918 18
                INC                      ; 0919 1f
A091a:          POP                      ; 091a 1c
A091b:          LR   K,P                 ; 091b 08
                PI   $0107               ; 091c 28 01 07
                LI   $c0                 ; 091f 20 c0
                LR   KU,A                ; 0921 04
                LIS  $0                  ; 0922 70
                LR   KL,A                ; 0923 05
                BF   $0,A0929            ; 0924 90 04
A0926:          LR   A,KL                ; 0926 01
                INC                      ; 0927 1f
                LR   KL,A                ; 0928 05
A0929:          CI   $03                 ; 0929 25 03
                BF   $1,A094a            ; 092b 91 1e
                DCI  A088c               ; 092d 2a 08 8c
                PI   A0fd5               ; 0930 28 0f d5
                LI   $7d                 ; 0933 20 7d
                LR   $0,A                ; 0935 50
                LIS  $2                  ; 0936 72
                LR   $1,A                ; 0937 51
                LR   $2,A                ; 0938 52
                LI   $32                 ; 0939 20 32
                LR   $3,A                ; 093b 53
                LR   A,KU                ; 093c 00
                LR   $4,A                ; 093d 54
                LI   $30                 ; 093e 20 30
                LR   $5,A                ; 0940 55
                PI   A0805               ; 0941 28 08 05
                LR   A,KU                ; 0944 00
                AI   $c0                 ; 0945 24 c0
                LR   KU,A                ; 0947 04
                BF   $0,A0926            ; 0948 90 dd
A094a:          PI   $011e               ; 094a 28 01 1e
                PK                       ; 094d 0c
A094e:          LR   K,P                 ; 094e 08
                LI   $34                 ; 094f 20 34
                LR   $3,A                ; 0951 53
                DCI  A08cf               ; 0952 2a 08 cf
                LM                       ; 0955 16
                LR   $4,A                ; 0956 54
                LM                       ; 0957 16
                LR   $5,A                ; 0958 55
                LI   $80                 ; 0959 20 80
                LR   $6,A                ; 095b 56
                LISU 3                   ; 095c 63
                LISL 5                   ; 095d 6d
                LR   A,(IS)              ; 095e 4c
                DCI  A0966               ; 095f 2a 09 66
                ADC                      ; 0962 8e
                ADC                      ; 0963 8e
                LR   Q,DC                ; 0964 0e
                LR   P0,Q                ; 0965 0d
A0966:          BF   $0,A099c            ; 0966 90 35
                BF   $0,A096e            ; 0968 90 05
                BF   $0,A098e            ; 096a 90 23
                BF   $0,A0994            ; 096c 90 27
A096e:          LIS  $2                  ; 096e 72
                LR   (IS),A              ; 096f 5c
A0970:          LR   A,$3                ; 0970 43
                CI   $22                 ; 0971 25 22
                BT   1,A098c             ; 0973 81 18
                LR   A,$4                ; 0975 44
                LR   $0,A                ; 0976 50
                LR   A,$3                ; 0977 43
                LR   $1,A                ; 0978 51
                LR   A,$6                ; 0979 46
                LR   $2,A                ; 097a 52
                PI   A089c               ; 097b 28 08 9c
                LR   A,$5                ; 097e 45
                LR   $0,A                ; 097f 50
                PI   A089c               ; 0980 28 08 9c
                LR   A,$4                ; 0983 44
                INC                      ; 0984 1f
                INC                      ; 0985 1f
                LR   $4,A                ; 0986 54
                DS   $5                  ; 0987 35
                DS   $5                  ; 0988 35
                DS   $3                  ; 0989 33
                BF   $0,A0970            ; 098a 90 e5
A098c:          BF   $0,A099c            ; 098c 90 0f
A098e:          LIS  $3                  ; 098e 73
                LR   (IS),A              ; 098f 5c
                LIS  $0                  ; 0990 70
                LR   $6,A                ; 0991 56
                BF   $0,A0970            ; 0992 90 dd
A0994:          LIS  $0                  ; 0994 70
                LR   (IS),A              ; 0995 5c
                DCI  A0885               ; 0996 2a 08 85
                PI   A0fd5               ; 0999 28 0f d5
A099c:          PK                       ; 099c 0c
A099d:          LR   K,P                 ; 099d 08
                PI   $0107               ; 099e 28 01 07
                LI   $80                 ; 09a1 20 80
                LR   KL,A                ; 09a3 05
                BF   $0,A09ae            ; 09a4 90 09
A09a6:          LR   A,KL                ; 09a6 01
                CI   $00                 ; 09a7 25 00
                BT   4,A09c8             ; 09a9 84 1e
                LI   $00                 ; 09ab 20 00
                LR   KL,A                ; 09ad 05
A09ae:          LI   $7d                 ; 09ae 20 7d
                LR   $0,A                ; 09b0 50
                LIS  $2                  ; 09b1 72
                LR   $1,A                ; 09b2 51
                LIS  $1                  ; 09b3 71
                LR   $2,A                ; 09b4 52
                LI   $32                 ; 09b5 20 32
                LR   $3,A                ; 09b7 53
                LR   A,KL                ; 09b8 01
                LR   $4,A                ; 09b9 54
                LI   $30                 ; 09ba 20 30
                LR   $5,A                ; 09bc 55
                PI   A0805               ; 09bd 28 08 05
                DCI  A087d               ; 09c0 2a 08 7d
                PI   A0fd5               ; 09c3 28 0f d5
                BF   $0,A09a6            ; 09c6 90 df
A09c8:          LR   A,$b                ; 09c8 4b
                CI   $ff                 ; 09c9 25 ff
                BF   $4,A09da            ; 09cb 94 0e
                LISU 7                   ; 09cd 67
                LISL 4                   ; 09ce 6c
                LR   A,(IS)              ; 09cf 4c
                LIS  $1                  ; 09d0 71
                AI   $66                 ; 09d1 24 66
                ASD  (IS)                ; 09d3 dc
                LR   (IS),A              ; 09d4 5c
                LIS  $4                  ; 09d5 74
                LR   $0,A                ; 09d6 50
                PI   A08d5               ; 09d7 28 08 d5
A09da:          PI   $011e               ; 09da 28 01 1e
                PK                       ; 09dd 0c
A09de:          LR   K,P                 ; 09de 08
                LR   A,$3                ; 09df 43
                CI   $01                 ; 09e0 25 01
                BF   $4,A09e8            ; 09e2 94 05
                PI   A089c               ; 09e4 28 08 9c
                PK                       ; 09e7 0c
A09e8:          PI   $0107               ; 09e8 28 01 07
                LISU 3                   ; 09eb 63
                LISL 5                   ; 09ec 6d
                LR   A,(IS)              ; 09ed 4c
                CI   $02                 ; 09ee 25 02
                BF   $4,A0a3a            ; 09f0 94 49
                LR   A,$2                ; 09f2 42
                CI   $00                 ; 09f3 25 00
                BT   4,A0a3a             ; 09f5 84 44
                LR   A,$3                ; 09f7 43
                CI   $00                 ; 09f8 25 00
                BF   $4,A0a3a            ; 09fa 94 3f
                LR   A,$0                ; 09fc 40
                CI   $34                 ; 09fd 25 34
                BF   $1,A0a3a            ; 09ff 91 3a
                AI   $04                 ; 0a01 24 04
                CI   $2f                 ; 0a03 25 2f
                BT   1,A0a3a             ; 0a05 81 34
                LR   A,$1                ; 0a07 41
                CI   $24                 ; 0a08 25 24
                BF   $1,A0a3a            ; 0a0a 91 2f
                AI   $02                 ; 0a0c 24 02
                CI   $1f                 ; 0a0e 25 1f
                BT   1,A0a3a             ; 0a10 81 29
                LISU 2                   ; 0a12 62
                LISL 2                   ; 0a13 6a
                LR   A,(IS)              ; 0a14 4c
                SR   4                   ; 0a15 14
                INC                      ; 0a16 1f
                LISU 7                   ; 0a17 67
                LISL 2                   ; 0a18 6a
                AI   $66                 ; 0a19 24 66
                ASD  (IS)                ; 0a1b dc
                LR   (IS),A              ; 0a1c 5c
                PI   A0867               ; 0a1d 28 08 67
                LISU 3                   ; 0a20 63
                LISL 0                   ; 0a21 68
                LR   (IS),A              ; 0a22 5c
                SR   1                   ; 0a23 12
                OI   $80                 ; 0a24 22 80
                LISU 4                   ; 0a26 64
                LR   (IS),A              ; 0a27 5c
                PI   A0867               ; 0a28 28 08 67
                NI   $31                 ; 0a2b 21 31
                LISU 2                   ; 0a2d 62
                LISL 2                   ; 0a2e 6a
                LR   (IS),A              ; 0a2f 5c
                PI   A091b               ; 0a30 28 09 1b
                LIS  $2                  ; 0a33 72
                LR   $0,A                ; 0a34 50
                PI   A08d5               ; 0a35 28 08 d5
                BF   $0,A0a4f            ; 0a38 90 16
A0a3a:          LISU 2                   ; 0a3a 62
                LISL 2                   ; 0a3b 6a
                LR   A,(IS)              ; 0a3c 4c
                SR   4                   ; 0a3d 14
                DCI  A0890               ; 0a3e 2a 08 90
                ADC                      ; 0a41 8e
                ADC                      ; 0a42 8e
                ADC                      ; 0a43 8e
                LR   A,$2                ; 0a44 42
                LR   $4,A                ; 0a45 54
                LIS  $6                  ; 0a46 76
                LR   $2,A                ; 0a47 52
                LIS  $3                  ; 0a48 73
                LR   $3,A                ; 0a49 53
                LIS  $1                  ; 0a4a 71
                LR   $5,A                ; 0a4b 55
                PI   A0805               ; 0a4c 28 08 05
A0a4f:          PI   $011e               ; 0a4f 28 01 1e
                PK                       ; 0a52 0c
A0a53:          LR   K,P                 ; 0a53 08
                PI   $0107               ; 0a54 28 01 07
                LISU 2                   ; 0a57 62
                LISL 3                   ; 0a58 6b
                LIS  $0                  ; 0a59 70
                AS   (IS)+               ; 0a5a cd
                BT   4,A0a62             ; 0a5b 84 06
                LIS  $1                  ; 0a5d 71
                BT   1,A0a62             ; 0a5e 81 03
                LI   $ff                 ; 0a60 20 ff
A0a62:          LR   $3,A                ; 0a62 53
                LR   A,(IS)              ; 0a63 4c
                LIS  $0                  ; 0a64 70
                AS   (IS)                ; 0a65 cc
                BT   4,A0a6d             ; 0a66 84 06
                LIS  $1                  ; 0a68 71
                BT   1,A0a6d             ; 0a69 81 03
                LI   $ff                 ; 0a6b 20 ff
A0a6d:          LR   $4,A                ; 0a6d 54
                LISU 2                   ; 0a6e 62
                LISL 7                   ; 0a6f 6f
                LR   A,(IS)-             ; 0a70 4e
                LR   $6,A                ; 0a71 56
                LR   A,(IS)+             ; 0a72 4d
                LR   (IS),A              ; 0a73 5c
                LIS  $0                  ; 0a74 70
                LR   $5,A                ; 0a75 55
                BF   $0,A0a7b            ; 0a76 90 04
A0a78:          LR   A,$5                ; 0a78 45
                INC                      ; 0a79 1f
                LR   $5,A                ; 0a7a 55
A0a7b:          CI   $20                 ; 0a7b 25 20
                BF   $1,A0abc            ; 0a7d 91 3e
                PI   A0867               ; 0a7f 28 08 67
                LR   $0,A                ; 0a82 50
                PI   A0867               ; 0a83 28 08 67
                LISU 3                   ; 0a86 63
                LISL 7                   ; 0a87 6f
                AS   (IS)-               ; 0a88 ce
                LR   $1,A                ; 0a89 51
                LR   A,$0                ; 0a8a 40
                AS   (IS)                ; 0a8b cc
                LR   $0,A                ; 0a8c 50
                LR   A,$0                ; 0a8d 40
                DCI  A0873               ; 0a8e 2a 08 73
                CM                       ; 0a91 8d
                BF   $2,A0aba            ; 0a92 92 27
                LR   A,$1                ; 0a94 41
                CM                       ; 0a95 8d
                BT   2,A0aba             ; 0a96 82 23
                CM                       ; 0a98 8d
                BF   $2,A0aba            ; 0a99 92 20
                LIS  $0                  ; 0a9b 70
                LR   $2,A                ; 0a9c 52
                PI   A089c               ; 0a9d 28 08 9c
                LR   A,$0                ; 0aa0 40
                AS   $3                  ; 0aa1 c3
                LR   $0,A                ; 0aa2 50
                LR   A,$1                ; 0aa3 41
                AS   $4                  ; 0aa4 c4
                LR   $1,A                ; 0aa5 51
                LR   A,$0                ; 0aa6 40
                DCI  A0873               ; 0aa7 2a 08 73
                CM                       ; 0aaa 8d
                BF   $2,A0aba            ; 0aab 92 0e
                LR   A,$1                ; 0aad 41
                CM                       ; 0aae 8d
                BT   2,A0aba             ; 0aaf 82 0a
                CM                       ; 0ab1 8d
                BF   $2,A0aba            ; 0ab2 92 07
                LI   $80                 ; 0ab4 20 80
                LR   $2,A                ; 0ab6 52
                PI   A089c               ; 0ab7 28 08 9c
A0aba:          BF   $0,A0a78            ; 0aba 90 bd
A0abc:          LISU 3                   ; 0abc 63
                LISL 6                   ; 0abd 6e
                LR   A,(IS)              ; 0abe 4c
                AS   $3                  ; 0abf c3
                LR   (IS)+,A             ; 0ac0 5d
                LR   A,(IS)              ; 0ac1 4c
                AS   $4                  ; 0ac2 c4
                LR   (IS),A              ; 0ac3 5c
                LISU 2                   ; 0ac4 62
                LISL 7                   ; 0ac5 6f
                LR   A,$6                ; 0ac6 46
                LR   (IS),A              ; 0ac7 5c
                PI   $011e               ; 0ac8 28 01 1e
                PK                       ; 0acb 0c
A0acc:          LR   K,P                 ; 0acc 08
                PI   $0107               ; 0acd 28 01 07
                LIS  $0                  ; 0ad0 70
                LR   QL,A                ; 0ad1 07
                BF   $0,A0ad7            ; 0ad2 90 04
A0ad4:          LR   A,QL                ; 0ad4 03
                INC                      ; 0ad5 1f
                LR   QL,A                ; 0ad6 07
A0ad7:          CI   $03                 ; 0ad7 25 03
                BT   1,A0adf             ; 0ad9 81 05
                PI   $011e               ; 0adb 28 01 1e
                PK                       ; 0ade 0c
A0adf:          CI   $00                 ; 0adf 25 00
                LIS  $0                  ; 0ae1 70
                BT   4,A0ae5             ; 0ae2 84 02
                LIS  $1                  ; 0ae4 71
A0ae5:          LR   QU,A                ; 0ae5 06
                LR   A,QL                ; 0ae6 03
                AI   $18                 ; 0ae7 24 18
                LR   IS,A                ; 0ae9 0b
                LR   A,(IS)              ; 0aea 4c
                LR   $0,A                ; 0aeb 50
                LISU 4                   ; 0aec 64
                LR   A,(IS)              ; 0aed 4c
                LR   $1,A                ; 0aee 51
                DCI  A0872               ; 0aef 2a 08 72
                LR   A,$0                ; 0af2 40
                CM                       ; 0af3 8d
                BT   2,A0b07             ; 0af4 82 12
                CM                       ; 0af6 8d
                BF   $2,A0b07            ; 0af7 92 0f
                LR   A,$1                ; 0af9 41
                CM                       ; 0afa 8d
                BT   2,A0b07             ; 0afb 82 0b
                CM                       ; 0afd 8d
                BF   $2,A0b07            ; 0afe 92 08
                LIS  $0                  ; 0b00 70
                LR   $2,A                ; 0b01 52
                LR   A,QU                ; 0b02 02
                LR   $3,A                ; 0b03 53
                PI   A09de               ; 0b04 28 09 de
A0b07:          LR   A,QU                ; 0b07 02
                CI   $01                 ; 0b08 25 01
                BF   $4,A0b36            ; 0b0a 94 2b
                LISU 2                   ; 0b0c 62
                LISL 3                   ; 0b0d 6b
                LR   A,(IS)+             ; 0b0e 4d
                LR   $6,A                ; 0b0f 56
                LR   A,(IS)              ; 0b10 4c
                LR   $7,A                ; 0b11 57
                LR   A,QL                ; 0b12 03
                AI   $18                 ; 0b13 24 18
                LR   IS,A                ; 0b15 0b
                LR   A,(IS)              ; 0b16 4c
                AI   $ce                 ; 0b17 24 ce
                LR   $0,A                ; 0b19 50
                PI   A08ff               ; 0b1a 28 08 ff
                AS   $6                  ; 0b1d c6
                LR   $3,A                ; 0b1e 53
                AS   (IS)                ; 0b1f cc
                LR   (IS),A              ; 0b20 5c
                LISU 4                   ; 0b21 64
                LR   A,(IS)              ; 0b22 4c
                AI   $de                 ; 0b23 24 de
                LR   $0,A                ; 0b25 50
                PI   A08ff               ; 0b26 28 08 ff
                AS   $7                  ; 0b29 c7
                LR   $1,A                ; 0b2a 51
                AS   (IS)                ; 0b2b cc
                LR   (IS),A              ; 0b2c 5c
                LR   A,$3                ; 0b2d 43
                LR   $0,A                ; 0b2e 50
                AS   $1                  ; 0b2f c1
                BF   $4,A0b33            ; 0b30 94 02
                DS   (IS)                ; 0b32 3c
A0b33:          JMP  A0bce               ; 0b33 29 0b ce
A0b36:          LIS  $0                  ; 0b36 70
                LR   $b,A                ; 0b37 5b
                LR   KL,A                ; 0b38 05
                PI   A08ba               ; 0b39 28 08 ba
                BF   $4,A0ba3            ; 0b3c 94 66
                LISU 4                   ; 0b3e 64
                LISL 5                   ; 0b3f 6d
                LIS  $3                  ; 0b40 73
                NS   (IS)                ; 0b41 fc
                BF   $4,A0b9c            ; 0b42 94 59
                LISU 7                   ; 0b44 67
                LISL 0                   ; 0b45 68
                LR   A,(IS)              ; 0b46 4c
                SR   4                   ; 0b47 14
                CI   $02                 ; 0b48 25 02
                BT   1,A0b56             ; 0b4a 81 0b
                PI   A0867               ; 0b4c 28 08 67
                NI   $02                 ; 0b4f 21 02
                AI   $ff                 ; 0b51 24 ff
                LR   $b,A                ; 0b53 5b
                BF   $0,A0b65            ; 0b54 90 10
A0b56:          LISU 3                   ; 0b56 63
                LISL 0                   ; 0b57 68
                LR   A,(IS)              ; 0b58 4c
                AI   $ce                 ; 0b59 24 ce
                LR   $0,A                ; 0b5b 50
                PI   A08ff               ; 0b5c 28 08 ff
                CI   $00                 ; 0b5f 25 00
                BF   $4,A0b64            ; 0b61 94 02
                LIS  $1                  ; 0b63 71
A0b64:          LR   $b,A                ; 0b64 5b
A0b65:          LISU 7                   ; 0b65 67
                LISL 0                   ; 0b66 68
                LR   A,(IS)              ; 0b67 4c
                NI   $0f                 ; 0b68 21 0f
                CI   $02                 ; 0b6a 25 02
                BT   1,A0b78             ; 0b6c 81 0b
                PI   A0867               ; 0b6e 28 08 67
                NI   $02                 ; 0b71 21 02
                AI   $ff                 ; 0b73 24 ff
                LR   KL,A                ; 0b75 05
                BF   $0,A0b87            ; 0b76 90 10
A0b78:          LISU 4                   ; 0b78 64
                LISL 0                   ; 0b79 68
                LR   A,(IS)              ; 0b7a 4c
                AI   $de                 ; 0b7b 24 de
                LR   $0,A                ; 0b7d 50
                PI   A08ff               ; 0b7e 28 08 ff
                CI   $00                 ; 0b81 25 00
                BF   $4,A0b86            ; 0b83 94 02
                LIS  $1                  ; 0b85 71
A0b86:          LR   KL,A                ; 0b86 05
A0b87:          LISU 2                   ; 0b87 62
                LISL 2                   ; 0b88 6a
                LIS  $f                  ; 0b89 7f
                NS   (IS)                ; 0b8a fc
                BT   4,A0b9c             ; 0b8b 84 10
                LISL 7                   ; 0b8d 6f
                LIS  $1                  ; 0b8e 71
                NS   (IS)                ; 0b8f fc
                BT   4,A0b98             ; 0b90 84 07
                LR   A,$b                ; 0b92 4b
                COM                      ; 0b93 18
                INC                      ; 0b94 1f
                LR   $b,A                ; 0b95 5b
                BF   $0,A0b9c            ; 0b96 90 05
A0b98:          LR   A,KL                ; 0b98 01
                COM                      ; 0b99 18
                INC                      ; 0b9a 1f
                LR   KL,A                ; 0b9b 05
A0b9c:          LI   $ff                 ; 0b9c 20 ff
                LISU 7                   ; 0b9e 67
                LISL 7                   ; 0b9f 6f
                LR   (IS),A              ; 0ba0 5c
                BF   $0,A0bbf            ; 0ba1 90 1d
A0ba3:          LISU 7                   ; 0ba3 67
                LISL 7                   ; 0ba4 6f
                LIS  $1                  ; 0ba5 71
                NS   (IS)                ; 0ba6 fc
                BT   4,A0bab             ; 0ba7 84 03
                LIS  $1                  ; 0ba9 71
                LR   $b,A                ; 0baa 5b
A0bab:          LIS  $2                  ; 0bab 72
                NS   (IS)                ; 0bac fc
                BT   4,A0bb2             ; 0bad 84 04
                LI   $ff                 ; 0baf 20 ff
                LR   $b,A                ; 0bb1 5b
A0bb2:          LIS  $4                  ; 0bb2 74
                NS   (IS)                ; 0bb3 fc
                BT   4,A0bb8             ; 0bb4 84 03
                LIS  $1                  ; 0bb6 71
                LR   KL,A                ; 0bb7 05
A0bb8:          LIS  $8                  ; 0bb8 78
                NS   (IS)                ; 0bb9 fc
                BT   4,A0bbf             ; 0bba 84 04
                LI   $ff                 ; 0bbc 20 ff
                LR   KL,A                ; 0bbe 05
A0bbf:          LISU 2                   ; 0bbf 62
                LISL 3                   ; 0bc0 6b
                LR   A,(IS)+             ; 0bc1 4d
                LR   $0,A                ; 0bc2 50
                LR   A,KL                ; 0bc3 01
                AS   (IS)                ; 0bc4 cc
                LISU 4                   ; 0bc5 64
                LISL 0                   ; 0bc6 68
                AS   (IS)                ; 0bc7 cc
                LR   (IS),A              ; 0bc8 5c
                LISU 3                   ; 0bc9 63
                LR   A,$b                ; 0bca 4b
                AS   $0                  ; 0bcb c0
                AS   (IS)                ; 0bcc cc
                LR   (IS),A              ; 0bcd 5c
A0bce:          LR   A,QL                ; 0bce 03
                AI   $18                 ; 0bcf 24 18
                LR   IS,A                ; 0bd1 0b
                LR   A,(IS)              ; 0bd2 4c
                LR   $0,A                ; 0bd3 50
                LISU 4                   ; 0bd4 64
                LR   A,(IS)              ; 0bd5 4c
                LR   $1,A                ; 0bd6 51
                DCI  A0872               ; 0bd7 2a 08 72
                LR   A,$0                ; 0bda 40
                CM                       ; 0bdb 8d
                BT   2,A0c40             ; 0bdc 82 63
                CM                       ; 0bde 8d
                BF   $2,A0c40            ; 0bdf 92 60
                LR   A,$1                ; 0be1 41
                CM                       ; 0be2 8d
                BT   2,A0c40             ; 0be3 82 5c
                CM                       ; 0be5 8d
                BF   $2,A0c40            ; 0be6 92 59
                LR   A,QU                ; 0be8 02
                CI   $00                 ; 0be9 25 00
                BF   $4,A0c2d            ; 0beb 94 41
                LISU 3                   ; 0bed 63
                LISL 0                   ; 0bee 68
                LR   A,(IS)              ; 0bef 4c
                AI   $ce                 ; 0bf0 24 ce
                LR   $0,A                ; 0bf2 50
                PI   A08ff               ; 0bf3 28 08 ff
                AI   $00                 ; 0bf6 24 00
                BF   $4,A0c1b            ; 0bf8 94 22
                LISU 4                   ; 0bfa 64
                LISL 0                   ; 0bfb 68
                LR   A,(IS)              ; 0bfc 4c
                AI   $de                 ; 0bfd 24 de
                LR   $0,A                ; 0bff 50
                PI   A08ff               ; 0c00 28 08 ff
                AI   $00                 ; 0c03 24 00
                BF   $4,A0c1b            ; 0c05 94 15
                DCI  A0881               ; 0c07 2a 08 81
                PI   A0fd5               ; 0c0a 28 0f d5
                LI   $ff                 ; 0c0d 20 ff
A0c0f:          LR   $b,A                ; 0c0f 5b
                PI   A099d               ; 0c10 28 09 9d
                DCI  A0881               ; 0c13 2a 08 81
                PI   A0fd5               ; 0c16 28 0f d5
                BF   $0,A0c2d            ; 0c19 90 13
A0c1b:          LISU 7                   ; 0c1b 67
                LISL 7                   ; 0c1c 6f
                LR   A,(IS)              ; 0c1d 4c
                CI   $ff                 ; 0c1e 25 ff
                BF   $4,A0c2d            ; 0c20 94 0c
                LISU 2                   ; 0c22 62
                LI   $2e                 ; 0c23 20 2e
                NS   (IS)                ; 0c25 fc
                BF   $4,A0c2d            ; 0c26 94 06
                DS   (IS)                ; 0c28 3c
                LI   $ff                 ; 0c29 20 ff
                BF   $0,A0c0f            ; 0c2b 90 e3
A0c2d:          LR   A,QL                ; 0c2d 03
                AI   $18                 ; 0c2e 24 18
                LR   IS,A                ; 0c30 0b
                LR   A,(IS)              ; 0c31 4c
                LR   $0,A                ; 0c32 50
                LISU 4                   ; 0c33 64
                LR   A,(IS)              ; 0c34 4c
                LR   $1,A                ; 0c35 51
                LI   $40                 ; 0c36 20 40
                LR   $2,A                ; 0c38 52
                LR   A,QU                ; 0c39 02
                LR   $3,A                ; 0c3a 53
                PI   A09de               ; 0c3b 28 09 de
                BF   $0,A0c5e            ; 0c3e 90 1f
A0c40:          LR   A,QU                ; 0c40 02
                CI   $00                 ; 0c41 25 00
                BT   4,A0c5e             ; 0c43 84 1a
                PI   A0867               ; 0c45 28 08 67
                LR   $0,A                ; 0c48 50
                PI   A0867               ; 0c49 28 08 67
                NI   $1f                 ; 0c4c 21 1f
                AI   $22                 ; 0c4e 24 22
                LR   $1,A                ; 0c50 51
                LR   A,QL                ; 0c51 03
                AI   $18                 ; 0c52 24 18
                LR   IS,A                ; 0c54 0b
                LR   A,$1                ; 0c55 41
                LR   (IS),A              ; 0c56 5c
                LISU 4                   ; 0c57 64
                LR   A,$0                ; 0c58 40
                NI   $1f                 ; 0c59 21 1f
                AI   $12                 ; 0c5b 24 12
                LR   (IS),A              ; 0c5d 5c
A0c5e:          JMP  A0ad4               ; 0c5e 29 0a d4
A0c61:          LI   $28                 ; 0c61 20 28
                LISU 7                   ; 0c63 67
                LISL 3                   ; 0c64 6b
                LR   (IS),A              ; 0c65 5c
                LISU 2                   ; 0c66 62
                LISL 6                   ; 0c67 6e
                DS   (IS)                ; 0c68 3c
                LI   $7d                 ; 0c69 20 7d
                LR   $0,A                ; 0c6b 50
                LIS  $2                  ; 0c6c 72
                LR   $1,A                ; 0c6d 51
                LR   $2,A                ; 0c6e 52
                LI   $32                 ; 0c6f 20 32
                LR   $3,A                ; 0c71 53
                LIS  $0                  ; 0c72 70
                LR   $4,A                ; 0c73 54
                LI   $30                 ; 0c74 20 30
                LR   $5,A                ; 0c76 55
                PI   A0805               ; 0c77 28 08 05
                LI   $7d                 ; 0c7a 20 7d
                LR   $0,A                ; 0c7c 50
                LI   $35                 ; 0c7d 20 35
                LR   $1,A                ; 0c7f 51
                LIS  $2                  ; 0c80 72
                LR   $2,A                ; 0c81 52
                LIS  $b                  ; 0c82 7b
                LR   $3,A                ; 0c83 53
                LI   $c0                 ; 0c84 20 c0
                LR   $4,A                ; 0c86 54
                LI   $30                 ; 0c87 20 30
                LR   $5,A                ; 0c89 55
                PI   A0805               ; 0c8a 28 08 05
                LISU 3                   ; 0c8d 63
                LISL 0                   ; 0c8e 68
                LI   $80                 ; 0c8f 20 80
                LR   (IS),A              ; 0c91 5c
                LISU 2                   ; 0c92 62
                LISL 2                   ; 0c93 6a
                LI   $30                 ; 0c94 20 30
                NS   (IS)                ; 0c96 fc
                LR   (IS),A              ; 0c97 5c
                LIS  $0                  ; 0c98 70
                LR   $0,A                ; 0c99 50
                LIS  $2                  ; 0c9a 72
                LR   $1,A                ; 0c9b 51
                LI   $7d                 ; 0c9c 20 7d
                LR   $2,A                ; 0c9e 52
                LI   $3e                 ; 0c9f 20 3e
                LR   $3,A                ; 0ca1 53
                LIS  $0                  ; 0ca2 70
                LR   $4,A                ; 0ca3 54
                LI   $20                 ; 0ca4 20 20
                LR   $5,A                ; 0ca6 55
                PI   A0805               ; 0ca7 28 08 05
                LIS  $0                  ; 0caa 70
                LISU 3                   ; 0cab 63
                LISL 5                   ; 0cac 6d
                LR   (IS),A              ; 0cad 5c
                LISU 7                   ; 0cae 67
                LISL 0                   ; 0caf 68
                LIS  $0                  ; 0cb0 70
                LR   (IS)+,A             ; 0cb1 5d
                LI   $99                 ; 0cb2 20 99
                LR   (IS)+,A             ; 0cb4 5d
                LI   $00                 ; 0cb5 20 00
                LR   (IS),A              ; 0cb7 5c
                LISL 4                   ; 0cb8 6c
                LR   (IS),A              ; 0cb9 5c
                LISU 4                   ; 0cba 64
                LISL 5                   ; 0cbb 6d
                LI   $28                 ; 0cbc 20 28
                LR   (IS),A              ; 0cbe 5c
                LIS  $0                  ; 0cbf 70
                LR   $0,A                ; 0cc0 50
                PI   A08d5               ; 0cc1 28 08 d5
                LIS  $1                  ; 0cc4 71
                LR   $0,A                ; 0cc5 50
                PI   A08d5               ; 0cc6 28 08 d5
                LIS  $2                  ; 0cc9 72
                LR   $0,A                ; 0cca 50
                PI   A08d5               ; 0ccb 28 08 d5
                LIS  $4                  ; 0cce 74
                LR   $0,A                ; 0ccf 50
                PI   A08d5               ; 0cd0 28 08 d5
A0cd3:          LISU 7                   ; 0cd3 67
                LISL 1                   ; 0cd4 69
                LIS  $0                  ; 0cd5 70
                AS   (IS)                ; 0cd6 cc
                BF   $4,A0cdc            ; 0cd7 94 04
                JMP  A0d71               ; 0cd9 29 0d 71
A0cdc:          PI   A08ba               ; 0cdc 28 08 ba
                LR   A,(IS)-             ; 0cdf 4e
                LR   A,(IS)              ; 0ce0 4c
                LR   $0,A                ; 0ce1 50
                LISU 2                   ; 0ce2 62
                LISL 3                   ; 0ce3 6b
                LIS  $0                  ; 0ce4 70
                LR   (IS)+,A             ; 0ce5 5d
                LR   (IS)-,A             ; 0ce6 5e
                LIS  $1                  ; 0ce7 71
                NS   $0                  ; 0ce8 f0
                BT   4,A0ced             ; 0ce9 84 03
                LIS  $2                  ; 0ceb 72
                LR   (IS),A              ; 0cec 5c
A0ced:          LIS  $2                  ; 0ced 72
                NS   $0                  ; 0cee f0
                BT   4,A0cf4             ; 0cef 84 04
                LI   $fe                 ; 0cf1 20 fe
                LR   (IS),A              ; 0cf3 5c
A0cf4:          LISL 4                   ; 0cf4 6c
                LIS  $4                  ; 0cf5 74
                NS   $0                  ; 0cf6 f0
                BT   4,A0cfb             ; 0cf7 84 03
                LIS  $2                  ; 0cf9 72
                LR   (IS),A              ; 0cfa 5c
A0cfb:          LIS  $8                  ; 0cfb 78
                NS   $0                  ; 0cfc f0
                BT   4,A0d02             ; 0cfd 84 04
                LI   $fe                 ; 0cff 20 fe
                LR   (IS),A              ; 0d01 5c
A0d02:          PI   A0acc               ; 0d02 28 0a cc
                PI   A0a53               ; 0d05 28 0a 53
                PI   A094e               ; 0d08 28 09 4e
                LISU 7                   ; 0d0b 67
                LISL 6                   ; 0d0c 6e
                LI   $80                 ; 0d0d 20 80
                NS   (IS)                ; 0d0f fc
                BT   4,A0d1a             ; 0d10 84 09
                LISU 3                   ; 0d12 63
                LISL 5                   ; 0d13 6d
                LIS  $0                  ; 0d14 70
                AS   (IS)                ; 0d15 cc
                BF   $4,A0d1a            ; 0d16 94 03
                LIS  $1                  ; 0d18 71
                LR   (IS),A              ; 0d19 5c
A0d1a:          LIS  $5                  ; 0d1a 75
                LR   $0,A                ; 0d1b 50
                PI   A085d               ; 0d1c 28 08 5d
                LISU 4                   ; 0d1f 64
                LISL 5                   ; 0d20 6d
                LIS  $3                  ; 0d21 73
                NS   (IS)                ; 0d22 fc
                BF   $4,A0d46            ; 0d23 94 22
                LISU 3                   ; 0d25 63
                LISL 0                   ; 0d26 68
                LR   A,(IS)              ; 0d27 4c
                LR   $0,A                ; 0d28 50
                LI   $32                 ; 0d29 20 32
                LR   $1,A                ; 0d2b 51
                PI   A0912               ; 0d2c 28 09 12
                NI   $f0                 ; 0d2f 21 f0
                LR   $2,A                ; 0d31 52
                LISU 4                   ; 0d32 64
                LISL 0                   ; 0d33 68
                LR   A,(IS)              ; 0d34 4c
                LR   $0,A                ; 0d35 50
                LI   $22                 ; 0d36 20 22
                LR   $1,A                ; 0d38 51
                PI   A0912               ; 0d39 28 09 12
                SR   4                   ; 0d3c 14
                AS   $2                  ; 0d3d c2
                LISU 7                   ; 0d3e 67
                LISL 0                   ; 0d3f 68
                LR   (IS),A              ; 0d40 5c
                LIS  $0                  ; 0d41 70
                LR   $0,A                ; 0d42 50
                PI   A08d5               ; 0d43 28 08 d5
A0d46:          LISU 4                   ; 0d46 64
                LISL 5                   ; 0d47 6d
                DS   (IS)                ; 0d48 3c
                BF   $4,A0d5d            ; 0d49 94 13
                LI   $28                 ; 0d4b 20 28
                LR   (IS),A              ; 0d4d 5c
                LISU 7                   ; 0d4e 67
                LISL 1                   ; 0d4f 69
                LI   $99                 ; 0d50 20 99
                AI   $66                 ; 0d52 24 66
                ASD  (IS)                ; 0d54 dc
                LR   (IS),A              ; 0d55 5c
                LIS  $1                  ; 0d56 71
                LR   $0,A                ; 0d57 50
                PI   A08d5               ; 0d58 28 08 d5
                BF   $0,A0d6e            ; 0d5b 90 12
A0d5d:          LI   $40                 ; 0d5d 20 40
                LR   $0,A                ; 0d5f 50
                PI   A085d               ; 0d60 28 08 5d
                INS  0                   ; 0d63 a0
                COM                      ; 0d64 18
                NI   $03                 ; 0d65 21 03
                CI   $02                 ; 0d67 25 02
                BF   $4,A0d6e            ; 0d69 94 04
                JMP  A0dd2               ; 0d6b 29 0d d2
A0d6e:          JMP  A0cd3               ; 0d6e 29 0c d3
A0d71:          DCI  A0876               ; 0d71 2a 08 76
                PI   A0fd5               ; 0d74 28 0f d5
                LI   $14                 ; 0d77 20 14
                LR   $1,A                ; 0d79 51
A0d7a:          PI   A085d               ; 0d7a 28 08 5d
                DS   $1                  ; 0d7d 31
                BF   $4,A0d7a            ; 0d7e 94 fb
                JMP  A0c61               ; 0d80 29 0c 61
                XI   $9c                 ; 0d83 23 9c
                db   $ef                 
                db   $ff                 
                LIS  $5                  ; 0d87 75
                LR   A,KU                ; 0d88 00
                INS  10                  ; 0d89 aa
                AS   $9                  ; 0d8a c9
                LIS  $6                  ; 0d8b 76
                LR   $5,A                ; 0d8c 55
                LIS  $e                  ; 0d8d 7e
                AS   $3                  ; 0d8e c3
                LR   $5,A                ; 0d8f 55
A0d90:          DS   $0                  ; 0d90 30
                LR   $4,A                ; 0d91 54
                LIS  $9                  ; 0d92 79
                LR   A,KU                ; 0d93 00
A0d94:          db   $ff                 
                db   $ff                 
A0d96:          BT   0,A0d96             ; 0d96 80 ff
                LR   KL,A                ; 0d98 05
                NS   $b                  ; 0d99 fb
                LR   A,KU                ; 0d9a 00
A0d9b:          db   $ff                 
                ASD  $3                  ; 0d9c d3
                XS   $3                  ; 0d9d e3
                LR   A,KU                ; 0d9e 00
                LIS  $0                  ; 0d9f 70
                AS   $0                  ; 0da0 c0
                BT   1,A0da5             ; 0da1 81 03
                COM                      ; 0da3 18
                INC                      ; 0da4 1f
A0da5:          POP                      ; 0da5 1c
A0da6:          LR   KL,A                ; 0da6 05
                LR   A,IS                ; 0da7 0a
                LR   A,KU                ; 0da8 00
                LI   $05                 ; 0da9 20 05
                LR   K,P                 ; 0dab 08
                BT   0,0                 ; 0dac 80 00
                LR   P0,Q                ; 0dae 0d
                AM                       ; 0daf 88
A0db0:          LR   K,P                 ; 0db0 08
                LR   A,QU                ; 0db1 02
                AS   $0                  ; 0db2 c0
                LR   A,KL                ; 0db3 01
                LR   P0,Q                ; 0db4 0d
                CM                       ; 0db5 8d
A0db6:          LR   KL,A                ; 0db6 05
                LR   K,P                 ; 0db7 08
                LR   A,$0                ; 0db8 40
                LR   A,KL                ; 0db9 01
                LR   P0,Q                ; 0dba 0d
                BT   3,A0dc0             ; 0dbb 83 04
                LR   A,QU                ; 0dbd 02
                BT   0,A0dc0             ; 0dbe 80 01
A0dc0:          LR   P0,Q                ; 0dc0 0d
                BR7  A0dd8               ; 0dc1 8f 16
                LR   $2,A                ; 0dc3 52
                LM                       ; 0dc4 16
                LR   $3,A                ; 0dc5 53
                LM                       ; 0dc6 16
                LR   $4,A                ; 0dc7 54
                LM                       ; 0dc8 16
                LR   $5,A                ; 0dc9 55
                LM                       ; 0dca 16
                LR   $a,A                ; 0dcb 5a
                LM                       ; 0dcc 16
                LR   $b,A                ; 0dcd 5b
                LR   DC,H                ; 0dce 10
                JMP  A0805               ; 0dcf 29 08 05
A0dd2:          LI   $99                 ; 0dd2 20 99
                LISU 7                   ; 0dd4 67
                LISL 1                   ; 0dd5 69
                LR   (IS)+,A             ; 0dd6 5d
                LR   (IS),A              ; 0dd7 5c
A0dd8:          LI   $7e                 ; 0dd8 20 7e
                LR   $0,A                ; 0dda 50
                LIS  $2                  ; 0ddb 72
                LR   $1,A                ; 0ddc 51
                LR   $2,A                ; 0ddd 52
                LI   $3e                 ; 0dde 20 3e
                LR   $3,A                ; 0de0 53
                LI   $80                 ; 0de1 20 80
                LR   $4,A                ; 0de3 54
                LI   $30                 ; 0de4 20 30
                LR   $5,A                ; 0de6 55
                PI   A0805               ; 0de7 28 08 05
A0dea:          LIS  $0                  ; 0dea 70
                LR   $0,A                ; 0deb 50
                LIS  $2                  ; 0dec 72
                LR   $1,A                ; 0ded 51
                LI   $7d                 ; 0dee 20 7d
                LR   $2,A                ; 0df0 52
                LI   $3e                 ; 0df1 20 3e
                LR   $3,A                ; 0df3 53
                LI   $00                 ; 0df4 20 00
                LR   $4,A                ; 0df6 54
                LI   $20                 ; 0df7 20 20
                LR   $5,A                ; 0df9 55
                PI   A0805               ; 0dfa 28 08 05
                PI   A0867               ; 0dfd 28 08 67
                NI   $7f                 ; 0e00 21 7f
                DCI  A0805               ; 0e02 2a 08 05
                ADC                      ; 0e05 8e
                LIS  $0                  ; 0e06 70
                LR   $0,A                ; 0e07 50
                LI   $30                 ; 0e08 20 30
                LR   $1,A                ; 0e0a 51
                LI   $7d                 ; 0e0b 20 7d
                LR   $2,A                ; 0e0d 52
                LIS  $4                  ; 0e0e 74
                LR   $3,A                ; 0e0f 53
                LI   $40                 ; 0e10 20 40
                LR   $4,A                ; 0e12 54
                LIS  $0                  ; 0e13 70
                LR   $5,A                ; 0e14 55
                PI   A0805               ; 0e15 28 08 05
                LISU 7                   ; 0e18 67
                LISL 0                   ; 0e19 68
                LI   $99                 ; 0e1a 20 99
                LR   (IS),A              ; 0e1c 5c
                LISL 4                   ; 0e1d 6c
                LIS  $0                  ; 0e1e 70
                LR   (IS),A              ; 0e1f 5c
                LIS  $1                  ; 0e20 71
                LISU 2                   ; 0e21 62
                LISL 5                   ; 0e22 6d
                LR   (IS),A              ; 0e23 5c
A0e24:          PI   A0867               ; 0e24 28 08 67
                NI   $7f                 ; 0e27 21 7f
                LISU 2                   ; 0e29 62
                LISL 0                   ; 0e2a 68
                LR   (IS),A              ; 0e2b 5c
                CI   $10                 ; 0e2c 25 10
                BT   1,A0e24             ; 0e2e 81 f5
                CI   $5c                 ; 0e30 25 5c
                BF   $1,A0e24            ; 0e32 91 f1
                LISU 2                   ; 0e34 62
                LISL 4                   ; 0e35 6c
                COM                      ; 0e36 18
                INC                      ; 0e37 1f
                AI   $6c                 ; 0e38 24 6c
                CI   $5d                 ; 0e3a 25 5d
                BT   1,A0e40             ; 0e3c 81 03
                LI   $62                 ; 0e3e 20 62
A0e40:          LR   (IS),A              ; 0e40 5c
                LISL 1                   ; 0e41 69
                LI   $0b                 ; 0e42 20 0b
                LR   (IS),A              ; 0e44 5c
                LIS  $0                  ; 0e45 70
                LISL 6                   ; 0e46 6e
                LR   (IS),A              ; 0e47 5c
                PI   A0867               ; 0e48 28 08 67
                NI   $02                 ; 0e4b 21 02
                AI   $ff                 ; 0e4d 24 ff
                LISL 2                   ; 0e4f 6a
                LR   (IS)+,A             ; 0e50 5d
                LIS  $0                  ; 0e51 70
                LR   (IS),A              ; 0e52 5c
A0e53:          LISU 2                   ; 0e53 62
                LISL 6                   ; 0e54 6e
                LIS  $1                  ; 0e55 71
                NS   (IS)                ; 0e56 fc
                BT   4,A0e5c             ; 0e57 84 04
                JMP  A0f9a               ; 0e59 29 0f 9a
A0e5c:          LISL 0                   ; 0e5c 68
                LR   A,(IS)+             ; 0e5d 4d
                LR   $0,A                ; 0e5e 50
                LR   A,(IS)              ; 0e5f 4c
                LR   $1,A                ; 0e60 51
                DCI  A0da6               ; 0e61 2a 0d a6
                PI   $0dc2               ; 0e64 28 0d c2
                PI   A08ba               ; 0e67 28 08 ba
                LISL 7                   ; 0e6a 6f
                LR   A,(IS)-             ; 0e6b 4e
                COM                      ; 0e6c 18
                LR   $0,A                ; 0e6d 50
                LR   A,(IS)              ; 0e6e 4c
                COM                      ; 0e6f 18
                NS   $0                  ; 0e70 f0
                COM                      ; 0e71 18
                LR   (IS),A              ; 0e72 5c
                LR   $0,A                ; 0e73 50
                LISU 2                   ; 0e74 62
                LISL 3                   ; 0e75 6b
                LR   A,(IS)              ; 0e76 4c
                INC                      ; 0e77 1f
                LR   (IS),A              ; 0e78 5c
                LISL 6                   ; 0e79 6e
                LI   $fd                 ; 0e7a 20 fd
                NS   (IS)                ; 0e7c fc
                LR   (IS),A              ; 0e7d 5c
                LISU 2                   ; 0e7e 62
                LISL 2                   ; 0e7f 6a
                LIS  $1                  ; 0e80 71
                NS   $0                  ; 0e81 f0
                BT   4,A0e87             ; 0e82 84 04
                LR   A,(IS)              ; 0e84 4c
                INC                      ; 0e85 1f
                LR   (IS),A              ; 0e86 5c
A0e87:          LIS  $2                  ; 0e87 72
                NS   $0                  ; 0e88 f0
                BT   4,A0e8c             ; 0e89 84 02
                DS   (IS)                ; 0e8b 3c
A0e8c:          LIS  $8                  ; 0e8c 78
                NS   $0                  ; 0e8d f0
                BT   4,A0e9c             ; 0e8e 84 0d
                LISU 7                   ; 0e90 67
                LISL 0                   ; 0e91 68
                LIS  $0                  ; 0e92 70
                AS   (IS)                ; 0e93 cc
                LISU 2                   ; 0e94 62
                BT   4,A0e9c             ; 0e95 84 06
                LISL 6                   ; 0e97 6e
                LR   A,(IS)              ; 0e98 4c
                OI   $02                 ; 0e99 22 02
                LR   (IS),A              ; 0e9b 5c
A0e9c:          LISL 6                   ; 0e9c 6e
                LIS  $2                  ; 0e9d 72
                NS   (IS)                ; 0e9e fc
                BT   4,A0ea4             ; 0e9f 84 04
                LISL 3                   ; 0ea1 6b
                DS   (IS)                ; 0ea2 3c
                DS   (IS)                ; 0ea3 3c
A0ea4:          LISL 2                   ; 0ea4 6a
                LIS  $0                  ; 0ea5 70
                AS   (IS)                ; 0ea6 cc
                LR   J,W                 ; 0ea7 1e
                BT   1,A0eab             ; 0ea8 81 02
                COM                      ; 0eaa 18
A0eab:          CI   $0f                 ; 0eab 25 0f
                BT   1,A0eb0             ; 0ead 81 02
                LIS  $f                  ; 0eaf 7f
A0eb0:          LR   W,J                 ; 0eb0 1d
                BT   1,A0eb4             ; 0eb1 81 02
                COM                      ; 0eb3 18
A0eb4:          LR   (IS)+,A             ; 0eb4 5d
                LIS  $0                  ; 0eb5 70
                AS   (IS)                ; 0eb6 cc
                LR   J,W                 ; 0eb7 1e
                BT   1,A0ebb             ; 0eb8 81 02
                COM                      ; 0eba 18
A0ebb:          CI   $0f                 ; 0ebb 25 0f
                BT   1,A0ec0             ; 0ebd 81 02
                LIS  $f                  ; 0ebf 7f
A0ec0:          LR   W,J                 ; 0ec0 1d
                BT   1,A0ec4             ; 0ec1 81 02
                COM                      ; 0ec3 18
A0ec4:          LR   (IS),A              ; 0ec4 5c
                LISL 2                   ; 0ec5 6a
                LR   A,(IS)              ; 0ec6 4c
                SR   1                   ; 0ec7 12
                LR   $0,A                ; 0ec8 50
                LR   A,(IS)              ; 0ec9 4c
                NI   $80                 ; 0eca 21 80
                AS   $0                  ; 0ecc c0
                LISL 0                   ; 0ecd 68
                AS   (IS)                ; 0ece cc
                LR   (IS),A              ; 0ecf 5c
                LISL 3                   ; 0ed0 6b
                LR   A,(IS)              ; 0ed1 4c
                LISL 1                   ; 0ed2 69
                AS   (IS)                ; 0ed3 cc
                LR   (IS),A              ; 0ed4 5c
                LISL 0                   ; 0ed5 68
                LR   A,(IS)              ; 0ed6 4c
                CI   $08                 ; 0ed7 25 08
                BF   $1,A0ede            ; 0ed9 91 04
                LI   $60                 ; 0edb 20 60
                LR   (IS),A              ; 0edd 5c
A0ede:          LR   A,(IS)              ; 0ede 4c
                CI   $60                 ; 0edf 25 60
                BT   1,A0ee5             ; 0ee1 81 03
                LIS  $8                  ; 0ee3 78
                LR   (IS),A              ; 0ee4 5c
A0ee5:          LISL 1                   ; 0ee5 69
                LR   A,(IS)              ; 0ee6 4c
                CI   $08                 ; 0ee7 25 08
                BF   $1,A0ef1            ; 0ee9 91 07
                LI   $08                 ; 0eeb 20 08
                LR   (IS),A              ; 0eed 5c
                LISL 3                   ; 0eee 6b
                LIS  $0                  ; 0eef 70
                LR   (IS),A              ; 0ef0 5c
A0ef1:          LR   A,(IS)              ; 0ef1 4c
                CI   $27                 ; 0ef2 25 27
                BT   1,A0eff             ; 0ef4 81 0a
                LISL 6                   ; 0ef6 6e
                LR   A,(IS)              ; 0ef7 4c
                OI   $01                 ; 0ef8 22 01
                LR   (IS),A              ; 0efa 5c
                LISL 1                   ; 0efb 69
                LI   $28                 ; 0efc 20 28
                LR   (IS),A              ; 0efe 5c
A0eff:          LIS  $0                  ; 0eff 70
                LR   $0,A                ; 0f00 50
                PI   A08d5               ; 0f01 28 08 d5
                LISU 7                   ; 0f04 67
                LISL 4                   ; 0f05 6c
                LR   A,(IS)              ; 0f06 4c
                CI   $99                 ; 0f07 25 99
                BT   4,A0f10             ; 0f09 84 06
                LIS  $1                  ; 0f0b 71
                AI   $66                 ; 0f0c 24 66
                ASD  (IS)                ; 0f0e dc
                LR   (IS),A              ; 0f0f 5c
A0f10:          LIS  $4                  ; 0f10 74
                LR   $0,A                ; 0f11 50
                PI   A08d5               ; 0f12 28 08 d5
                LISU 2                   ; 0f15 62
                LISL 1                   ; 0f16 69
                LIS  $8                  ; 0f17 78
                AS   (IS)                ; 0f18 cc
                CI   $2e                 ; 0f19 25 2e
                BF   $4,A0f44            ; 0f1b 94 28
                LISL 4                   ; 0f1d 6c
                LR   A,(IS)              ; 0f1e 4c
                LISL 0                   ; 0f1f 68
                COM                      ; 0f20 18
                INC                      ; 0f21 1f
                AS   (IS)                ; 0f22 cc
                BF   $1,A0f44            ; 0f23 91 20
                CI   $03                 ; 0f25 25 03
                BF   $1,A0f44            ; 0f27 91 1c
                LISL 2                   ; 0f29 6a
                LIS  $0                  ; 0f2a 70
                AS   (IS)                ; 0f2b cc
                BT   1,A0f30             ; 0f2c 81 03
                COM                      ; 0f2e 18
                INC                      ; 0f2f 1f
A0f30:          CI   $04                 ; 0f30 25 04
                BF   $1,A0f44            ; 0f32 91 11
                LISL 3                   ; 0f34 6b
                LIS  $0                  ; 0f35 70
                AS   (IS)                ; 0f36 cc
                BT   1,A0f3b             ; 0f37 81 03
                COM                      ; 0f39 18
                INC                      ; 0f3a 1f
A0f3b:          CI   $03                 ; 0f3b 25 03
                BF   $1,A0f44            ; 0f3d 91 06
                LISL 6                   ; 0f3f 6e
                LR   A,(IS)              ; 0f40 4c
                OI   $05                 ; 0f41 22 05
                LR   (IS),A              ; 0f43 5c
A0f44:          LISL 0                   ; 0f44 68
                LR   A,(IS)+             ; 0f45 4d
                LR   $0,A                ; 0f46 50
                LR   A,(IS)              ; 0f47 4c
                LR   $1,A                ; 0f48 51
                DCI  A0db6               ; 0f49 2a 0d b6
                PI   $0dc2               ; 0f4c 28 0d c2
                LISU 2                   ; 0f4f 62
                LISL 6                   ; 0f50 6e
                LIS  $2                  ; 0f51 72
                NS   (IS)                ; 0f52 fc
                BT   4,A0f61             ; 0f53 84 0d
                LISL 0                   ; 0f55 68
                LR   A,(IS)+             ; 0f56 4d
                LR   $0,A                ; 0f57 50
                LIS  $8                  ; 0f58 78
                AS   (IS)                ; 0f59 cc
                LR   $1,A                ; 0f5a 51
                DCI  $0dbc               ; 0f5b 2a 0d bc
                PI   $0dc2               ; 0f5e 28 0d c2
A0f61:          LISU 2                   ; 0f61 62
                LISL 4                   ; 0f62 6c
                LR   A,(IS)              ; 0f63 4c
                LR   $0,A                ; 0f64 50
                LI   $2e                 ; 0f65 20 2e
                LR   $1,A                ; 0f67 51
                DCI  A0db0               ; 0f68 2a 0d b0
                PI   $0dc2               ; 0f6b 28 0d c2
                LISU 2                   ; 0f6e 62
                LISL 6                   ; 0f6f 6e
                LIS  $2                  ; 0f70 72
                NS   (IS)                ; 0f71 fc
                BT   4,A0f84             ; 0f72 84 11
                LISU 7                   ; 0f74 67
                LISL 0                   ; 0f75 68
                LI   $99                 ; 0f76 20 99
                AI   $66                 ; 0f78 24 66
                ASD  (IS)                ; 0f7a dc
                LR   (IS),A              ; 0f7b 5c
                DCI  A0d90               ; 0f7c 2a 0d 90
                PI   A0fd5               ; 0f7f 28 0f d5
                BF   $0,A0f97            ; 0f82 90 14
A0f84:          LIS  $3                  ; 0f84 73
                LR   $1,A                ; 0f85 51
A0f86:          PI   A085d               ; 0f86 28 08 5d
                DS   $1                  ; 0f89 31
                BF   $4,A0f86            ; 0f8a 94 fb
                INS  0                   ; 0f8c a0
                COM                      ; 0f8d 18
                NI   $03                 ; 0f8e 21 03
                CI   $01                 ; 0f90 25 01
                BF   $4,A0f97            ; 0f92 94 04
                JMP  A0c61               ; 0f94 29 0c 61
A0f97:          JMP  A0e53               ; 0f97 29 0e 53
A0f9a:          LISU 2                   ; 0f9a 62
                LISL 6                   ; 0f9b 6e
                LIS  $4                  ; 0f9c 74
                NS   (IS)                ; 0f9d fc
                BF   $4,A0fb3            ; 0f9e 94 14
                LISL 0                   ; 0fa0 68
                LR   A,(IS)+             ; 0fa1 4d
                LR   $0,A                ; 0fa2 50
                LR   A,(IS)              ; 0fa3 4c
                LR   $1,A                ; 0fa4 51
                DCI  $0daa               ; 0fa5 2a 0d aa
                PI   $0dc2               ; 0fa8 28 0d c2
                DCI  A0d9b               ; 0fab 2a 0d 9b
                PI   A0fd5               ; 0fae 28 0f d5
                BF   $0,A0fc5            ; 0fb1 90 13
A0fb3:          DCI  A0d94               ; 0fb3 2a 0d 94
                PI   A0fd5               ; 0fb6 28 0f d5
                LISU 7                   ; 0fb9 67
                LISL 4                   ; 0fba 6c
                LR   A,(IS)              ; 0fbb 4c
                LISL 2                   ; 0fbc 6a
                LR   $0,A                ; 0fbd 50
                COM                      ; 0fbe 18
                INC                      ; 0fbf 1f
                AS   (IS)                ; 0fc0 cc
                BF   $2,A0fc5            ; 0fc1 92 03
                LR   A,$0                ; 0fc3 40
                LR   (IS),A              ; 0fc4 5c
A0fc5:          LIS  $2                  ; 0fc5 72
                LR   $0,A                ; 0fc6 50
                PI   A08d5               ; 0fc7 28 08 d5
                LIS  $f                  ; 0fca 7f
                LR   $1,A                ; 0fcb 51
A0fcc:          PI   A085d               ; 0fcc 28 08 5d
                DS   $1                  ; 0fcf 31
                BF   $4,A0fcc            ; 0fd0 94 fb
                JMP  A0dea               ; 0fd2 29 0d ea
A0fd5:          LIS  $0                  ; 0fd5 70
                LR   $0,A                ; 0fd6 50
                LR   $1,A                ; 0fd7 51
A0fd8:          LIS  $0                  ; 0fd8 70
                AM                       ; 0fd9 88
                BF   $4,A0fdd            ; 0fda 94 02
                POP                      ; 0fdc 1c
A0fdd:          LR   $2,A                ; 0fdd 52
                LM                       ; 0fde 16
                LR   $3,A                ; 0fdf 53
                LM                       ; 0fe0 16
                LR   $4,A                ; 0fe1 54
A0fe2:          DS   $2                  ; 0fe2 32
                BT   4,A0fd8             ; 0fe3 84 f4
                LI   $80                 ; 0fe5 20 80
                OUTS 5                   ; 0fe7 b5
                LR   A,$3                ; 0fe8 43
                AS   $0                  ; 0fe9 c0
                LR   $0,A                ; 0fea 50
A0feb:          INC                      ; 0feb 1f
                BF   $4,A0feb            ; 0fec 94 fe
                OUTS 5                   ; 0fee b5
                LR   A,$4                ; 0fef 44
                AS   $1                  ; 0ff0 c1
                LR   $1,A                ; 0ff1 51
A0ff2:          INC                      ; 0ff2 1f
                BF   $4,A0ff2            ; 0ff3 94 fe
                BF   $0,A0fe2            ; 0ff5 90 ec
                LR   A,KU                ; 0ff7 00
                LR   A,KU                ; 0ff8 00
                LR   A,KU                ; 0ff9 00
                LR   A,KU                ; 0ffa 00
                LR   A,KU                ; 0ffb 00
                LR   A,KU                ; 0ffc 00
                LR   A,KU                ; 0ffd 00
                LR   A,KU                ; 0ffe 00
                LR   A,KU                ; 0fff 00