From 6403ab1acfaf9fac8e205679fcc4b651dafd34e2 Mon Sep 17 00:00:00 2001
From: Virgil Dupras <hsoft@hardcoded.net>
Date: Thu, 30 May 2019 14:46:25 -0400
Subject: [PATCH] zasm: add support for SRL r

---
 apps/zasm/instr.asm      |   9 ++++++---
 tools/emul/zasm/zasm.bin | Bin 4241 -> 4251 bytes
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/apps/zasm/instr.asm b/apps/zasm/instr.asm
index d5075f5..46346ea 100644
--- a/apps/zasm/instr.asm
+++ b/apps/zasm/instr.asm
@@ -2,7 +2,7 @@
 ; Number of rows in the argspec table
 .equ	ARGSPEC_TBL_CNT		31
 ; Number of rows in the primary instructions table
-.equ	INSTR_TBL_CNT		151
+.equ	INSTR_TBL_CNT		152
 ; size in bytes of each row in the primary instructions table
 .equ	INSTR_TBL_ROWSIZE	6
 ; Instruction IDs They correspond to the index of the table in instrNames
@@ -61,8 +61,9 @@
 .equ	I_RRCA	0x34
 .equ	I_SBC	0x35
 .equ	I_SCF	0x36
-.equ	I_SUB	0x37
-.equ	I_XOR	0x38
+.equ	I_SRL	0x37
+.equ	I_SUB	0x38
+.equ	I_XOR	0x39
 
 ; Checks whether A is 'N' or 'M'
 checkNOrM:
@@ -969,6 +970,7 @@ instrNames:
 	.db "RRCA"
 	.db "SBC", 0
 	.db "SCF", 0
+	.db "SRL", 0
 	.db "SUB", 0
 	.db "XOR", 0
 
@@ -1142,6 +1144,7 @@ instrTBl:
 	.db I_SBC, 'A', 0xb, 0,    0b10011000	, 0	; SBC A, r
 	.db I_SBC,'h',0x3,0x44,    0xed, 0b01000010	; SBC HL, ss
 	.db I_SCF, 0,   0,   0,    0x37		, 0	; SCF
+	.db I_SRL, 0xb, 0,0x40,    0xcb, 0b00111000	; SRL r
 	.db I_SUB, 'l', 0,   0,    0x96		, 0	; SUB (HL)
 	.db I_SUB, 0xb, 0,   0,    0b10010000	, 0	; SUB r
 	.db I_SUB, 'n', 0,   0,    0xd6 	, 0	; SUB n
diff --git a/tools/emul/zasm/zasm.bin b/tools/emul/zasm/zasm.bin
index 938b7a92e58a274e861eaff28ef955f0669617da..ae06e5a711310196bc5e413abddee2c017f97f69 100644
GIT binary patch
delta 851
zcmY*XT}V@582-L<=BDlEY(ngqky{fytuk5V&x(UY<g(c^_|BQ)QZKrQQlbl+H&ZB@
zK}7P=4|E*}MPUn}3!AZuj`m#$&bxCla7Bugk#^PUJzI^sI`8|u&-*;@dCr;iKJ;>#
z=hGa<c$J!P0I#H4@GXodQg1jnc3)N5xa!%KWslXYo?A?7nH4q9zSD2~T^ytnrfYbG
z+A403DMU|TcA?8t<?VrzgHq4sG+7rp`DdVy1XWT%o=W+1AVwUV=0KW(R5o#GsF{E?
z_MvM|UMMlmJmW)KCrZ?^#2-eC1ba!~oT2!a*H3&7Q&9m%k^fYtx7tfGL6sgg*N(-A
zybdOCLRnXC1_r1ZnxNcIK&w0iWb1Ny?%@BKsKo7d7q2WG1Vc~(ECRjZ3pQBO^V$4c
zh)!SNhb0?bHaksy#MMVv&GoS!BJy5^_!66Xg8wLVY`|*+Z$zrpXDYx{gr^B)L<Hdi
zkzEN(r&&BKRYSs%v(d{&&xyx<u$Yj1HnyTlEm`9eU9|M<QAhx2e5YrJ3)UY+Jjd8z
zr^jv}%`TV#(&T#AZGJ%4Ej73=WvP6DxwGNa%c>E6mld@yw6<PC=pJgdB6J6}4kNUT
z+5mZq+GvNp!Fru!$QN=zIi(EIQTq`5LZ9pnSfYZX9)G2W9No47!k&Z{Uu)T<D^4dJ
z=kXN%;gD?Os&qJ?WwoIQ+n{@e#wIx1n)myYYfMDBv?iM~0%GgR{F0KHRrGv5yQcf4
zq`yAN!Xe4Yrsz%KNcD^&<G{Wo`=xp;&x!?I7JP#>(Ybh`0I6)URn=3$ZbZekw8o}7
z;{`l_Fk0Z|TcQPCauy2jWeh%}nOBj~%zedMKL87o0KQV45v0I|qT+U=Es9tnR&_1M
eB--n&6PFZ?%_{87Nq=K<_s#*sKd?WU)_wyA#7;;6

delta 869
zcmY*XOK1~O6rDGdCaL*MQ;<w;sS^|FG}uxCZEBUlADWiLw5e|<E`&;PA=)A$r4>mR
zMaG4S@=zCrf(xOGVkr^9jj2Y#Nqvhh(nVmPK~k}yiwf<|;GIN+uIAo*&O7J6GjHDa
z)W>EQS6GD5Cb6IpDx|~cAwsG2C)SI+6Dplj#RGZzQq3F1^^Be^s3p2hesa&yaq_@2
zhYG~m@OU<gjTEBSV`8H(4kZhvQ7r1RA+YkVPy!FcaD@@=@{iCccC)&h(anjyhs{7u
zc}AySW2^F7jcMg57ui2wqt+$<Fh=pfFb-WZ760-u_PZ@r1%TrJsjTdus>uw*$VqGK
z>?oFZzywyP>&kt=05ww+lraXaItY{fTXo#c{e#4?*XylrSz8D|P=Q$-deawdkZzRn
zrOyzZvBphGPO@QbvLvu4LAI@dD{(Avz9{ym_KXy_#b4NkYXfgevKwz3z*K;*1!M#U
z!UZC|9hEN9>8R8U2}90iFPl9pob$uMl;n5Pf+~gc<}bQoyWAPYA)s+X;vo+le-#(c
z(5pkD%bfIi0D(!5=i`X=1=+E+phVhce}mGQ#ygyFlVP4SVF$xJVZxIPv%&Pk<TcYz
zMqC|^yZ9Y0;iJlFWt_~pCgA1lx;juhX>kY87LnZ}P6gAY$odC8uX!fPy!#qjAc&Wo
zQ>xTk%G1_JoPH<0e0L9Q>nH_-TA2z=F{8`YEYHwyN-n2l(~40l<;zA;(t-hvMk7)a
zT_A)%(Y&O{D0EDtd#Y$#t`=mI_s{al)#*wF!q}sms@Op9C53WEr;9_=6_o2tR@huu
zvcgGCmC6?xfzM3#eS9YSNbv>6;DE$~uXNbVkEi2F;h@=8MI4Z(S}xLdRb-d->SH}S
n7;GCm(ydkZ2z6=8p}_qXnp1R|R_O3xuv<IQHfF8{SVsR1*ZWaB