Reset: equ $0000 org $0800 CartridgeStart: LR $5,A ; 0800 55 Cartridge marker LR K,P ; 0801 08 is skipped CartridgeEntry: LI $d6 ; 0802 20 d6 Palette and color for clear screen LR $3,A ; 0804 53 PI $00d0 ; 0805 28 00 d0 BIOS_CLEAR_SCREEN LI $8c ; 0808 20 8c Load red "T" in r0 LR $0,A ; 080a 50 PI $0099 ; 080b 28 00 99 BIOS_PROMPTS LR A,$4 ; 080e 44 Button presses stored in r4 from prompts routine. CI $01 ; 080f 25 01 Button 1? BT 4,A0824 ; 0811 84 12 CI $02 ; 0813 25 02 Button 2? BT 4,A0821 ; 0815 84 0b CI $04 ; 0817 25 04 Button 4? BT 4,A081e ; 0819 84 04 JMP A0a44 ; 081b 29 0a 44 So it's button 3 then... A081e: JMP A098b ; 081e 29 09 8b Button 4 has been pressed A0821: JMP A1000 ; 0821 29 10 00 Button 2 has been pressed A0824: LI $d6 ; 0824 20 d6 Button 1 pressed, palette and color for clear screen LR $3,A ; 0826 53 PI $00d0 ; 0827 28 00 d0 BIOS_CLEAR_SCREEN LIS $6 ; 082a 76 LR $4,A ; 082b 54 LI $40 ; 082c 20 40 LR $3,A ; 082e 53 LI $38 ; 082f 20 38 LR $2,A ; 0831 52 A0832: LIS $f ; 0832 7f LR $1,A ; 0833 51 DCI A1200 ; 0834 2a 12 00 PI $071d ; 0837 28 07 1d LI $15 ; 083a 20 15 LR $1,A ; 083c 51 PI $071d ; 083d 28 07 1d LI $1b ; 0840 20 1b LR $1,A ; 0842 51 PI $071d ; 0843 28 07 1d DS $2 ; 0846 32 LR A,$2 ; 0847 42 CI $30 ; 0848 25 30 BF $4,A0832 ; 084a 94 e7 LI $68 ; 084c 20 68 LR $1,A ; 084e 51 LIS $7 ; 084f 77 LR $4,A ; 0850 54 A0851: LI $29 ; 0851 20 29 LR $2,A ; 0853 52 LI $80 ; 0854 20 80 LR $3,A ; 0856 53 DCI A1236 ; 0857 2a 12 36 PI $071d ; 085a 28 07 1d LI $c0 ; 085d 20 c0 LR $3,A ; 085f 53 LI $30 ; 0860 20 30 LR $2,A ; 0862 52 PI $071d ; 0863 28 07 1d LI $37 ; 0866 20 37 LR $2,A ; 0868 52 PI $071d ; 0869 28 07 1d LIS $4 ; 086c 74 LR $5,A ; 086d 55 PI $008f ; 086e 28 00 8f LI $30 ; 0871 20 30 LR $2,A ; 0873 52 PI $071d ; 0874 28 07 1d LI $37 ; 0877 20 37 LR $2,A ; 0879 52 PI $071d ; 087a 28 07 1d LIS $4 ; 087d 74 LR $5,A ; 087e 55 PI $008f ; 087f 28 00 8f DS $1 ; 0882 31 LR A,$1 ; 0883 41 CI $20 ; 0884 25 20 BF $4,A0851 ; 0886 94 ca LI $c0 ; 0888 20 c0 LR $3,A ; 088a 53 LI $30 ; 088b 20 30 LR $2,A ; 088d 52 LI $37 ; 088e 20 37 LR $2,A ; 0890 52 LIS $f ; 0891 7f LR $0,A ; 0892 50 LIS $6 ; 0893 76 LR $4,A ; 0894 54 A0895: LIS $0 ; 0895 70 LR $3,A ; 0896 53 A0897: DCI A1212 ; 0897 2a 12 12 LI $25 ; 089a 20 25 LR $2,A ; 089c 52 PI A0a90 ; 089d 28 0a 90 LI $2b ; 08a0 20 2b LR $2,A ; 08a2 52 PI A0a90 ; 08a3 28 0a 90 LI $40 ; 08a6 20 40 LR $5,A ; 08a8 55 PI $008f ; 08a9 28 00 8f LR A,$3 ; 08ac 43 CI $80 ; 08ad 25 80 LI $80 ; 08af 20 80 LR $3,A ; 08b1 53 BF $4,A0897 ; 08b2 94 e4 DS $0 ; 08b4 30 BF $4,A0895 ; 08b5 94 df LISL 1 ; 08b7 69 LISU 2 ; 08b8 62 LI $30 ; 08b9 20 30 LR (IS)+,A ; 08bb 5d LISL 3 ; 08bc 6b LI $12 ; 08bd 20 12 LR (IS)+,A ; 08bf 5d LI $79 ; 08c0 20 79 LR (IS),A ; 08c2 5c LI $28 ; 08c3 20 28 LR $2,A ; 08c5 52 PI A0abc ; 08c6 28 0a bc LI $f8 ; 08c9 20 f8 LR $2,A ; 08cb 52 A08cc: LIS $0 ; 08cc 70 LR $0,A ; 08cd 50 A08ce: LI $48 ; 08ce 20 48 LR $1,A ; 08d0 51 LI $c0 ; 08d1 20 c0 NS $0 ; 08d3 f0 LR $3,A ; 08d4 53 PI A0afe ; 08d5 28 0a fe LI $40 ; 08d8 20 40 NS $0 ; 08da f0 LR $3,A ; 08db 53 PI A0afe ; 08dc 28 0a fe LI $80 ; 08df 20 80 NS $0 ; 08e1 f0 LR $3,A ; 08e2 53 PI A0afe ; 08e3 28 0a fe LI $4c ; 08e6 20 4c LR $1,A ; 08e8 51 LIS $3 ; 08e9 73 AS $2 ; 08ea c2 LR $2,A ; 08eb 52 LI $80 ; 08ec 20 80 NS $0 ; 08ee f0 LR $3,A ; 08ef 53 PI A0afe ; 08f0 28 0a fe LI $c0 ; 08f3 20 c0 NS $0 ; 08f5 f0 LR $3,A ; 08f6 53 PI A0afe ; 08f7 28 0a fe LI $fd ; 08fa 20 fd AS $2 ; 08fc c2 LR $2,A ; 08fd 52 LR A,$0 ; 08fe 40 CI $00 ; 08ff 25 00 BF $4,A090b ; 0901 94 09 LIS $1 ; 0903 71 AS $2 ; 0904 c2 LR $2,A ; 0905 52 LI $c0 ; 0906 20 c0 LR $0,A ; 0908 50 BF $0,A08ce ; 0909 90 c4 A090b: LIS $f ; 090b 7f LR $5,A ; 090c 55 PI $008f ; 090d 28 00 8f LR A,$2 ; 0910 42 CI $0c ; 0911 25 0c BF $4,A08cc ; 0913 94 b8 LISL 6 ; 0915 6e LISU 2 ; 0916 62 LIS $d ; 0917 7d LR (IS)+,A ; 0918 5d LI $2c ; 0919 20 2c LR (IS),A ; 091b 5c LISL 1 ; 091c 69 LI $10 ; 091d 20 10 LR (IS),A ; 091f 5c PI A0abc ; 0920 28 0a bc LISL 3 ; 0923 6b LISU 2 ; 0924 62 LIS $c ; 0925 7c LR (IS),A ; 0926 5c LI $20 ; 0927 20 20 LR $2,A ; 0929 52 LI $40 ; 092a 20 40 LR $3,A ; 092c 53 PI A0c44 ; 092d 28 0c 44 PI A0abc ; 0930 28 0a bc PI A0939 ; 0933 28 09 39 JMP A0824 ; 0936 29 08 24 A0939: LR K,P ; 0939 08 PI $0107 ; 093a 28 01 07 LI $d6 ; 093d 20 d6 LR $3,A ; 093f 53 PI $00d0 ; 0940 28 00 d0 PI A0abc ; 0943 28 0a bc LIS $f ; 0946 7f LR $0,A ; 0947 50 LIS $8 ; 0948 78 LR $4,A ; 0949 54 A094a: LIS $0 ; 094a 70 LR $3,A ; 094b 53 A094c: DCI A1259 ; 094c 2a 12 59 LI $1b ; 094f 20 1b LR $1,A ; 0951 51 LI $10 ; 0952 20 10 LR $2,A ; 0954 52 PI $071d ; 0955 28 07 1d LI $23 ; 0958 20 23 LR $1,A ; 095a 51 PI $071d ; 095b 28 07 1d LI $18 ; 095e 20 18 LR $2,A ; 0960 52 LI $1b ; 0961 20 1b LR $1,A ; 0963 51 PI $071d ; 0964 28 07 1d LI $23 ; 0967 20 23 LR $1,A ; 0969 51 PI $071d ; 096a 28 07 1d LI $40 ; 096d 20 40 LR $5,A ; 096f 55 PI $008f ; 0970 28 00 8f LR A,$3 ; 0973 43 CI $80 ; 0974 25 80 LI $80 ; 0976 20 80 LR $3,A ; 0978 53 BF $4,A094c ; 0979 94 d2 DS $0 ; 097b 30 BF $4,A094a ; 097c 94 cd LI $2b ; 097e 20 2b LR $2,A ; 0980 52 LI $c0 ; 0981 20 c0 LR $3,A ; 0983 53 PI A0c44 ; 0984 28 0c 44 PI $011e ; 0987 28 01 1e PK ; 098a 0c A098b: LI $d0 ; 098b 20 d0 Start here when button 4 was pressed. LR $3,A ; 098d 53 PI $00d0 ; 098e 28 00 d0 LI $d3 ; 0991 20 d3 LR $3,A ; 0993 53 PI $00d0 ; 0994 28 00 d0 LI $d6 ; 0997 20 d6 LR $3,A ; 0999 53 PI $00d0 ; 099a 28 00 d0 LIS $1 ; 099d 71 LR $2,A ; 099e 52 LR $4,A ; 099f 54 LI $80 ; 09a0 20 80 LR $3,A ; 09a2 53 A09a3: LIS $4 ; 09a3 74 LR $1,A ; 09a4 51 A09a5: DCI $07b7 ; 09a5 2a 07 b7 PI $071d ; 09a8 28 07 1d LIS $1 ; 09ab 71 AS $1 ; 09ac c1 LR $1,A ; 09ad 51 CI $80 ; 09ae 25 80 BF $4,A09a5 ; 09b0 94 f4 LIS $1 ; 09b2 71 AS $2 ; 09b3 c2 LR $2,A ; 09b4 52 CI $40 ; 09b5 25 40 BF $4,A09a3 ; 09b7 94 eb LIS $0 ; 09b9 70 LR $3,A ; 09ba 53 LIS $1 ; 09bb 71 LR $4,A ; 09bc 54 LR $2,A ; 09bd 52 LI $2c ; 09be 20 2c LR $0,A ; 09c0 50 LI $4c ; 09c1 20 4c LR $9,A ; 09c3 59 LISL 0 ; 09c4 68 LISU 2 ; 09c5 62 LIS $3 ; 09c6 73 LR (IS),A ; 09c7 5c A09c8: LR A,$0 ; 09c8 40 LR $1,A ; 09c9 51 A09ca: DCI $07b7 ; 09ca 2a 07 b7 PI $071d ; 09cd 28 07 1d LIS $1 ; 09d0 71 AS $1 ; 09d1 c1 LR $1,A ; 09d2 51 COM ; 09d3 18 AS $9 ; 09d4 c9 BF $4,A09ca ; 09d5 94 f4 LIS $1 ; 09d7 71 AS $2 ; 09d8 c2 LR $2,A ; 09d9 52 CI $40 ; 09da 25 40 BT 4,A09ea ; 09dc 84 0d NS (IS) ; 09de fc BF $4,A09c8 ; 09df 94 e8 LIS $1 ; 09e1 71 AS $0 ; 09e2 c0 LR $0,A ; 09e3 50 LI $ff ; 09e4 20 ff AS $9 ; 09e6 c9 LR $9,A ; 09e7 59 BF $0,A09c8 ; 09e8 90 df A09ea: LI $1c ; 09ea 20 1c LR $0,A ; 09ec 50 LIS $1 ; 09ed 71 LR $2,A ; 09ee 52 LI $5c ; 09ef 20 5c LR $9,A ; 09f1 59 LR A,(IS) ; 09f2 4c CI $01 ; 09f3 25 01 LIS $1 ; 09f5 71 LR (IS),A ; 09f6 5c BF $4,A09c8 ; 09f7 94 d0 LIS $f ; 09f9 7f LR $2,A ; 09fa 52 LI $c0 ; 09fb 20 c0 LR $3,A ; 09fd 53 PI A0aa7 ; 09fe 28 0a a7 LI $14 ; 0a01 20 14 LR $2,A ; 0a03 52 PI A0aa7 ; 0a04 28 0a a7 LI $19 ; 0a07 20 19 LR $2,A ; 0a09 52 PI A0aa7 ; 0a0a 28 0a a7 LIS $0 ; 0a0d 70 LR $5,A ; 0a0e 55 PI $008f ; 0a0f 28 00 8f LI $d6 ; 0a12 20 d6 LR $3,A ; 0a14 53 LISL 7 ; 0a15 6f LISU 3 ; 0a16 63 LIS $3 ; 0a17 73 LR (IS),A ; 0a18 5c PI $00d0 ; 0a19 28 00 d0 LISL 1 ; 0a1c 69 LISU 2 ; 0a1d 62 LIS $f ; 0a1e 7f LR (IS)+,A ; 0a1f 5d LISL 3 ; 0a20 6b LI $10 ; 0a21 20 10 LR (IS)+,A ; 0a23 5d LI $50 ; 0a24 20 50 LR (IS),A ; 0a26 5c LISL 6 ; 0a27 6e LI $10 ; 0a28 20 10 LR (IS)+,A ; 0a2a 5d LI $90 ; 0a2b 20 90 LR (IS),A ; 0a2d 5c PI A0abc ; 0a2e 28 0a bc LI $33 ; 0a31 20 33 LR $2,A ; 0a33 52 PI A0c44 ; 0a34 28 0c 44 LISL 3 ; 0a37 6b LISU 2 ; 0a38 62 LIS $c ; 0a39 7c LR (IS)+,A ; 0a3a 5d LI $f2 ; 0a3b 20 f2 LR (IS),A ; 0a3d 5c PI A0939 ; 0a3e 28 09 39 JMP A098b ; 0a41 29 09 8b A0a44: LI $d3 ; 0a44 20 d3 LR $3,A ; 0a46 53 PI $00d0 ; 0a47 28 00 d0 LI $d0 ; 0a4a 20 d0 LR $3,A ; 0a4c 53 PI $00d0 ; 0a4d 28 00 d0 LI $d3 ; 0a50 20 d3 LR $3,A ; 0a52 53 PI $00d0 ; 0a53 28 00 d0 LI $d0 ; 0a56 20 d0 LR $3,A ; 0a58 53 PI $00d0 ; 0a59 28 00 d0 LI $d6 ; 0a5c 20 d6 LR $3,A ; 0a5e 53 PI $00d0 ; 0a5f 28 00 d0 LISL 1 ; 0a62 69 LISU 2 ; 0a63 62 LI $10 ; 0a64 20 10 LR (IS),A ; 0a66 5c LISL 3 ; 0a67 6b LI $11 ; 0a68 20 11 LR (IS)+,A ; 0a6a 5d LIS $0 ; 0a6b 70 LR (IS),A ; 0a6c 5c PI A0abc ; 0a6d 28 0a bc LI $d3 ; 0a70 20 d3 LR $3,A ; 0a72 53 PI $00d0 ; 0a73 28 00 d0 LI $d0 ; 0a76 20 d0 LR $3,A ; 0a78 53 PI $00d0 ; 0a79 28 00 d0 LISL 3 ; 0a7c 6b LISU 2 ; 0a7d 62 LIS $c ; 0a7e 7c LR (IS)+,A ; 0a7f 5d LI $f2 ; 0a80 20 f2 LR (IS),A ; 0a82 5c LISL 6 ; 0a83 6e LIS $d ; 0a84 7d LR (IS)+,A ; 0a85 5d LI $53 ; 0a86 20 53 LR (IS),A ; 0a88 5c PI A0939 ; 0a89 28 09 39 BF $0,A0a44 ; 0a8c 90 b7 A0a8e: BF $0,A0a8e ; 0a8e 90 ff A0a90: LR K,P ; 0a90 08 PI $0107 ; 0a91 28 01 07 LIS $f ; 0a94 7f LR $1,A ; 0a95 51 PI $071d ; 0a96 28 07 1d LI $15 ; 0a99 20 15 LR $1,A ; 0a9b 51 PI $071d ; 0a9c 28 07 1d LI $1b ; 0a9f 20 1b LR $1,A ; 0aa1 51 PI $071d ; 0aa2 28 07 1d BF $0,A0afa ; 0aa5 90 54 A0aa7: LR K,P ; 0aa7 08 PI $0107 ; 0aa8 28 01 07 LI $18 ; 0aab 20 18 LR $9,A ; 0aad 59 LI $30 ; 0aae 20 30 LR $1,A ; 0ab0 51 A0ab1: PI A0ae9 ; 0ab1 28 0a e9 LIS $1 ; 0ab4 71 AS $1 ; 0ab5 c1 LR $1,A ; 0ab6 51 DS $9 ; 0ab7 39 BF $4,A0ab1 ; 0ab8 94 f8 BF $0,A0afa ; 0aba 90 3f A0abc: JMP A0b41 ; 0abc 29 0b 41 A0abf: LR K,P ; 0abf 08 PI $0107 ; 0ac0 28 01 07 LIS $8 ; 0ac3 78 LR $9,A ; 0ac4 59 A0ac5: PI A0ae9 ; 0ac5 28 0a e9 LIS $1 ; 0ac8 71 AS $1 ; 0ac9 c1 LR $1,A ; 0aca 51 DS $9 ; 0acb 39 BF $4,A0ac5 ; 0acc 94 f8 LI $f8 ; 0ace 20 f8 AS $1 ; 0ad0 c1 LR $1,A ; 0ad1 51 BF $0,A0afa ; 0ad2 90 27 A0ad4: LR K,P ; 0ad4 08 PI $0107 ; 0ad5 28 01 07 LIS $7 ; 0ad8 77 LR $9,A ; 0ad9 59 A0ada: PI A0ae9 ; 0ada 28 0a e9 LIS $1 ; 0add 71 AS $2 ; 0ade c2 LR $2,A ; 0adf 52 DS $9 ; 0ae0 39 BF $4,A0ada ; 0ae1 94 f8 LI $f9 ; 0ae3 20 f9 AS $2 ; 0ae5 c2 LR $2,A ; 0ae6 52 BF $0,A0afa ; 0ae7 90 12 A0ae9: LR K,P ; 0ae9 08 PI $0107 ; 0aea 28 01 07 LR A,$2 ; 0aed 42 OI $00 ; 0aee 22 00 BF $1,A0afa ; 0af0 91 09 DCI $0767 ; 0af2 2a 07 67 LIS $1 ; 0af5 71 LR $4,A ; 0af6 54 PI $071d ; 0af7 28 07 1d A0afa: PI $011e ; 0afa 28 01 1e PK ; 0afd 0c A0afe: LR K,P ; 0afe 08 PI $0107 ; 0aff 28 01 07 PI A0abf ; 0b02 28 0a bf PI A0ad4 ; 0b05 28 0a d4 LIS $7 ; 0b08 77 AS $2 ; 0b09 c2 LR $2,A ; 0b0a 52 PI A0abf ; 0b0b 28 0a bf LI $f9 ; 0b0e 20 f9 AS $2 ; 0b10 c2 LR $2,A ; 0b11 52 LIS $7 ; 0b12 77 AS $1 ; 0b13 c1 LR $1,A ; 0b14 51 PI A0ad4 ; 0b15 28 0a d4 LIS $2 ; 0b18 72 AS $1 ; 0b19 c1 LR $1,A ; 0b1a 51 BF $0,A0afa ; 0b1b 90 de LIS $5 ; 0b1d 75 LR $3,A ; 0b1e 53 LR $1,A ; 0b1f 51 LR K,P ; 0b20 08 PI $0107 ; 0b21 28 01 07 LIS $0 ; 0b24 70 LR $0,A ; 0b25 50 LIS $8 ; 0b26 78 LR $4,A ; 0b27 54 A0b28: PI $0718 ; 0b28 28 07 18 LIS $8 ; 0b2b 78 AS $1 ; 0b2c c1 LR $1,A ; 0b2d 51 LISL 0 ; 0b2e 68 LISU 2 ; 0b2f 62 COM ; 0b30 18 AS (IS)+ ; 0b31 cd BT 1,A0b28 ; 0b32 81 f5 LR A,(IS)+ ; 0b34 4d LR $1,A ; 0b35 51 LIS $8 ; 0b36 78 AS $2 ; 0b37 c2 LR $2,A ; 0b38 52 COM ; 0b39 18 AS (IS) ; 0b3a cc BT 1,A0b28 ; 0b3b 81 ec A0b3d: PI $011e ; 0b3d 28 01 1e PK ; 0b40 0c A0b41: LR K,P ; 0b41 08 PI $0107 ; 0b42 28 01 07 A0b45: LISL 3 ; 0b45 6b LISU 2 ; 0b46 62 LR A,(IS)+ ; 0b47 4d LR QU,A ; 0b48 06 LR A,(IS) ; 0b49 4c LR QL,A ; 0b4a 07 LR DC,Q ; 0b4b 0f LM ; 0b4c 16 LR $0,A ; 0b4d 50 LR Q,DC ; 0b4e 0e LR A,QL ; 0b4f 03 LR (IS)-,A ; 0b50 5e LR A,QU ; 0b51 02 LR (IS),A ; 0b52 5c LR A,$0 ; 0b53 40 CI $ff ; 0b54 25 ff BT 4,A0b3d ; 0b56 84 e6 CI $fe ; 0b58 25 fe BT 4,A0b7b ; 0b5a 84 20 CI $fd ; 0b5c 25 fd BT 4,A0b89 ; 0b5e 84 2a CI $fc ; 0b60 25 fc BT 4,A0b90 ; 0b62 84 2d CI $fb ; 0b64 25 fb BT 4,A0b7e ; 0b66 84 17 CI $fa ; 0b68 25 fa BT 4,A0b9a ; 0b6a 84 2f CI $f9 ; 0b6c 25 f9 BT 4,A0b83 ; 0b6e 84 14 NI $f0 ; 0b70 21 f0 CI $f0 ; 0b72 25 f0 BT 4,A0ba0 ; 0b74 84 2b PI A0c01 ; 0b76 28 0c 01 BF $0,A0b45 ; 0b79 90 cb A0b7b: LIS $9 ; 0b7b 79 AS $2 ; 0b7c c2 LR $2,A ; 0b7d 52 A0b7e: LISL 1 ; 0b7e 69 LR A,(IS) ; 0b7f 4c LR $1,A ; 0b80 51 BF $0,A0b45 ; 0b81 90 c3 A0b83: LI $f7 ; 0b83 20 f7 AS $2 ; 0b85 c2 LR $2,A ; 0b86 52 BF $0,A0b45 ; 0b87 90 bd A0b89: LIS $0 ; 0b89 70 LR $5,A ; 0b8a 55 PI $008f ; 0b8b 28 00 8f BF $0,A0b45 ; 0b8e 90 b6 A0b90: LIS $3 ; 0b90 73 LR $0,A ; 0b91 50 A0b92: PI $008f ; 0b92 28 00 8f DS $0 ; 0b95 30 BF $4,A0b92 ; 0b96 94 fb BF $0,A0b45 ; 0b98 90 ac A0b9a: LIS $f ; 0b9a 7f LR $1,A ; 0b9b 51 LIS $c ; 0b9c 7c LR $2,A ; 0b9d 52 BF $0,A0b45 ; 0b9e 90 a6 A0ba0: LR A,$0 ; 0ba0 40 SL 1 ; 0ba1 13 SL 1 ; 0ba2 13 SL 4 ; 0ba3 15 LR $3,A ; 0ba4 53 BF $0,A0b45 ; 0ba5 90 9f LR K,P ; 0ba7 08 PI $0107 ; 0ba8 28 01 07 LR DC,H ; 0bab 10 PI A0c25 ; 0bac 28 0c 25 LR A,$4 ; 0baf 44 INC ; 0bb0 1f LR $4,A ; 0bb1 54 PI $011e ; 0bb2 28 01 1e PK ; 0bb5 0c A0bb6: LR K,P ; 0bb6 08 PI $0107 ; 0bb7 28 01 07 LR Q,DC ; 0bba 0e LISL 0 ; 0bbb 68 LISU 3 ; 0bbc 63 LIS $5 ; 0bbd 75 LR (IS)+,A ; 0bbe 5d LR (IS)+,A ; 0bbf 5d A0bc0: LISL 2 ; 0bc0 6a LISU 3 ; 0bc1 63 LR DC,Q ; 0bc2 0f LM ; 0bc3 16 LR Q,DC ; 0bc4 0e LR (IS),A ; 0bc5 5c A0bc6: LISL 2 ; 0bc6 6a LISU 3 ; 0bc7 63 LR A,(IS) ; 0bc8 4c LR $3,A ; 0bc9 53 SL 1 ; 0bca 13 LR (IS)+,A ; 0bcb 5d LR A,$3 ; 0bcc 43 OI $00 ; 0bcd 22 00 LR A,(IS) ; 0bcf 4c BF $1,A0bd3 ; 0bd0 91 02 LIS $0 ; 0bd2 70 A0bd3: LR $3,A ; 0bd3 53 DCI $07b7 ; 0bd4 2a 07 b7 LIS $0 ; 0bd7 70 LR $0,A ; 0bd8 50 PI $0718 ; 0bd9 28 07 18 LR A,$4 ; 0bdc 44 AS $1 ; 0bdd c1 LR $1,A ; 0bde 51 LISL 0 ; 0bdf 68 LISU 3 ; 0be0 63 DS (IS) ; 0be1 3c BF $4,A0bc6 ; 0be2 94 e3 LR A,$4 ; 0be4 44 SL 1 ; 0be5 13 SL 1 ; 0be6 13 AS $4 ; 0be7 c4 COM ; 0be8 18 AS $1 ; 0be9 c1 INC ; 0bea 1f LR $1,A ; 0beb 51 LIS $5 ; 0bec 75 LR (IS)+,A ; 0bed 5d LR A,$4 ; 0bee 44 AS $2 ; 0bef c2 LR $2,A ; 0bf0 52 DS (IS)+ ; 0bf1 3d BF $4,A0bc0 ; 0bf2 94 cd LR A,$4 ; 0bf4 44 SL 1 ; 0bf5 13 SL 1 ; 0bf6 13 AS $4 ; 0bf7 c4 COM ; 0bf8 18 INC ; 0bf9 1f AS $2 ; 0bfa c2 LR $2,A ; 0bfb 52 LR DC,Q ; 0bfc 0f PI $011e ; 0bfd 28 01 1e PK ; 0c00 0c A0c01: LR K,P ; 0c01 08 PI $0107 ; 0c02 28 01 07 DCI A0d20 ; 0c05 2a 0d 20 LIS $7 ; 0c08 77 LR $4,A ; 0c09 54 A0c0a: LR A,$0 ; 0c0a 40 NI $7f ; 0c0b 21 7f ADC ; 0c0d 8e DS $4 ; 0c0e 34 BF $4,A0c0a ; 0c0f 94 fa LIS $7 ; 0c11 77 LR $4,A ; 0c12 54 LR A,$0 ; 0c13 40 CI $ff ; 0c14 25 ff BF $4,A0c1b ; 0c16 94 04 DCI A0e00 ; 0c18 2a 0e 00 DC0 pointing to graphics A0c1b: PI $071d ; 0c1b 28 07 1d using bios drawing routine LIS $7 ; 0c1e 77 AS $1 ; 0c1f c1 LR $1,A ; 0c20 51 PI $011e ; 0c21 28 01 1e popk bios routine PK ; 0c24 0c A0c25: LR K,P ; 0c25 08 PI $0107 ; 0c26 28 01 07 A0c29: PI A0bb6 ; 0c29 28 0b b6 LR A,$4 ; 0c2c 44 SL 1 ; 0c2d 13 SL 1 ; 0c2e 13 AS $4 ; 0c2f c4 AS $1 ; 0c30 c1 LR $1,A ; 0c31 51 LISL 0 ; 0c32 68 LISU 2 ; 0c33 62 COM ; 0c34 18 AS (IS)+ ; 0c35 cd BT 1,A0c29 ; 0c36 81 f2 LR A,(IS)+ ; 0c38 4d LR $1,A ; 0c39 51 LI $ff ; 0c3a 20 ff LR $5,A ; 0c3c 55 PI $008f ; 0c3d 28 00 8f PI $011e ; 0c40 28 01 1e PK ; 0c43 0c A0c44: LR K,P ; 0c44 08 PI $0107 ; 0c45 28 01 07 A0c48: LISU 3 ; 0c48 63 LISL 0 ; 0c49 68 LIS $8 ; 0c4a 78 LR (IS),A ; 0c4b 5c LR $1,A ; 0c4c 51 A0c4d: LIS $d ; 0c4d 7d LR $9,A ; 0c4e 59 A0c4f: PI A0c7a ; 0c4f 28 0c 7a PI A0c01 ; 0c52 28 0c 01 DS $9 ; 0c55 39 BF $4,A0c4f ; 0c56 94 f8 LISU 3 ; 0c58 63 LISL 0 ; 0c59 68 DS (IS) ; 0c5a 3c LR A,(IS) ; 0c5b 4c LR $1,A ; 0c5c 51 CI $02 ; 0c5d 25 02 BF $4,A0c4d ; 0c5f 94 ed LISU 2 ; 0c61 62 LISL 7 ; 0c62 6f LR A,(IS) ; 0c63 4c INC ; 0c64 1f LR (IS),A ; 0c65 5c LR A,$0 ; 0c66 40 CI $ff ; 0c67 25 ff BT 4,A0c6f ; 0c69 84 05 CI $00 ; 0c6b 25 00 BF $0,A0c48 ; 0c6d 90 da A0c6f: LISU 2 ; 0c6f 62 LISL 6 ; 0c70 6e LIS $d ; 0c71 7d LR (IS)+,A ; 0c72 5d LI $53 ; 0c73 20 53 LR (IS),A ; 0c75 5c PI $011e ; 0c76 28 01 1e PK ; 0c79 0c A0c7a: LISU 2 ; 0c7a 62 LISL 6 ; 0c7b 6e LR A,(IS)+ ; 0c7c 4d LR QU,A ; 0c7d 06 LR A,(IS) ; 0c7e 4c LR QL,A ; 0c7f 07 LR DC,Q ; 0c80 0f LR A,$9 ; 0c81 49 COM ; 0c82 18 AI $0d ; 0c83 24 0d ADC ; 0c85 8e LM ; 0c86 16 LR $0,A ; 0c87 50 POP ; 0c88 1c LR A,(IS)- ; 0c89 4e LR A,$5 ; 0c8a 45 LR $2,A ; 0c8b 52 .byte "OL[MPIA" ; [ displayed as "Y" on screen PART 1 .byte $fe ; seems to mean new row .byte " 1980" ; PART 1 .byte $fc ; 0c9c fc .byte $ff ; 0c9d ff .byte $fa ; 0c9e fa .byte $f1 ; 0c9f f1 .byte $fe ; 0ca0 fe .byte " NICHT" .byte $fe .byte "VERPASSEN" .byte $fc ; 0cb2 fc .byte $fa ; 0cb3 fa .byte $f2 ; 0cb4 f2 .byte "MIT DEM" .byte $fe ; 0cbc fe .byte $f2 ; 0cbd f2 .byte "EIGENEN" .byte $fe ; 0cc5 fe .byte $f1 ; 0cc6 f1 .byte "VIDEOGERXT" ; X shown as Ä (A umlaut) on screen .byte $fc ; 0cd1 fc .byte $fa ; 0cd2 fa .byte $f1 ; 0cd3 f1 .byte "VON DEN" .byte $fe ; 0cdb fe .byte "VIDEO- " .byte $fe .byte "SPE\IALISTEN" ; "\" shown as Z on screen .byte $fc ; 0cf0 fc .byte $ff ; 0fc1 ff .byte $fa ; 0cf2 fa .byte $f1 ; 0cf3 f1 .byte " ANRUF" .byte $fe ; 0cff fe .byte " GENZGT" ; Z shown as Ü on screen (U umlaut) .byte $ff .byte "GENZG" ; Z shown as Ü on screen (U umlaut) .byte $ff .byte "G" ; 0d13 47 .byte $ff .byte " GENZGT" ; Z shown as Ü on screen (U umlaut) .byte $ff .byte "G" ; 0d1f 47 A0d20: .byte "ENZG" .byte $ff .byte "G" ; 0d25 47 .byte $ff .byte $ff .byte $ff .byte "G" ; 0d29 47 .byte $ff .byte $ff .byte " SPORT-SPIEL-SPANNUNG " .byte $ff .byte " () UNSER KUNDENDIENST IST SCHON UNTERWEGS " .byte $ff .byte " BEI UNS ERHALTEN SIE SCHECKHEFTGARANTIE = 700 * " .byte "VERBRIEFTE SICHERHEIT IM GAN\EN BUNDESGEBIET" ; \ shown as Z .byte $ff .byte " " .byte $ff ; Block of graphics starting here A0e00: LR A,KU ; 0e00 00 LR A,KU ; 0e01 00 LR A,KU ; 0e02 00 LR A,KU ; 0e03 00 LR A,KU ; 0e04 00 LR A,KU ; 0e05 00 LR A,KU ; 0e06 00 LI $50 ; 0e07 20 50 LR $0,A ; 0e09 50 LR $0,A ; 0e0a 50 LI $00 ; 0e0b 20 00 LI $50 ; 0e0d 20 50 LR $0,A ; 0e0f 50 LR A,KU ; 0e10 00 LR A,KU ; 0e11 00 LR A,KU ; 0e12 00 LR A,KU ; 0e13 00 LR A,KU ; 0e14 00 LR $0,A ; 0e15 50 NS $8 ; 0e16 f8 LR $0,A ; 0e17 50 LR $0,A ; 0e18 50 LR $0,A ; 0e19 50 NS $8 ; 0e1a f8 A0e1b: LR $0,A ; 0e1b 50 LI $78 ; 0e1c 20 78 AS $0 ; 0e1e c0 LIS $0 ; 0e1f 70 PI $f020 ; 0e20 28 f0 20 AS $0 ; 0e23 c0 AS $8 ; 0e24 c8 LR DC,H ; 0e25 10 LI $40 ; 0e26 20 40 BF $8,A0e41 ; 0e28 98 18 LR A,$0 ; 0e2a 40 INS 0 ; 0e2b a0 INS 0 ; 0e2c a0 LR A,$0 ; 0e2d 40 INS 8 ; 0e2e a8 BF $0,A0e98 ; 0e2f 90 68 LI $20 ; 0e31 20 20 LI $00 ; 0e33 20 00 LR A,KU ; 0e35 00 LR A,KU ; 0e36 00 LR A,KU ; 0e37 00 LR Q,DC ; 0e38 0e LR IS,A ; 0e39 0b NS (IS)- ; 0e3a fe NS (IS)- ; 0e3b fe NS (IS)- ; 0e3c fe DS $0 ; 0e3d 30 DS $0 ; 0e3e 30 NS $8 ; 0e3f f8 NS $8 ; 0e40 f8 A0e41: NS $8 ; 0e41 f8 NS $8 ; 0e42 f8 NS $8 ; 0e43 f8 LISU 0 ; 0e44 60 LISU 0 ; 0e45 60 LR A,KU ; 0e46 00 AM ; 0e47 88 LR $0,A ; 0e48 50 LI $50 ; 0e49 20 50 AM ; 0e4b 88 LR A,KU ; 0e4c 00 LR A,KU ; 0e4d 00 LI $20 ; 0e4e 20 20 NS $8 ; 0e50 f8 LI $20 ; 0e51 20 20 LR A,KU ; 0e53 00 LR A,KU ; 0e54 00 LR A,KU ; 0e55 00 LR A,KU ; 0e56 00 LR A,KU ; 0e57 00 LI $20 ; 0e58 20 20 LR A,$0 ; 0e5a 40 LR A,KU ; 0e5b 00 LR A,KU ; 0e5c 00 LR A,KU ; 0e5d 00 NS $8 ; 0e5e f8 LR A,KU ; 0e5f 00 LR A,KU ; 0e60 00 LR A,KU ; 0e61 00 LR A,KU ; 0e62 00 LR A,KU ; 0e63 00 LR A,KU ; 0e64 00 LR A,KU ; 0e65 00 LR A,KU ; 0e66 00 LR A,KU ; 0e67 00 LI $00 ; 0e68 20 00 LR K,P ; 0e6a 08 LR DC,H ; 0e6b 10 LI $40 ; 0e6c 20 40 BT 0,0 ; 0e6e 80 00 LIS $0 ; 0e70 70 AM ; 0e71 88 BF $8,A0e1b ; 0e72 98 a8 AS $8 ; 0e74 c8 AM ; 0e75 88 LIS $0 ; 0e76 70 LI $20 ; 0e77 20 20 LI $20 ; 0e79 20 20 LI $20 ; 0e7b 20 20 LI $70 ; 0e7d 20 70 AM ; 0e7f 88 LR K,P ; 0e80 08 DS $0 ; 0e81 30 A0e82: LR A,$0 ; 0e82 40 BT 0,-8 ; 0e83 80 f8 A0e85: LIS $0 ; 0e85 70 AM ; 0e86 88 LR K,P ; 0e87 08 A0e88: DS $0 ; 0e88 30 LR K,P ; 0e89 08 AM ; 0e8a 88 LIS $0 ; 0e8b 70 A0e8c: LR DC,H ; 0e8c 10 A0e8d: DS $0 ; 0e8d 30 LR $0,A ; 0e8e 50 A0e8f: BF $0,A0e88 ; 0e8f 90 f8 LR DC,H ; 0e91 10 LR DC,H ; 0e92 10 NS $8 ; 0e93 f8 A0e94: BT 0,A0e85 ; 0e94 80 f0 LR K,P ; 0e96 08 LR K,P ; 0e97 08 A0e98: AM ; 0e98 88 LIS $0 ; 0e99 70 DS $0 ; 0e9a 30 LR A,$0 ; 0e9b 40 BT 0,A0e8d ; 0e9c 80 f0 A0e9e: AM ; 0e9e 88 AM ; 0e9f 88 LIS $0 ; 0ea0 70 NS $8 ; 0ea1 f8 LR K,P ; 0ea2 08 LR DC,H ; 0ea3 10 LI $40 ; 0ea4 20 40 BT 0,-128 ; 0ea6 80 80 LIS $0 ; 0ea8 70 AM ; 0ea9 88 AM ; 0eaa 88 LIS $0 ; 0eab 70 AM ; 0eac 88 AM ; 0ead 88 LIS $0 ; 0eae 70 LIS $0 ; 0eaf 70 AM ; 0eb0 88 AM ; 0eb1 88 LIS $8 ; 0eb2 78 LR K,P ; 0eb3 08 LR DC,H ; 0eb4 10 A0eb5: LISU 0 ; 0eb5 60 LR A,KU ; 0eb6 00 A0eb7: LR A,KU ; 0eb7 00 LI $00 ; 0eb8 20 00 LI $00 ; 0eba 20 00 LR A,KU ; 0ebc 00 LR A,KU ; 0ebd 00 LR A,KU ; 0ebe 00 LI $00 ; 0ebf 20 00 LI $20 ; 0ec1 20 20 LR A,$0 ; 0ec3 40 LR DC,H ; 0ec4 10 LI $40 ; 0ec5 20 40 BT 0,64 ; 0ec7 80 40 LI $10 ; 0ec9 20 10 LOOKS LIKE CHARACTER DATA HERE LR A,KU ; 0ecb 00 LR A,KU ; 0ecc 00 NS $8 ; 0ecd f8 LR A,KU ; 0ece 00 A0ecf: NS $8 ; 0ecf f8 LR A,KU ; 0ed0 00 LR A,KU ; 0ed1 00 LR A,$0 ; 0ed2 40 LI $10 ; 0ed3 20 10 A0ed5: LR K,P ; 0ed5 08 LR DC,H ; 0ed6 10 LI $40 ; 0ed7 20 40 LIS $0 ; 0ed9 70 AM ; 0eda 88 LR DC,H ; 0edb 10 LI $20 ; 0edc 20 20 LR A,KU ; 0ede 00 LI $70 ; 0edf 20 70 AM ; 0ee1 88 INS 8 ; 0ee2 a8 OUTS 8 ; 0ee3 b8 OUTS 0 ; 0ee4 b0 BT 0,A0f5e ; 0ee5 80 78 LIS $0 ; 0ee7 70 AM ; 0ee8 88 AM ; 0ee9 88 NS $8 ; 0eea f8 AM ; 0eeb 88 A0eec: AM ; 0eec 88 AM ; 0eed 88 NS $0 ; 0eee f0 AM ; 0eef 88 AM ; 0ef0 88 NS $0 ; 0ef1 f0 AM ; 0ef2 88 AM ; 0ef3 88 NS $0 ; 0ef4 f0 LIS $0 ; 0ef5 70 AM ; 0ef6 88 BT 0,-128 ; 0ef7 80 80 BT 0,A0e82 ; 0ef9 80 88 LIS $0 ; 0efb 70 NS $0 ; 0efc f0 AM ; 0efd 88 AM ; 0efe 88 AM ; 0eff 88 AM ; 0f00 88 AM ; 0f01 88 NS $0 ; 0f02 f0 NS $8 ; 0f03 f8 BT 0,A0e85 ; 0f04 80 80 XS $0 ; 0f06 e0 BT 0,A0e88 ; 0f07 80 80 NS $8 ; 0f09 f8 NS $8 ; 0f0a f8 BT 0,A0e8c ; 0f0b 80 80 XS $0 ; 0f0d e0 BT 0,A0e8f ; 0f0e 80 80 BT 0,112 ; 0f10 80 70 AM ; 0f12 88 BT 0,A0e94 ; 0f13 80 80 BF $8,A0e9e ; 0f15 98 88 LIS $8 ; 0f17 78 AM ; 0f18 88 AM ; 0f19 88 AM ; 0f1a 88 NS $8 ; 0f1b f8 AM ; 0f1c 88 AM ; 0f1d 88 AM ; 0f1e 88 LIS $0 ; 0f1f 70 LI $20 ; 0f20 20 20 LI $20 ; 0f22 20 20 LI $70 ; 0f24 20 70 LIS $0 ; 0f26 70 LR DC,H ; 0f27 10 LR DC,H ; 0f28 10 LR DC,H ; 0f29 10 LR DC,H ; 0f2a 10 LR $0,A ; 0f2b 50 LI $88 ; 0f2c 20 88 BF $0,A0ecf ; 0f2e 90 a0 AS $0 ; 0f30 c0 INS 0 ; 0f31 a0 BF $0,-120 ; 0f32 90 88 BT 0,A0eb5 ; 0f34 80 80 BT 0,A0eb7 ; 0f36 80 80 BT 0,-128 ; 0f38 80 80 NS $8 ; 0f3a f8 AM ; 0f3b 88 ASD $8 ; 0f3c d8 INS 8 ; 0f3d a8 INS 8 ; 0f3e a8 AM ; 0f3f 88 AM ; 0f40 88 AM ; 0f41 88 AM ; 0f42 88 AM ; 0f43 88 AS $8 ; 0f44 c8 INS 8 ; 0f45 a8 BF $8,A0ecf ; 0f46 98 88 AM ; 0f48 88 NS $8 ; 0f49 f8 AM ; 0f4a 88 AM ; 0f4b 88 AM ; 0f4c 88 AM ; 0f4d 88 AM ; 0f4e 88 NS $8 ; 0f4f f8 NS $0 ; 0f50 f0 AM ; 0f51 88 AM ; 0f52 88 NS $0 ; 0f53 f0 BT 0,A0ed5 ; 0f54 80 80 BT 0,A0fc7 ; 0f56 80 70 AM ; 0f58 88 AM ; 0f59 88 AM ; 0f5a 88 INS 8 ; 0f5b a8 BF $8,A0fd5 ; 0f5c 98 78 A0f5e: NS $0 ; 0f5e f0 AM ; 0f5f 88 AM ; 0f60 88 NS $0 ; 0f61 f0 INS 0 ; 0f62 a0 BF $0,A0eec ; 0f63 90 88 LIS $0 ; 0f65 70 AM ; 0f66 88 BT 0,A0fd8 ; 0f67 80 70 LR K,P ; 0f69 08 AM ; 0f6a 88 LIS $0 ; 0f6b 70 NS $8 ; 0f6c f8 LI $20 ; 0f6d 20 20 LI $20 ; 0f6f 20 20 LI $20 ; 0f71 20 20 AM ; 0f73 88 AM ; 0f74 88 AM ; 0f75 88 AM ; 0f76 88 AM ; 0f77 88 AM ; 0f78 88 LIS $0 ; 0f79 70 AM ; 0f7a 88 AM ; 0f7b 88 AM ; 0f7c 88 AM ; 0f7d 88 AM ; 0f7e 88 LR $0,A ; 0f7f 50 LI $88 ; 0f80 20 88 AM ; 0f82 88 AM ; 0f83 88 AM ; 0f84 88 INS 8 ; 0f85 a8 INS 8 ; 0f86 a8 LR $0,A ; 0f87 50 AM ; 0f88 88 LIS $0 ; 0f89 70 AM ; 0f8a 88 NS $8 ; 0f8b f8 AM ; 0f8c 88 AM ; 0f8d 88 AM ; 0f8e 88 AM ; 0f8f 88 LIS $0 ; 0f90 70 AM ; 0f91 88 AM ; 0f92 88 AM ; 0f93 88 AM ; 0f94 88 LIS $0 ; 0f95 70 AM ; 0f96 88 LR A,KU ; 0f97 00 AM ; 0f98 88 AM ; 0f99 88 AM ; 0f9a 88 AM ; 0f9b 88 LIS $0 ; 0f9c 70 AM ; 0f9d 88 AM ; 0f9e 88 AM ; 0f9f 88 LR $0,A ; 0fa0 50 LI $20 ; 0fa1 20 20 LI $f8 ; 0fa3 20 f8 LR K,P ; 0fa5 08 LR DC,H ; 0fa6 10 LI $40 ; 0fa7 20 40 BT 0,-8 ; 0fa9 80 f8 AM ; 0fab 88 LIS $0 ; 0fac 70 AM ; 0fad 88 AM ; 0fae 88 AM ; 0faf 88 AM ; 0fb0 88 LIS $0 ; 0fb1 70 NS $a ; 0fb2 fa NS $3 ; 0fb3 f3 .byte "ELECTRONIC-" .byte $fe ; 0fbf fe .byte " PARTN" A0fc7: .byte "ER" .byte $fe ; 0fc9 fe .byte $fe ; 0fca fe .byte $f2 ; 0fcb f2 .byte "SERVICE-P" A0fd5: .byte "LUS" ; 0fd5 4c A0fd8: .byte $f1 ; 0fd8 f1 .byte $ff ; 0fd9 ff .byte $fa ; 0fda fa .byte $f3 ; 0fdb f3 .byte "ELECTRONIC" .byte $fe .byte $fe .byte "PARTNER" .byte $fd ; 0fef fd .byte $fe ; 0ff0 fe .byte $fe ; 0ff1 fe .byte "GEMEINSCHAFT" .byte $fc ; 0ffe fc .byte $ff ; 0fff ff A1000: LI $d3 ; 1000 20 d3 Start here when button 2 was pressed LR $3,A ; 1002 53 PI $00d0 ; 1003 28 00 d0 LI $d0 ; 1006 20 d0 LR $3,A ; 1008 53 PI $00d0 ; 1009 28 00 d0 LI $d6 ; 100c 20 d6 LR $3,A ; 100e 53 PI $00d0 ; 100f 28 00 d0 Three screen clears, different colors. LISU 2 ; 1012 62 LISL 1 ; 1013 69 LI $10 ; 1014 20 10 LR (IS),A ; 1016 5c LISL 3 ; 1017 6b LIS $f ; 1018 7f LR (IS)+,A ; 1019 5d LI $b2 ; 101a 20 b2 LR (IS)+,A ; 101c 5d LISL 6 ; 101d 6e LIS $d ; 101e 7d LR (IS)+,A ; 101f 5d LI $95 ; 1020 20 95 LR (IS),A ; 1022 5c PI A0abc ; 1023 28 0a bc LI $31 ; 1026 20 31 LR $2,A ; 1028 52 PI A0c44 ; 1029 28 0c 44 LI $d3 ; 102c 20 d3 LR $3,A ; 102e 53 PI $00d0 ; 102f 28 00 d0 LI $d0 ; 1032 20 d0 LR $3,A ; 1034 53 PI $00d0 ; 1035 28 00 d0 LISU 2 ; 1038 62 LISL 3 ; 1039 6b LIS $c ; 103a 7c LR (IS)+,A ; 103b 5d LI $f2 ; 103c 20 f2 LR (IS)+,A ; 103e 5d PI A0939 ; 103f 28 09 39 BF $0,A1000 ; 1042 90 bd .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff NS $a ; 1050 fa NS $1 ; 1051 f1 LI $3e ; 1052 20 3e DS (IS)- ; 1054 3e DS (IS)- ; 1055 3e LI $f2 ; 1056 20 f2 DS $7 ; 1058 37 DS $0 ; 1059 30 DS $0 ; 105a 30 LI $f1 ; 105b 20 f1 DS (IS) ; 105d 3c DS (IS) ; 105e 3c DS (IS) ; 105f 3c NS (IS)- ; 1060 fe NS $3 ; 1061 f3 .byte " ELECTRONIC-" .byte $fe ; 106e fe .byte " PARTNER" .byte $fe ; 1079 fe .byte $f1 ; 107a f1 .byte " BIETEN MEHR" .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte " UNSER NEUES PARTNERANGEBOT = " .byte "HOHE LEISTUNG / GZNSTIGER PREIS " .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $fa ; 1100 fa .byte $f1 ; 1101 f1 .byte $3e ; 1102 3e .byte $f3 ; 1103 f3 .byte "ELECTRONIC-" .byte $f1 ; 110f f1 .byte $3c ; 1110 3c "<" .byte $fe ; 1111 fe .byte $3e ; 1112 3e ">" .byte " " ; 1113 20 20 .byte $f3 ; 1115 f3 .byte "PARTNER " .byte $f1 ; 111f f1 .byte $3c ; 1120 3c .byte $fe ; 1121 fe .byte $f2 ; 1122 f2 .byte "MIETVORTEILE:" .byte $fc ; 1130 fc .byte $fe ; 1131 fe .byte $f1 ; 1132 f1 .byte " VERGLEICHEN" .byte $fe ; 113f fe .byte " SIE BITTE!" .byte $fc .byte $f9 ; 114d f9 .byte $fb ; 114e fb .byte "OHNE KAPITAL-" .byte $fe ; 115c fe .byte "AUFWAND ... " .byte $fc ; 1169 fc .byte $f9 ; 116a f9 .byte $fb ; 116b fb .byte " SOFORT EIN " .byte $fe ; 1179 fe .byte "NEUES GERXT" ; X shown as Ä on screen (A umlaut) .byte $fc ; 1185 fc .byte $f9 ; 1186 f9 .byte $fb ; 1187 fb .byte " REPARATUR-" .byte $fe ; 1193 fe .byte " KOSTEN.. " .byte $fc .byte $fb ; 11a0 fb .byte $f9 ; 11a1 f9 .byte " ENTFALLEN " .byte $fe .byte $20 .byte $f2 .byte "=========" .byte $f1 ; 11b9 f1 .byte $fb ; 11ba fb .byte $f9 ; 11bb f9 .byte $fc ; 11bc fc .byte "ERSTKLASSIGER" .byte $fe ; 11ca fe .byte "BLIT\SERVICE" ; \ shown as Z on screen .byte $fc ; 11d7 fc .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff A1200: .byte $ff NS (IS) ; 1201 fc LIS $c ; 1202 7c DS (IS) ; 1203 3c POP ; 1204 1c LR A,KU ; 1205 00 NS (IS) ; 1206 fc NS (IS) ; 1207 fc NS (IS) ; 1208 fc NS (IS) ; 1209 fc NS (IS) ; 120a fc LIS $8 ; 120b 78 NS (IS) ; 120c fc NS (IS) ; 120d fc NS $8 ; 120e f8 NS $0 ; 120f f0 XS $0 ; 1210 e0 LR A,KU ; 1211 00 A1212: LR A,KU ; 1212 00 LR A,KU ; 1213 00 LR A,KU ; 1214 00 LR A,KU ; 1215 00 AS $0 ; 1216 c0 LR A,$0 ; 1217 40 LR A,KU ; 1218 00 LR A,KU ; 1219 00 LR A,$0 ; 121a 40 DS $0 ; 121b 30 COM ; 121c 18 COM ; 121d 18 LR A,KU ; 121e 00 LR A,KU ; 121f 00 LR A,KU ; 1220 00 LR A,KU ; 1221 00 LR A,KU ; 1222 00 XS $0 ; 1223 e0 AI $64 ; 1224 24 64 AS (IS) ; 1226 cc AS (IS) ; 1227 cc LIS $c ; 1228 7c DS (IS) ; 1229 3c OUTS 0 ; 122a b0 OUTS 0 ; 122b b0 A122c: DS $0 ; 122c 30 DS $4 ; 122d 34 XS (IS) ; 122e ec XS (IS) ; 122f ec LISL 0 ; 1230 68 LISL 4 ; 1231 6c AS (IS) ; 1232 cc BF $c,A122c ; 1233 9c f8 NS $0 ; 1235 f0 A1236: LR A,KU ; 1236 00 LR A,KU ; 1237 00 LR A,KU ; 1238 00 LR A,KU ; 1239 00 LR A,KU ; 123a 00 LR A,KU ; 123b 00 LISU 0 ; 123c 60 LR A,$0 ; 123d 40 LR A,(IS) ; 123e 4c LR A,(IS) ; 123f 4c LR A,$0 ; 1240 40 NS (IS) ; 1241 fc PK ; 1242 0c PK ; 1243 0c PK ; 1244 0c PK ; 1245 0c SR 4 ; 1246 14 AI $14 ; 1247 24 14 LR KU,A ; 1249 04 LR KU,A ; 124a 04 LR A,$0 ; 124b 40 LR A,(IS) ; 124c 4c LR A,(IS) ; 124d 4c LR A,$0 ; 124e 40 NS (IS) ; 124f fc PK ; 1250 0c PK ; 1251 0c PK ; 1252 0c PK ; 1253 0c LR K,P ; 1254 08 COM ; 1255 18 PK ; 1256 0c LR K,P ; 1257 08 LR K,P ; 1258 08 A1259: LIS $f ; 1259 7f LIS $f ; 125a 7f LISU 6 ; 125b 66 LISU 6 ; 125c 66 NS $7 ; 125d f7 NS $7 ; 125e f7 LR QL,A ; 125f 07 LR DC,Q ; 1260 0f NS (IS)- ; 1261 fe NS (IS)- ; 1262 fe LISU 6 ; 1263 66 LISU 6 ; 1264 66 .byte $ef .byte $ef XS $0 ; 1267 e0 NS $0 ; 1268 f0 LR DC,Q ; 1269 0f INC ; 126a 1f .byte $3f .byte $3f LR A,KU ; 126d 00 LR A,KU ; 126e 00 LR A,KU ; 126f 00 LR A,KU ; 1270 00 NS $0 ; 1271 f0 NS $8 ; 1272 f8 NS (IS) ; 1273 fc NS (IS) ; 1274 fc LR A,KU ; 1275 00 LR A,KU ; 1276 00 LR A,KU ; 1277 00 LR A,KU ; 1278 00 NS $3 ; 1279 f3 LR A,$5 ; 127a 45 LR A,(IS) ; 127b 4c LR A,$5 ; 127c 45 LR A,$3 ; 127d 43 LR $4,A ; 127e 54 LR $2,A ; 127f 52 .byte $4f LR A,(IS)- ; 1281 4e LR A,$9 ; 1282 49 LR A,$3 ; 1283 43 NS (IS)- ; 1284 fe LR $0,A ; 1285 50 LR A,$1 ; 1286 41 LR $2,A ; 1287 52 LR $4,A ; 1288 54 LR A,(IS)- ; 1289 4e LR A,$5 ; 128a 45 LR $2,A ; 128b 52 .byte $ff NS $a ; 128d fa NS $2 ; 128e f2 .byte $4f LR A,(IS) ; 1290 4c LR $b,A ; 1291 5b LR A,(IS)+ ; 1292 4d LR $0,A ; 1293 50 LR A,$9 ; 1294 49 LR A,$1 ; 1295 41 NS (IS)- ; 1296 fe LI $31 ; 1297 20 31 DS $9 ; 1299 39 DS $8 ; 129a 38 DS $0 ; 129b 30 NS (IS) ; 129c fc .byte $ff NS $a ; 129e fa NS $1 ; 129f f1 NS (IS)- ; 12a0 fe LI $20 ; 12a1 20 20 LR A,(IS)- ; 12a3 4e LR A,$9 ; 12a4 49 LR A,$3 ; 12a5 43 LR A,$8 ; 12a6 48 LR $4,A ; 12a7 54 NS (IS)- ; 12a8 fe LR $6,A ; 12a9 56 LR A,$5 ; 12aa 45 LR $2,A ; 12ab 52 LR $0,A ; 12ac 50 LR A,$1 ; 12ad 41 LR $3,A ; 12ae 53 LR $3,A ; 12af 53 LR A,$5 ; 12b0 45 LR A,(IS)- ; 12b1 4e NS (IS) ; 12b2 fc NS $a ; 12b3 fa NS $2 ; 12b4 f2 LR A,(IS)+ ; 12b5 4d LR A,$9 ; 12b6 49 LR $4,A ; 12b7 54 LI $44 ; 12b8 20 44 LR A,$5 ; 12ba 45 LR A,(IS)+ ; 12bb 4d NS (IS)- ; 12bc fe NS $2 ; 12bd f2 LR A,$5 ; 12be 45 LR A,$9 ; 12bf 49 LR A,$7 ; 12c0 47 LR A,$5 ; 12c1 45 LR A,(IS)- ; 12c2 4e LR A,$5 ; 12c3 45 LR A,(IS)- ; 12c4 4e NS (IS)- ; 12c5 fe NS $1 ; 12c6 f1 LR $6,A ; 12c7 56 LR A,$9 ; 12c8 49 LR A,$4 ; 12c9 44 LR A,$5 ; 12ca 45 .byte $4f LR A,$7 ; 12cc 47 LR A,$5 ; 12cd 45 LR $2,A ; 12ce 52 LR $8,A ; 12cf 58 LR $4,A ; 12d0 54 NS (IS) ; 12d1 fc NS $a ; 12d2 fa NS $1 ; 12d3 f1 LR $6,A ; 12d4 56 .byte $4f LR A,(IS)- ; 12d6 4e LI $44 ; 12d7 20 44 LR A,$5 ; 12d9 45 LR A,(IS)- ; 12da 4e NS (IS)- ; 12db fe LR $6,A ; 12dc 56 LR A,$9 ; 12dd 49 LR A,$4 ; 12de 44 LR A,$5 ; 12df 45 .byte $4f .byte $2d LI $fe ; 12e2 20 fe LR $3,A ; 12e4 53 LR $0,A ; 12e5 50 LR A,$5 ; 12e6 45 LR (IS),A ; 12e7 5c LR A,$9 ; 12e8 49 LR A,$1 ; 12e9 41 LR A,(IS) ; 12ea 4c LR A,$9 ; 12eb 49 LR $3,A ; 12ec 53 LR $4,A ; 12ed 54 LR A,$5 ; 12ee 45 LR A,(IS)- ; 12ef 4e NS (IS) ; 12f0 fc .byte $ff NS $a ; 12f2 fa NS $1 ; 12f3 f1 LI $20 ; 12f4 20 20 LI $20 ; 12f6 20 20 LI $20 ; 12f8 20 20 LR A,$1 ; 12fa 41 LR A,(IS)- ; 12fb 4e LR $2,A ; 12fc 52 LR $5,A ; 12fd 55 LR A,$6 ; 12fe 46 NS (IS)- ; 12ff fe LI $ff ; 1300 20 ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff A1400: LI $d3 ; 1400 20 d3 LR $3,A ; 1402 53 PI $00d0 ; 1403 28 00 d0 LI $d0 ; 1406 20 d0 LR $3,A ; 1408 53 PI $00d0 ; 1409 28 00 d0 LI $d6 ; 140c 20 d6 LR $3,A ; 140e 53 PI $00d0 ; 140f 28 00 d0 LISU 2 ; 1412 62 LISL 1 ; 1413 69 LI $10 ; 1414 20 10 LR (IS),A ; 1416 5c LISL 3 ; 1417 6b LIS $f ; 1418 7f LR (IS)+,A ; 1419 5d LI $b2 ; 141a 20 b2 LR (IS)+,A ; 141c 5d LISL 6 ; 141d 6e LIS $d ; 141e 7d LR (IS)+,A ; 141f 5d LI $95 ; 1420 20 95 LR (IS),A ; 1422 5c PI A0abc ; 1423 28 0a bc LI $31 ; 1426 20 31 LR $2,A ; 1428 52 PI A0c44 ; 1429 28 0c 44 LI $d3 ; 142c 20 d3 LR $3,A ; 142e 53 PI $00d0 ; 142f 28 00 d0 LI $d0 ; 1432 20 d0 LR $3,A ; 1434 53 PI $00d0 ; 1435 28 00 d0 LISU 2 ; 1438 62 LISL 3 ; 1439 6b LIS $c ; 143a 7c LR (IS)+,A ; 143b 5d LI $f2 ; 143c 20 f2 LR (IS)+,A ; 143e 5d PI A0939 ; 143f 28 09 39 BF $0,A1400 ; 1442 90 bd .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff NS $a ; 1450 fa NS $1 ; 1451 f1 LI $3e ; 1452 20 3e DS (IS)- ; 1454 3e DS (IS)- ; 1455 3e LI $f2 ; 1456 20 f2 DS $7 ; 1458 37 DS $0 ; 1459 30 DS $0 ; 145a 30 LI $f1 ; 145b 20 f1 DS (IS) ; 145d 3c DS (IS) ; 145e 3c DS (IS) ; 145f 3c NS (IS)- ; 1460 fe NS $3 ; 1461 f3 LI $45 ; 1462 20 45 LR A,(IS) ; 1464 4c LR A,$5 ; 1465 45 LR A,$3 ; 1466 43 LR $4,A ; 1467 54 LR $2,A ; 1468 52 .byte $4f LR A,(IS)- ; 146a 4e LR A,$9 ; 146b 49 LR A,$3 ; 146c 43 .byte $2d NS (IS)- ; 146e fe LI $20 ; 146f 20 20 LI $50 ; 1471 20 50 LR A,$1 ; 1473 41 LR $2,A ; 1474 52 LR $4,A ; 1475 54 LR A,(IS)- ; 1476 4e LR A,$5 ; 1477 45 LR $2,A ; 1478 52 NS (IS)- ; 1479 fe NS $1 ; 147a f1 LI $42 ; 147b 20 42 LR A,$9 ; 147d 49 LR A,$5 ; 147e 45 LR $4,A ; 147f 54 LR A,$5 ; 1480 45 LR A,(IS)- ; 1481 4e LI $4d ; 1482 20 4d LR A,$5 ; 1484 45 LR A,$8 ; 1485 48 LR $2,A ; 1486 52 .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff LI $20 ; 1490 20 20 LI $20 ; 1492 20 20 LI $20 ; 1494 20 20 LI $20 ; 1496 20 20 LI $20 ; 1498 20 20 LI $20 ; 149a 20 20 LR $5,A ; 149c 55 LR A,(IS)- ; 149d 4e LR $3,A ; 149e 53 LR A,$5 ; 149f 45 LR $2,A ; 14a0 52 LI $4e ; 14a1 20 4e LR A,$5 ; 14a3 45 LR $5,A ; 14a4 55 LR A,$5 ; 14a5 45 LR $3,A ; 14a6 53 LI $50 ; 14a7 20 50 LR A,$1 ; 14a9 41 LR $2,A ; 14aa 52 LR $4,A ; 14ab 54 LR A,(IS)- ; 14ac 4e LR A,$5 ; 14ad 45 LR $2,A ; 14ae 52 LR A,$1 ; 14af 41 LR A,(IS)- ; 14b0 4e LR A,$7 ; 14b1 47 LR A,$5 ; 14b2 45 LR A,$2 ; 14b3 42 .byte $4f LR $4,A ; 14b5 54 LI $3d ; 14b6 20 3d LI $48 ; 14b8 20 48 .byte $4f LR A,$8 ; 14bb 48 LR A,$5 ; 14bc 45 LI $4c ; 14bd 20 4c LR A,$5 ; 14bf 45 LR A,$9 ; 14c0 49 LR $3,A ; 14c1 53 LR $4,A ; 14c2 54 LR $5,A ; 14c3 55 LR A,(IS)- ; 14c4 4e LR A,$7 ; 14c5 47 LI $2f ; 14c6 20 2f LI $47 ; 14c8 20 47 LR $a,A ; 14ca 5a LR A,(IS)- ; 14cb 4e LR $3,A ; 14cc 53 LR $4,A ; 14cd 54 LR A,$9 ; 14ce 49 LR A,$7 ; 14cf 47 LR A,$5 ; 14d0 45 LR $2,A ; 14d1 52 LI $50 ; 14d2 20 50 LR $2,A ; 14d4 52 LR A,$5 ; 14d5 45 LR A,$9 ; 14d6 49 LR $3,A ; 14d7 53 LI $20 ; 14d8 20 20 LI $20 ; 14da 20 20 LI $20 ; 14dc 20 20 LI $20 ; 14de 20 20 LI $20 ; 14e0 20 20 LI $20 ; 14e2 20 20 .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff NS $a ; 1500 fa NS $1 ; 1501 f1 DS (IS)- ; 1502 3e NS $3 ; 1503 f3 LR A,$5 ; 1504 45 LR A,(IS) ; 1505 4c LR A,$5 ; 1506 45 LR A,$3 ; 1507 43 LR $4,A ; 1508 54 LR $2,A ; 1509 52 .byte $4f LR A,(IS)- ; 150b 4e LR A,$9 ; 150c 49 LR A,$3 ; 150d 43 .byte $2d NS $1 ; 150f f1 DS (IS) ; 1510 3c NS (IS)- ; 1511 fe DS (IS)- ; 1512 3e LI $20 ; 1513 20 20 NS $3 ; 1515 f3 LR $0,A ; 1516 50 LR A,$1 ; 1517 41 LR $2,A ; 1518 52 LR $4,A ; 1519 54 LR A,(IS)- ; 151a 4e LR A,$5 ; 151b 45 LR $2,A ; 151c 52 LI $20 ; 151d 20 20 NS $1 ; 151f f1 DS (IS) ; 1520 3c NS (IS)- ; 1521 fe NS $2 ; 1522 f2 LR A,(IS)+ ; 1523 4d LR A,$9 ; 1524 49 LR A,$5 ; 1525 45 LR $4,A ; 1526 54 LR $6,A ; 1527 56 .byte $4f LR $2,A ; 1529 52 LR $4,A ; 152a 54 LR A,$5 ; 152b 45 LR A,$9 ; 152c 49 LR A,(IS) ; 152d 4c LR A,$5 ; 152e 45 DS $a ; 152f 3a NS (IS) ; 1530 fc NS (IS)- ; 1531 fe NS $1 ; 1532 f1 LI $56 ; 1533 20 56 LR A,$5 ; 1535 45 LR $2,A ; 1536 52 LR A,$7 ; 1537 47 LR A,(IS) ; 1538 4c LR A,$5 ; 1539 45 LR A,$9 ; 153a 49 LR A,$3 ; 153b 43 LR A,$8 ; 153c 48 LR A,$5 ; 153d 45 LR A,(IS)- ; 153e 4e NS (IS)- ; 153f fe LI $20 ; 1540 20 20 LR $3,A ; 1542 53 LR A,$9 ; 1543 49 LR A,$5 ; 1544 45 LI $42 ; 1545 20 42 LR A,$9 ; 1547 49 LR $4,A ; 1548 54 LR $4,A ; 1549 54 LR A,$5 ; 154a 45 NI $fc ; 154b 21 fc NS $9 ; 154d f9 NS $b ; 154e fb .byte $4f LR A,$8 ; 1550 48 LR A,(IS)- ; 1551 4e LR A,$5 ; 1552 45 LI $4b ; 1553 20 4b LR A,$1 ; 1555 41 LR $0,A ; 1556 50 LR A,$9 ; 1557 49 LR $4,A ; 1558 54 LR A,$1 ; 1559 41 LR A,(IS) ; 155a 4c .byte $2d NS (IS)- ; 155c fe LR A,$1 ; 155d 41 LR $5,A ; 155e 55 LR A,$6 ; 155f 46 LR $7,A ; 1560 57 LR A,$1 ; 1561 41 LR A,(IS)- ; 1562 4e LR A,$4 ; 1563 44 LI $2e ; 1564 20 2e .byte $2e .byte $2e LI $fc ; 1568 20 fc NS $9 ; 156a f9 NS $b ; 156b fb LI $53 ; 156c 20 53 .byte $4f LR A,$6 ; 156f 46 .byte $4f LR $2,A ; 1571 52 LR $4,A ; 1572 54 LI $45 ; 1573 20 45 LR A,$9 ; 1575 49 LR A,(IS)- ; 1576 4e LI $20 ; 1577 20 20 NS (IS)- ; 1579 fe LR A,(IS)- ; 157a 4e LR A,$5 ; 157b 45 LR $5,A ; 157c 55 LR A,$5 ; 157d 45 LR $3,A ; 157e 53 LI $47 ; 157f 20 47 LR A,$5 ; 1581 45 LR $2,A ; 1582 52 LR $8,A ; 1583 58 LR $4,A ; 1584 54 NS (IS) ; 1585 fc NS $9 ; 1586 f9 NS $b ; 1587 fb LI $52 ; 1588 20 52 LR A,$5 ; 158a 45 LR $0,A ; 158b 50 LR A,$1 ; 158c 41 LR $2,A ; 158d 52 LR A,$1 ; 158e 41 LR $4,A ; 158f 54 LR $5,A ; 1590 55 LR $2,A ; 1591 52 .byte $2d NS (IS)- ; 1593 fe LI $20 ; 1594 20 20 LR A,$b ; 1596 4b .byte $4f LR $3,A ; 1598 53 LR $4,A ; 1599 54 LR A,$5 ; 159a 45 LR A,(IS)- ; 159b 4e .byte $2e .byte $2e LI $fc ; 159e 20 fc NS $b ; 15a0 fb NS $9 ; 15a1 f9 LI $45 ; 15a2 20 45 LR A,(IS)- ; 15a4 4e LR $4,A ; 15a5 54 LR A,$6 ; 15a6 46 LR A,$1 ; 15a7 41 LR A,(IS) ; 15a8 4c LR A,(IS) ; 15a9 4c LR A,$5 ; 15aa 45 LR A,(IS)- ; 15ab 4e LI $fe ; 15ac 20 fe LI $f2 ; 15ae 20 f2 DS (IS)+ ; 15b0 3d DS (IS)+ ; 15b1 3d DS (IS)+ ; 15b2 3d DS (IS)+ ; 15b3 3d DS (IS)+ ; 15b4 3d DS (IS)+ ; 15b5 3d DS (IS)+ ; 15b6 3d DS (IS)+ ; 15b7 3d DS (IS)+ ; 15b8 3d NS $1 ; 15b9 f1 NS $b ; 15ba fb NS $9 ; 15bb f9 NS (IS) ; 15bc fc LR A,$5 ; 15bd 45 LR $2,A ; 15be 52 LR $3,A ; 15bf 53 LR $4,A ; 15c0 54 LR A,$b ; 15c1 4b LR A,(IS) ; 15c2 4c LR A,$1 ; 15c3 41 LR $3,A ; 15c4 53 LR $3,A ; 15c5 53 LR A,$9 ; 15c6 49 LR A,$7 ; 15c7 47 LR A,$5 ; 15c8 45 LR $2,A ; 15c9 52 NS (IS)- ; 15ca fe LR A,$2 ; 15cb 42 LR A,(IS) ; 15cc 4c LR A,$9 ; 15cd 49 LR $4,A ; 15ce 54 LR (IS),A ; 15cf 5c LR $3,A ; 15d0 53 LR A,$5 ; 15d1 45 LR $2,A ; 15d2 52 LR $6,A ; 15d3 56 LR A,$9 ; 15d4 49 LR A,$3 ; 15d5 43 LR A,$5 ; 15d6 45 NS (IS) ; 15d7 fc .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff NS (IS) ; 1601 fc LIS $c ; 1602 7c DS (IS) ; 1603 3c POP ; 1604 1c LR A,KU ; 1605 00 NS (IS) ; 1606 fc NS (IS) ; 1607 fc NS (IS) ; 1608 fc NS (IS) ; 1609 fc NS (IS) ; 160a fc LIS $8 ; 160b 78 NS (IS) ; 160c fc NS (IS) ; 160d fc NS $8 ; 160e f8 NS $0 ; 160f f0 XS $0 ; 1610 e0 LR A,KU ; 1611 00 LR A,KU ; 1612 00 LR A,KU ; 1613 00 LR A,KU ; 1614 00 LR A,KU ; 1615 00 AS $0 ; 1616 c0 LR A,$0 ; 1617 40 LR A,KU ; 1618 00 LR A,KU ; 1619 00 LR A,$0 ; 161a 40 DS $0 ; 161b 30 COM ; 161c 18 COM ; 161d 18 LR A,KU ; 161e 00 LR A,KU ; 161f 00 LR A,KU ; 1620 00 LR A,KU ; 1621 00 LR A,KU ; 1622 00 XS $0 ; 1623 e0 AI $64 ; 1624 24 64 AS (IS) ; 1626 cc AS (IS) ; 1627 cc LIS $c ; 1628 7c DS (IS) ; 1629 3c OUTS 0 ; 162a b0 OUTS 0 ; 162b b0 A162c: DS $0 ; 162c 30 DS $4 ; 162d 34 XS (IS) ; 162e ec XS (IS) ; 162f ec LISL 0 ; 1630 68 LISL 4 ; 1631 6c AS (IS) ; 1632 cc BF $c,A162c ; 1633 9c f8 NS $0 ; 1635 f0 LR A,KU ; 1636 00 LR A,KU ; 1637 00 LR A,KU ; 1638 00 LR A,KU ; 1639 00 LR A,KU ; 163a 00 LR A,KU ; 163b 00 LISU 0 ; 163c 60 LR A,$0 ; 163d 40 LR A,(IS) ; 163e 4c LR A,(IS) ; 163f 4c LR A,$0 ; 1640 40 NS (IS) ; 1641 fc PK ; 1642 0c PK ; 1643 0c PK ; 1644 0c PK ; 1645 0c SR 4 ; 1646 14 AI $14 ; 1647 24 14 LR KU,A ; 1649 04 LR KU,A ; 164a 04 LR A,$0 ; 164b 40 LR A,(IS) ; 164c 4c LR A,(IS) ; 164d 4c LR A,$0 ; 164e 40 NS (IS) ; 164f fc PK ; 1650 0c PK ; 1651 0c PK ; 1652 0c PK ; 1653 0c LR K,P ; 1654 08 COM ; 1655 18 PK ; 1656 0c LR K,P ; 1657 08 LR K,P ; 1658 08 LIS $f ; 1659 7f LIS $f ; 165a 7f LISU 6 ; 165b 66 LISU 6 ; 165c 66 NS $7 ; 165d f7 NS $7 ; 165e f7 LR QL,A ; 165f 07 LR DC,Q ; 1660 0f NS (IS)- ; 1661 fe NS (IS)- ; 1662 fe LISU 6 ; 1663 66 LISU 6 ; 1664 66 .byte $ef .byte $ef XS $0 ; 1667 e0 NS $0 ; 1668 f0 LR DC,Q ; 1669 0f INC ; 166a 1f .byte $3f .byte $3f LR A,KU ; 166d 00 LR A,KU ; 166e 00 LR A,KU ; 166f 00 LR A,KU ; 1670 00 NS $0 ; 1671 f0 NS $8 ; 1672 f8 NS (IS) ; 1673 fc NS (IS) ; 1674 fc LR A,KU ; 1675 00 LR A,KU ; 1676 00 LR A,KU ; 1677 00 LR A,KU ; 1678 00 NS $3 ; 1679 f3 LR A,$5 ; 167a 45 LR A,(IS) ; 167b 4c LR A,$5 ; 167c 45 LR A,$3 ; 167d 43 LR $4,A ; 167e 54 LR $2,A ; 167f 52 .byte $4f LR A,(IS)- ; 1681 4e LR A,$9 ; 1682 49 LR A,$3 ; 1683 43 NS (IS)- ; 1684 fe LR $0,A ; 1685 50 LR A,$1 ; 1686 41 LR $2,A ; 1687 52 LR $4,A ; 1688 54 LR A,(IS)- ; 1689 4e LR A,$5 ; 168a 45 LR $2,A ; 168b 52 .byte $ff NS $a ; 168d fa NS $2 ; 168e f2 .byte $4f LR A,(IS) ; 1690 4c LR $b,A ; 1691 5b LR A,(IS)+ ; 1692 4d LR $0,A ; 1693 50 LR A,$9 ; 1694 49 LR A,$1 ; 1695 41 NS (IS)- ; 1696 fe LI $31 ; 1697 20 31 DS $9 ; 1699 39 DS $8 ; 169a 38 DS $0 ; 169b 30 NS (IS) ; 169c fc .byte $ff NS $a ; 169e fa NS $1 ; 169f f1 NS (IS)- ; 16a0 fe LI $20 ; 16a1 20 20 LR A,(IS)- ; 16a3 4e LR A,$9 ; 16a4 49 LR A,$3 ; 16a5 43 LR A,$8 ; 16a6 48 LR $4,A ; 16a7 54 NS (IS)- ; 16a8 fe LR $6,A ; 16a9 56 LR A,$5 ; 16aa 45 LR $2,A ; 16ab 52 LR $0,A ; 16ac 50 LR A,$1 ; 16ad 41 LR $3,A ; 16ae 53 LR $3,A ; 16af 53 LR A,$5 ; 16b0 45 LR A,(IS)- ; 16b1 4e NS (IS) ; 16b2 fc NS $a ; 16b3 fa NS $2 ; 16b4 f2 LR A,(IS)+ ; 16b5 4d LR A,$9 ; 16b6 49 LR $4,A ; 16b7 54 LI $44 ; 16b8 20 44 LR A,$5 ; 16ba 45 LR A,(IS)+ ; 16bb 4d NS (IS)- ; 16bc fe NS $2 ; 16bd f2 LR A,$5 ; 16be 45 LR A,$9 ; 16bf 49 LR A,$7 ; 16c0 47 LR A,$5 ; 16c1 45 LR A,(IS)- ; 16c2 4e LR A,$5 ; 16c3 45 LR A,(IS)- ; 16c4 4e NS (IS)- ; 16c5 fe NS $1 ; 16c6 f1 LR $6,A ; 16c7 56 LR A,$9 ; 16c8 49 LR A,$4 ; 16c9 44 LR A,$5 ; 16ca 45 .byte $4f LR A,$7 ; 16cc 47 LR A,$5 ; 16cd 45 LR $2,A ; 16ce 52 LR $8,A ; 16cf 58 LR $4,A ; 16d0 54 NS (IS) ; 16d1 fc NS $a ; 16d2 fa NS $1 ; 16d3 f1 LR $6,A ; 16d4 56 .byte $4f LR A,(IS)- ; 16d6 4e LI $44 ; 16d7 20 44 LR A,$5 ; 16d9 45 LR A,(IS)- ; 16da 4e NS (IS)- ; 16db fe LR $6,A ; 16dc 56 LR A,$9 ; 16dd 49 LR A,$4 ; 16de 44 LR A,$5 ; 16df 45 .byte $4f .byte $2d LI $fe ; 16e2 20 fe LR $3,A ; 16e4 53 LR $0,A ; 16e5 50 LR A,$5 ; 16e6 45 LR (IS),A ; 16e7 5c LR A,$9 ; 16e8 49 LR A,$1 ; 16e9 41 LR A,(IS) ; 16ea 4c LR A,$9 ; 16eb 49 LR $3,A ; 16ec 53 LR $4,A ; 16ed 54 LR A,$5 ; 16ee 45 LR A,(IS)- ; 16ef 4e NS (IS) ; 16f0 fc .byte $ff NS $a ; 16f2 fa NS $1 ; 16f3 f1 LI $20 ; 16f4 20 20 LI $20 ; 16f6 20 20 LI $20 ; 16f8 20 20 LR A,$1 ; 16fa 41 LR A,(IS)- ; 16fb 4e LR $2,A ; 16fc 52 LR $5,A ; 16fd 55 LR A,$6 ; 16fe 46 NS (IS)- ; 16ff fe LI $ff ; 1700 20 ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff .byte $ff