Reset: equ $0000 org $0800 CartridgeStart: LR $5,A ; 0800 55 NOP ; 0801 2b CartridgeEntry: LI $d0 ; 0802 20 d0 LR $3,A ; 0804 53 PI $00d0 ; 0805 28 00 d0 A0808: LI $8a ; 0808 20 8a LR $0,A ; 080a 50 PI $0099 ; 080b 28 00 99 LR A,$4 ; 080e 44 LISU 7 ; 080f 67 LISL 0 ; 0810 68 LR (IS),A ; 0811 5c SR 1 ; 0812 12 SR 1 ; 0813 12 BF $4,A0808 ; 0814 94 f3 A0816: LISU 3 ; 0816 63 LISL 7 ; 0817 6f LIS $0 ; 0818 70 LR (IS),A ; 0819 5c LI $d6 ; 081a 20 d6 LR $3,A ; 081c 53 PI $00d0 ; 081d 28 00 d0 LISU 7 ; 0820 67 LISL 0 ; 0821 68 LR A,(IS) ; 0822 4c SR 1 ; 0823 12 BT 4,A083d ; 0824 84 18 SR 1 ; 0826 12 BF $4,A0808 ; 0827 94 e0 LI $16 ; 0829 20 16 A082b: LR IS,A ; 082b 0b LIS $0 ; 082c 70 LR (IS),A ; 082d 5c LR A,IS ; 082e 0a INC ; 082f 1f CI $23 ; 0830 25 23 BF $4,A082b ; 0832 94 f8 LR IS,A ; 0834 0b LI $ff ; 0835 20 ff LR (IS),A ; 0837 5c DCI A0faf ; 0838 2a 0f af BF $0,A084b ; 083b 90 0f A083d: LI $16 ; 083d 20 16 DCI A0fa1 ; 083f 2a 0f a1 A0842: LR IS,A ; 0842 0b LM ; 0843 16 LR (IS),A ; 0844 5c LR A,IS ; 0845 0a INC ; 0846 1f CI $24 ; 0847 25 24 BF $4,A0842 ; 0849 94 f8 A084b: LISU 7 ; 084b 67 LISL 4 ; 084c 6c LM ; 084d 16 LR (IS)+,A ; 084e 5d LM ; 084f 16 LR (IS)+,A ; 0850 5d LM ; 0851 16 LR (IS)+,A ; 0852 5d LM ; 0853 16 LR (IS),A ; 0854 5c LI $17 ; 0855 20 17 LR $1,A ; 0857 51 LI $1c ; 0858 20 1c LR $2,A ; 085a 52 LI $3d ; 085b 20 3d LR $3,A ; 085d 53 A085e: LI $d2 ; 085e 20 d2 LR $0,A ; 0860 50 PI $0679 ; 0861 28 06 79 LR A,$1 ; 0864 41 AI $fb ; 0865 24 fb LR $1,A ; 0867 51 DS $3 ; 0868 33 BF $4,A085e ; 0869 94 f4 LI $1b ; 086b 20 1b LR $a,A ; 086d 5a A086e: PI A0bcc ; 086e 28 0b cc DS $a ; 0871 3a BT 1,A086e ; 0872 81 fb LISU 2 ; 0874 62 LISL 0 ; 0875 68 LIS $1 ; 0876 71 LR (IS)+,A ; 0877 5d LIS $0 ; 0878 70 LR (IS)+,A ; 0879 5d LR (IS),A ; 087a 5c PI A0d1d ; 087b 28 0d 1d PI A0d44 ; 087e 28 0d 44 A0881: LISU 4 ; 0881 64 LISL 6 ; 0882 6e LIS $1 ; 0883 71 AS (IS) ; 0884 cc LR (IS)-,A ; 0885 5e LR A,(IS) ; 0886 4c LNK ; 0887 19 LR (IS)+,A ; 0888 5d PI A0d06 ; 0889 28 0d 06 CI $20 ; 088c 25 20 BF $4,A0881 ; 088e 94 f2 A0890: LIS $0 ; 0890 70 LR $5,A ; 0891 55 PI $008f ; 0892 28 00 8f PI A0d9c ; 0895 28 0d 9c LISU 2 ; 0898 62 LISL 2 ; 0899 6a LIS $0 ; 089a 70 LR (IS),A ; 089b 5c PI A0ed2 ; 089c 28 0e d2 LISU 2 ; 089f 62 LISL 4 ; 08a0 6c LR A,$3 ; 08a1 43 LR (IS)-,A ; 08a2 5e LR A,$4 ; 08a3 44 LR (IS)-,A ; 08a4 5e LI $80 ; 08a5 20 80 LR (IS),A ; 08a7 5c PI A0ed2 ; 08a8 28 0e d2 LISU 2 ; 08ab 62 LISL 2 ; 08ac 6a LIS $0 ; 08ad 70 LR (IS)+,A ; 08ae 5d LR $5,A ; 08af 55 PI $008f ; 08b0 28 00 8f LR A,$3 ; 08b3 43 AS $4 ; 08b4 c4 COM ; 08b5 18 INC ; 08b6 1f AS (IS)+ ; 08b7 cd AS (IS) ; 08b8 cc BT 4,A0890 ; 08b9 84 d6 BT 1,A08c5 ; 08bb 81 09 LR A,$4 ; 08bd 44 LR (IS)-,A ; 08be 5e LR A,$3 ; 08bf 43 LR (IS)-,A ; 08c0 5e LR A,(IS) ; 08c1 4c OI $80 ; 08c2 22 80 LR (IS),A ; 08c4 5c A08c5: LISL 3 ; 08c5 6b LR A,(IS)+ ; 08c6 4d COM ; 08c7 18 INC ; 08c8 1f AS (IS) ; 08c9 cc BF $4,A08d0 ; 08ca 94 05 LR A,(IS) ; 08cc 4c COM ; 08cd 18 LR (IS)-,A ; 08ce 5e LR (IS)+,A ; 08cf 5d A08d0: PI A0d9c ; 08d0 28 0d 9c LISU 7 ; 08d3 67 LISL 1 ; 08d4 69 LIS $0 ; 08d5 70 LR (IS)-,A ; 08d6 5e LIS $1 ; 08d7 71 NS (IS)+ ; 08d8 fd BF $4,A08e8 ; 08d9 94 0e LISU 2 ; 08db 62 LISL 3 ; 08dc 6b LR A,(IS)+ ; 08dd 4d AS (IS)+ ; 08de cd CI $03 ; 08df 25 03 BF $4,A08e8 ; 08e1 94 06 LI $fe ; 08e3 20 fe LISU 7 ; 08e5 67 LISL 1 ; 08e6 69 LR (IS),A ; 08e7 5c A08e8: PI A0d63 ; 08e8 28 0d 63 PI A0de5 ; 08eb 28 0d e5 PI A0d06 ; 08ee 28 0d 06 DCI A0fb6 ; 08f1 2a 0f b6 BT 4,A0900 ; 08f4 84 0b A08f6: LR $5,A ; 08f6 55 LM ; 08f7 16 LR QU,A ; 08f8 06 LM ; 08f9 16 LR QL,A ; 08fa 07 LR A,$5 ; 08fb 45 SR 1 ; 08fc 12 BF $4,A08f6 ; 08fd 94 f8 LR P0,Q ; 08ff 0d A0900: LISU 4 ; 0900 64 LISL 7 ; 0901 6f LR A,(IS) ; 0902 4c INC ; 0903 1f LR (IS),A ; 0904 5c NI $03 ; 0905 21 03 BT 4,A08e8 ; 0907 84 e0 NI $01 ; 0909 21 01 BF $4,A091f ; 090b 94 13 PI A0dbd ; 090d 28 0d bd A0910: LI $20 ; 0910 20 20 LR $5,A ; 0912 55 PI $008f ; 0913 28 00 8f BF $0,A0900 ; 0916 90 e9 LISL 3 ; 0918 6b LR A,(IS)+ ; 0919 4d LR $0,A ; 091a 50 LR A,(IS)- ; 091b 4e LR (IS)+,A ; 091c 5d LR A,$0 ; 091d 40 LR (IS),A ; 091e 5c A091f: PI A0d63 ; 091f 28 0d 63 BF $0,A0910 ; 0922 90 ed LIS $1 ; 0924 71 BF $0,A0929 ; 0925 90 03 LI $ff ; 0927 20 ff A0929: LR $0,A ; 0929 50 LISL 1 ; 092a 69 LR A,(IS) ; 092b 4c AI $f4 ; 092c 24 f4 BF $1,A0934 ; 092e 91 05 LR A,$0 ; 0930 40 COM ; 0931 18 INC ; 0932 1f LR $0,A ; 0933 50 A0934: LR A,(IS) ; 0934 4c CI $17 ; 0935 25 17 BF $1,A0951 ; 0937 91 19 AS $0 ; 0939 c0 BF $1,A0962 ; 093a 91 27 CI $18 ; 093c 25 18 BT 4,A0966 ; 093e 84 27 LR $a,A ; 0940 5a AS (IS) ; 0941 cc CI $17 ; 0942 25 17 BT 4,A0900 ; 0944 84 bb A0946: PI A0ddc ; 0946 28 0d dc LR A,$a ; 0949 4a LISL 1 ; 094a 69 LR (IS),A ; 094b 5c PI A0de5 ; 094c 28 0d e5 BF $0,A0910 ; 094f 90 c0 A0951: CI $19 ; 0951 25 19 BT 1,A0900 ; 0953 81 ac AI $e6 ; 0955 24 e6 BT 4,A095b ; 0957 84 03 LI $17 ; 0959 20 17 A095b: LR $a,A ; 095b 5a LR A,$0 ; 095c 40 INC ; 095d 1f A095e: BF $4,A0900 ; 095e 94 a1 BF $0,A0946 ; 0960 90 e5 A0962: LI $1a ; 0962 20 1a BF $0,A0968 ; 0964 90 03 A0966: LI $1b ; 0966 20 1b A0968: LR $a,A ; 0968 5a LISU 7 ; 0969 67 LISL 0 ; 096a 68 LIS $1 ; 096b 71 NS (IS) ; 096c fc BF $0,A095e ; 096d 90 f0 LISL 1 ; 096f 69 LR A,(IS) ; 0970 4c CI $1a ; 0971 25 1a BF $4,A0978 ; 0973 94 04 INC ; 0975 1f BF $0,A098e ; 0976 90 17 A0978: CI $0b ; 0978 25 0b BF $1,A0900 ; 097a 91 85 A097c: CI $17 ; 097c 25 17 BF $1,A0995 ; 097e 91 16 COM ; 0980 18 INC ; 0981 1f AI $17 ; 0982 24 17 BF $0,A098e ; 0984 90 09 LISL 1 ; 0986 69 LR A,(IS) ; 0987 4c CI $1b ; 0988 25 1b BF $4,A0991 ; 098a 94 06 AI $ff ; 098c 24 ff A098e: LR $a,A ; 098e 5a BF $0,A0946 ; 098f 90 b6 A0991: CI $0b ; 0991 25 0b BF $1,A097c ; 0993 91 e8 A0995: JMP A0900 ; 0995 29 09 00 PI A0d0c ; 0998 28 0d 0c CI $10 ; 099b 25 10 BF $4,A09af ; 099d 94 11 PI A0d17 ; 099f 28 0d 17 CI $10 ; 09a2 25 10 BF $4,A09af ; 09a4 94 0a JMP A0b04 ; 09a6 29 0b 04 A09a9: PI A0ff5 ; 09a9 28 0f f5 PI A0ff5 ; 09ac 28 0f f5 A09af: JMP A0910 ; 09af 29 09 10 LISL 1 ; 09b2 69 LR A,(IS) ; 09b3 4c LR $a,A ; 09b4 5a PI A0cd8 ; 09b5 28 0c d8 BT 4,A09a9 ; 09b8 84 f0 PI A0ca9 ; 09ba 28 0c a9 PI A0d38 ; 09bd 28 0d 38 XS $3 ; 09c0 e3 BF $4,A09a9 ; 09c1 94 e7 PI A0e8a ; 09c3 28 0e 8a LR $b,A ; 09c6 5b BF $1,A09e0 ; 09c7 91 18 LR $a,A ; 09c9 5a CI $17 ; 09ca 25 17 BF $1,A09e0 ; 09cc 91 13 PI A0cd8 ; 09ce 28 0c d8 CI $01 ; 09d1 25 01 BT 1,A0a08 ; 09d3 81 34 PI A0ca9 ; 09d5 28 0c a9 PI A0d38 ; 09d8 28 0d 38 XS $3 ; 09db e3 BF $4,A09a9 ; 09dc 94 cc BF $0,A0a08 ; 09de 90 29 A09e0: PI A0e4f ; 09e0 28 0e 4f LR A,$a ; 09e3 4a CI $17 ; 09e4 25 17 BF $1,A09a9 ; 09e6 91 c2 PI A0d38 ; 09e8 28 0d 38 BT 1,A09f4 ; 09eb 81 08 LI $ee ; 09ed 20 ee AS $a ; 09ef ca BF $1,A09a9 ; 09f0 91 b8 BF $0,A09f9 ; 09f2 90 06 A09f4: LI $fa ; 09f4 20 fa AS $a ; 09f6 ca BT 1,A09a9 ; 09f7 81 b1 A09f9: LR A,$b ; 09f9 4b CI $18 ; 09fa 25 18 BT 4,A0a08 ; 09fc 84 0b LISL 1 ; 09fe 69 INC ; 09ff 1f BT 4,A0a08 ; 0a00 84 07 LR A,$a ; 0a02 4a COM ; 0a03 18 INC ; 0a04 1f AS (IS) ; 0a05 cc BF $4,A09a9 ; 0a06 94 a2 A0a08: PI A0d38 ; 0a08 28 0d 38 BT 1,A0a10 ; 0a0b 81 04 LIS $1 ; 0a0d 71 BF $0,A0a12 ; 0a0e 90 03 A0a10: LI $ff ; 0a10 20 ff A0a12: LISL 5 ; 0a12 6d LR (IS),A ; 0a13 5c LISL 1 ; 0a14 69 LR A,(IS) ; 0a15 4c LR $a,A ; 0a16 5a PI A0cd8 ; 0a17 28 0c d8 LR $0,A ; 0a1a 50 DS $0 ; 0a1b 30 PI A0ce8 ; 0a1c 28 0c e8 PI A0bcc ; 0a1f 28 0b cc BF $0,A0a3e ; 0a22 90 1b A0a24: PI A0ddc ; 0a24 28 0d dc LISL 1 ; 0a27 69 LR A,(IS) ; 0a28 4c CI $18 ; 0a29 25 18 BT 1,A0a34 ; 0a2b 81 08 AI $e7 ; 0a2d 24 e7 DCI A0fb3 ; 0a2f 2a 0f b3 ADC ; 0a32 8e LM ; 0a33 16 A0a34: LISL 5 ; 0a34 6d AS (IS) ; 0a35 cc LISL 1 ; 0a36 69 LR (IS),A ; 0a37 5c PI A0de5 ; 0a38 28 0d e5 PI A0fd2 ; 0a3b 28 0f d2 A0a3e: LISU 2 ; 0a3e 62 LISL 1 ; 0a3f 69 LR A,(IS) ; 0a40 4c XS $b ; 0a41 eb BT 4,A0a70 ; 0a42 84 2d PI A0d38 ; 0a44 28 0d 38 BF $1,A0a4c ; 0a47 91 04 LIS $0 ; 0a49 70 BF $0,A0a4e ; 0a4a 90 03 A0a4c: LI $17 ; 0a4c 20 17 A0a4e: LISL 1 ; 0a4e 69 XS (IS) ; 0a4f ec BF $4,A0a24 ; 0a50 94 d3 LIS $5 ; 0a52 75 LR $b,A ; 0a53 5b A0a54: PI A0ddc ; 0a54 28 0d dc LI $20 ; 0a57 20 20 LR $5,A ; 0a59 55 PI $008f ; 0a5a 28 00 8f PI A0de5 ; 0a5d 28 0d e5 PI A0fd9 ; 0a60 28 0f d9 DS $b ; 0a63 3b BF $4,A0a54 ; 0a64 94 ef PI A0e4f ; 0a66 28 0e 4f LIS $0 ; 0a69 70 AS $a ; 0a6a ca BT 1,A0aaf ; 0a6b 81 43 JMP A0b7b ; 0a6d 29 0b 7b A0a70: LR A,(IS) ; 0a70 4c LR $a,A ; 0a71 5a PI A0ca9 ; 0a72 28 0c a9 PI A0d38 ; 0a75 28 0d 38 XS $3 ; 0a78 e3 BF $4,A0a81 ; 0a79 94 07 PI A0cd8 ; 0a7b 28 0c d8 INC ; 0a7e 1f BF $0,A0aa8 ; 0a7f 90 28 A0a81: PI A0cd8 ; 0a81 28 0c d8 BT 4,A0aa4 ; 0a84 84 1f LR A,$a ; 0a86 4a LR $b,A ; 0a87 5b PI A0fd9 ; 0a88 28 0f d9 PI A0fd9 ; 0a8b 28 0f d9 LI $19 ; 0a8e 20 19 LR $a,A ; 0a90 5a PI A0d38 ; 0a91 28 0d 38 BT 1,A0a97 ; 0a94 81 02 DS $a ; 0a96 3a A0a97: PI A0cd8 ; 0a97 28 0c d8 INC ; 0a9a 1f LR $0,A ; 0a9b 50 PI A0ce8 ; 0a9c 28 0c e8 PI A0bcc ; 0a9f 28 0b cc LR A,$b ; 0aa2 4b LR $a,A ; 0aa3 5a A0aa4: PI A0cc5 ; 0aa4 28 0c c5 LIS $1 ; 0aa7 71 A0aa8: LR $0,A ; 0aa8 50 PI A0ce8 ; 0aa9 28 0c e8 PI A0bcc ; 0aac 28 0b cc A0aaf: LISU 2 ; 0aaf 62 LISL 3 ; 0ab0 6b LIS $0 ; 0ab1 70 AS (IS) ; 0ab2 cc BF $4,A0ab6 ; 0ab3 94 02 LISL 4 ; 0ab5 6c A0ab6: LIS $0 ; 0ab6 70 AS (IS) ; 0ab7 cc BT 1,A0abd ; 0ab8 81 04 COM ; 0aba 18 BF $0,A0abe ; 0abb 90 02 A0abd: LIS $0 ; 0abd 70 A0abe: LR (IS),A ; 0abe 5c LISL 3 ; 0abf 6b LIS $0 ; 0ac0 70 AS (IS)+ ; 0ac1 cd AS (IS) ; 0ac2 cc BF $4,A0aeb ; 0ac3 94 27 LISU 7 ; 0ac5 67 LISL 1 ; 0ac6 69 LR A,(IS) ; 0ac7 4c INC ; 0ac8 1f BF $1,A0ad0 ; 0ac9 91 06 BF $4,A0b04 ; 0acb 94 38 LR (IS),A ; 0acd 5c BF $0,A0b1b ; 0ace 90 4c A0ad0: LR (IS),A ; 0ad0 5c PI A0d44 ; 0ad1 28 0d 44 LIS $0 ; 0ad4 70 LR $3,A ; 0ad5 53 A0ad6: PI A0d06 ; 0ad6 28 0d 06 BT 4,A0ad6 ; 0ad9 84 fc CI $20 ; 0adb 25 20 BT 4,A0af1 ; 0add 84 13 CI $40 ; 0adf 25 40 BF $4,A0ad6 ; 0ae1 94 f4 LISL 3 ; 0ae3 6b LR A,$3 ; 0ae4 43 COM ; 0ae5 18 LR (IS)+,A ; 0ae6 5d LR (IS),A ; 0ae7 5c INC ; 0ae8 1f BT 4,A0ad6 ; 0ae9 84 ec A0aeb: PI A0eab ; 0aeb 28 0e ab JMP A08e8 ; 0aee 29 08 e8 A0af1: LR A,$3 ; 0af1 43 INC ; 0af2 1f CI $06 ; 0af3 25 06 BT 1,A0af8 ; 0af5 81 02 LIS $1 ; 0af7 71 A0af8: LR $3,A ; 0af8 53 LISL 3 ; 0af9 6b LR (IS)+,A ; 0afa 5d LR (IS),A ; 0afb 5c PI A0d63 ; 0afc 28 0d 63 PI A0fd2 ; 0aff 28 0f d2 BF $0,A0ad6 ; 0b02 90 d3 A0b04: PI A0d9c ; 0b04 28 0d 9c LISU 2 ; 0b07 62 LISL 2 ; 0b08 6a LI $80 ; 0b09 20 80 XS (IS) ; 0b0b ec LR (IS),A ; 0b0c 5c PI A0d44 ; 0b0d 28 0d 44 A0b10: PI A0d06 ; 0b10 28 0d 06 CI $80 ; 0b13 25 80 BT 4,A0b2a ; 0b15 84 14 CI $20 ; 0b17 25 20 BF $4,A0b10 ; 0b19 94 f6 A0b1b: PI A0eab ; 0b1b 28 0e ab PI A0ed2 ; 0b1e 28 0e d2 LISU 2 ; 0b21 62 LISL 3 ; 0b22 6b LR A,$3 ; 0b23 43 LR (IS)+,A ; 0b24 5d LR A,$4 ; 0b25 44 LR (IS),A ; 0b26 5c JMP A08c5 ; 0b27 29 08 c5 A0b2a: LISU 2 ; 0b2a 62 LISL 0 ; 0b2b 68 LI $ff ; 0b2c 20 ff AS (IS) ; 0b2e cc BT 4,A0b3c ; 0b2f 84 0c LISL 2 ; 0b31 6a LR A,(IS) ; 0b32 4c SR 4 ; 0b33 14 SR 1 ; 0b34 12 SR 1 ; 0b35 12 SR 1 ; 0b36 12 XS (IS) ; 0b37 ec NI $01 ; 0b38 21 01 BT 4,A0b10 ; 0b3a 84 d5 A0b3c: LISL 0 ; 0b3c 68 LR A,(IS) ; 0b3d 4c CI $64 ; 0b3e 25 64 BT 4,A0b10 ; 0b40 84 cf LIS $d ; 0b42 7d LR $0,A ; 0b43 50 LI $33 ; 0b44 20 33 LR $1,A ; 0b46 51 LI $34 ; 0b47 20 34 LR $2,A ; 0b49 52 PI $0679 ; 0b4a 28 06 79 PI $0679 ; 0b4d 28 06 79 PI A0ff8 ; 0b50 28 0f f8 PI A0d1d ; 0b53 28 0d 1d PI A0ff5 ; 0b56 28 0f f5 PI A0d11 ; 0b59 28 0d 11 CI $80 ; 0b5c 25 80 BT 4,A0b66 ; 0b5e 84 07 CI $40 ; 0b60 25 40 BT 4,A0b7b ; 0b62 84 18 BF $0,A0b3c ; 0b64 90 d7 A0b66: LISU 2 ; 0b66 62 LISL 0 ; 0b67 68 LR A,(IS) ; 0b68 4c AI $66 ; 0b69 24 66 ASD (IS) ; 0b6b dc LR (IS),A ; 0b6c 5c LISL 2 ; 0b6d 6a LR A,(IS) ; 0b6e 4c NI $80 ; 0b6f 21 80 BT 4,A0b75 ; 0b71 84 03 OI $01 ; 0b73 22 01 A0b75: LR (IS),A ; 0b75 5c PI A0d1d ; 0b76 28 0d 1d BF $0,A0b10 ; 0b79 90 96 A0b7b: PI A0d9c ; 0b7b 28 0d 9c PI A0fd2 ; 0b7e 28 0f d2 LI $1b ; 0b81 20 1b LR $1,A ; 0b83 51 PI A0d38 ; 0b84 28 0d 38 LR $3,A ; 0b87 53 BF $1,A0b8d ; 0b88 91 04 LI $45 ; 0b8a 20 45 LR $1,A ; 0b8c 51 A0b8d: LI $34 ; 0b8d 20 34 LR $2,A ; 0b8f 52 DCI A0f45 ; 0b90 2a 0f 45 LIS $3 ; 0b93 73 LR $4,A ; 0b94 54 A0b95: LR A,$3 ; 0b95 43 LR $0,A ; 0b96 50 PI $067c ; 0b97 28 06 7c DS $4 ; 0b9a 34 BF $4,A0b95 ; 0b9b 94 f9 LI $40 ; 0b9d 20 40 LR $3,A ; 0b9f 53 LI $45 ; 0ba0 20 45 LR $1,A ; 0ba2 51 PI A0d38 ; 0ba3 28 0d 38 BF $1,A0bae ; 0ba6 91 07 LI $80 ; 0ba8 20 80 LR $3,A ; 0baa 53 LI $15 ; 0bab 20 15 LR $1,A ; 0bad 51 A0bae: LIS $4 ; 0bae 74 LR $4,A ; 0baf 54 A0bb0: LR A,$3 ; 0bb0 43 LR $0,A ; 0bb1 50 PI $067c ; 0bb2 28 06 7c DS $4 ; 0bb5 34 BF $4,A0bb0 ; 0bb6 94 f9 PI A0fd9 ; 0bb8 28 0f d9 PI A0d0c ; 0bbb 28 0d 0c CI $40 ; 0bbe 25 40 BF $4,A0b7b ; 0bc0 94 ba PI A0d17 ; 0bc2 28 0d 17 CI $40 ; 0bc5 25 40 BF $4,A0b7b ; 0bc7 94 b3 JMP A0816 ; 0bc9 29 08 16 A0bcc: LR K,P ; 0bcc 08 PI $0107 ; 0bcd 28 01 07 LR A,$a ; 0bd0 4a CI $19 ; 0bd1 25 19 BT 1,A0bd8 ; 0bd3 81 04 LIS $0 ; 0bd5 70 BF $0,A0bff ; 0bd6 90 28 A0bd8: AI $e8 ; 0bd8 24 e8 BF $1,A0bfd ; 0bda 91 22 LI $0d ; 0bdc 20 0d BF $4,A0be2 ; 0bde 94 03 LI $1f ; 0be0 20 1f A0be2: LR $2,A ; 0be2 52 LI $35 ; 0be3 20 35 LR $1,A ; 0be5 51 LIS $7 ; 0be6 77 LR $3,A ; 0be7 53 A0be8: LI $d0 ; 0be8 20 d0 LR $0,A ; 0bea 50 PI $0679 ; 0beb 28 06 79 LR A,$1 ; 0bee 41 AI $fa ; 0bef 24 fa LR $1,A ; 0bf1 51 LIS $2 ; 0bf2 72 AS $2 ; 0bf3 c2 LR $2,A ; 0bf4 52 DS $3 ; 0bf5 33 BF $4,A0be8 ; 0bf6 94 f1 LR A,$1 ; 0bf8 41 INC ; 0bf9 1f LR $1,A ; 0bfa 51 BF $0,A0c4c ; 0bfb 90 50 A0bfd: NI $01 ; 0bfd 21 01 A0bff: LR $0,A ; 0bff 50 LI $1f ; 0c00 20 1f LR $2,A ; 0c02 52 LR A,$a ; 0c03 4a CI $0b ; 0c04 25 0b BT 1,A0c13 ; 0c06 81 0c CI $1a ; 0c08 25 1a BT 4,A0c13 ; 0c0a 84 08 LI $0d ; 0c0c 20 0d LR $2,A ; 0c0e 52 LR A,$a ; 0c0f 4a AI $e8 ; 0c10 24 e8 COM ; 0c12 18 A0c13: DCI A0fc6 ; 0c13 2a 0f c6 ADC ; 0c16 8e LM ; 0c17 16 LR $1,A ; 0c18 51 LR A,$a ; 0c19 4a CI $19 ; 0c1a 25 19 BT 1,A0c21 ; 0c1c 81 04 LI $5b ; 0c1e 20 5b LR $1,A ; 0c20 51 A0c21: LIS $5 ; 0c21 75 LR $9,A ; 0c22 59 LI $c0 ; 0c23 20 c0 LR $3,A ; 0c25 53 A0c26: DCI A0f8f ; 0c26 2a 0f 8f LR A,$a ; 0c29 4a CI $19 ; 0c2a 25 19 BT 1,A0c31 ; 0c2c 81 04 DCI $0f9e ; 0c2e 2a 0f 9e A0c31: PI A0cfd ; 0c31 28 0c fd LIS $3 ; 0c34 73 AS $2 ; 0c35 c2 LR $2,A ; 0c36 52 DS $9 ; 0c37 39 BF $4,A0c26 ; 0c38 94 ed DCI A0f8f ; 0c3a 2a 0f 8f LR A,$a ; 0c3d 4a CI $19 ; 0c3e 25 19 BT 1,A0c45 ; 0c40 81 04 DCI $0f9e ; 0c42 2a 0f 9e A0c45: LR A,$0 ; 0c45 40 SL 1 ; 0c46 13 LR $0,A ; 0c47 50 DS $2 ; 0c48 32 PI A0cfd ; 0c49 28 0c fd A0c4c: PI A0ca9 ; 0c4c 28 0c a9 CI $80 ; 0c4f 25 80 BT 4,A0c5a ; 0c51 84 08 LI $1a ; 0c53 20 1a LR $2,A ; 0c55 52 LI $fd ; 0c56 20 fd BF $0,A0c5e ; 0c58 90 05 A0c5a: LI $0e ; 0c5a 20 0e LR $2,A ; 0c5c 52 LIS $3 ; 0c5d 73 A0c5e: LISU 6 ; 0c5e 66 LISL 4 ; 0c5f 6c LR (IS),A ; 0c60 5c LR A,$a ; 0c61 4a CI $18 ; 0c62 25 18 BT 4,A0c6e ; 0c64 84 09 CI $1a ; 0c66 25 1a BT 4,A0c6e ; 0c68 84 05 CI $0b ; 0c6a 25 0b BF $1,A0c72 ; 0c6c 91 05 A0c6e: LR A,$2 ; 0c6e 42 AI $12 ; 0c6f 24 12 LR $2,A ; 0c71 52 A0c72: PI A0cd8 ; 0c72 28 0c d8 BT 4,A0ca5 ; 0c75 84 2f LISU 6 ; 0c77 66 LISL 5 ; 0c78 6d LR (IS),A ; 0c79 5c LIS $2 ; 0c7a 72 LR $0,A ; 0c7b 50 LR A,(IS) ; 0c7c 4c AI $f6 ; 0c7d 24 f6 BT 1,A0c88 ; 0c7f 81 08 DS $0 ; 0c81 30 AI $05 ; 0c82 24 05 BT 1,A0c88 ; 0c84 81 03 A0c86: DS $0 ; 0c86 30 LR A,(IS) ; 0c87 4c A0c88: LISL 6 ; 0c88 6e LR (IS),A ; 0c89 5c A0c8a: DCI A0f7d ; 0c8a 2a 0f 7d LR A,$3 ; 0c8d 43 CI $80 ; 0c8e 25 80 BF $4,A0c95 ; 0c90 94 04 DCI A0f86 ; 0c92 2a 0f 86 A0c95: DS (IS)- ; 0c95 3e BF $1,A0c86 ; 0c96 91 ef PI A0cfd ; 0c98 28 0c fd LISL 4 ; 0c9b 6c LR A,$2 ; 0c9c 42 AS (IS)+ ; 0c9d cd LR $2,A ; 0c9e 52 LR A,$0 ; 0c9f 40 COM ; 0ca0 18 AS (IS) ; 0ca1 cc LR (IS)+,A ; 0ca2 5d BF $4,A0c8a ; 0ca3 94 e6 A0ca5: PI $011e ; 0ca5 28 01 1e PK ; 0ca8 0c A0ca9: LR A,$a ; 0ca9 4a SL 1 ; 0caa 13 SR 4 ; 0cab 14 AI $3c ; 0cac 24 3c LR IS,A ; 0cae 0b LIS $7 ; 0caf 77 NS $a ; 0cb0 fa LR $3,A ; 0cb1 53 LR A,(IS) ; 0cb2 4c A0cb3: BT 4,A0cb9 ; 0cb3 84 05 SR 1 ; 0cb5 12 DS $3 ; 0cb6 33 BF $0,A0cb3 ; 0cb7 90 fb A0cb9: NI $01 ; 0cb9 21 01 BT 4,A0cc1 ; 0cbb 84 05 LI $80 ; 0cbd 20 80 LR $3,A ; 0cbf 53 POP ; 0cc0 1c A0cc1: LI $40 ; 0cc1 20 40 LR $3,A ; 0cc3 53 POP ; 0cc4 1c A0cc5: LR A,$a ; 0cc5 4a SL 1 ; 0cc6 13 SR 4 ; 0cc7 14 AI $3c ; 0cc8 24 3c LR IS,A ; 0cca 0b LIS $7 ; 0ccb 77 NS $a ; 0ccc fa LR $9,A ; 0ccd 59 LIS $1 ; 0cce 71 A0ccf: BT 4,A0cd5 ; 0ccf 84 05 SL 1 ; 0cd1 13 DS $9 ; 0cd2 39 BF $0,A0ccf ; 0cd3 90 fb A0cd5: XS (IS) ; 0cd5 ec LR (IS),A ; 0cd6 5c POP ; 0cd7 1c A0cd8: LR A,$a ; 0cd8 4a SR 1 ; 0cd9 12 AI $16 ; 0cda 24 16 LR IS,A ; 0cdc 0b LIS $1 ; 0cdd 71 NS $a ; 0cde fa BT 4,A0ce5 ; 0cdf 84 05 LR A,(IS) ; 0ce1 4c SL 4 ; 0ce2 15 SR 4 ; 0ce3 14 POP ; 0ce4 1c A0ce5: LR A,(IS) ; 0ce5 4c SR 4 ; 0ce6 14 POP ; 0ce7 1c A0ce8: LR A,$a ; 0ce8 4a SR 1 ; 0ce9 12 AI $16 ; 0cea 24 16 LR IS,A ; 0cec 0b LIS $1 ; 0ced 71 NS $a ; 0cee fa BT 4,A0cf7 ; 0cef 84 07 LI $f0 ; 0cf1 20 f0 A0cf3: NS (IS) ; 0cf3 fc AS $0 ; 0cf4 c0 LR (IS),A ; 0cf5 5c POP ; 0cf6 1c A0cf7: LR A,$0 ; 0cf7 40 SL 4 ; 0cf8 15 LR $0,A ; 0cf9 50 LIS $f ; 0cfa 7f BF $0,A0cf3 ; 0cfb 90 f7 A0cfd: LIS $3 ; 0cfd 73 LR $4,A ; 0cfe 54 LR A,$0 ; 0cff 40 SL 1 ; 0d00 13 AS $0 ; 0d01 c0 ADC ; 0d02 8e JMP $071d ; 0d03 29 07 1d A0d06: LISL 2 ; 0d06 6a LISU 2 ; 0d07 62 LIS $0 ; 0d08 70 AS (IS) ; 0d09 cc BF $1,A0d17 ; 0d0a 91 0c A0d0c: LIS $0 ; 0d0c 70 OUTS 1 ; 0d0d b1 INS 1 ; 0d0e a1 BF $0,A0d1a ; 0d0f 90 0a A0d11: LISL 2 ; 0d11 6a LISU 2 ; 0d12 62 LIS $0 ; 0d13 70 AS (IS) ; 0d14 cc BF $1,A0d0c ; 0d15 91 f6 A0d17: LIS $0 ; 0d17 70 OUTS 4 ; 0d18 b4 INS 4 ; 0d19 a4 A0d1a: COM ; 0d1a 18 LR $0,A ; 0d1b 50 POP ; 0d1c 1c A0d1d: LR K,P ; 0d1d 08 PI $0107 ; 0d1e 28 01 07 LI $33 ; 0d21 20 33 LR $1,A ; 0d23 51 LI $34 ; 0d24 20 34 LR $2,A ; 0d26 52 LISU 2 ; 0d27 62 LISL 0 ; 0d28 68 LR A,(IS) ; 0d29 4c SR 4 ; 0d2a 14 OI $c0 ; 0d2b 22 c0 LR $0,A ; 0d2d 50 PI $0679 ; 0d2e 28 06 79 LR A,(IS) ; 0d31 4c NI $0f ; 0d32 21 0f OI $c0 ; 0d34 22 c0 BF $0,A0d5d ; 0d36 90 26 A0d38: LISU 2 ; 0d38 62 LISL 2 ; 0d39 6a LIS $0 ; 0d3a 70 AS (IS) ; 0d3b cc BT 1,A0d41 ; 0d3c 81 04 LI $80 ; 0d3e 20 80 POP ; 0d40 1c A0d41: LI $40 ; 0d41 20 40 POP ; 0d43 1c A0d44: LR K,P ; 0d44 08 PI $0107 ; 0d45 28 01 07 PI A0d38 ; 0d48 28 0d 38 LR $0,A ; 0d4b 50 LR $3,A ; 0d4c 53 BT 1,A0d53 ; 0d4d 81 05 LI $21 ; 0d4f 20 21 BF $0,A0d55 ; 0d51 90 03 A0d53: LI $45 ; 0d53 20 45 A0d55: LR $1,A ; 0d55 51 LI $34 ; 0d56 20 34 LR $2,A ; 0d58 52 PI $0679 ; 0d59 28 06 79 LR A,$3 ; 0d5c 43 A0d5d: LR $0,A ; 0d5d 50 PI $0679 ; 0d5e 28 06 79 BF $0,A0d98 ; 0d61 90 36 A0d63: LR K,P ; 0d63 08 PI $0107 ; 0d64 28 01 07 LI $45 ; 0d67 20 45 LR $1,A ; 0d69 51 PI A0d38 ; 0d6a 28 0d 38 LISL 3 ; 0d6d 6b LR $a,A ; 0d6e 5a BT 1,A0d74 ; 0d6f 81 04 LI $21 ; 0d71 20 21 LR $1,A ; 0d73 51 A0d74: LI $34 ; 0d74 20 34 LR $2,A ; 0d76 52 LIS $0 ; 0d77 70 AS (IS)+ ; 0d78 cd BT 1,A0d7c ; 0d79 81 02 COM ; 0d7b 18 A0d7c: AS $a ; 0d7c ca LR $0,A ; 0d7d 50 NI $0f ; 0d7e 21 0f BF $4,A0d84 ; 0d80 94 03 LIS $d ; 0d82 7d LR $0,A ; 0d83 50 A0d84: PI $0679 ; 0d84 28 06 79 LIS $0 ; 0d87 70 AS (IS)- ; 0d88 ce BT 1,A0d8c ; 0d89 81 02 COM ; 0d8b 18 A0d8c: AS $a ; 0d8c ca LR $0,A ; 0d8d 50 NI $0f ; 0d8e 21 0f BF $4,A0d94 ; 0d90 94 03 LIS $d ; 0d92 7d LR $0,A ; 0d93 50 A0d94: PI $0679 ; 0d94 28 06 79 LISL 2 ; 0d97 6a A0d98: PI $011e ; 0d98 28 01 1e PK ; 0d9b 0c A0d9c: LR K,P ; 0d9c 08 PI $0107 ; 0d9d 28 01 07 LIS $d ; 0da0 7d LR $0,A ; 0da1 50 LI $15 ; 0da2 20 15 LR $1,A ; 0da4 51 LI $34 ; 0da5 20 34 LR $2,A ; 0da7 52 LIS $4 ; 0da8 74 LR $3,A ; 0da9 53 A0daa: PI $0679 ; 0daa 28 06 79 DS $3 ; 0dad 33 BF $4,A0daa ; 0dae 94 fb LI $45 ; 0db0 20 45 LR $1,A ; 0db2 51 LIS $4 ; 0db3 74 LR $3,A ; 0db4 53 A0db5: PI $0679 ; 0db5 28 06 79 DS $3 ; 0db8 33 BF $4,A0db5 ; 0db9 94 fb BF $0,A0d98 ; 0dbb 90 dc A0dbd: LR K,P ; 0dbd 08 PI $0107 ; 0dbe 28 01 07 LISU 2 ; 0dc1 62 LISL 4 ; 0dc2 6c LIS $0 ; 0dc3 70 AS (IS) ; 0dc4 cc LR $4,A ; 0dc5 54 BT 1,A0dca ; 0dc6 81 03 LIS $0 ; 0dc8 70 LR (IS),A ; 0dc9 5c A0dca: LISL 3 ; 0dca 6b LIS $0 ; 0dcb 70 AS (IS) ; 0dcc cc LR $3,A ; 0dcd 53 BT 1,A0dd2 ; 0dce 81 03 LIS $0 ; 0dd0 70 LR (IS),A ; 0dd1 5c A0dd2: PI A0d63 ; 0dd2 28 0d 63 LISL 3 ; 0dd5 6b LR A,$3 ; 0dd6 43 LR (IS)+,A ; 0dd7 5d LR A,$4 ; 0dd8 44 LR (IS)-,A ; 0dd9 5e BF $0,A0d98 ; 0dda 90 bd A0ddc: LR K,P ; 0ddc 08 PI $0107 ; 0ddd 28 01 07 DCI $0f9e ; 0de0 2a 0f 9e BF $0,A0e0a ; 0de3 90 26 A0de5: LR K,P ; 0de5 08 PI $0107 ; 0de6 28 01 07 DCI A0f98 ; 0de9 2a 0f 98 LIS $1 ; 0dec 71 LR $0,A ; 0ded 50 PI A0d38 ; 0dee 28 0d 38 BT 1,A0df4 ; 0df1 81 02 DS $0 ; 0df3 30 A0df4: LISU 2 ; 0df4 62 LISL 1 ; 0df5 69 LR A,(IS) ; 0df6 4c CI $1a ; 0df7 25 1a BT 4,A0e03 ; 0df9 84 09 CI $18 ; 0dfb 25 18 BT 4,A0e03 ; 0dfd 84 05 CI $0b ; 0dff 25 0b BF $1,A0e06 ; 0e01 91 04 A0e03: LIS $1 ; 0e03 71 XS $0 ; 0e04 e0 LR $0,A ; 0e05 50 A0e06: LR A,$0 ; 0e06 40 ADC ; 0e07 8e ADC ; 0e08 8e ADC ; 0e09 8e A0e0a: LR Q,DC ; 0e0a 0e LISU 2 ; 0e0b 62 LISL 1 ; 0e0c 69 LI $36 ; 0e0d 20 36 LR $1,A ; 0e0f 51 LR A,(IS) ; 0e10 4c AI $e6 ; 0e11 24 e6 BF $1,A0e1c ; 0e13 91 08 LI $5b ; 0e15 20 5b LR $1,A ; 0e17 51 BT 4,A0e22 ; 0e18 84 09 BF $0,A0e26 ; 0e1a 90 0b A0e1c: AI $02 ; 0e1c 24 02 BF $1,A0e36 ; 0e1e 91 17 BF $4,A0e26 ; 0e20 94 05 A0e22: LI $30 ; 0e22 20 30 BF $0,A0e28 ; 0e24 90 03 A0e26: LI $0a ; 0e26 20 0a A0e28: LR $2,A ; 0e28 52 A0e29: LISL 2 ; 0e29 6a LIS $0 ; 0e2a 70 LR $0,A ; 0e2b 50 PI A0d38 ; 0e2c 28 0d 38 LR $3,A ; 0e2f 53 LR DC,Q ; 0e30 0f PI A0cfd ; 0e31 28 0c fd BF $0,A0e86 ; 0e34 90 51 A0e36: AI $0c ; 0e36 24 0c BT 1,A0e40 ; 0e38 81 07 LI $30 ; 0e3a 20 30 LR $2,A ; 0e3c 52 LR A,(IS) ; 0e3d 4c BF $0,A0e47 ; 0e3e 90 08 A0e40: LI $0a ; 0e40 20 0a LR $2,A ; 0e42 52 LR A,(IS) ; 0e43 4c AI $e8 ; 0e44 24 e8 COM ; 0e46 18 A0e47: DCI A0fc6 ; 0e47 2a 0f c6 ADC ; 0e4a 8e LM ; 0e4b 16 LR $1,A ; 0e4c 51 BF $0,A0e29 ; 0e4d 90 db A0e4f: LR K,P ; 0e4f 08 PI $0107 ; 0e50 28 01 07 LI $1b ; 0e53 20 1b LR $a,A ; 0e55 5a LIS $1 ; 0e56 71 LR $1,A ; 0e57 51 PI A0d38 ; 0e58 28 0d 38 LR $4,A ; 0e5b 54 BF $1,A0e69 ; 0e5c 91 0c PI A0cd8 ; 0e5e 28 0c d8 BF $4,A0e86 ; 0e61 94 24 LR $1,A ; 0e63 51 DS $1 ; 0e64 31 LI $17 ; 0e65 20 17 BF $0,A0e6f ; 0e67 90 07 A0e69: DS $a ; 0e69 3a PI A0cd8 ; 0e6a 28 0c d8 BF $4,A0e86 ; 0e6d 94 18 A0e6f: LR $a,A ; 0e6f 5a PI A0cd8 ; 0e70 28 0c d8 BT 4,A0e7b ; 0e73 84 07 PI A0ca9 ; 0e75 28 0c a9 XS $4 ; 0e78 e4 BT 4,A0e86 ; 0e79 84 0c A0e7b: LR A,$a ; 0e7b 4a AS $1 ; 0e7c c1 BF $1,A0e83 ; 0e7d 91 05 CI $18 ; 0e7f 25 18 BF $4,A0e6f ; 0e81 94 ed A0e83: LI $ff ; 0e83 20 ff LR $a,A ; 0e85 5a A0e86: PI $011e ; 0e86 28 01 1e PK ; 0e89 0c A0e8a: LISU 2 ; 0e8a 62 LISL 3 ; 0e8b 6b A0e8c: LIS $0 ; 0e8c 70 AS (IS)+ ; 0e8d cd BT 1,A0e91 ; 0e8e 81 02 COM ; 0e90 18 A0e91: BT 4,A0e8c ; 0e91 84 fa LR $1,A ; 0e93 51 LISL 2 ; 0e94 6a LIS $0 ; 0e95 70 AS (IS)- ; 0e96 ce BF $1,A0e9d ; 0e97 91 05 LR A,$1 ; 0e99 41 COM ; 0e9a 18 INC ; 0e9b 1f LR $1,A ; 0e9c 51 A0e9d: LR A,(IS) ; 0e9d 4c CI $18 ; 0e9e 25 18 BT 1,A0ea9 ; 0ea0 81 08 AI $e7 ; 0ea2 24 e7 DCI A0fb3 ; 0ea4 2a 0f b3 ADC ; 0ea7 8e LM ; 0ea8 16 A0ea9: AS $1 ; 0ea9 c1 POP ; 0eaa 1c A0eab: LR K,P ; 0eab 08 PI $0107 ; 0eac 28 01 07 PI A0ddc ; 0eaf 28 0d dc LI $19 ; 0eb2 20 19 LR $a,A ; 0eb4 5a PI A0d38 ; 0eb5 28 0d 38 BF $1,A0ebb ; 0eb8 91 02 DS $a ; 0eba 3a A0ebb: PI A0cd8 ; 0ebb 28 0c d8 LISU 2 ; 0ebe 62 LISL 1 ; 0ebf 69 BT 4,A0ec4 ; 0ec0 84 03 LR A,$a ; 0ec2 4a LR (IS),A ; 0ec3 5c A0ec4: LR A,(IS) ; 0ec4 4c CI $17 ; 0ec5 25 17 BT 1,A0ed0 ; 0ec7 81 08 COM ; 0ec9 18 INC ; 0eca 1f AS $a ; 0ecb ca BT 4,A0ed0 ; 0ecc 84 03 LIS $0 ; 0ece 70 LR (IS),A ; 0ecf 5c A0ed0: BF $0,A0f10 ; 0ed0 90 3f A0ed2: LR K,P ; 0ed2 08 PI $0107 ; 0ed3 28 01 07 PI A0d44 ; 0ed6 28 0d 44 A0ed9: PI A0d06 ; 0ed9 28 0d 06 CI $20 ; 0edc 25 20 BF $4,A0ed9 ; 0ede 94 fa A0ee0: PI A0ff8 ; 0ee0 28 0f f8 PI A0f30 ; 0ee3 28 0f 30 LR A,$0 ; 0ee6 40 LR $3,A ; 0ee7 53 PI A0f30 ; 0ee8 28 0f 30 LR A,$0 ; 0eeb 40 LR $4,A ; 0eec 54 LR $1,A ; 0eed 51 LI $21 ; 0eee 20 21 LR $1,A ; 0ef0 51 PI A0d38 ; 0ef1 28 0d 38 LR $a,A ; 0ef4 5a BF $1,A0efa ; 0ef5 91 04 LI $45 ; 0ef7 20 45 LR $1,A ; 0ef9 51 A0efa: LI $34 ; 0efa 20 34 LR $2,A ; 0efc 52 LR A,$3 ; 0efd 43 AS $a ; 0efe ca LR $0,A ; 0eff 50 PI $0679 ; 0f00 28 06 79 LR A,$4 ; 0f03 44 AS $a ; 0f04 ca LR $0,A ; 0f05 50 PI $0679 ; 0f06 28 06 79 PI A0d06 ; 0f09 28 0d 06 CI $20 ; 0f0c 25 20 BT 4,A0ee0 ; 0f0e 84 d1 A0f10: PI $011e ; 0f10 28 01 1e PK ; 0f13 0c A0f14: DCI A0f68 ; 0f14 2a 0f 68 LIS $0 ; 0f17 70 LR $0,A ; 0f18 50 LR $1,A ; 0f19 51 LISU 4 ; 0f1a 64 LISL 6 ; 0f1b 6e A0f1c: LR A,$1 ; 0f1c 41 AS (IS)- ; 0f1d ce LR $1,A ; 0f1e 51 LR A,$0 ; 0f1f 40 LNK ; 0f20 19 AS (IS) ; 0f21 cc LR $0,A ; 0f22 50 LM ; 0f23 16 LR IS,A ; 0f24 0b BR7 A0f1c ; 0f25 8f f6 LISL 6 ; 0f27 6e LIS $5 ; 0f28 75 AS $1 ; 0f29 c1 LR (IS)-,A ; 0f2a 5e LIS $8 ; 0f2b 78 LNK ; 0f2c 19 AS $0 ; 0f2d c0 LR (IS),A ; 0f2e 5c POP ; 0f2f 1c A0f30: LR A,IS ; 0f30 0a LR $2,A ; 0f31 52 LR K,P ; 0f32 08 PI $0107 ; 0f33 28 01 07 A0f36: PI A0f14 ; 0f36 28 0f 14 LR A,(IS) ; 0f39 4c SR 4 ; 0f3a 14 CI $05 ; 0f3b 25 05 BF $2,A0f36 ; 0f3d 92 f8 INC ; 0f3f 1f LR $0,A ; 0f40 50 LR A,$2 ; 0f41 42 LR IS,A ; 0f42 0b BF $0,A0f10 ; 0f43 90 cc A0f45: AM ; 0f45 88 AM ; 0f46 88 INS 8 ; 0f47 a8 INS 8 ; 0f48 a8 NS $8 ; 0f49 f8 LIS $0 ; 0f4a 70 LI $20 ; 0f4b 20 20 LI $70 ; 0f4d 20 70 AM ; 0f4f 88 AS $8 ; 0f50 c8 INS 8 ; 0f51 a8 BF $8,-120 ; 0f52 98 88 BT 0,-128 ; 0f54 80 80 BT 0,-128 ; 0f56 80 80 NS $8 ; 0f58 f8 NS $8 ; 0f59 f8 AM ; 0f5a 88 AM ; 0f5b 88 AM ; 0f5c 88 NS $8 ; 0f5d f8 NS $8 ; 0f5e f8 A0f5f: BT 0,A0fd0 ; 0f5f 80 70 LR K,P ; 0f61 08 NS $8 ; 0f62 f8 NS $8 ; 0f63 f8 BT 0,A0f45 ; 0f64 80 e0 BT 0,A0f5f ; 0f66 80 f8 A0f68: LR A,KL ; 0f68 01 IN $01 ; 0f69 26 01 LR A,KL ; 0f6b 01 IN $01 ; 0f6c 26 01 IN $01 ; 0f6e 26 01 LR A,KL ; 0f70 01 LR A,KL ; 0f71 01 LR A,KL ; 0f72 01 LR A,KL ; 0f73 01 IN $01 ; 0f74 26 01 IN $01 ; 0f76 26 01 IN $01 ; 0f78 26 01 LR A,KL ; 0f7a 01 IN $27 ; 0f7b 26 27 A0f7d: LR A,KU ; 0f7d 00 LR A,$0 ; 0f7e 40 INS 0 ; 0f7f a0 LR A,KU ; 0f80 00 XS $0 ; 0f81 e0 INS 0 ; 0f82 a0 LR A,$0 ; 0f83 40 XS $0 ; 0f84 e0 INS 0 ; 0f85 a0 A0f86: INS 0 ; 0f86 a0 LR A,$0 ; 0f87 40 LR A,KU ; 0f88 00 INS 0 ; 0f89 a0 XS $0 ; 0f8a e0 LR A,KU ; 0f8b 00 INS 0 ; 0f8c a0 XS $0 ; 0f8d e0 LR A,$0 ; 0f8e 40 A0f8f: LR A,$0 ; 0f8f 40 LR A,$0 ; 0f90 40 LR A,$0 ; 0f91 40 LR A,$0 ; 0f92 40 LR A,$0 ; 0f93 40 LR A,KU ; 0f94 00 LR A,KU ; 0f95 00 LR A,$0 ; 0f96 40 LR A,$0 ; 0f97 40 A0f98: BT 0,A0ff9 ; 0f98 80 60 BT 0,A0fbb ; 0f9a 80 20 AS $0 ; 0f9c c0 LI $00 ; 0f9d 20 00 LR A,KU ; 0f9f 00 LR A,KU ; 0fa0 00 A0fa1: LI $00 ; 0fa1 20 00 LR KL,A ; 0fa3 05 LR A,QL ; 0fa4 03 LR A,KU ; 0fa5 00 LR KL,A ; 0fa6 05 LR $0,A ; 0fa7 50 LR A,KU ; 0fa8 00 DS $0 ; 0fa9 30 LR $0,A ; 0faa 50 LR A,KU ; 0fab 00 LR A,QU ; 0fac 02 LR A,KU ; 0fad 00 LR A,KU ; 0fae 00 A0faf: LR A,KL ; 0faf 01 LR K,P ; 0fb0 08 LR KL,A ; 0fb1 05 LR QU,A ; 0fb2 06 A0fb3: db $ff db $ff COM ; 0fb5 18 A0fb6: LR P,K ; 0fb6 09 OUT $09 ; 0fb7 27 09 AI $09 ; 0fb9 24 09 A0fbb: BT 6,A0fc5 ; 0fbb 86 09 LISL 7 ; 0fbd 6f LR P,K ; 0fbe 09 BF $8,A0fc9 ; 0fbf 98 09 COM ; 0fc1 18 LR P,K ; 0fc2 09 LR A,KU ; 0fc3 00 LR P,K ; 0fc4 09 A0fc5: db $b2 A0fc6: LR $6,A ; 0fc6 56 LR $1,A ; 0fc7 51 LR A,(IS) ; 0fc8 4c A0fc9: LR A,$7 ; 0fc9 47 LR A,$2 ; 0fca 42 DS (IS)+ ; 0fcb 3d db $2f DCI $2520 ; 0fcd 2a 25 20 A0fd0: EI ; 0fd0 1b LM ; 0fd1 16 A0fd2: LI $80 ; 0fd2 20 80 A0fd4: LR $8,A ; 0fd4 58 LI $40 ; 0fd5 20 40 BF $0,A0fde ; 0fd7 90 06 A0fd9: LI $80 ; 0fd9 20 80 A0fdb: LR $8,A ; 0fdb 58 LI $80 ; 0fdc 20 80 A0fde: LR $0,A ; 0fde 50 LR K,P ; 0fdf 08 PI $0107 ; 0fe0 28 01 07 LIS $f ; 0fe3 7f LR $5,A ; 0fe4 55 PI $008f ; 0fe5 28 00 8f LR A,$0 ; 0fe8 40 OUTS 5 ; 0fe9 b5 LR A,$8 ; 0fea 48 LR $5,A ; 0feb 55 PI $008f ; 0fec 28 00 8f LIS $0 ; 0fef 70 OUTS 5 ; 0ff0 b5 PI $011e ; 0ff1 28 01 1e PK ; 0ff4 0c A0ff5: LIS $f ; 0ff5 7f BF $0,A0fd4 ; 0ff6 90 dd A0ff8: LIS $1 ; 0ff8 71 A0ff9: BF $0,A0fdb ; 0ff9 90 e1 db $ff db $ff db $ff db $ff db $ff