; This is the Z80 verification test. Title ZORTUR SUBTTL Z80 verification test OCT ONE EQU 1 TWO EQU 2 FIVE EQU 5 HUNDRED EQU 100 ASEG ORG 100H .Z80 START: ADC A,C ;89 ADC A,20 ;CE14 ADC A,(HL) ;8E ADC A,(IX+0) ;DD8E00 ADC A,(IY+5) ;FD8E05 ADC HL,DE ;ED5A ADD A,(HL) ;86 ADD A,(IX+1) ;DD8601 ADD A,10 ;C60A ADD A,L ;85 ADD HL,HL ;29 ADD IX,IX ;DD29 ADD IY,SP ;FD39 AND D ;A2 AND 50 ;E632 AND (HL) ;A6 AND (IX+ONE) ;DDA601 OPB: BIT 1,(HL) ;CB4E BIT 3,(IX+10) ;DDCB0A5E BIT 0,(IY+0) ;FDCB0046 BIT 7,A ;CB7F OPC: CALL START ;CD0001 CALL Z,START ;C40001 CCF ;3F CP D ;BA CP HUNDRED ;FE64 CP (HL) ;BE CP (IX+5) ;DDBE05 CPD ;EDA9 CPDR ;EDB9 CPI ;EDA1 CPIR ;EDB1 CPL ;2F OPD: DAA ;27 DEC H ;25 DEC (HL) ;35 DEC (IY+0) ;FD3500 DEC HL ;2B DEC IX ;DD2B DEC IY ;FD2B DI ;F3 HERE: DJNZ HERE ;10FE OPE: EI ;FB EX AF,AF ;08 EX DE,HL ;EB EX (SP),HL ;E3 EX (SP),IX ;DDE3 EX (SP),IY ;FDE3 EXX ;D9 OPH: HALT ;76 IM 0 ;ED46 IM 1 ;ED56 IM 2 ;ED5E IN E,(C) ;ED58 IN A,(0F0H) ;DBF0 INC A ;3C INC HL ;23 INC (HL) ;34 INC (IX+1) ;DD3401 INC (IY+10) ;FD340A INC IX ;DD23 INC IY ;FD23 IND ;EDAA INDR ;EDBA INI ;EDA2 INIR ;EDB2 OPJ: JP C,START ;DA0001 JP START ;C30001 JP (HL) ;E9 JP (IX) ;DDE9 JP (IY) ;FDE9 JR C,OPJ ;38F3 JR OPL ;1800 OPL: LD DE,(1234H) ;ED5B3412 LD SP,1234H ;313412 LD A,HUNDRED ;3E64 LD L,A ;6F LD (BC),A ;02 LD (DE),A ;12 LD (HL), ;3606 LD (HL),E ;73 LD A,(HL) ;7E LD A,(IX+1) ;DD7E01 LD H,(IY+0) ;FD6600 LD (IX+0),100 ;DD360064 LD (IY+TWO),ONE ;FD360201 LD (IX+0),A ;DD7700 LD (IY+1),B ;FD7001 LD A,(1243H) ;3A3412 LD (1234H),A ;323412 LD (1234H),DE ;ED533412 LD (1234H),HL ;223412 LD (1234H),IX ;DD223412 LD (1234H),IY ;FD223412 LD A,(BC) ;0A LD A,(DE) ;1A LD A,I ;ED57 LD I,A ;ED47 LD A,R ;ED5F LD R,A ;ED4F LD HL,(1234H) ;2A3412 LD IX,1234H ;DD213412 LD IX,(1234H) ;DD2A3412 LD IY,1234H ;FD213412 LD IY,(1234H) ;FD2A3412 LD SP,HL ;F9 LD SP,IX ;DDF9 LD SP,IY ;FDF9 LDD ;EDA8 LDDR ;EDB8 LDI ;EDA0 LDIR ;EDB0 NEG ;ED44 NOP ;00 OR H ;B4 OR FIVE ;F605 OR (HL) ;B6 OR (IX+ONE) ;DDB601 OR (IY+0) ;FDB600 OTDR ;EDBB OTIR ;EDB3 OUT (C),L ;ED69 OUT (ONE),A ;D301 OUTD ;EDAB OUTI ;EDA3 POP AF ;F1 POP IX ;DDE1 POP IY ;FDE1 PUSH HL ;E5 PUSH IX ;DDE5 PUSH IY ;FDE5 RES ONE,C ;CB89 RES 7,(HL) ;CBBE RES 3,(IX+1) ;DDCB019E RET ;C9 RET Z ;C8 RETI ;ED4D RETN ;ED45 RL B ;CB10 RL (HL) ;CB16 RL (IX+2) ;DDCB0216 RLA ;17 RLCA ;07 RLC H ;CB04 RLC (HL) ;CB06 RLC (IX+5) ;DDCB0506 RLC (IY+0) ;FDCB0006 RLD ;ED6F RR C ;CB19 RR (HL) ;CB1E RR (IX+3) ;DDCB031E RRA ;1F RRC A ;CB0F RRC (HL) ;CB0E RRC (IX+5) ;DDCB050E RRCA ;0F RRD ;ED67 RST 18H ;DF SBC A,L ;9C SBC A,10 ;DE0A SBC A,(HL) ;9E SBC A,(IX+0) ;DD9E00 SBC HL,DE ;ED52 SCF ;37 SET 0,A ;CBC7 SET 1,(HL) ;CBCE SET TWO,(IY+3) ;FDCB03D6 SLA B ;CB20 SLA (HL) ;CB26 SLA (IX+1) ;DDCB0126 SRA C ;CB29 SRA (HL) ;CB2E SRA (IX+0) ;DDCB002E SRL A ;CB3F SRL (HL) ;CB3E SRL (IX+1) ;DDCB013E SUB C ;91 SUB 5 ;D605 SUB (HL) ;96 SUB (IX+2) ;DD9602 XOR H ;AC XOR 70H ;EE70 XOR (HL) ;AE XOR (IX+0) ;DDAE00 XOR (IY+10) ;FDAE0A END