1/ 0 : cpu Z80 2/ 800 : org 0800h 3/ 800 : ; 4/ 800 : DB 10 in a,(10h) 5/ 802 : E6 1F and 1fh 6/ 804 : FE 11 cp 11h 7/ 806 : CA 0C 08 jp z,X080c 8/ 809 : C3 45 08 jp X0845 9/ 80C : ; 10/ 80C : DB 10 in a,(10h) 11/ 80E : E6 1F and 1fh 12/ 810 : FE 11 cp 11h 13/ 812 : CA 0C 08 jp z,X080c 14/ 815 : 6F ld l,a 15/ 816 : 26 19 ld h,19h 16/ 818 : 34 inc (hl) 17/ 819 : 7E ld a,(hl) 18/ 81A : E6 01 and 1 19/ 81C : 77 ld (hl),a 20/ 81D : 06 10 ld b,10h 21/ 81F : 2E 0F ld l,0fh 22/ 821 : 3E 00 ld a,0 23/ 823 : B6 or (hl) 24/ 824 : 05 dec b 25/ 825 : 57 ld d,a 26/ 826 : 78 ld a,b 27/ 827 : FE 08 cp 8 28/ 829 : C2 2D 08 jp nz,X082d 29/ 82C : 5A ld e,d 30/ 82D : FE 00 cp 0 31/ 82F : CA 38 08 jp z,X0838 32/ 832 : 7A ld a,d 33/ 833 : 2D dec l 34/ 834 : 17 rla 35/ 835 : C3 23 08 jp X0823 36/ 838 : ; 37/ 838 : 7A ld a,d 38/ 839 : D3 15 out (15h),a 39/ 83B : D3 05 out (5),a 40/ 83D : 7B ld a,e 41/ 83E : D3 14 out (14h),a 42/ 840 : D3 04 out (4),a 43/ 842 : C3 00 08 jp X0800 44/ 845 : ; 45/ 845 : DB 10 in a,(10h) 46/ 847 : E6 1F and 1fh 47/ 849 : FE 13 cp 13h 48/ 84B : CA 51 08 jp z,X0851 49/ 84E : C3 00 08 jp X0800 50/ 851 : ; 51/ 851 : DB 10 in a,(10h) 52/ 853 : E6 1F and 1fh 53/ 855 : FE 13 cp 13h 54/ 857 : CA 51 08 jp z,X0851 55/ 85A : 57 ld d,a 56/ 85B : 3E FF ld a,0ffh 57/ 85D : D3 0F out (0fh),a 58/ 85F : 3E 00 ld a,0 59/ 861 : D3 0F out (0fh),a 60/ 863 : 7A ld a,d 61/ 864 : D3 0D out (0dh),a 62/ 866 : D3 09 out (9),a 63/ 868 : 3E 00 ld a,0 64/ 86A : D3 08 out (8),a 65/ 86C : C3 00 08 jp X0800