Reset: equ $0000 org $0800 CartridgeStart: LR $5,A ; 0800 55 NOP ; 0801 2b CartridgeEntry: LIS $0 ; 0802 70 OUTS 0 ; 0803 b0 OUTS 1 ; 0804 b1 OUTS 4 ; 0805 b4 OUTS 5 ; 0806 b5 LI $d0 ; 0807 20 d0 LR $3,A ; 0809 53 PI $00d0 ; 080a 28 00 d0 A080d: LI $8a ; 080d 20 8a LR $0,A ; 080f 50 PI $0099 ; 0810 28 00 99 LR A,$4 ; 0813 44 DS $4 ; 0814 34 BF $4,A080d ; 0815 94 f7 LIS $0 ; 0817 70 LR $0,A ; 0818 50 LR $2,A ; 0819 52 LIS $f ; 081a 7f LR $3,A ; 081b 53 PI A0d4c ; 081c 28 0d 4c LIS $8 ; 081f 78 SL 4 ; 0820 15 LR $0,A ; 0821 50 LIS $0 ; 0822 70 LR $3,A ; 0823 53 PI A0d4c ; 0824 28 0d 4c LIS $0 ; 0827 70 LR $0,A ; 0828 50 LI $31 ; 0829 20 31 LR $2,A ; 082b 52 LIS $f ; 082c 7f LR $3,A ; 082d 53 PI A0d5b ; 082e 28 0d 5b LIS $c ; 0831 7c SL 4 ; 0832 15 LR $0,A ; 0833 50 LI $32 ; 0834 20 32 LR $3,A ; 0836 53 PI A0d5b ; 0837 28 0d 5b LIS $5 ; 083a 75 LR $4,A ; 083b 54 LIS $0 ; 083c 70 LR $3,A ; 083d 53 DCI A0c88 ; 083e 2a 0c 88 LIS $8 ; 0841 78 LR $9,A ; 0842 59 A0843: LM ; 0843 16 LR $1,A ; 0844 51 LM ; 0845 16 LR $2,A ; 0846 52 LR Q,DC ; 0847 0e PI $0718 ; 0848 28 07 18 LI $ca ; 084b 20 ca AS $1 ; 084d c1 COM ; 084e 18 AI $3c ; 084f 24 3c LR $1,A ; 0851 51 PI $0718 ; 0852 28 07 18 LR DC,Q ; 0855 0f DS $9 ; 0856 39 BT 1,A0843 ; 0857 81 eb LIS $0 ; 0859 70 OUTS 1 ; 085a b1 OUTS 4 ; 085b b4 LISU 7 ; 085c 67 LISL 3 ; 085d 6b LI $3c ; 085e 20 3c LR (IS),A ; 0860 5c LISU 3 ; 0861 63 LISL 0 ; 0862 68 LIS $5 ; 0863 75 LR (IS)+,A ; 0864 5d LIS $0 ; 0865 70 LR (IS)+,A ; 0866 5d LIS $5 ; 0867 75 LR (IS)+,A ; 0868 5d LIS $5 ; 0869 75 LR (IS)+,A ; 086a 5d LIS $0 ; 086b 70 LR (IS)+,A ; 086c 5d LIS $5 ; 086d 75 LR (IS),A ; 086e 5c LIS $2 ; 086f 72 LR $4,A ; 0870 54 BF $0,A0883 ; 0871 90 11 A0873: LIS $0 ; 0873 70 LR QU,A ; 0874 06 PI A0e72 ; 0875 28 0e 72 LIS $0 ; 0878 70 LR $5,A ; 0879 55 PI $008f ; 087a 28 00 8f A087d: LI $8e ; 087d 20 8e LR $0,A ; 087f 50 PI $0099 ; 0880 28 00 99 A0883: LI $80 ; 0883 20 80 LR $a,A ; 0885 5a LR $b,A ; 0886 5b LIS $1 ; 0887 71 LR $9,A ; 0888 59 LR A,$4 ; 0889 44 SL 4 ; 088a 15 BF $1,A087d ; 088b 91 f1 SL 1 ; 088d 13 BF $1,A0897 ; 088e 91 08 SL 1 ; 0890 13 BF $1,A0896 ; 0891 91 04 DS $a ; 0893 3a BF $0,A0898 ; 0894 90 03 A0896: DS $a ; 0896 3a A0897: DS $b ; 0897 3b A0898: LISU 2 ; 0898 62 LISL 1 ; 0899 69 A089a: PI A0e31 ; 089a 28 0e 31 LR A,(IS)+ ; 089d 4d LIS $0 ; 089e 70 AS $a ; 089f ca LR (IS),A ; 08a0 5c BF $1,A08b6 ; 08a1 91 14 LIS $0 ; 08a3 70 LR (IS)-,A ; 08a4 5e LIS $e ; 08a5 7e LR $0,A ; 08a6 50 LIS $1 ; 08a7 71 LR $8,A ; 08a8 58 PI A0df5 ; 08a9 28 0d f5 LISU 3 ; 08ac 63 LIS $0 ; 08ad 70 AS (IS)- ; 08ae ce AS (IS)+ ; 08af cd BF $4,A08b5 ; 08b0 94 04 LR A,(IS)- ; 08b2 4e LIS $1 ; 08b3 71 LR (IS)+,A ; 08b4 5d A08b5: LISU 2 ; 08b5 62 A08b6: LR A,$b ; 08b6 4b LR $a,A ; 08b7 5a LISL 4 ; 08b8 6c DS $9 ; 08b9 39 BT 4,A089a ; 08ba 84 df LI $10 ; 08bc 20 10 LR QU,A ; 08be 06 PI A0e72 ; 08bf 28 0e 72 PI A0c9a ; 08c2 28 0c 9a LIS $2 ; 08c5 72 LR $1,A ; 08c6 51 LISU 7 ; 08c7 67 LISL 0 ; 08c8 68 LR A,IS ; 08c9 0a LR (IS)-,A ; 08ca 5e LISU 6 ; 08cb 66 LI $11 ; 08cc 20 11 LR $0,A ; 08ce 50 A08cf: LR (IS)-,A ; 08cf 5e LR (IS)-,A ; 08d0 5e AS $0 ; 08d1 c0 BR7 A08cf ; 08d2 8f fc LR $3,A ; 08d4 53 LR A,IS ; 08d5 0a AI $38 ; 08d6 24 38 LR IS,A ; 08d8 0b LR A,$3 ; 08d9 43 DS $1 ; 08da 31 BT 1,A08cf ; 08db 81 f3 LR (IS)-,A ; 08dd 5e LR (IS)-,A ; 08de 5e A08df: LISU 7 ; 08df 67 LISL 0 ; 08e0 68 LR A,(IS) ; 08e1 4c SL 1 ; 08e2 13 CI $5e ; 08e3 25 5e BT 1,A0916 ; 08e5 81 30 LIS $1 ; 08e7 71 LR $8,A ; 08e8 58 PI A0d9a ; 08e9 28 0d 9a INS 1 ; 08ec a1 LR $0,A ; 08ed 50 INS 4 ; 08ee a4 LR $1,A ; 08ef 51 A08f0: INS 0 ; 08f0 a0 COM ; 08f1 18 NI $06 ; 08f2 21 06 BT 4,A08f9 ; 08f4 84 04 JMP A0873 ; 08f6 29 08 73 A08f9: INS 1 ; 08f9 a1 XS $0 ; 08fa e0 SL 1 ; 08fb 13 BF $1,A0909 ; 08fc 91 0c INS 4 ; 08fe a4 XS $1 ; 08ff e1 SL 1 ; 0900 13 BF $1,A0909 ; 0901 91 07 DS $2 ; 0903 32 BF $4,A08f0 ; 0904 94 eb DS $3 ; 0906 33 BF $0,A08f0 ; 0907 90 e8 A0909: PI A0b7c ; 0909 28 0b 7c LR A,$3 ; 090c 43 LR $2,A ; 090d 52 PI A0b7c ; 090e 28 0b 7c LIS $0 ; 0911 70 LR $8,A ; 0912 58 PI A0d9a ; 0913 28 0d 9a A0916: LISU 2 ; 0916 62 LISL 5 ; 0917 6d LR A,(IS) ; 0918 4c NI $80 ; 0919 21 80 LR (IS),A ; 091b 5c LISL 2 ; 091c 6a LR A,(IS) ; 091d 4c NI $80 ; 091e 21 80 LR (IS)-,A ; 0920 5e LIS $3 ; 0921 73 LR $8,A ; 0922 58 PI A0d9a ; 0923 28 0d 9a A0926: INS 0 ; 0926 a0 COM ; 0927 18 NI $06 ; 0928 21 06 BT 4,A092f ; 092a 84 04 JMP A0873 ; 092c 29 08 73 A092f: LISL 2 ; 092f 6a PI A0be1 ; 0930 28 0b e1 LISL 5 ; 0933 6d PI A0be1 ; 0934 28 0b e1 LR A,(IS) ; 0937 4c NI $84 ; 0938 21 84 BT 4,A0926 ; 093a 84 eb LISL 2 ; 093c 6a LR A,(IS) ; 093d 4c NI $84 ; 093e 21 84 BT 4,A0926 ; 0940 84 e5 LISL 1 ; 0942 69 PI A0e4a ; 0943 28 0e 4a LISL 4 ; 0946 6c PI A0e4a ; 0947 28 0e 4a LISL 7 ; 094a 6f PI A0e4a ; 094b 28 0e 4a LISL 1 ; 094e 69 LIS $f ; 094f 7f LR $0,A ; 0950 50 PI A0df3 ; 0951 28 0d f3 LISL 4 ; 0954 6c PI A0df3 ; 0955 28 0d f3 LIS $0 ; 0958 70 LR QL,A ; 0959 07 LR $8,A ; 095a 58 PI A0d9a ; 095b 28 0d 9a A095e: LISU 2 ; 095e 62 LISL 5 ; 095f 6d LIS $0 ; 0960 70 AS (IS)- ; 0961 ce BF $1,A096e ; 0962 91 0b PI A0b09 ; 0964 28 0b 09 PI A0b2c ; 0967 28 0b 2c LR (IS)-,A ; 096a 5e PI A0e8c ; 096b 28 0e 8c A096e: LISL 2 ; 096e 6a LIS $0 ; 096f 70 AS (IS)- ; 0970 ce BF $1,A097d ; 0971 91 0b PI A0b09 ; 0973 28 0b 09 PI A0b2c ; 0976 28 0b 2c LR (IS)-,A ; 0979 5e PI A0e8c ; 097a 28 0e 8c A097d: PI A0b09 ; 097d 28 0b 09 PI A0b30 ; 0980 28 0b 30 LR QL,A ; 0983 07 NI $04 ; 0984 21 04 BF $4,A098d ; 0986 94 06 PI A0e96 ; 0988 28 0e 96 BF $0,A095e ; 098b 90 d2 A098d: LR A,QU ; 098d 02 LISU 7 ; 098e 67 LISL 2 ; 098f 6a LR (IS),A ; 0990 5c LIS $0 ; 0991 70 LR QU,A ; 0992 06 PI A0e96 ; 0993 28 0e 96 LIS $f ; 0996 7f LR $a,A ; 0997 5a LI $4f ; 0998 20 4f LR QU,A ; 099a 06 A099b: LIS $0 ; 099b 70 LR $0,A ; 099c 50 LISL 2 ; 099d 6a LR A,(IS) ; 099e 4c NI $20 ; 099f 21 20 BT 4,A09b2 ; 09a1 84 10 LR A,(IS) ; 09a3 4c OI $02 ; 09a4 22 02 LR (IS)-,A ; 09a6 5e LI $8a ; 09a7 20 8a LR $0,A ; 09a9 50 PI A0df3 ; 09aa 28 0d f3 LIS $5 ; 09ad 75 LR (IS),A ; 09ae 5c PI A0e8c ; 09af 28 0e 8c A09b2: LISL 5 ; 09b2 6d LR A,(IS) ; 09b3 4c NI $20 ; 09b4 21 20 BT 4,A09c7 ; 09b6 84 10 LR A,(IS) ; 09b8 4c OI $02 ; 09b9 22 02 LR (IS)-,A ; 09bb 5e LI $8a ; 09bc 20 8a LR $0,A ; 09be 50 PI A0df3 ; 09bf 28 0d f3 LIS $5 ; 09c2 75 LR (IS),A ; 09c3 5c PI A0e8c ; 09c4 28 0e 8c A09c7: LR A,QL ; 09c7 03 NI $20 ; 09c8 21 20 BT 4,A09d7 ; 09ca 84 0c LISL 7 ; 09cc 6f LIS $5 ; 09cd 75 LR (IS),A ; 09ce 5c PI A0e96 ; 09cf 28 0e 96 LIS $2 ; 09d2 72 LR (IS),A ; 09d3 5c JMP A0a9b ; 09d4 29 0a 9b A09d7: DS $a ; 09d7 3a BT 4,A09fb ; 09d8 84 22 DS $0 ; 09da 30 BF $1,A09fb ; 09db 91 1f LI $40 ; 09dd 20 40 OUTS 5 ; 09df b5 LI $10 ; 09e0 20 10 LR $5,A ; 09e2 55 PI $008f ; 09e3 28 00 8f LIS $0 ; 09e6 70 OUTS 5 ; 09e7 b5 LR A,QU ; 09e8 02 XI $c1 ; 09e9 23 c1 LR QU,A ; 09eb 06 A09ec: INC ; 09ec 1f BF $4,A09ec ; 09ed 94 fe LI $80 ; 09ef 20 80 OUTS 5 ; 09f1 b5 LIS $5 ; 09f2 75 LR $5,A ; 09f3 55 PI $008f ; 09f4 28 00 8f LIS $0 ; 09f7 70 OUTS 5 ; 09f8 b5 BF $0,A099b ; 09f9 90 a1 A09fb: LISL 1 ; 09fb 69 PI A0c9a ; 09fc 28 0c 9a LISL 4 ; 09ff 6c A0a00: LIS $0 ; 0a00 70 LR $0,A ; 0a01 50 PI A0d9a ; 0a02 28 0d 9a A0a05: LISU 2 ; 0a05 62 PI A0c9a ; 0a06 28 0c 9a A0a09: LR A,(IS)+ ; 0a09 4d LR A,(IS)- ; 0a0a 4e NI $c8 ; 0a0b 21 c8 BT 4,A0a18 ; 0a0d 84 0a LR A,IS ; 0a0f 0a NI $01 ; 0a10 21 01 LISL 1 ; 0a12 69 BT 4,A0a09 ; 0a13 84 f5 JMP A0a9b ; 0a15 29 0a 9b A0a18: LIS $2 ; 0a18 72 LR $a,A ; 0a19 5a LR $8,A ; 0a1a 58 PI A0d9a ; 0a1b 28 0d 9a A0a1e: LI $95 ; 0a1e 20 95 A0a20: LR $0,A ; 0a20 50 PI A0df3 ; 0a21 28 0d f3 LR A,IS ; 0a24 0a NI $01 ; 0a25 21 01 BT 4,A0a2c ; 0a27 84 04 INS 4 ; 0a29 a4 BF $0,A0a2d ; 0a2a 90 02 A0a2c: INS 1 ; 0a2c a1 A0a2d: COM ; 0a2d 18 SR 4 ; 0a2e 14 SL 4 ; 0a2f 15 XS $9 ; 0a30 e9 BF $4,A0a39 ; 0a31 94 07 A0a33: DS $a ; 0a33 3a BT 1,A0a1e ; 0a34 81 e9 LIS $f ; 0a36 7f BF $0,A0a20 ; 0a37 90 e8 A0a39: XS $9 ; 0a39 e9 LR $9,A ; 0a3a 59 BT 4,A0a33 ; 0a3b 84 f7 BF $1,A0a72 ; 0a3d 91 34 SL 1 ; 0a3f 13 BF $1,A0a8e ; 0a40 91 4d LR A,(IS)+ ; 0a42 4d LR A,(IS)- ; 0a43 4e NI $04 ; 0a44 21 04 BT 4,A0a05 ; 0a46 84 be LISU 3 ; 0a48 63 LR A,(IS)+ ; 0a49 4d LI $66 ; 0a4a 20 66 AS (IS) ; 0a4c cc ASD (IS)- ; 0a4d de LR $0,A ; 0a4e 50 LR A,(IS)- ; 0a4f 4e LIS $0 ; 0a50 70 BF $2,A0a54 ; 0a51 92 02 LIS $1 ; 0a53 71 A0a54: COM ; 0a54 18 AS (IS)+ ; 0a55 cd BT 2,A0a63 ; 0a56 82 0c INC ; 0a58 1f BF $4,A0a05 ; 0a59 94 ab LR A,$0 ; 0a5b 40 COM ; 0a5c 18 AS (IS) ; 0a5d cc BT 2,A0a63 ; 0a5e 82 04 INC ; 0a60 1f BF $4,A0a05 ; 0a61 94 a3 A0a63: LISU 2 ; 0a63 62 LIS $5 ; 0a64 75 LR (IS),A ; 0a65 5c LI $4e ; 0a66 20 4e LR QU,A ; 0a68 06 PI A0e8c ; 0a69 28 0e 8c LIS $2 ; 0a6c 72 LR (IS)+,A ; 0a6d 5d LR A,(IS) ; 0a6e 4c OI $20 ; 0a6f 22 20 LR (IS)-,A ; 0a71 5e A0a72: PI A0b09 ; 0a72 28 0b 09 PI A0b2c ; 0a75 28 0b 2c LR (IS)-,A ; 0a78 5e PI A0e8c ; 0a79 28 0e 8c LR A,(IS)+ ; 0a7c 4d LR A,(IS)- ; 0a7d 4e NI $28 ; 0a7e 21 28 BT 4,A0a05 ; 0a80 84 84 NI $08 ; 0a82 21 08 BT 4,A0a8e ; 0a84 84 09 LR A,(IS)+ ; 0a86 4d LR A,(IS) ; 0a87 4c OI $01 ; 0a88 22 01 LR (IS)-,A ; 0a8a 5e LIS $c ; 0a8b 7c BF $0,A0a94 ; 0a8c 90 07 A0a8e: LR A,(IS)+ ; 0a8e 4d LR A,(IS) ; 0a8f 4c OI $40 ; 0a90 22 40 LR (IS)-,A ; 0a92 5e LIS $e ; 0a93 7e A0a94: LR $0,A ; 0a94 50 PI A0df3 ; 0a95 28 0d f3 JMP A0a00 ; 0a98 29 0a 00 A0a9b: LISU 7 ; 0a9b 67 LISL 2 ; 0a9c 6a LR A,(IS) ; 0a9d 4c LR QU,A ; 0a9e 06 PI A0e96 ; 0a9f 28 0e 96 LIS $0 ; 0aa2 70 LR $5,A ; 0aa3 55 PI $008f ; 0aa4 28 00 8f LISL 2 ; 0aa7 6a LR A,(IS) ; 0aa8 4c NI $88 ; 0aa9 21 88 BT 4,A0ab3 ; 0aab 84 07 LISL 5 ; 0aad 6d LR A,(IS) ; 0aae 4c NI $88 ; 0aaf 21 88 BF $4,A0b06 ; 0ab1 94 54 A0ab3: LISL 6 ; 0ab3 6e LR A,(IS)+ ; 0ab4 4d CI $11 ; 0ab5 25 11 BF $1,A0acf ; 0ab7 91 17 BF $4,A0ac0 ; 0ab9 94 06 LR A,QL ; 0abb 03 NI $10 ; 0abc 21 10 BT 4,A0acf ; 0abe 84 10 A0ac0: PI A0b09 ; 0ac0 28 0b 09 PI A0b30 ; 0ac3 28 0b 30 LR QL,A ; 0ac6 07 PI A0e96 ; 0ac7 28 0e 96 LR A,QL ; 0aca 03 NI $08 ; 0acb 21 08 A0acd: BT 4,A0ab3 ; 0acd 84 e5 A0acf: LISL 6 ; 0acf 6e A0ad0: LR A,QL ; 0ad0 03 SL 4 ; 0ad1 15 LIS $0 ; 0ad2 70 BF $1,A0ad6 ; 0ad3 91 02 LR A,(IS) ; 0ad5 4c A0ad6: LR QL,A ; 0ad6 07 LISL 5 ; 0ad7 6d A0ad8: LR A,(IS)- ; 0ad8 4e NI $88 ; 0ad9 21 88 BF $4,A0b00 ; 0adb 94 24 LR A,(IS)- ; 0add 4e LR A,QL ; 0ade 03 COM ; 0adf 18 INC ; 0ae0 1f AS (IS)+ ; 0ae1 cd LR A,(IS)+ ; 0ae2 4d LR A,(IS) ; 0ae3 4c BT 4,A0af5 ; 0ae4 84 10 BT 1,A0aee ; 0ae6 81 07 OI $01 ; 0ae8 22 01 LR (IS)-,A ; 0aea 5e LIS $b ; 0aeb 7b BF $0,A0af9 ; 0aec 90 0c A0aee: OI $02 ; 0aee 22 02 LR (IS)-,A ; 0af0 5e LI $8a ; 0af1 20 8a BF $0,A0af9 ; 0af3 90 05 A0af5: NI $80 ; 0af5 21 80 LR (IS)-,A ; 0af7 5e LIS $d ; 0af8 7d A0af9: LR $0,A ; 0af9 50 PI A0df3 ; 0afa 28 0d f3 PI A0c9a ; 0afd 28 0c 9a A0b00: LR A,IS ; 0b00 0a NI $01 ; 0b01 21 01 LISL 2 ; 0b03 6a BT 4,A0ad8 ; 0b04 84 d3 A0b06: JMP A08df ; 0b06 29 08 df A0b09: LR A,IS ; 0b09 0a LR $7,A ; 0b0a 57 LISU 7 ; 0b0b 67 LISL 0 ; 0b0c 68 LR A,(IS) ; 0b0d 4c LR $0,A ; 0b0e 50 LR IS,A ; 0b0f 0b LR A,(IS) ; 0b10 4c LR QU,A ; 0b11 06 LISU 7 ; 0b12 67 LISL 0 ; 0b13 68 LR A,$0 ; 0b14 40 XI $80 ; 0b15 23 80 BF $1,A0b25 ; 0b17 91 0d INC ; 0b19 1f CI $38 ; 0b1a 25 38 BT 1,A0b20 ; 0b1c 81 03 LI $30 ; 0b1e 20 30 A0b20: LR (IS),A ; 0b20 5c LR A,QU ; 0b21 02 SL 4 ; 0b22 15 BF $0,A0b27 ; 0b23 90 03 A0b25: LR (IS),A ; 0b25 5c LR A,QU ; 0b26 02 A0b27: SR 4 ; 0b27 14 LR QU,A ; 0b28 06 LR A,$7 ; 0b29 47 LR IS,A ; 0b2a 0b POP ; 0b2b 1c A0b2c: LR A,(IS)+ ; 0b2c 4d LR A,(IS)- ; 0b2d 4e BF $0,A0b33 ; 0b2e 90 04 A0b30: LR A,QL ; 0b30 03 LISU 2 ; 0b31 62 LISL 7 ; 0b32 6f A0b33: LR $8,A ; 0b33 58 LR A,(IS) ; 0b34 4c INC ; 0b35 1f LR (IS)-,A ; 0b36 5e CI $02 ; 0b37 25 02 LR A,$8 ; 0b39 48 BT 4,A0b40 ; 0b3a 84 05 NI $fb ; 0b3c 21 fb BF $0,A0b42 ; 0b3e 90 03 A0b40: OI $04 ; 0b40 22 04 A0b42: LR $8,A ; 0b42 58 LR A,QU ; 0b43 02 CI $0a ; 0b44 25 0a BT 1,A0b49 ; 0b46 81 02 LIS $a ; 0b48 7a A0b49: CI $01 ; 0b49 25 01 BF $4,A0b59 ; 0b4b 94 0d LR A,$8 ; 0b4d 48 NI $10 ; 0b4e 21 10 LIS $0 ; 0b50 70 BF $4,A0b58 ; 0b51 94 06 LR A,$8 ; 0b53 48 OI $10 ; 0b54 22 10 LR $8,A ; 0b56 58 LIS $a ; 0b57 7a A0b58: INC ; 0b58 1f A0b59: AS (IS) ; 0b59 cc A0b5a: LR (IS)+,A ; 0b5a 5d CI $15 ; 0b5b 25 15 LR A,(IS)+ ; 0b5d 4d LR A,$8 ; 0b5e 48 BT 4,A0b70 ; 0b5f 84 10 BT 1,A0b7b ; 0b61 81 19 NI $10 ; 0b63 21 10 BT 4,A0b78 ; 0b65 84 12 XS $8 ; 0b67 e8 LR $8,A ; 0b68 58 LR A,(IS)- ; 0b69 4e LR A,(IS)- ; 0b6a 4e LR A,(IS) ; 0b6b 4c AI $f6 ; 0b6c 24 f6 BF $0,A0b5a ; 0b6e 90 eb A0b70: NI $04 ; 0b70 21 04 LR A,$8 ; 0b72 48 BT 4,A0b7b ; 0b73 84 07 OI $20 ; 0b75 22 20 POP ; 0b77 1c A0b78: LR A,$8 ; 0b78 48 OI $08 ; 0b79 22 08 A0b7b: POP ; 0b7b 1c A0b7c: LR K,P ; 0b7c 08 LI $6f ; 0b7d 20 6f LR $4,A ; 0b7f 54 A0b80: AS $2 ; 0b80 c2 A0b81: NI $7f ; 0b81 21 7f CI $68 ; 0b83 25 68 BT 1,A0b89 ; 0b85 81 03 AI $98 ; 0b87 24 98 A0b89: CI $3b ; 0b89 25 3b BF $1,A0b91 ; 0b8b 91 05 AI $3c ; 0b8d 24 3c BF $0,A0b81 ; 0b8f 90 f1 A0b91: LR $5,A ; 0b91 55 LR $1,A ; 0b92 51 PI A0bba ; 0b93 28 0b ba PI A0b09 ; 0b96 28 0b 09 LR A,QU ; 0b99 02 LR $6,A ; 0b9a 56 LR A,$4 ; 0b9b 44 LR $1,A ; 0b9c 51 PI A0bba ; 0b9d 28 0b ba PI A0b09 ; 0ba0 28 0b 09 PI A0bca ; 0ba3 28 0b ca LR A,$4 ; 0ba6 44 LR $5,A ; 0ba7 55 LR A,$6 ; 0ba8 46 LR QU,A ; 0ba9 06 PI A0bca ; 0baa 28 0b ca LR A,$2 ; 0bad 42 AI $49 ; 0bae 24 49 AS $5 ; 0bb0 c5 LR $2,A ; 0bb1 52 DS $4 ; 0bb2 34 LR A,$4 ; 0bb3 44 CI $3b ; 0bb4 25 3b BF $4,A0b80 ; 0bb6 94 c9 LR P,K ; 0bb8 09 POP ; 0bb9 1c A0bba: LR A,$1 ; 0bba 41 NI $01 ; 0bbb 21 01 LR A,$1 ; 0bbd 41 BT 4,A0bc5 ; 0bbe 84 06 SR 1 ; 0bc0 12 OI $80 ; 0bc1 22 80 BF $0,A0bc6 ; 0bc3 90 02 A0bc5: SR 1 ; 0bc5 12 A0bc6: LISU 7 ; 0bc6 67 LISL 0 ; 0bc7 68 LR (IS),A ; 0bc8 5c POP ; 0bc9 1c A0bca: LR A,$5 ; 0bca 45 SR 1 ; 0bcb 12 LR IS,A ; 0bcc 0b LR A,$5 ; 0bcd 45 NI $01 ; 0bce 21 01 LR A,QU ; 0bd0 02 BF $4,A0bda ; 0bd1 94 08 SL 4 ; 0bd3 15 LR $0,A ; 0bd4 50 LR A,(IS) ; 0bd5 4c NI $0f ; 0bd6 21 0f BF $0,A0bde ; 0bd8 90 05 A0bda: LR $0,A ; 0bda 50 LR A,(IS) ; 0bdb 4c NI $f0 ; 0bdc 21 f0 A0bde: XS $0 ; 0bde e0 LR (IS),A ; 0bdf 5c POP ; 0be0 1c A0be1: LR K,P ; 0be1 08 PI $0107 ; 0be2 28 01 07 LR A,(IS)- ; 0be5 4e NI $84 ; 0be6 21 84 BT 4,A0bf2 ; 0be8 84 09 BF $1,A0bef ; 0bea 91 04 JMP A0c6e ; 0bec 29 0c 6e A0bef: JMP A0c82 ; 0bef 29 0c 82 A0bf2: LR A,IS ; 0bf2 0a NI $01 ; 0bf3 21 01 BT 4,A0bfa ; 0bf5 84 04 INS 4 ; 0bf7 a4 BF $0,A0bfb ; 0bf8 90 02 A0bfa: INS 1 ; 0bfa a1 A0bfb: COM ; 0bfb 18 LR QL,A ; 0bfc 07 BT 4,A0c04 ; 0bfd 84 06 LIS $f ; 0bff 7f LR $0,A ; 0c00 50 PI A0df3 ; 0c01 28 0d f3 A0c04: LR A,(IS)+ ; 0c04 4d LR A,IS ; 0c05 0a NI $01 ; 0c06 21 01 BF $4,A0c0e ; 0c08 94 05 LR A,$9 ; 0c0a 49 LR $1,A ; 0c0b 51 BF $0,A0c10 ; 0c0c 90 03 A0c0e: LR A,QU ; 0c0e 02 LR $1,A ; 0c0f 51 A0c10: LR A,QL ; 0c10 03 CI $00 ; 0c11 25 00 BF $4,A0c25 ; 0c13 94 11 LIS $0 ; 0c15 70 LR $1,A ; 0c16 51 A0c17: LISU 2 ; 0c17 62 LR A,IS ; 0c18 0a NI $01 ; 0c19 21 01 BF $4,A0c21 ; 0c1b 94 05 LR A,$1 ; 0c1d 41 LR $9,A ; 0c1e 59 BF $0,A0c6f ; 0c1f 90 4f A0c21: LR A,$1 ; 0c21 41 LR QU,A ; 0c22 06 BF $0,A0c6f ; 0c23 90 4b A0c25: DS $1 ; 0c25 31 BT 1,A0c17 ; 0c26 81 f0 LR A,QL ; 0c28 03 LISU 3 ; 0c29 63 NI $20 ; 0c2a 21 20 BT 4,A0c40 ; 0c2c 84 13 LR A,(IS) ; 0c2e 4c INC ; 0c2f 1f LR (IS),A ; 0c30 5c NI $0f ; 0c31 21 0f CI $0a ; 0c33 25 0a BF $4,A0c3b ; 0c35 94 05 LR A,(IS) ; 0c37 4c NI $f0 ; 0c38 21 f0 LR (IS),A ; 0c3a 5c A0c3b: LI $14 ; 0c3b 20 14 LR $1,A ; 0c3d 51 BF $0,A0c17 ; 0c3e 90 d8 A0c40: LR A,QL ; 0c40 03 AI $00 ; 0c41 24 00 BF $1,A0c4f ; 0c43 91 0b NI $10 ; 0c45 21 10 BT 4,A0c17 ; 0c47 84 cf LI $76 ; 0c49 20 76 ASD (IS) ; 0c4b dc LR (IS),A ; 0c4c 5c BF $0,A0c3b ; 0c4d 90 ed A0c4f: LR A,(IS)- ; 0c4f 4e LR A,(IS)- ; 0c50 4e LR $3,A ; 0c51 53 LIS $0 ; 0c52 70 AS (IS)+ ; 0c53 cd LR A,(IS)+ ; 0c54 4d BF $4,A0c5e ; 0c55 94 08 LR A,(IS) ; 0c57 4c COM ; 0c58 18 ASD $3 ; 0c59 d3 BT 2,A0c5e ; 0c5a 82 03 LR A,$3 ; 0c5c 43 LR (IS),A ; 0c5d 5c A0c5e: LIS $0 ; 0c5e 70 AS (IS) ; 0c5f cc BF $4,A0c63 ; 0c60 94 02 LIS $1 ; 0c62 71 A0c63: LR (IS),A ; 0c63 5c LISU 2 ; 0c64 62 LR A,(IS) ; 0c65 4c OI $04 ; 0c66 22 04 LR (IS)-,A ; 0c68 5e LIS $e ; 0c69 7e LR $0,A ; 0c6a 50 PI A0df3 ; 0c6b 28 0d f3 A0c6e: LR A,(IS)+ ; 0c6e 4d A0c6f: LISU 3 ; 0c6f 63 LR A,(IS)- ; 0c70 4e SR 4 ; 0c71 14 LR $0,A ; 0c72 50 LIS $0 ; 0c73 70 LR $8,A ; 0c74 58 PI A0df5 ; 0c75 28 0d f5 LR A,(IS)+ ; 0c78 4d LR A,(IS)- ; 0c79 4e SL 4 ; 0c7a 15 SR 4 ; 0c7b 14 LR $0,A ; 0c7c 50 LIS $1 ; 0c7d 71 LR $8,A ; 0c7e 58 PI A0df5 ; 0c7f 28 0d f5 A0c82: LR A,(IS)+ ; 0c82 4d LISU 2 ; 0c83 62 PI $011e ; 0c84 28 01 1e PK ; 0c87 0c A0c88: LR W,J ; 0c88 1d DS $1 ; 0c89 31 COM ; 0c8a 18 DS $0 ; 0c8b 30 SL 1 ; 0c8c 13 db $2e LR Q,DC ; 0c8e 0e XDC ; 0c8f 2c LR Q,DC ; 0c90 0e db $2d LR P,K ; 0c92 09 DCI $092d ; 0c93 2a 09 2d LR KL,A ; 0c96 05 DCI $052d ; 0c97 2a 05 2d A0c9a: LR K,P ; 0c9a 08 PI $0107 ; 0c9b 28 01 07 LR A,(IS)+ ; 0c9e 4d LR A,IS ; 0c9f 0a LR QU,A ; 0ca0 06 LISU 3 ; 0ca1 63 LR A,(IS) ; 0ca2 4c LR $a,A ; 0ca3 5a A0ca4: LIS $8 ; 0ca4 78 SL 4 ; 0ca5 15 LR $3,A ; 0ca6 53 LI $09 ; 0ca7 20 09 LR $2,A ; 0ca9 52 LIS $5 ; 0caa 75 LR $4,A ; 0cab 54 LI $17 ; 0cac 20 17 LR $1,A ; 0cae 51 LISU 3 ; 0caf 63 LISL 0 ; 0cb0 68 A0cb1: LR A,(IS) ; 0cb1 4c SR 4 ; 0cb2 14 LR $0,A ; 0cb3 50 DCI $0767 ; 0cb4 2a 07 67 PI $0718 ; 0cb7 28 07 18 LIS $6 ; 0cba 76 AS $1 ; 0cbb c1 LR $1,A ; 0cbc 51 LR A,(IS)+ ; 0cbd 4d SL 4 ; 0cbe 15 SR 4 ; 0cbf 14 LR $0,A ; 0cc0 50 DCI $0767 ; 0cc1 2a 07 67 PI $0718 ; 0cc4 28 07 18 LIS $6 ; 0cc7 76 AS $1 ; 0cc8 c1 LR $1,A ; 0cc9 51 CI $5f ; 0cca 25 5f BT 4,A0cd8 ; 0ccc 84 0b CI $2f ; 0cce 25 2f BF $4,A0cb1 ; 0cd0 94 e0 LR A,(IS)+ ; 0cd2 4d LI $47 ; 0cd3 20 47 LR $1,A ; 0cd5 51 BF $0,A0cb1 ; 0cd6 90 da A0cd8: LIS $0 ; 0cd8 70 OUTS 1 ; 0cd9 b1 OUTS 4 ; 0cda b4 LR A,QU ; 0cdb 02 LR IS,A ; 0cdc 0b LR A,(IS) ; 0cdd 4c NI $03 ; 0cde 21 03 BT 4,A0d0b ; 0ce0 84 2a A0ce2: LIS $0 ; 0ce2 70 COM ; 0ce3 18 ASD $a ; 0ce4 da LR $a,A ; 0ce5 5a BT 2,A0d1b ; 0ce6 82 34 LR A,(IS) ; 0ce8 4c SL 1 ; 0ce9 13 SL 1 ; 0cea 13 BT 1,A0d05 ; 0ceb 81 19 NI $10 ; 0ced 21 10 LISU 3 ; 0cef 63 LR A,(IS) ; 0cf0 4c LISU 2 ; 0cf1 62 BT 4,A0cfe ; 0cf2 84 0b INC ; 0cf4 1f SR 1 ; 0cf5 12 LR $a,A ; 0cf6 5a NI $08 ; 0cf7 21 08 BT 4,A0cff ; 0cf9 84 05 LR A,$a ; 0cfb 4a AI $fd ; 0cfc 24 fd A0cfe: LR $a,A ; 0cfe 5a A0cff: LR A,(IS) ; 0cff 4c NI $df ; 0d00 21 df LR (IS),A ; 0d02 5c BF $0,A0ce2 ; 0d03 90 de A0d05: LR A,(IS) ; 0d05 4c NI $fc ; 0d06 21 fc OI $08 ; 0d08 22 08 LR (IS),A ; 0d0a 5c A0d0b: LR A,(IS)- ; 0d0b 4e PI $011e ; 0d0c 28 01 1e PK ; 0d0f 0c A0d10: SL 4 ; 0d10 15 OUTS 5 ; 0d11 b5 LIS $8 ; 0d12 78 LR $5,A ; 0d13 55 PI $008f ; 0d14 28 00 8f LIS $0 ; 0d17 70 OUTS 5 ; 0d18 b5 BF $0,A0ca4 ; 0d19 90 8a A0d1b: LR A,(IS)- ; 0d1b 4e LISU 3 ; 0d1c 63 NI $02 ; 0d1d 21 02 BF $4,A0d3f ; 0d1f 94 1f COM ; 0d21 18 ASD (IS) ; 0d22 dc LR (IS)-,A ; 0d23 5e BT 4,A0d2f ; 0d24 84 0a BT 2,A0d2c ; 0d26 82 05 LIS $0 ; 0d28 70 COM ; 0d29 18 ASD (IS) ; 0d2a dc LR (IS)+,A ; 0d2b 5d A0d2c: LIS $4 ; 0d2c 74 BF $0,A0d10 ; 0d2d 90 e2 A0d2f: AS (IS)+ ; 0d2f cd BF $4,A0d2c ; 0d30 94 fb LISU 2 ; 0d32 62 LR A,(IS)+ ; 0d33 4d LR A,(IS) ; 0d34 4c OI $80 ; 0d35 22 80 NI $fc ; 0d37 21 fc LR (IS)-,A ; 0d39 5e PI A0e31 ; 0d3a 28 0e 31 BF $0,A0d2c ; 0d3d 90 ee A0d3f: LI $67 ; 0d3f 20 67 ASD (IS) ; 0d41 dc LR (IS)-,A ; 0d42 5e BF $2,A0d49 ; 0d43 92 05 LI $67 ; 0d45 20 67 ASD (IS) ; 0d47 dc LR (IS),A ; 0d48 5c A0d49: LIS $8 ; 0d49 78 BF $0,A0d10 ; 0d4a 90 c5 A0d4c: LI $7d ; 0d4c 20 7d LR $1,A ; 0d4e 51 INC ; 0d4f 1f LR $4,A ; 0d50 54 LR A,$0 ; 0d51 40 NI $80 ; 0d52 21 80 LR $6,A ; 0d54 56 LR A,$0 ; 0d55 40 SL 1 ; 0d56 13 LR $0,A ; 0d57 50 LIS $0 ; 0d58 70 BF $0,A0d60 ; 0d59 90 06 A0d5b: LIS $5 ; 0d5b 75 LR $1,A ; 0d5c 51 LI $70 ; 0d5d 20 70 LR $4,A ; 0d5f 54 A0d60: LR $5,A ; 0d60 55 LI $40 ; 0d61 20 40 OUTS 0 ; 0d63 b0 A0d64: LR A,$2 ; 0d64 42 COM ; 0d65 18 NI $3f ; 0d66 21 3f OUTS 5 ; 0d68 b5 LR A,$1 ; 0d69 41 LR $7,A ; 0d6a 57 A0d6b: LR A,$0 ; 0d6b 40 A0d6c: XI $c0 ; 0d6c 23 c0 OUTS 1 ; 0d6e b1 LR A,$7 ; 0d6f 47 COM ; 0d70 18 OUTS 4 ; 0d71 b4 LI $60 ; 0d72 20 60 OUTS 0 ; 0d74 b0 LI $40 ; 0d75 20 40 OUTS 0 ; 0d77 b0 LIS $4 ; 0d78 74 COM ; 0d79 18 A0d7a: INC ; 0d7a 1f BF $4,A0d7a ; 0d7b 94 fe LR A,$7 ; 0d7d 47 INC ; 0d7e 1f LR $7,A ; 0d7f 57 COM ; 0d80 18 INC ; 0d81 1f AS $4 ; 0d82 c4 BF $1,A0d8d ; 0d83 91 09 BF $4,A0d6b ; 0d85 94 e5 DS $5 ; 0d87 35 BT 1,A0d8d ; 0d88 81 04 LR A,$6 ; 0d8a 46 BF $0,A0d6c ; 0d8b 90 e0 A0d8d: LR A,$2 ; 0d8d 42 INC ; 0d8e 1f LR $2,A ; 0d8f 52 NI $3f ; 0d90 21 3f XS $3 ; 0d92 e3 BF $4,A0d64 ; 0d93 94 d0 LIS $0 ; 0d95 70 OUTS 1 ; 0d96 b1 OUTS 4 ; 0d97 b4 OUTS 0 ; 0d98 b0 POP ; 0d99 1c A0d9a: LR K,P ; 0d9a 08 DCI A0db3 ; 0d9b 2a 0d b3 LR A,$8 ; 0d9e 48 SL 4 ; 0d9f 15 BT 4,A0da4 ; 0da0 84 03 ADC ; 0da2 8e LM ; 0da3 16 A0da4: LR $3,A ; 0da4 53 LIS $5 ; 0da5 75 LR $4,A ; 0da6 54 LI $30 ; 0da7 20 30 LR $1,A ; 0da9 51 LI $33 ; 0daa 20 33 LR $2,A ; 0dac 52 LIS $0 ; 0dad 70 LR $0,A ; 0dae 50 A0daf: PI $0718 ; 0daf 28 07 18 LIS $6 ; 0db2 76 A0db3: AS $1 ; 0db3 c1 LR $1,A ; 0db4 51 CI $3f ; 0db5 25 3f BT 1,A0daf ; 0db7 81 f7 DCI $079e ; 0db9 2a 07 9e A0dbc: PI $0718 ; 0dbc 28 07 18 LIS $0 ; 0dbf 70 OUTS 1 ; 0dc0 b1 OUTS 4 ; 0dc1 b4 PK ; 0dc2 0c BT 0,A0dbc ; 0dc3 80 f8 INS 8 ; 0dc5 a8 INS 8 ; 0dc6 a8 INS 8 ; 0dc7 a8 INS 8 ; 0dc8 a8 NS $8 ; 0dc9 f8 LI $20 ; 0dca 20 20 LI $f8 ; 0dcc 20 f8 LR A,KU ; 0dce 00 LR A,KU ; 0dcf 00 LR A,KU ; 0dd0 00 LR A,KU ; 0dd1 00 LR A,KU ; 0dd2 00 LR A,$0 ; 0dd3 40 AM ; 0dd4 88 BF $0,-32 ; 0dd5 90 e0 BF $0,A0d60 ; 0dd7 90 88 NS $8 ; 0dd9 f8 AM ; 0dda 88 NS $8 ; 0ddb f8 AM ; 0ddc 88 AM ; 0ddd 88 LR A,KU ; 0dde 00 LR A,KU ; 0ddf 00 LR A,KU ; 0de0 00 LR A,KU ; 0de1 00 LR A,KU ; 0de2 00 LR A,$0 ; 0de3 40 LR A,KU ; 0de4 00 A0de5: LR A,KU ; 0de5 00 LR A,KU ; 0de6 00 LR A,KU ; 0de7 00 LR A,KU ; 0de8 00 NS $8 ; 0de9 f8 BT 0,-32 ; 0dea 80 e0 BT 0,A0de5 ; 0dec 80 f8 LR A,KU ; 0dee 00 LR A,KU ; 0def 00 LR A,KU ; 0df0 00 LR A,KU ; 0df1 00 LR A,KU ; 0df2 00 A0df3: LIS $2 ; 0df3 72 LR $8,A ; 0df4 58 A0df5: LR A,IS ; 0df5 0a NI $07 ; 0df6 21 07 DS $8 ; 0df8 38 AS $8 ; 0df9 c8 BF $0,A0dfd ; 0dfa 90 02 LR A,$8 ; 0dfc 48 A0dfd: DCI A0e2b ; 0dfd 2a 0e 2b ADC ; 0e00 8e LM ; 0e01 16 LR $1,A ; 0e02 51 LIS $4 ; 0e03 74 SL 4 ; 0e04 15 LR $3,A ; 0e05 53 LR K,P ; 0e06 08 LI $33 ; 0e07 20 33 LR $2,A ; 0e09 52 LIS $5 ; 0e0a 75 LR $4,A ; 0e0b 54 LI $c0 ; 0e0c 20 c0 NS $0 ; 0e0e f0 BT 4,A0e12 ; 0e0f 84 02 LR $3,A ; 0e11 53 A0e12: DCI $0767 ; 0e12 2a 07 67 LR A,$0 ; 0e15 40 NI $3f ; 0e16 21 3f LR $0,A ; 0e18 50 CI $09 ; 0e19 25 09 BT 1,A0e24 ; 0e1b 81 08 CI $0f ; 0e1d 25 0f BF $1,A0e24 ; 0e1f 91 04 DCI A0ef9 ; 0e21 2a 0e f9 A0e24: PI $0718 ; 0e24 28 07 18 LIS $0 ; 0e27 70 OUTS 1 ; 0e28 b1 OUTS 4 ; 0e29 b4 PK ; 0e2a 0c A0e2b: SL 1 ; 0e2b 13 LNK ; 0e2c 19 XI $58 ; 0e2d 23 58 LR (IS)-,A ; 0e2f 5e LR A,(IS)- ; 0e30 4e A0e31: LR K,P ; 0e31 08 PI $0107 ; 0e32 28 01 07 LIS $f ; 0e35 7f LR $0,A ; 0e36 50 LIS $0 ; 0e37 70 LR $8,A ; 0e38 58 PI A0df5 ; 0e39 28 0d f5 LIS $1 ; 0e3c 71 LR $8,A ; 0e3d 58 PI A0df5 ; 0e3e 28 0d f5 LIS $2 ; 0e41 72 LR $8,A ; 0e42 58 PI A0df5 ; 0e43 28 0d f5 PI $011e ; 0e46 28 01 1e PK ; 0e49 0c A0e4a: LR K,P ; 0e4a 08 PI $0107 ; 0e4b 28 01 07 LI $10 ; 0e4e 20 10 LR QU,A ; 0e50 06 LIS $0 ; 0e51 70 AS (IS) ; 0e52 cc BT 4,A0e6b ; 0e53 84 17 CI $05 ; 0e55 25 05 BF $1,A0e5b ; 0e57 91 03 LIS $5 ; 0e59 75 LR (IS),A ; 0e5a 5c A0e5b: LR A,IS ; 0e5b 0a CI $14 ; 0e5c 25 14 BF $1,A0e65 ; 0e5e 91 06 PI A0e8c ; 0e60 28 0e 8c BF $0,A0e68 ; 0e63 90 04 A0e65: PI A0e96 ; 0e65 28 0e 96 A0e68: DS (IS) ; 0e68 3c BF $4,A0e5b ; 0e69 94 f1 A0e6b: LIS $0 ; 0e6b 70 LR (IS)-,A ; 0e6c 5e LR (IS)+,A ; 0e6d 5d PI $011e ; 0e6e 28 01 1e PK ; 0e71 0c A0e72: LR K,P ; 0e72 08 PI $0107 ; 0e73 28 01 07 LI $34 ; 0e76 20 34 LR $1,A ; 0e78 51 LI $11 ; 0e79 20 11 LR $2,A ; 0e7b 52 PI A0ea2 ; 0e7c 28 0e a2 LI $3a ; 0e7f 20 3a LR $1,A ; 0e81 51 LI $11 ; 0e82 20 11 LR $2,A ; 0e84 52 PI A0ea2 ; 0e85 28 0e a2 PI $011e ; 0e88 28 01 1e PK ; 0e8b 0c A0e8c: DCI A0ef9 ; 0e8c 2a 0e f9 LR A,IS ; 0e8f 0a NI $01 ; 0e90 21 01 SL 4 ; 0e92 15 ADC ; 0e93 8e BF $0,A0e9b ; 0e94 90 06 A0e96: DCI $0f19 ; 0e96 2a 0f 19 LISU 2 ; 0e99 62 LISL 7 ; 0e9a 6f A0e9b: LR A,(IS) ; 0e9b 4c SL 1 ; 0e9c 13 ADC ; 0e9d 8e LM ; 0e9e 16 LR $1,A ; 0e9f 51 LM ; 0ea0 16 LR $2,A ; 0ea1 52 A0ea2: LR K,P ; 0ea2 08 LIS $5 ; 0ea3 75 LR $4,A ; 0ea4 54 LR A,QU ; 0ea5 02 SR 1 ; 0ea6 12 SL 4 ; 0ea7 15 LIS $0 ; 0ea8 70 LR $0,A ; 0ea9 50 BT 1,A0eae ; 0eaa 81 03 LIS $c ; 0eac 7c SL 4 ; 0ead 15 A0eae: LR $3,A ; 0eae 53 DCI $07b7 ; 0eaf 2a 07 b7 PI $0718 ; 0eb2 28 07 18 DS $1 ; 0eb5 31 DS $1 ; 0eb6 31 DCI $07b7 ; 0eb7 2a 07 b7 PI $0718 ; 0eba 28 07 18 LIS $4 ; 0ebd 74 AS $2 ; 0ebe c2 LR $2,A ; 0ebf 52 DCI $07b7 ; 0ec0 2a 07 b7 PI $0718 ; 0ec3 28 07 18 LIS $2 ; 0ec6 72 AS $1 ; 0ec7 c1 LR $1,A ; 0ec8 51 DCI $07b7 ; 0ec9 2a 07 b7 PI $0718 ; 0ecc 28 07 18 DS $1 ; 0ecf 31 DS $2 ; 0ed0 32 DS $2 ; 0ed1 32 LR A,QU ; 0ed2 02 NI $c0 ; 0ed3 21 c0 BF $4,A0ed9 ; 0ed5 94 03 LIS $8 ; 0ed7 78 SL 4 ; 0ed8 15 A0ed9: LR $3,A ; 0ed9 53 LR A,QU ; 0eda 02 NI $0f ; 0edb 21 0f LR $0,A ; 0edd 50 BT 4,A0ef7 ; 0ede 84 18 DCI A0f44 ; 0ee0 2a 0f 44 PI $0718 ; 0ee3 28 07 18 LR A,$0 ; 0ee6 40 CI $0d ; 0ee7 25 0d BF $1,A0ef7 ; 0ee9 91 0d LI $40 ; 0eeb 20 40 A0eed: OUTS 5 ; 0eed b5 LIS $0 ; 0eee 70 LR $5,A ; 0eef 55 A0ef0: INC ; 0ef0 1f BF $4,A0ef0 ; 0ef1 94 fe OUTS 5 ; 0ef3 b5 PI $008f ; 0ef4 28 00 8f A0ef7: LIS $0 ; 0ef7 70 OUTS 1 ; 0ef8 b1 A0ef9: OUTS 4 ; 0ef9 b4 PK ; 0efa 0c db $5f LR W,J ; 0efc 1d LR $8,A ; 0efd 58 LI $51 ; 0efe 20 51 XI $4a ; 0f00 23 4a CI $43 ; 0f02 25 43 IN $5c ; 0f04 26 5c OI $55 ; 0f06 22 55 CI $4e ; 0f08 25 4e PI $141d ; 0f0a 28 14 1d A0f0d: EI ; 0f0d 1b LI $22 ; 0f0e 20 22 XI $29 ; 0f10 23 29 CI $30 ; 0f12 25 30 IN $17 ; 0f14 26 17 OI $1e ; 0f16 22 1e CI $25 ; 0f18 25 25 PI $2a11 ; 0f1a 28 2a 11 DS $3 ; 0f1d 33 LR H,DC ; 0f1e 11 DS (IS) ; 0f1f 3c LR H,DC ; 0f20 11 LR A,$5 ; 0f21 45 LR H,DC ; 0f22 11 LR A,(IS)- ; 0f23 4e LR H,DC ; 0f24 11 LR $7,A ; 0f25 57 A0f26: LR H,DC ; 0f26 11 COM ; 0f27 18 LR H,DC ; 0f28 11 NI $11 ; 0f29 21 11 NS $8 ; 0f2b f8 BT 0,-104 ; 0f2c 80 98 AM ; 0f2e 88 NS $8 ; 0f2f f8 AM ; 0f30 88 AM ; 0f31 88 LR $0,A ; 0f32 50 LR $0,A ; 0f33 50 A0f34: LI $f8 ; 0f34 20 f8 AM ; 0f36 88 NS $8 ; 0f37 f8 AM ; 0f38 88 AM ; 0f39 88 AM ; 0f3a 88 AM ; 0f3b 88 AM ; 0f3c 88 AM ; 0f3d 88 NS $8 ; 0f3e f8 LR A,KU ; 0f3f 00 LR A,KU ; 0f40 00 NS $8 ; 0f41 f8 LR A,KU ; 0f42 00 LR A,KU ; 0f43 00 A0f44: LR A,KU ; 0f44 00 LR A,KU ; 0f45 00 LR A,KU ; 0f46 00 LR A,KU ; 0f47 00 LR A,KU ; 0f48 00 LI $50 ; 0f49 20 50 AM ; 0f4b 88 NS $8 ; 0f4c f8 AM ; 0f4d 88 LIS $0 ; 0f4e 70 LR DC,H ; 0f4f 10 LIS $0 ; 0f50 70 LR A,$0 ; 0f51 40 LIS $0 ; 0f52 70 LIS $0 ; 0f53 70 LR DC,H ; 0f54 10 LIS $0 ; 0f55 70 LR DC,H ; 0f56 10 LIS $0 ; 0f57 70 LR $0,A ; 0f58 50 LR $0,A ; 0f59 50 LIS $0 ; 0f5a 70 LR DC,H ; 0f5b 10 LR DC,H ; 0f5c 10 LIS $0 ; 0f5d 70 A0f5e: LR A,$0 ; 0f5e 40 A0f5f: LIS $0 ; 0f5f 70 LR DC,H ; 0f60 10 LIS $0 ; 0f61 70 A0f62: LIS $0 ; 0f62 70 LR A,$0 ; 0f63 40 A0f64: LIS $0 ; 0f64 70 LR $0,A ; 0f65 50 LIS $0 ; 0f66 70 LIS $0 ; 0f67 70 LR DC,H ; 0f68 10 LI $20 ; 0f69 20 20 LI $70 ; 0f6b 20 70 LR $0,A ; 0f6d 50 LIS $0 ; 0f6e 70 LR $0,A ; 0f6f 50 LIS $0 ; 0f70 70 LIS $0 ; 0f71 70 LR $0,A ; 0f72 50 LIS $0 ; 0f73 70 LR DC,H ; 0f74 10 LR DC,H ; 0f75 10 OUTS 8 ; 0f76 b8 INS 8 ; 0f77 a8 INS 8 ; 0f78 a8 INS 8 ; 0f79 a8 OUTS 8 ; 0f7a b8 XS $0 ; 0f7b e0 BF $0,A0f0d ; 0f7c 90 90 BF $0,A0f5f ; 0f7e 90 e0 XS $0 ; 0f80 e0 BF $0,A0f62 ; 0f81 90 e0 BF $0,A0f64 ; 0f83 90 e0 BF $0,A0f26 ; 0f85 90 a0 XS $0 ; 0f87 e0 BF $0,-120 ; 0f88 90 88 AM ; 0f8a 88 LR $0,A ; 0f8b 50 LI $50 ; 0f8c 20 50 AM ; 0f8e 88 LI $20 ; 0f8f 20 20 ASD $8 ; 0f91 d8 LI $20 ; 0f92 20 20 LIS $1 ; 0f94 71 CM ; 0f95 8d BF $4,A0faf ; 0f96 94 18 LIS $0 ; 0f98 70 AS $7 ; 0f99 c7 BT 4,A0f5e ; 0f9a 84 c3 LR A,$b ; 0f9c 4b SL 1 ; 0f9d 13 LR A,$7 ; 0f9e 47 BT 1,A0fa2 ; 0f9f 81 02 LR $5,A ; 0fa1 55 A0fa2: JMP A0eed ; 0fa2 29 0e ed DCI $0b71 ; 0fa5 2a 0b 71 LR A,$7 ; 0fa8 47 LR $5,A ; 0fa9 55 ADC ; 0faa 8e LIS $1 ; 0fab 71 CM ; 0fac 8d BT 4,A0f5e ; 0fad 84 b0 A0faf: LR A,$5 ; 0faf 45 LR $7,A ; 0fb0 57 LISU 2 ; 0fb1 62 LISL 4 ; 0fb2 6c NS (IS) ; 0fb3 fc BT 4,A0fb8 ; 0fb4 84 03 LR $5,A ; 0fb6 55 LR $7,A ; 0fb7 57 A0fb8: JMP A0f34 ; 0fb8 29 0f 34 LR K,P ; 0fbb 08 LR A,$8 ; 0fbc 48 LR $7,A ; 0fbd 57 NI $01 ; 0fbe 21 01 BT 4,A0fcc ; 0fc0 84 0b LR A,$9 ; 0fc2 49 LR $0,A ; 0fc3 50 PI A0acd ; 0fc4 28 0a cd BT 1,A0fcc ; 0fc7 81 04 LIS $e ; 0fc9 7e NS $7 ; 0fca f7 LR $7,A ; 0fcb 57 A0fcc: LIS $2 ; 0fcc 72 NS $8 ; 0fcd f8 BT 4,A0fda ; 0fce 84 0b LR A,$9 ; 0fd0 49 LR $0,A ; 0fd1 50 PI A0ad0 ; 0fd2 28 0a d0 BT 1,A0fda ; 0fd5 81 04 LIS $d ; 0fd7 7d NS $7 ; 0fd8 f7 LR $7,A ; 0fd9 57 A0fda: LIS $4 ; 0fda 74 A0fdb: NS $8 ; 0fdb f8 BT 4,A0fe8 ; 0fdc 84 0b LR A,$9 ; 0fde 49 LR $0,A ; 0fdf 50 PI A0ad8 ; 0fe0 28 0a d8 BT 1,A0fe8 ; 0fe3 81 04 LIS $b ; 0fe5 7b NS $7 ; 0fe6 f7 LR $7,A ; 0fe7 57 A0fe8: LIS $8 ; 0fe8 78 NS $8 ; 0fe9 f8 BT 4,A0ff6 ; 0fea 84 0b LR A,$9 ; 0fec 49 LR $0,A ; 0fed 50 PI $0ad4 ; 0fee 28 0a d4 BT 1,A0ff6 ; 0ff1 81 04 LIS $7 ; 0ff3 77 NS $7 ; 0ff4 f7 LR $7,A ; 0ff5 57 A0ff6: LIS $0 ; 0ff6 70 LR P,K ; 0ff7 09 POP ; 0ff8 1c BF $0,A0fdb ; 0ff9 90 e1 LR $0,A ; 0ffb 50 LI $20 ; 0ffc 20 20 LR KU,A ; 0ffe 04 LI $00 ; 0fff 20 00