From ac65a653d3158c353f3fb0cf9af1c4423f99731a Mon Sep 17 00:00:00 2001
From: Stephen Toth <stephentoth.st@gmail.com>
Date: Sat, 30 Jun 2018 15:33:20 -0400
Subject: [PATCH] add SLEEP FshCommand

---
 bin/FSHa.8xp                         | Bin 2839 -> 2943 bytes
 includes/FshCmd.asm                  |  23 ++++++++++++++++++-----
 includes/FshCommands/FshCommands.inc |   1 +
 3 files changed, 19 insertions(+), 5 deletions(-)

diff --git a/bin/FSHa.8xp b/bin/FSHa.8xp
index 1419b6e2ed8e6e510f62e9b448d90fa1dda5a947..6557199a1bde0e36affd15fcc408d66cf84017b2 100644
GIT binary patch
delta 1417
zcmZ{jT}%{L6vt;~nf;97R2J3{a0U#nABm6_yS9a50!R!Z32!y6L6<~ZELJdpO+laR
zLt|`iEDvh*!G~Re{lch;nz&LPcIZ`(afu;O+=tPo)N13m4U6Z_&a!KTP4>>2^FQa@
z-~8v!K>l3*@ydpJ#}cm6VXkj!*v#p_O2@~JCqL2#t3W-HFgtF&Pu&<>@y~~$nxiYu
zgYv)!^sOJ1Gk;A;R*s{q!@vGi%pVP(`kd#Z<SxIq-!%yI%OEI4g8+Zj`5~djrS(Rx
zJS+Fy$i2zR-5N^u-WkgDMut<li^G}Rl#!dx%2fpPx}D0W0i!S$l@Nkf`9XCLf`psv
zaU;gKX(~Si5^ko)!Z1j<i5|x=#^HMW5@VdH$GZaLy3pjjkL}EbyEw{(E<A_;Z6|Xk
zxj<I_&eB9fi;=HP#kPGRpieErXfHWp+UvZG+p-xK5FvX;i8H#OvP>+tU7w#&BNmZE
zIa{445t2<AK*;x}oLf-ADIejK83kWC%>dPi-|{EOpjgr0(pXp5%;h&9?CO-e_O!{n
zTibUZY;W!AI3Vx+zN<s-Y;SAZFYoK{w#n|z&9!T|XY908^U85?qPw)49h?6~$9<qY
z^uc)3jiUjWzdNRc@YGy2th^Qg>5&otiB(I2p!F%aSkkTc-b}=JB~D7rYx&n?n|YP6
zB1k&T-n_9OEafIElAn1@rLKRp-lXaF0GTltI#KAGEH~Tf8y_6mzK%Zf!PFQjv=ruf
zL;q_LZ@(m4Eh|4k0b4Z1j%M(Fu+?r$r25i=_d|i4wiF275V>gCBr^VC^4wBpL@TXd
z^y|3*Bx2fF+{{VnbK2{i<vqz7&kKkqVl%Xn7iKQGU&Z3u<CfeAXmRB?aYB;tAmKLy
z2^z8r!7cP(KhUBuBsZ$ZaP_FCaLrY(;c8Ro!mzz3{&)v=Ujg@>-buUXR<evtSxYw7
zhM_0Psd%ZD=>?0RvEhA{iPYUXaWqq)DJR5<Cj3YhiSTw;0TM`9oT6ab4+#y+NvqA(
ze{Y_1dJ#^K`dx$({(`Gby%|XnVjmJtF~WGVtQ=?*AM3J3=q}B1{mwu)L>2=@#VF7e
zTbgv5k>(@Ahol<_@5rlSrUpmSriMorHr1n6jWF16aJ8vtM^dmsa@fA=>)Az#P+>%P
d$ykRwWKgQ*9QJU_-lC`P328TH8KY4D^E*3%;++5h

delta 1355
zcmZ{jTWHf@6vvaa>C$dfqf|SGUE_v`^D;q4ojMhqn}XYe4ipt83`M~QAEZ;URS*Op
zME%^nAjlqM?YdslDTois93oBqWJm10Y>ZWiig#Z`MXM)CYdcp9P0n{N|Nk#1<oC>r
zGtVw>8ncx$)MnYRrD+|b|EMit`*f5x2^@8c+^>W%M(1NJ;Qw+I>KR(r3(~kB=#KzM
z*WM0^0>jX|(R0U~Y=wMvCCi4$Gj@URTQAV3VUT|H0z7O8KuS%DB|#%MEttza$>g5r
z<syAX-;KUp-|di*yBo^o&S!F6*<5@;L_fMZ0BaN>2qGG32W26~XrRYJABZTd$1gEP
zK|LN0frvtS90-wduGxMEN3^HBh2tiC%8nRNGpR7UX1Sz?c{M&$+f9y`oK`*x^m7q6
zD3Wf|KKmuK(ljohRldetdw0P~4ezvW`>W8#&mmXLo9sssOjGe7<V2N|1uLjB9aY{*
z_)2LGsEyyxE+Pqj=?3YQ9}>;?D#9?B@PmFjBSrCTZVekNXbpqt%f!dA>v|Yeuh!ww
zn;)g(taN~!wk%-JlAD$)P7ae1OS^AZ1g0><OVf33Q>EjhdN^%*yd(nN;U#V%T~}kS
zEOETA_72yyR0DnOhZoq6CyR}K_rr;n>ik^0kvj|n@%u>@pTnDGl%M~~^N-Ku%eQ6p
zwf?LJ&Y*`X*>DwX0IcgbrwpTPq5Xe_H>ODw#3`)cwY@Zuox;3KbV^v|&~sr(#nt;s
z3nQYxv3oKil&|fPK}||s{E!%saWnvsqEUg1G}12tpf{tCu2tsAkajD}@H$m##j91h
zC__s}^23fEnbcYrTSueNfh!n|k}1WGy?;-jN}c>rGk#wZii>Ds7}UGW^i~l!?Z>|b
zt^Ht19Ylp%hWZ7r-bHT|aVdx+G?P?6Y&jIm;(7>col&j<x)oDQL#x88RoN3W&<>H=
zHW&9m){uM;WE~K1IV4Z)KS&b_StJ~tjHD4Y_GgJU_7`5DTd^l~z^^)>yWaq8ByVh0
fY$qu#F5BK2)A{h0<3qW^E1OWr^5N)YzF_MgYyZE+

diff --git a/includes/FshCmd.asm b/includes/FshCmd.asm
index 84e9763..fc004d7 100644
--- a/includes/FshCmd.asm
+++ b/includes/FshCmd.asm
@@ -42,6 +42,15 @@ fshcmddecode:
   call z, bytecpy
  pop hl
 
+ push hl    
+  push de
+   ld de, fshcmdCLS 
+   call strcmp
+   ld hl, fshcmdCLSo
+  pop de
+  call z, bytecpy
+ pop hl
+
  push hl
   push de
    ld de, fshcmdVARS
@@ -51,11 +60,11 @@ fshcmddecode:
   call z, bytecpy
  pop hl
 
- push hl    
+ push hl
   push de
-   ld de, fshcmdCLS 
+   ld de, fshcmdSLEEP
    call strcmp
-   ld hl, fshcmdCLSo
+   ld hl, fshcmdSLEEPo
   pop de
   call z, bytecpy
  pop hl
@@ -87,13 +96,17 @@ fshcmdroute:
  call bytecmp
  jp z, fshcmdMOVEf
 
+ ld de, fshcmdCLSo
+ call bytecmp
+ jp z, fshcmdCLSf
+
  ld de, fshcmdVARSo
  call bytecmp
  jp z, fshcmdVARSf
 
- ld de, fshcmdCLSo
+ ld de, fshcmdSLEEPo
  call bytecmp
- jp z, fshcmdCLSf
+ jp z, fshcmdSLEEPf
  
  push bc           ;put ret location back on stack
  ret
diff --git a/includes/FshCommands/FshCommands.inc b/includes/FshCommands/FshCommands.inc
index 15c9306..8460529 100644
--- a/includes/FshCommands/FshCommands.inc
+++ b/includes/FshCommands/FshCommands.inc
@@ -4,3 +4,4 @@
 #include "includes/FshCommands/MOVE.asm"
 #include "includes/FshCommands/CLS.asm"
 #include "includes/FshCommands/VARS.asm"
+#include "includes/FshCommands/SLEEP.asm"