Skip to content

Instantly share code, notes, and snippets.

@houmei
Last active January 13, 2019 12:19
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save houmei/4c5bd7b255daa5ac65a6cf693e1e4d7a to your computer and use it in GitHub Desktop.
Save houmei/4c5bd7b255daa5ac65a6cf693e1e4d7a to your computer and use it in GitHub Desktop.
XRADAA TEST / Dr.Dobbs Journal 1976-11-12 IMSAI "INCOMPATIBILITY"
18 30 0 94 6 30
INTEL8080A:
MVI A,9 ; ADDA
A=18 F=SZ0H0P1C
XRA A
A=0 F=SZ000P1C
DAA
A=0 F=SZ000P1C
NEC8080A:
MVI A,9 ; ADDA
A=18 F=000H1P1C
XRA A
A=0 F=0Z0H1P1C
DAA
A=0 F=000H1P1C
MON
8000
LXI B,0000
PUSH B
POP PSW
MVI A,9
ADD A
PUSH PSW
XRA A
PUSH PSW
DAA
PUSH PSW
POP B
MOV A,B
STA F00A
MOV A,C
STA F00C
POP B
MOV A,B
STA F006
MOV A,C
STA F008
POP B
MOV A,B
STA F002
MOV A,C
STA F004
RET
SYSTEM
NEW
10 A=0
20 B=0
30 C=0
40 D=0
50 E=0
60 F=0
70 EXEC 0
80 PRINT A,B,C,D,E,F
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment