Subversion Repositories NedoOS

        ;MAIN "*",#C6
        MACRO DCOM wrd
        DB wrd&0xff;\0
        ORG $+255
        DB wrd/256;'(\0)
        ORG $-256
        ENDM

;--------------------- обычные -----------------------
MAINCOMS
;#0X
        DCOM NOPER
        DCOM LDBC ;LD BC,nn
        DCOM LDbcA
        DCOM SIM1 ;INC BC
        DCOM SIM1 ;INC B
        DCOM SIM1 ;DEC B
        DCOM SIM2 ;LD B,n
        DCOM SIM1 ;RLCA
        DCOM EXAER
        DCOM SIM1 ;ADD HL,BC
        DCOM LDAbc
        DCOM SIM1 ;DEC BC
        DCOM SIM1 ;INC C
        DCOM SIM1 ;DEC C
        DCOM SIM2 ;LD C,n
        DCOM SIM1 ;RRCA
;#1X
        DCOM DJNZER
        DCOM LDDE ;LD DE,nn
        DCOM LDdeA
        DCOM SIM1 ;INC DE
        DCOM SIM1 ;INC D
        DCOM SIM1 ;DEC D
        DCOM SIM2 ;LD D,n
        DCOM SIM1 ;RLA
        DCOM JRER
        DCOM SIM1 ;ADD HL,DE
        DCOM LDAde
        DCOM SIM1 ;DEC DE
        DCOM SIM1 ;INC E
        DCOM SIM1 ;DEC E
        DCOM SIM2 ;LD E,n
        DCOM SIM1 ;RRA
;#2X
        DCOM JRcc
        DCOM LDHL ;LD HL,nn
        DCOM LDnnHL
        DCOM SIM1 ;INC HL
        DCOM SIM1 ;INC H
        DCOM SIM1 ;DEC H
        DCOM SIM2 ;LD H,n
        DCOM SIM1 ;DAA
        DCOM JRcc
        DCOM SIM1 ;ADD HL,HL
        DCOM LDHLnn
        DCOM SIM1 ;DEC HL
        DCOM SIM1 ;INC L
        DCOM SIM1 ;DEC L
        DCOM SIM2 ;LD L,n
        DCOM SIM1 ;CPL
;#3X
        DCOM JRcc
        DCOM LDSP ;LD SP,nn
        DCOM LDnnA
        DCOM INCSP ;INC SP
        DCOM INCM ;INC (HL)
        DCOM DECM ;DEC (HL)
        DCOM LDMn ;LD (HL),n
        DCOM SIM1 ;SCF
        DCOM JRcc
        DCOM ADDSP ;ADD HL,SP
        DCOM LDAnn
        DCOM DECSP ;DEC SP
        DCOM SIM1 ;INC A
        DCOM SIM1 ;DEC A
        DCOM SIM2 ;LD A,n
        DCOM SIM1 ;CCF
;#4X-#6X
       DUP 6
       DUP 6
        DCOM SIM1LD
       EDUP
        DCOM LDrM
        DCOM SIM1
       EDUP
;#7X
       DUP 6
        DCOM LDMr
       EDUP
        DCOM HALTER
        DCOM LDMA
       DUP 6
        DCOM SIM1
       EDUP
        DCOM LDAM
        DCOM SIM1
;#8X-#BX
       DUP 8
       DUP 6
        DCOM SIM1
       EDUP
        DCOM LOGAM
        DCOM SIM1
       EDUP
;#CX
        DCOM RETcc
        DCOM POPBC
        DCOM JPcc
       DCOM JPER
        DCOM CALLcc
        DCOM PUSHBC
        DCOM SIM2
        DCOM RSTn
        DCOM RETcc
       DCOM RETER
        DCOM JPcc
       DCOM CBPREFIX
        DCOM CALLcc
       DCOM CALLER
        DCOM SIM2
        DCOM RSTn
;#DX
        DCOM RETcc
        DCOM POPDE
        DCOM JPcc
       DCOM OUTnA
        DCOM CALLcc
        DCOM PUSHDE
        DCOM SIM2
        DCOM RSTn
        DCOM RETcc
       DCOM EXXER
        DCOM JPcc
       DCOM INAn
        DCOM CALLcc
       DCOM DDPREFIX
        DCOM SIM2
        DCOM RSTn
;#EX
        DCOM RETcc
        DCOM POPHL
        DCOM JPcc
       DCOM EXSPHL
        DCOM CALLcc
        DCOM PUSHHL
        DCOM SIM2
        DCOM RSTn
        DCOM RETcc
       DCOM JPM
        DCOM JPcc
       DCOM SIM1
        DCOM CALLcc
       DCOM EDPREFIX
        DCOM SIM2
        DCOM RSTn
;#FX
        DCOM RETcc
        DCOM POPAF
        DCOM JPcc
       DCOM DIER
        DCOM CALLcc
        DCOM PUSHAF
        DCOM SIM2
        DCOM RSTn
        DCOM RETcc
       DCOM LDSPHL
        DCOM JPcc
       DCOM EIER
        DCOM CALLcc
       DCOM FDPREFIX
        DCOM SIM2
        DCOM RSTn

 DISPLAY $-MAINCOMS,"=256"
        ORG $+256

;--------------------- #CB -----------------------
CBCOMS
;#0X-#3X
       DUP 8
       DUP 6
        DCOM CB2
       EDUP
        DCOM CB2M
        DCOM CB2
       EDUP
;#4X-#FX
       DUP 24
       DUP 6
        DCOM CB2
       EDUP
        DCOM CB2M
        DCOM CB2
       EDUP

 DISPLAY $-CBCOMS,"=256"
        ORG $+256

;--------------------- #DD #CB -----------------------
DDCBCOMS
;#0X-#3X
       DUP 8
       DUP 6
        DCOM DDCBUNDOC
       EDUP
        DCOM DDCBDOC
        DCOM DDCBUNDOC
       EDUP
;#4X-#FX
       DUP 24
       DUP 6
        DCOM DDCBUNDOC
       EDUP
        DCOM DDCBDOC
        DCOM DDCBUNDOC
       EDUP

 DISPLAY $-DDCBCOMS,"=256"
        ORG $+256

;--------------------- #ED -----------------------
EDCOMS
;#0X-#3X
       DUP 64
        DCOM NOPER
       EDUP
;#4X
        DCOM INrC
        DCOM OUTCr
        DCOM ED2
        DCOM LDnnBC
        DCOM ED2
        DCOM RETNER
        DCOM IMn
       DCOM LDIA
        DCOM INrC
        DCOM OUTCr
        DCOM ED2
        DCOM LDBCnn
        DCOM ED2
        DCOM RETIER
        DCOM IMn
       DCOM LDRA
;#5X
        DCOM INrC
        DCOM OUTCr
        DCOM ED2
        DCOM LDnnDE
        DCOM ED2
        DCOM RETNER
        DCOM IMn
       DCOM LDAI
        DCOM INrC
        DCOM OUTCr
        DCOM ED2
        DCOM LDDEnn
        DCOM ED2
        DCOM RETIER
        DCOM IMn
       DCOM LDAR
;#6X
        DCOM INrC
        DCOM OUTCr
        DCOM ED2
        DCOM LDnnHL
        DCOM ED2
        DCOM RETNER
        DCOM IMn
       DCOM RRDER
        DCOM INrC
        DCOM OUTCr
        DCOM ED2
        DCOM LDHLnn
        DCOM ED2
        DCOM RETIER
        DCOM IMn
       DCOM RLDER
;#7X
        DCOM INFC
        DCOM OUTCr
        DCOM SBCHLSP;ED2
        DCOM LDnnSP
        DCOM ED2
        DCOM RETNER
        DCOM IMn
       DCOM NOPER
        DCOM INAC
        DCOM OUTCA
        DCOM ADCHLSP;ED2
        DCOM LDSPnn
        DCOM ED2
        DCOM RETIER
        DCOM IMn
       DCOM NOPER
;#8X-#9X
       DUP 32
        DCOM NOPER
       EDUP
;#AX
        DCOM LDIER
        DCOM CPIER
        DCOM INIER
        DCOM OUTIER
       DUP 4
        DCOM NOPER
       EDUP
        DCOM LDDER
        DCOM CPDER
        DCOM INDER
        DCOM OUTDER
       DUP 4
        DCOM NOPER
       EDUP
;#BX
        DCOM LDIRER
        DCOM CPIRER
        DCOM INIRER
        DCOM OTIRER
       DUP 4
        DCOM NOPER
       EDUP
        DCOM LDDRER
        DCOM CPDRER
        DCOM INDRER
        DCOM OTDRER
       DUP 4
        DCOM NOPER
       EDUP
;#CX-#FX
       DUP 64
        DCOM NOPER
       EDUP

 DISPLAY $-EDCOMS,"=256"
        ORG $+256

;--------------------- #DD -----------------------
DDCOMS
;#0X
        DCOM NOPER
        DCOM LDBC ;LD BC,nn
        DCOM LDbcA
        DCOM SIM1 ;INC BC
        DCOM SIM1 ;INC B
        DCOM SIM1 ;DEC B
        DCOM SIM2 ;LD B,n
        DCOM SIM1 ;RLCA
        DCOM EXAER
        DCOM DD2 ;ADD IX,BC
        DCOM LDAbc
        DCOM SIM1 ;DEC BC
        DCOM SIM1 ;INC C
        DCOM SIM1 ;DEC C
        DCOM SIM2 ;LD C,n
        DCOM SIM1 ;RRCA
;#1X
        DCOM DJNZER
        DCOM LDDE ;LD DE,nn
        DCOM LDdeA
        DCOM SIM1 ;INC DE
        DCOM SIM1 ;INC D
        DCOM SIM1 ;DEC D
        DCOM SIM2 ;LD D,n
        DCOM SIM1 ;RLA
        DCOM JRER
        DCOM DD2 ;ADD IX,DE
        DCOM LDAde
        DCOM SIM1 ;DEC DE
        DCOM SIM1 ;INC E
        DCOM SIM1 ;DEC E
        DCOM SIM2 ;LD E,n
        DCOM SIM1 ;RRA
;#2X
        DCOM JRcc
        DCOM LDIX ;LD IX,nn
        DCOM LDnnIX
        DCOM DD2 ;INC IX
        DCOM DD2 ;INC HX
        DCOM DD2 ;DEC HX
        DCOM DD3 ;LD HX,n
        DCOM SIM1 ;DAA
        DCOM JRcc
        DCOM DD2 ;ADD IX,IX
        DCOM LDIXnn
        DCOM DD2 ;DEC IX
        DCOM DD2 ;INC LX
        DCOM DD2 ;DEC LX
        DCOM DD3 ;LD LX,n
        DCOM SIM1 ;CPL
;#3X
        DCOM JRcc
        DCOM LDSP ;LD SP,nn
        DCOM LDnnA
        DCOM INCSP ;INC SP
        DCOM IDCMX ;INC (IX)
        DCOM IDCMX ;DEC (IX)
        DCOM LDMXn ;LD (IX),n
        DCOM SIM1 ;SCF
        DCOM JRcc
        DCOM ADDISP ;ADD IX,SP
        DCOM LDAnn
        DCOM DECSP ;DEC SP
        DCOM SIM1 ;INC A
        DCOM SIM1 ;DEC A
        DCOM SIM2 ;LD A,n
        DCOM SIM1 ;CCF
;#4X-#5X
       DUP 4
       DUP 4
        DCOM SIM1LD
       EDUP
        DCOM DD2LD
        DCOM DD2LD
        DCOM LDrMX
        DCOM SIM1
       EDUP
;#6X
       DUP 2
       DUP 6
        DCOM DD2LD
       EDUP
        DCOM LDrMX
        DCOM DD2;SIM1 ;ld hx/lx,a
       EDUP
;#7X
       DUP 6
        DCOM LDMXr
       EDUP
        DCOM HALTER
        DCOM LDMXA
       DUP 4
        DCOM SIM1
       EDUP
        DCOM DD2 ;ld a,hx
        DCOM DD2 ;ld a,lx
        DCOM LDAMX
        DCOM SIM1
;#8X-#BX
       DUP 8
       DUP 4
        DCOM SIM1
       EDUP
        DCOM DD2
        DCOM DD2
        DCOM LOGAMX
        DCOM SIM1
       EDUP
;#CX
        DCOM RETcc
        DCOM POPBC
        DCOM JPcc
       DCOM JPER
        DCOM CALLcc
        DCOM PUSHBC
        DCOM SIM2
        DCOM RSTn
        DCOM RETcc
       DCOM RETER
        DCOM JPcc
       DCOM DDCBPREFIX
        DCOM CALLcc
       DCOM CALLER
        DCOM SIM2
        DCOM RSTn
;#DX
        DCOM RETcc
        DCOM POPDE
        DCOM JPcc
       DCOM OUTnA
        DCOM CALLcc
        DCOM PUSHDE
        DCOM SIM2
        DCOM RSTn
        DCOM RETcc
       DCOM EXXER
        DCOM JPcc
       DCOM INAn
        DCOM CALLcc
       DCOM DDPREFIX
        DCOM SIM2
        DCOM RSTn
;#EX
        DCOM RETcc
        DCOM POPIX
        DCOM JPcc
       DCOM EXSPIX
        DCOM CALLcc
        DCOM PUSHIX
        DCOM SIM2
        DCOM RSTn
        DCOM RETcc
       DCOM JPMX
        DCOM JPcc
       DCOM SIM1
        DCOM CALLcc
       DCOM EDPREFIX
        DCOM SIM2
        DCOM RSTn
;#FX
        DCOM RETcc
        DCOM POPAF
        DCOM JPcc
       DCOM DIER
        DCOM CALLcc
        DCOM PUSHAF
        DCOM SIM2
        DCOM RSTn
        DCOM RETcc
       DCOM LDSPIX
        DCOM JPcc
       DCOM EIER
        DCOM CALLcc
       DCOM FDPREFIX
        DCOM SIM2
        DCOM RSTn

 DISPLAY $-DDCOMS,"=256"
        ORG $+256