From fdf4c9194445dee6dc8af5907ed3c974a5927760 Mon Sep 17 00:00:00 2001 From: Redo Date: Mon, 31 Oct 2022 14:02:37 -0600 Subject: [PATCH] add instruction list --- instructionList.txt | 196 ++++++++++++++++++++++++++++++++++++++++++++ rom-8608.lua | 9 +- 2 files changed, 203 insertions(+), 2 deletions(-) create mode 100644 instructionList.txt diff --git a/instructionList.txt b/instructionList.txt new file mode 100644 index 0000000..c6f98d2 --- /dev/null +++ b/instructionList.txt @@ -0,0 +1,196 @@ + +Control (C): +rst 00 1 Clear all registers and set I=0 +hlt F0 1 Halt non-interrupt execution +run F1 1 Resume non-interrupt execution +brk F3 1 Trigger interrupt +irt F4 1 Return from interrupt + +16-bit Inc/Dec (I): +icp 12 1 P++ +dcp 15 1 P-- +icq 13 1 Q++ +dcq 16 1 Q-- + +8-bit Unary (U): +inc a 10 1 A++, set flags +dec a 11 1 A--, set flags +icc a 1B 1 A+=CF, set flags +inc b 19 1 B++, set flags +dec b 1A 1 B--, set flags +icc b 1C 1 B+=CF, set flags +inc c 17 1 C++, set flags +dec c 18 1 C--, set flags +icc c 1D 1 C+=CF, set flags +tst a 14 1 Set flags according to A-0 +tst b 1E 1 Set flags according to B-0 +tst c 1F 1 Set flags according to C-0 +inc *s+imm8 2B 4 *(S+imm8)++, set flags +dec *s+imm8 2C 4 *(S+imm8)--, set flags +icc *s+imm8 2D 4 *(S+imm8)-=CF, set flags +tst *s+imm8 2E 3 Set flags according to *(S+imm8)-0 + +8-bit Arithmetic/Logic (A): +add imm8 24 2 A+=imm8, set flags +adb imm8 72 2 B+=imm8, set flags +adc imm8 73 2 C+=imm8, set flags +sub imm8 70 2 A-=imm8, set flags +sbb imm8 99 2 B-=imm8, set flags +sbc imm8 9A 2 C-=imm8, set flags +acc imm8 78 2 A+=imm8+CF, set flags +scc imm8 79 2 A-=imm8+CF, set flags +cmp imm8 71 2 set flags according to A-imm8 +and imm8 74 2 A&=imm8, set zero flag +ior imm8 75 2 A|=imm8, set zero flag +xor imm8 76 2 A^=imm8, set zero flag +ann imm8 77 2 A&=~imm8, set zero flag +add *s+imm8 AE 3 A+=*(S+imm8), set flags +adb *s+imm8 9B 3 B+=*(S+imm8), set flags +adc *s+imm8 9C 3 C+=*(S+imm8), set flags +sub *s+imm8 AF 3 A-=*(S+imm8), set flags +sbb *s+imm8 9D 3 B-=*(S+imm8), set flags +sbc *s+imm8 9E 3 C-=*(S+imm8), set flags +acc *s+imm8 B5 3 A+=*(S+imm8)+CF, set flags +scc *s+imm8 B7 3 A-=*(S+imm8)+CF, set flags +cmp *s+imm8 B0 3 set flags according to A-*(S+imm8) +and *s+imm8 B1 3 A&=*(S+imm8), set zero flag +ior *s+imm8 B2 3 A|=*(S+imm8), set zero flag +xor *s+imm8 B3 3 A^=*(S+imm8), set zero flag +ann *s+imm8 B4 3 A&=~*(S+imm8), set zero flag +add b A0 1 A+=B, set flags +adc b 9F 1 C+=B, set flags +sub b A1 1 A-=B, set flags +sbc b B6 1 C-=B, set flags +acc b B8 1 A+=B+CF, set flags +scc b B9 1 A-=B+CF, set flags +cmp b A2 1 set flags according to A-B +and b A3 1 A&=B, set zero flag +ior b A4 1 A|=B, set zero flag +xor b A5 1 A^=B, set zero flag +ann b A6 1 A&=~B, set zero flag +add c A7 1 A+=C, set flags +adb c BD 1 B+=C, set flags +sub c A8 1 A-=C, set flags +sbb c BC 1 B-=C, set flags +acc c BA 1 A+=C+CF, set flags +scc c BB 1 A-=C+CF, set flags +cmp c A9 1 set flags according to A-C +and c AA 1 A&=C, set zero flag +ior c AB 1 A|=C, set zero flag +xor c AC 1 A^=C, set zero flag +ann c AD 1 A&=~C, set zero flag + +Jumps (J): +jmp imm16 60 3 I=imm16 +jsr imm16 63 3 I=imm16, Q=I +jmp p 64 1 I=P +jsr p 65 1 I=P, Q=I +jmp q 66 1 I=Q +jsr q 67 1 I=Q, Q=I +jpr imm8 31 2 I+=imm8 +jnz imm8 30 2 I+=imm8 if !Zero +jpz imm8 32 2 I+=imm8 if Zero +jlt imm8 33 2 I+=imm8 if !Carry +jge imm8 34 2 I+=imm8 if Carry +jle imm8 35 2 I+=imm8 if !Zero&!Carry +jgt imm8 36 2 I+=imm8 if Zero|Carry + +Stack (S): +pha 40 2 *(S++)=A +phb 44 2 *(S++)=B +phc 45 2 *(S++)=C +php 41 3 *(S++++)=P +phq 46 3 *(S++++)=Q +ppa 42 2 A=*(--S) +ppb 47 2 B=*(--S) +ppc 48 2 C=*(--S) +ppp 43 3 P=*(----S) +ppq 49 3 Q=*(----S) + +8-bit Load/Store (B): +lda imm8 20 2 A=imm8 +ldb imm8 26 2 B=imm8 +ldc imm8 27 2 C=imm8 +lda *s+imm8 28 3 A=*s+imm8 +ldb *s+imm8 29 3 B=*s+imm8 +ldc *s+imm8 2A 3 C=*s+imm8 +sta *s+imm8 96 3 *s+imm8=A +stb *s+imm8 97 3 *s+imm8=B +stc *s+imm8 98 3 *s+imm8=C +lda *imm16 51 4 A=*imm16 +ldb *imm16 56 4 B=*imm16 +ldc *imm16 57 4 C=*imm16 +sta *imm16 50 4 *imm16=A +stb *imm16 58 4 *imm16=B +stc *imm16 59 4 *imm16=C +sta *p 52 2 *P=A +stb *p 5A 2 *P=B +stc *p 5B 2 *P=C +sta *q 54 2 *Q=A +stb *q 5C 2 *Q=B +stc *q 5D 2 *Q=C +lda *p 53 2 A=*P +ldb *p 5E 2 B=*P +ldc *p 5F 2 C=*P +lda *q 55 2 A=*Q +ldb *q 61 2 B=*Q +ldc *q 62 2 C=*Q + +16-bit Load/Store (W): +ldp imm16 21 3 P=imm16 +ldq imm16 23 3 Q=imm16 +lds imm16 25 3 S=imm16 +ldv imm16 22 3 V=imm16 +ldp *s+imm8 7A 4 P=*S+imm8 +ldq *s+imm8 7B 4 Q=*S+imm8 +stp *s+imm8 7E 4 *S+imm8=P +stq *s+imm8 7F 4 *S+imm8=Q +ldp *imm16 68 5 P=*imm16 +ldq *imm16 6A 5 Q=*imm16 +stp *imm16 6C 5 *imm16=P +stq *imm16 6E 5 *imm16=Q +ldp *p 92 3 P=*P +ldq *p 93 3 Q=*P +ldp *q 94 3 P=*Q +ldq *q 95 3 Q=*Q +stp *q 7C 3 *Q=P +stq *p 7D 3 *P=Q + +Moves (M): +lda b 80 1 A=B +lda c 81 1 A=C +ldb a 82 1 B=A +ldb c 83 1 B=C +ldc a 84 1 C=A +ldc b 85 1 C=B +lda pl 86 1 A=P&FF +lda ph 87 1 A=P>>8 +lda ql 88 1 A=Q&FF +lda qh 89 1 A=Q>>8 +ldp q 8A 1 P=Q +ldp s 8B 1 P=S +ldp v 8C 1 P=V +ldp i 8D 1 P=I +ldp cb 91 1 P=C<<8+B +ldq p 8E 1 Q=P +lds p 8F 1 S=P +ldv p 90 1 V=P + +Opcodes used: 164/255 + 0123456789ABCDEF +00 | C--------------- +10 | UUIIUIIUUUUUUUUU +20 | BWWWAWBBBBBUUUU- +30 | JJJJJJJ--------- +40 | SSSSSSSSSS------ +50 | BBBBBBBBBBBBBBBB +60 | JBBJJJJJWWWWWWWW +70 | AAAAAAAAAAWWWWWW +80 | MMMMMMMMMMMMMMMM +90 | MMWWWWBBBAAAAAAA +A0 | AAAAAAAAAAAAAAAA +B0 | AAAAAAAAAAAAAA-- +C0 | ---------------- +D0 | ---------------- +E0 | ---------------- +F0 | CCCCC----------- diff --git a/rom-8608.lua b/rom-8608.lua index 91d747e..4367bac 100644 --- a/rom-8608.lua +++ b/rom-8608.lua @@ -107,7 +107,6 @@ local function archToUcode(arch) end end end - print(table.concat(infolines)) local lt = {"Opcodes used: "..numOpcodesUsed.."/255\n", " "} for i = 0, 15 do table.insert(lt, hex(i):sub(2, 2)) end @@ -120,7 +119,13 @@ local function archToUcode(arch) end table.insert(lt, "\n") end - print(table.concat(lt)) + + local info = table.concat(infolines).."\n"..table.concat(lt) + print(info) + + local fo = io.open("instructionList.txt", "w") + fo:write(info) + fo:close() return ucode end