From bbb75838cd6cfa0012618416dd0848f2a16c86b7 Mon Sep 17 00:00:00 2001
From: Dennis Ranke <dennis.ranke@gmail.com>
Date: Sun, 2 Apr 2023 23:21:31 +0200
Subject: [PATCH 1/3] first unoptimized version of blitSprite & grabSprite

---
 examples/curlywas/sprites.cwa    |  21 ++++++++++++
 examples/include/microw8-api.cwa |   2 ++
 examples/include/microw8-api.wat |   2 ++
 platform/bin/loader.wasm         | Bin 1269 -> 1282 bytes
 platform/bin/platform.uw8        | Bin 3892 -> 4028 bytes
 platform/src/platform.cwa        |  54 +++++++++++++++++++++++++++++++
 uw8-tool/src/base_module.rs      |  15 +++++++++
 7 files changed, 94 insertions(+)
 create mode 100644 examples/curlywas/sprites.cwa

diff --git a/examples/curlywas/sprites.cwa b/examples/curlywas/sprites.cwa
new file mode 100644
index 0000000..4515026
--- /dev/null
+++ b/examples/curlywas/sprites.cwa
@@ -0,0 +1,21 @@
+include "../include/microw8-api.cwa"
+
+const SPRITE = 0x20000;
+
+export fn upd() {
+	cls(0);
+	let t = time();
+	let i: i32;
+	loop spriteLoop {
+		let inline x = sin(t * -1.3 + i as f32 / 8_f) * 180_f + 160_f;
+		let inline y = sin(t * 1.7 + i as f32 / 9_f) * 140_f + 120_f;
+		blitSprite(SPRITE, 16, x as i32, y as i32, 0x100);
+		branch_if (i +:= 1) < 200: spriteLoop;
+	}
+}
+
+start fn start() {
+	printChar('OO');
+	circle(8_f, 8_f, 6_f, 75);
+	grabSprite(SPRITE, 16, 0, 0, 0);
+}
diff --git a/examples/include/microw8-api.cwa b/examples/include/microw8-api.cwa
index c537642..60c9478 100644
--- a/examples/include/microw8-api.cwa
+++ b/examples/include/microw8-api.cwa
@@ -35,6 +35,8 @@ import "env.circle_outline" fn circle_outline(f32, f32, f32, i32);
 import "env.exp" fn exp(f32) -> f32;
 import "env.playNote" fn playNote(i32, i32);
 import "env.sndGes" fn sndGes(i32) -> f32;
+import "env.blitSprite" fn blitSprite(i32, i32, i32, i32, i32);
+import "env.grabSprite" fn grabSprite(i32, i32, i32, i32, i32);
 
 const TIME_MS = 0x40;
 const GAMEPAD = 0x44;
diff --git a/examples/include/microw8-api.wat b/examples/include/microw8-api.wat
index 04bd403..e006e59 100644
--- a/examples/include/microw8-api.wat
+++ b/examples/include/microw8-api.wat
@@ -35,6 +35,8 @@
 (import "env" "exp" (func $exp (param f32) (result f32)))
 (import "env" "playNote" (func $playNote (param i32) (param i32)))
 (import "env" "sndGes" (func $sndGes (param i32) (result f32)))
+(import "env" "blitSprite" (func $blitSprite (param i32) (param i32) (param i32) (param i32) (param i32)))
+(import "env" "grabSprite" (func $grabSprite (param i32) (param i32) (param i32) (param i32) (param i32)))
 
 ;; to use defines, include this file with a preprocessor
 ;; like gpp (https://logological.org/gpp).
diff --git a/platform/bin/loader.wasm b/platform/bin/loader.wasm
index 83425e2095c469579b1e332e8906775cf66e5800..0055ae6e59db4d745a7fd862e19853f030cd623d 100644
GIT binary patch
delta 512
zcmV+b0{{K>34#i+4FiAk0|5X*01NB`75~@wM{$MsE2p94?FNZt7`A*A-Vpm%ALKH1
z0x>oekB~`cUHrFeCcoBaIt4`(%E~T7!+_HnnSij^r2;KXXWX6dlOBV?c?CAtuq8!w
z2N5Ge5l!>kfq-T|-J#7wn~tl@J@m)!6|0{BeCfH4^VG57Yw&-AFqm(CQzCeawdE*R
z+~#A6Fw$TX;l0=5m?c`?=|dEgfqrn09VM==^x`LL7sj`{M~O&7t=T!Ct%)%N>I+ft
z)|IX+XcvLHi>+Mt%qp%Dvap!4zt|2M+2SWMY!|{6Fx?v5XO^;^)EH85f6|PQ&*g@c
z_1NWy7cn<tXvKf5=GR+&Mwwo^5jh9+pcXd$fo`=WlK)X0=dAw5y+G_1{@Ri-B+0`B
zl2*mU!gmGO{WMk3S{I|<twBV(8V4e-kfPtA1v;7kA?F)|hn8B{ay$hHOgWFQt{$pW
zpW_&W83(M({>O3eG2k5d{7r^#Idrq5Z-m4tdvCk(=+St$8++^lt6^%<ZNe_35$X;G
zAYrbCE_t{dq-=GcRmPRRvNU<nyTN>JT3Ukrl+mxbceOZ#>0WeR8atoO3+Bu(M&on$
zH5$F`dlg}trV@agd0DK0mRm;QUv5UVp3sU^cSWi6at2!B7qI;mUo{v3-H&3^{I~jl
C009yJ

delta 499
zcmV<P0Sx|v3iS!F4FiAX0|5X*01Mv(m!HpZS<(J-6}2yl*j)ah#eX^@GqRPiOZ$Bx
zhUc}n)7@<Z#5ZEISyON0g5gXswY6)75l3goht85E2~y4I)>zH<&UgS-0dkIF0MM)4
zSb0XAUT-`6EC3gR40+3EzqN}RhmER*S6&yN@3hgfyodIB>AZh2VqIbQ&<ptpbk5!4
zN~2z^j^)t<4#_KjJmF5>74UVVAjVnx<EK>_QqP2R8#07MfZWR=gD>I$R8yd<`5h2q
zE$s{i$>Ayz#GtY+%lmQm`3hf{3zBZLoJ5tFA`Vgr92$iVS5rj}X9Ssfdd(RQVI|#Y
zhnUS&1H>M9{AzzTwjy)5pLG4i1Xa09tWnxBcXCgcUr^n_!(%o=B*nAJG*h0bW`8HW
zfzMtag^b^=f8Pr7P}*QktoG6(F@EV?QBbS0&h(YYRobFpse5)eSG<qrAwz$(0tbB{
zFF}RIGL{8(rG<c*^y%sSGWRL!FX@uFi_M9BwiBhNv|4M*hCl>*!HOTMDELw4BF&{}
z0q?H&ERO-%%+Xt?j^uZDbZ0K!e9Y$aOWTk+&ho~l*Mc!S*`vR71aEXRy(Azq2(bCy
p=~l7Y6i!G{NmSr~@S6xvvp~{~1CX^Ow7I2=f>A5*>z(1UsQOh|`eFb8

diff --git a/platform/bin/platform.uw8 b/platform/bin/platform.uw8
index 2425d513c13e60795216e9ef3226b268e9486756..d19e1a901aa1fb7ece9eccebcdd816db94fda4ad 100644
GIT binary patch
literal 4028
zcmV;t4@2+*Dc`Wd&Gq;iwcw`JdmO^_4jh_?W0@6OOsjT2Bgt^7I#6xE3+;4UIM+di
zwh;)bdci;0ry^~2`>ydWR(vO6c0?sEB=VSR-{fUDGr>ANpV$84E23$dWav0UCkdRq
z&H4HNFW);RU7V3}Wyh@qgs;($!Zo6yy#lR2k!AyNqoze;k+&}%#0~uFS7yPM_*E}M
zIJnQ<i#4N?ELa`lIjp9iEcES;uzF17kAPp*ld`%6w4I{l!bBmmlh>VluGOzK?!L&9
zRt(+DxiUkfnxH4xGZ(OeVig;v7ua@cPThZuVD21yhzY{$X3K(92s;xF+Q>c>Hr*}a
z79<X<NXro~rkSDU@#WW8lb!a-x3bQ%4>L->KM9~cnjuNVeVYsqa1PTE_{PF-lx8;Y
zZEtE?;yZseJI4p~U0adUPJ&e0l<P>W_GCQ!7rEs}A@nm3m9n|OMK4CxMr7+@T;qN^
z->><>_1Eyf-Wnuc&%L_SyUWRrfHV%nnHo7_1gj-zL2$>@W$IbcZDd?enF%aXeQm>h
zj22NJV01Cl4q33wsz_8zG}JmT_Q7JTO6^)vbppJjh2CF6gF_s@!UtytCw7%~a&Bqx
zxUugE4i=olwreF41UNU1O%Q?31tKJR2;qAIq&bFJ(Vrx#yVYwTtM5Ajk_RQv*{fY-
zCYz_NuRj_2zbn?@fNWIaKalV$%Bn4ctu(3A<6CXMuPf*z1v9E#2+*2GQ>P!8T0d+Q
z*4CZ|WoJ%WTdL!kV<pVrp_HTFu|kd@<3dRs<EDUClUbsO*N`O?#~$}Z4e%fTC>x2Y
z$dB%3EyA1no&06?(h;jC^U2{MfKPQSDUr0LNBP0SiRibl`4o;u8kfe1YqV?;x}{MM
z1@!t6%FD#dMS$j4OA!kp#vomz<z%ZwSDpkY;Ua+~6j8&rlTtuTPe+7#l(3n)Up*PQ
zl)v*IF)+~z0+BgGsKP(5HLbquPng1z*kt|Kq(7y?vIj-}iS9$ZPu}?1Ecs@J$McfK
zxRYRgL|=w!4+LDRA|EWmz{>Z7NhsHgwLMT{S@OcfXfk;NEu;-Ho`ce>V7qB5b8+i4
z?X+SEa-d;*M0SXAvi7Qgd#9_L10|xvAaa@2rgu3&j=H^V;ga6M<b2fY-O>EM6+h8j
z4z~owK##@<3?#)45ld0n1*EA0?4QH9MeUzMV=-h^#1z&5h3pu6<edg&djmrMPuq=f
zXhb;-S#MScra8k>iYij)cQM>fM5c{%$66pU`&)!+X@aTVZQ=`qdU6eOt#)fjgyJjB
zZ)eClm{{9EN4C&b;B2tNs`DilW4C>lH<m@C@q#gSTLdmP`Gfo_V4s4$-&PytBju+v
z`Ko|_50kk4XA9ZN9il)|Mi~(Cj`o<AcLTGQ3b9ttXAU+#@!eg@q|Zq(<=~fSqqA{(
z$}{eDcVX+(V@Z6%RN1jQSjFF0%n^AoKqNQZ6B)D+gY<g3l_w`<Ez1-WYE1&lj;vEs
zJau$Mg}ijHTru}Pepd^XZ7vU~_toY;fq!jOIe!+0k{`?+kLX2lCqqh+TX<%#Pdsw6
zF+wf-L)cW?5Tnki30pF)q%IBF8|Q%|#t^vp24G56WTfC}vi5s>5LpkYj<=`zy+0@K
z-9mOnf|ZWC!LZKFG_6FzPloq8N$iU~J6SE@-P+@o92b<cH(u^B4MVwnRAPW>bI+0G
z1z!akOc(vyoXai%azQT1WBtzfF8(loSByFj_)y<rM-8N3mhchg+R}|a7r-TDDLuw!
zW;;GWJhFo8XzKYby2Y_&Ww;)hu7!2`hL{dY=}dO%ZeRcqVpGUjBQYG!@RcHgn1|6H
z@uZ1R*N}{=tf!Ox+{+xX19pw9BV@~8{A&>T@vfnz<YlPUU?HMjT6W>$*Wi!>2TUn*
zi@hrs-paVh6!-GA91xry_@=iFXOe~Lwe6SW3X@Rcwx1}3=#e>P&>*wyH;TnY2c-XG
zhPEt6ohlna)w<E6-FR+`uUN_aatAHN6=u!_kEdmk$BL!A$OqzrsObK2eV;3G(E-Mn
zCkaIaLcj-B!m5I?_6wd_3rxwgU(!3(?&dZiqrJ>PLeukOfdtOS_uu7ME?Jsll)W}U
zjW|Yc3QA>X*(!=0!F5ofdr0_wu0CU}A(na8pk5%|Ivbp0Qv0dN>7x0W#&V&wZ%*y@
zdSggbf_#xld$mz+Lp3$&Y2NFC=j0}fmi*tk1fverHi1qQiz;{b^f=0QCT~BShVvrw
zS)Cyfu?Fl6{jt$GN4-XB0O6oF5GnK-ED<qy%ZyNk70)~Z#)2g4^4xBC_JC4SFka=7
zSas$l&ZVZ8U-vD-?ZxHT+^dGqs&kaSFYtI`XsxDMryax244|_hL*^=i8aw`XW&M8c
zEd<1a|7}qne{Kz9La&?e7lesW@!ru#TF9-u$o&oZrf24_)RQ4P;?J}PF0$yYRuReD
z!2ekOG$2=WNcgkWXukg+CuO0SMoOrxI^IAvsNheo(I$dX?!RcSJ>`a1vrdrsq$1QY
zKt}_9PHt^9Rw2*x!g*8$mR<KFOOJrVb(?qeevF7OYUMLJ)I5i|{8ksYvyOos4OlHh
zE+fshw83L3d?Fmhd$I_VB&_E7!6f?P;gP(1?)J58TShJ@)h1F4F2+y4Njm9brrurV
zVcnMuo2!?O5DlJdTM>{0GN<D-ki5DwX`D(?j-qOK87oLh4zXbve86!d;yl=WR%!%D
zLL|?Akews+?@^-?7;rU-yOBk=oiBd?=G1cx>ZJ6ym(Y0=N13DRdRXTyFy`_Wmj9Vf
zdyNz_>$N%d1}}bI4$(S{ad*M-XH*o?M%by>gSR|JhS4*(vM3P&lh%HaNUcP-qn<(a
zRNw3Kwv%A)%I?lnVt*32RX_9+xuLAm!u?bp9pql>Ysy6zdl41<1oBSrzwRK}7<Zay
zbsQsd|G8#WKe?5|mu1hTP?LH6yq17&k6rorg8<8RLbjek)YzB0n)FO-AH-jREo}0;
zFAi=E>fK~X5AMP3x{3aN)2_TqXr#TaMZO$?w1*OI!ZUE`whVj;)RYlu=N1^Vrqq#<
z`+=a8IHX!*`@*#l<>~M00Ws0%L@WY{40~PV592-R+~;Y~_UzBmb3-AM_`I~}<46qw
zBgA4~YtF0MCGs|Lhq~HQ{NN0tmZf|;SByuO9FCeAaOo$fgvV=<#TRwyKcz~<$qxy(
z##TLuG>-f=!|t!(0&%V=nnxFwVZ8$GC@_ELShVqA7p8RH2Y_RRnF_?*<k|t=38gp#
zm(9@XH-?GjR^J#nH5(ec%Gee>o-8w?7O5w^O%iPa`4GJ6=67)Nr|X5`Wc#Wzm6$f|
z^;E$r-~CORMQVxQF(Bq9zA@Zi@D<R8sPBZpUOa3|V6Pqdp^0RmA^ihH`GffaO(ak2
zTrLZ*4mH3<UzJiIa3}-R9X;Z8q?b|Dw-FZLGRBe$>3i_NQL*$7*Zmft%lKUZLE1n*
z2oTw(ue{_(8kEK+C0ag%j9^EuJFgrdQv)R|FI6zy5n!Bxr5klvhL?s68}5+fu{Rg_
z&LdYDS?uFtIZ0q`Li2DP>=7lP1y~`+7_Fff%vOEumfauG_duj;qp7mXC9Psv_)m&k
zZ5jfg%v{`jKqa!Qlt0&(yL?fB!)u*7aO$pBOe}{*3DoZK;mSs58+$G~90BMMS|(^<
zuQ7%aGpBZ|16fBphJSnZ$<p(u0)-4)%o9f(bA-appk}s!3N+J-YYx4hosWx0yx0yp
zHA{AsfOl&8xp0~GhX#DdT#2T4d<{`l*({d2jrBj+=0VTN_O-E5>zY9b;P5ZXQ!vVr
zf^4(3n$<=G1QYb(GMD-%r>&jhuaX2*@`DW4#shtUw#-cCoR<?=o5xMJWtX^0YfAEz
z=APSa^kp*M)@EH*O3+FzuH&r;cM1WG^*WLP*v2Zd94VKpjfD#wmwO8HJ<?HZ!;PhW
zVia<{dF`9cTCd0(IpWZ)PL)pnuB^cbqXGUs$0VAsg=p<YKQb?y>A^)==VZVCyvQl^
zQFXi`iS*)DVUF+*<!!QrgOLa9ToP22*?x6|7E%4+a=TjZx$IXK=P?=#TMx0np1N)8
z6HI1&qNghy7<M0V@t$r8m|9YnZ%r^Izo2iXn!<^adTGyCENS&*M?4=jgqhQG(#wL7
zUR2DgD9_!m`UEgY2+#8V2)`e6(_tfrcB`+oubR5i6K<APu@{7$sS#<o;CUGzIb-`+
zt0h%TTl)X>l=lbei2EX1NZsGiX{q+-RJhBwt2S50%0)<X!N7dJp=_uqsNjDe6Bstq
zflTkpD;Nj~-6j9hWRdP`&A;YW<OmD11rFQCrXDrl1xl9Oh@c-bkz+Ydux}2Bz`GME
zap+sM3yc!5QTHIQGcD?#Sl-MkrGA-)N9M!&X3zldKOD;A>g`>MBnPlh4r2rdN;?Nf
z2EZ=#g<C0qiuEV*=YQ6>y<FMVqC0eQ97}GqP%r0I&K5l-$VJdLF!<IRkyu%@J)(E0
zoHXw-vey*Rd7OYcM72ae{S@Fo8Nu%ZB0iCX5a^DZN@!XM_$U8?M;^GVs8F((Ax};X
z31~L%ToUsHpjMsn$DXFss8Yy+!)z+c-90j38$D-)`arY%NY7|3P>AWUjQfN&)G+z_
z5!)A^T&INd9pH<%;MEBY8@th8;e_6xF#Gb3OvJ<*?l>0}57z&wO>ms`ofu4C2mQoB
zF{EW2Z7$LtQ<<0m7?EbwAdj@l*81j)Q>$R8$0IqSfaKY#Pg)0@+4`K##`{onFsUg@
z7C8<f_`uZ$?$Uc7q9L}xtIy~fc5$E484o8xPE<{r4S2OsLerenDp+jA+Qy|3bStle
z4C6OYXP^(0h^z8`=>4`zAf(%xlW}9`gMFO5{F>H>{HKHyN((`NQ%!OOLLQ@d=gi%x
z(W1=mzXMC~-rfLPI_aYaS9~fSH4-z{ZIF6!A5k^~be}P3GkIcz<1E7C$>z_Xz@f`Q
z-yT%;-0-Jt*6?)_cHHJ7+?w^3hj=M;{nelike@Y-e#a&HuKqkot$`!v@e0c!=q9?+
ze@1(J=b1A|0ma%G5H7VbA)R+K0YSUf7>^kSM5}uEOcBi;(OunhYR2=@jkOmxAfmr-
zXxeZ~FH47>$%!?s)DVw?X1Dpeh|CAc6-Yj^0N^5!2E@hQmmN{YE;&M>BakTf4ela%
znlFnL?Fh{Rk3*lx91R;7A@^zcP!__fqmNO0NlXhfoYnWEAOefVnA*9%cxE<cKl=L<
i&tF-3f&W9jqehMEyMF=RA6(FhTTkEOsZ|u5Ilo2+sNj77

literal 3892
zcmV-456kcZ8o$5yu`K+oyI`fcChxk0IvQNhQA(9#-<WTIQk2`}HMZJ@NTTE#fH!PN
z9F;q<SyYv$YP;^Z2OE7YN{m-yz!GH6Fn-{?Ds%M_QL=5VvJCW@aIL3nYsglMPu7U>
zF#k#X*uCtP@a4g#W>Yf`sS6UYf|CrIN^-q^erFWok}+Ac_Jsq5(_iVw=LhzW9nmP7
z2YsnoBs2t%0o$A38^N$uI?!Cl5{Cl5q;Pu_-jGyM9}K+o8zSS_w-swua#zd6(nf+U
z0vlP@NP^V)GBmc+Zq^hJR3Cd{W%<#MTjn<!4*^znv5MRkQu;+w*i8E7)Q>TnEyt#a
z74TSeq2UAc11wgv13p5jt5SY1;TAY^oG*LRgg>k0^-LZkyrrq+_C3BteX*(b_iF>V
zZ)7ZfE`*?P>9v^Mi#WK$$z8#>xlqW{VS|2Y_<qP;UQ1}4#p8F=XHXVPgoym%^|jzd
z?~~c32xE(h>3XZ2EK_-pdeYMg7U&{U5>Gi=v}}ixtZ(T~<O_~Md`iOd;iP#Zv5i1h
zM=jA<abGTT6noFyky_s!b!6wV8&_d7+K)L#v5vy^HPxSUW}3j*f1xYJSSawD0)B*A
zRRzwM)@_PK>{!K@sQ{n1+Vbs~PDWW3Q1)QIW%y*0qRng8pap>lYHZIV!L(o;hn;nC
z%CV>=5u0)b7eS%Byefe(=40BZm**CEgh+JU6!+{dTrm#vNYH22P+wQW{1-*etWvhj
z19WEeuCb}6?`$yQX{@{BsydCXGmV;j#(kHqztp}!ZCcJw;WM0tgHFhRuvw322U8;3
z79D;f2s4%o57Xf?SMjFMhjRm<oG=jecW0k8Rhqm0j~BL~7yBLF0a+%vWr_xu_@%+7
zq1v_ii^xMyQ)QDCM{VpS-n<=!*U(61Ah5!332?GraySG7RuRtqgFa~L{V%xP{9Rp$
z<CqPcd#W(WEVK9lf`PaE7L^mvF}2<!DP;rZAsBBBw+pvy2atN6ZH^pHF*NO3^a}^l
z6ZmE0EaY`@bZoR~zjoyhhiKwM*M>kMHr+^Np$<qI6YE`^QSti^4KsqP|F1Nj{SD8v
zm!jbaPf++SZkLTCyzoCVTY&xWMGGN7LFHKYI9EWq0piFuSptV4#)Z<6p0YUmz~1_M
z5H4U#*_16z0jKvu44@yUFA=|5j78=Pv|IB;DoE-v+XfHTNJQG=AYx9oq2YaVzH4~d
zW|B&>7G<nG?<17Z&-!8&l!^c7pg<W;S~!m%?IX;dDtgG~1&%gb${UNo&;MZK1X#iw
zZd&3(fz=u${&<-yjG7M=e^ll%d&X&(Fq=zz8ouDrmtn~0bRj&*{$^ROLToslyl+Rs
z*(H<`S1Q~Q_?fx-Lo=|H=5sDvG;+u($Tm_G@Lm^2nf2bCzG#tqA-*S1JR0m`oY<{$
ze4r}(EsT;+uEW<II9@1}ITnv#`mJ@KHtvC`$L0kZ<O7H}#W@;7E<v2Bc<_y|ZU90W
zFgM4nuVKyvv?~bpye;WCp%ej=tj;aIs>&5(GNYHK`~Ry!#N$SPlltEjlJEq(iD+Yj
z92k?&WK0_kp}&mMy707gB&gS9VsG$sAb!HC<qE1&6_Ypq{JUM?YgGab-i0Yucgl4N
z)i>r~zHxPaCY^?NfzVCry!m7zx_t_*_vP=8)D9U?)&G#e{Rts3YY>3{Zos#dZbJ7H
zG&h@0H@S)SeF6@ZH|c$C63?$7Z9XAcAb%qPDltDc$xu;Ajx<0zA!y#pS)5b0_*FT)
zH3ypn&<)-s2>W<Yz-kPzr^WT*Z)t|w8vNL~@UU0irTStB{c^#HmbF8X5912B=_OwA
zUe*+5#4EN7>?t4H=g0@#U0R6HaDS6dA48l-A)Affq&HJVdTSH_wx{w5#9o&sn4a4l
zw&S<#Q^Y1$R(?`dAxz`jgd9eXuG?hpYP(=r&^n@UTaRe-xI|elzFLg__{H+auD9*k
zkkQKRo`#7f&*GDZ*BDLYGz5|mJyjiE=-Kh7h`Qw`jwa+-%jt0En-83Ra$0L&ufh*C
zT3-{u)W?@=pV5qyVo~Wig2_D7h|D-vaZ%86a5se}CwCrNUrAofAQiPLkCveENyw~p
z(L?9EK~Pqp!4{+pjry>gRJDGx&+dmiZhZ2oO|X3hKId9Cxz^4!)rQzPsemIrV+Fv_
zp>nKZ8W+sVkk`uj1ory8g6y^Inq!f+s*oQ-{qKa!F=bPqor#v9S|nbXjNiBVE9EC|
zE<fy@Wg^-!)S1q{136p&Ka&A<Smf!?rygvv=9=Vck_kj3g-!^LN)39KywZY3{g<T!
zg#fx-t@1?835IaRXTWz<ZVYEex>cRnU2Z5w!zOIwuO;O=(Lz=Y<&BRUCgSOdrcfml
z;?{wUcy?2a9mzZEC|}8ka~$u@xm@nsTKM+>O#e<j7c_u!#_ICR5wS94H|P4O;{(0`
zJ3_W@VZez$G8yBtUv-DqOp73Jy9_hD$pR$yn_UW<zb$%H-1Uz~*_t=hzbUWX1X|N4
zou~xUXrEeSy$HQ<KJ!&vS;Fqk+~W?B51DF0b6G*Z5N{*|4D;ZjR4ur8e_isHAY`en
zklrvMZjBdZOhRUrVfUrY$^COnt9NEBb-7LhqCdFJgRtgfMV_Hm%}H0F%Z6W{DB(e;
zqqU}&KcQBx%ENuKz?0hjJ~877vVO{WwGOo6_OG}ecOGRPA3JGL7fsyFiT~TtEZp<6
zce`Z%2jiJn{f0IW*G#-EQtspp{@r6uvJ|gVpI9Wt$@Wmd-`1a}0}+lcC6Y-c531er
z`SF@FLG#v-F7C7dOFuzQZYSWz>(XfabLQWW>09Z_{M-Fh!3s2b&nc|3X37MwL%`}3
zN*#-+NVJC;Ym-Kvs1sM>wd)HBTrm{;#9qf8hUxC@<t~ih^YjL2n0|!>?S!tUWB)si
z-4<{ciQo`a>z$6pH-*d&mNt|u5_yM~%i?K^#lQ*WA0YeBrmf@7<6}L61&LRgf5>a=
zoE3?$zh291H7CM-z`ZOif(#idhjD~=)o;c+XPTGEQ*VKT;hoIA9d#hqBo|y*`|8%M
zi&T3kzDKI{uhtLL6`k|#yiDDX%-DgOoS!NWJt6+E{$h2l<xRsbF*kRI^cSyqs1cDr
zGq!a7x{Ou{^LvqK&?u)TW3{V8MlwM7->SMaT&n;^jpx54J-SaT!30&4>7kX7Q{eVi
zRwXFhPnUy5La6re>`<5_ChU3hR=xzV>1HtO6P{p&c}C@fE?vp58*CLaQlO>Vx;qj9
z+GkL@oFelG(BktkH|<xF@}S!ABI~Z2BAzp{R-#VrAc#BD*p&O5E=-f7S`uElvZ%<l
zQVHVS#wa1`r%+oKBIr!L@T9B`4#9~MoZ38z=3+j7^8<*B{`e=Oz6|mt+5IvN9wew5
z_Ol_|p)>jD2rX&+gF>1`L+mRtjoy+!_>STr)(7dvgR$e^3~8AKql{mfSB`JjywIR`
zz8^;WkfD@>Z{j*`bQ=mYp%!r`%RSP!iMt$t(ajky<haJ}2BakyjJ$OhBw<hw*~dG~
z+X*H7?3oYbyGaE3^pHf3H{GdN*p5El@v_kiN2lwA<5#<L1563h@^QC`ytD~R?tnIt
zWbEbsnonV}r|Tk_w)*K0pYI5;^;T04YDdHvx=}PQbE#g(s%j?yk1y5vTv5IdY4DBl
z{~*mx>=S#xx?~(8o!@1Bo1<^+!aVcB6%Vqc;2dI7dT+M+8TS(w5+U?rR;dnCjz1Pc
zF7MBov@;R55G$IowLOKITpbA)RW@y*J#L1Nuuw1Jf${~PvHL-{g3C<vt33Bd{UPDu
zBD|GOGLhL_f2#1v!p@S=-`m9KM(C<VPj_#RqC^_&qq?QUeBLAOjZG6IkcoVZDfx0i
zNQvi-TzONPqYmO0yVpOBO_#Q1G;sdJm3zG$?72ae=CQgbp#+hJS`1vccbe#=9a<D4
z3~SUSfUa|o-Q~#rNZ5wycPS;Q@E_16x!M%wM6>=f^jg#M%KwY_Nf27Qo5Z&M(9zrA
zajvA12jqkVs$dojqqvLUEB?SvuS?0SKs*Y`*wAQW7;iY|Y59;Cak_A<?LLt*nSi~k
z1pv^SJVCX@rjhoxnm=8l#Hx-JJC>@t>gNF78FsYfGt;b30wjmmdV~!kDuIiVA7Wi6
z-@OJ<Ql~NSoI<H)X1GE$VE)JAe=3~!<`fBduQ0~Qkgl=Ubww+%!~rVI0=RL=4VD=;
zhPz-6M!N^jic&eeYTvDg5Ty=UH1V`j<+7*O-{i%iEnSxlE3$gjU~k*TNbT!CtnA}e
zE5q~T`N+&-noz0sN#~RJ88CfZU+cfXc0_A#sCrIV$a2`3X*of@=V95ODa0XAN*R@E
zX}Ow4k7|undTou`xu|y<55?5tH9$Qb!(n^=CIP=yI$1tqw!o1F;j4Fn8v(qR(C{s(
zp&m~+5WcQ@930{AFMR8|UUhg>yh-fkjB3PPiT9;x-F>6kw((d0Xi&?8B4+E>`4^em
zvrXIu9xFn7pKzsZP-uYO#%YJ|VDPr!>WBdai<u_}jzJWF06bOl8B*UuiubKDAbhw3
zkb6ruU(3D~Ar(PkJ)flSu8^CTQ451ln1R>`*Wf&)NzMG{0Z`}pM`2};gHrJUiSI6Q
zb>dE<b^OD#mJ-I&9*=Vp*ZL~=&i=c>!+gq@@zv&cg6$s|@I%^1`jbfcx>5&-iJ8-Y
z^kVkwq|LA2`MR?^@&ydXp@RkAUc+cv7!uk@1PB~up}cITxf5KpB8u2uo1EZ#s2NfT
z{5d2;-*jMhwgFS%O*GW-cb;A(jipTe+h6$9v?yUP=RcxKg-<bZilEX^q6i!VZq!z9
znB~PCjdw^ZIHU^lpZOAN-c(Vw5{rlSXaplwg4$0O!mif&oACEdo>ujT%Ykh{0-c{P
z{js7e2i-H$nH+|e^{jiBCVctNP<G7xc<iXo0z3BRQJ@l8I(6U8@CzM46+PRQ^V?8Y
zA=wl%B5UMOF;{y<ZFaN+0AKh&^f_!Cf>-N%B1m(jN($dwS$4A*Ia=9$+=^@d3Jg-P
z#_G<ll+lCIoY>y1gyp4uwuQkbw91xR_x$Iu+rgE<rFH7ScNcFqgg=qNuINSh>;DR|
C>cf8k

diff --git a/platform/src/platform.cwa b/platform/src/platform.cwa
index c6e37fd..db1e2f9 100644
--- a/platform/src/platform.cwa
+++ b/platform/src/platform.cwa
@@ -352,6 +352,60 @@ export fn line(x1: f32, y1: f32, x2: f32, y2: f32, col: i32) {
     setPixel(i32.trunc_sat_f32_s(x1 + f * dx), i32.trunc_sat_f32_s(y1 + f * dy), col);
 }
 
+export fn blitSprite(sprite: i32, size: i32, x: i32, y: i32, control: i32) {
+    let width = size & 65535;
+    let height = select(size >> 16, size >> 16, width);
+    let trans = (control & 511) - 256;
+    let flip_x = 1 - ((control >> 8) & 2);
+    let flip_y = 1 - ((control >> 9) & 2);
+    if flip_x < 0 {
+        sprite += width - 1;
+    }
+    if flip_y < 0 {
+        sprite += (height - 1) * width;
+    }
+
+    let ly = 0;
+    loop yloop {
+        let lx = 0;
+        loop xloop {
+            let col = (sprite + lx * flip_x + ly * flip_y * height)?0;
+            if col != trans {
+                setPixel(x + lx, y + ly, col);
+            }
+            branch_if (lx +:= 1) < width: xloop;
+        }
+        branch_if (ly +:= 1) < height: yloop;
+    }
+}
+
+export fn grabSprite(sprite: i32, size: i32, x: i32, y: i32, control: i32) {
+    let width = size & 65535;
+    let height = select(size >> 16, size >> 16, width);
+    let trans = (control & 511) - 256;
+    let flip_x = 1 - ((control >> 8) & 2);
+    let flip_y = 1 - ((control >> 9) & 2);
+    if flip_x < 0 {
+        sprite += width - 1;
+    }
+    if flip_y < 0 {
+        sprite += (height - 1) * width;
+    }
+
+    let ly = 0;
+    loop yloop {
+        let lx = 0;
+        loop xloop {
+            let col = getPixel(x + lx, y + ly);
+            if col != trans {
+                (sprite + lx * flip_x + ly * flip_y * height)?0 = col;
+            }
+            branch_if (lx +:= 1) < width: xloop;
+        }
+        branch_if (ly +:= 1) < height: yloop;
+    }
+}
+
 //////////
 // TEXT //
 //////////
diff --git a/uw8-tool/src/base_module.rs b/uw8-tool/src/base_module.rs
index 9b86735..afcf077 100644
--- a/uw8-tool/src/base_module.rs
+++ b/uw8-tool/src/base_module.rs
@@ -169,6 +169,21 @@ impl BaseModule {
         add_function(&mut functions, &type_map, "playNote", &[I32, I32], None);
         add_function(&mut functions, &type_map, "sndGes", &[I32], Some(F32));
 
+        add_function(
+            &mut functions,
+            &type_map,
+            "blitSprite",
+            &[I32, I32, I32, I32, I32],
+            None,
+        );
+        add_function(
+            &mut functions,
+            &type_map,
+            "grabSprite",
+            &[I32, I32, I32, I32, I32],
+            None,
+        );
+
         for i in functions.len()..64 {
             add_function(
                 &mut functions,

From 4a1d607bcbd8f38714b0e003cb944a44ea326414 Mon Sep 17 00:00:00 2001
From: Dennis Ranke <dennis.ranke@gmail.com>
Date: Mon, 3 Apr 2023 00:09:02 +0200
Subject: [PATCH 2/3] optimize blitSprite

---
 platform/bin/platform.uw8 | Bin 4028 -> 4146 bytes
 platform/src/platform.cwa |  34 +++++++++++++++++++++++++---------
 2 files changed, 25 insertions(+), 9 deletions(-)

diff --git a/platform/bin/platform.uw8 b/platform/bin/platform.uw8
index d19e1a901aa1fb7ece9eccebcdd816db94fda4ad..33b8e166afb379b646676d46934033d18a3cdf19 100644
GIT binary patch
literal 4146
zcmV-25Y6ubPw%h;aeDA#0)ei?3zkLX3+>}9JcWyV_l4|+pfo^wLZotf40jT0kNse#
zmAwzknvQ0QjMwLfK|>x`$ysfUn>r@p);aYq!zmDwE9bum+Cr}C#xX9XtCnHvbQ0Fu
z9n|yy!u!-5od!%aJ=sX`sl^n$?#_tOhST0yep4~QJXuvDe8Hs_gn;z`&#CrELJp(a
z_+X6P7~)a{R*)0Zjm9hD;TKenI|v>E#h&cTdX%a$*2Nt4t_l;I%ELi3_u-@-QBK1g
zlQS*taON#$*Q(&a8T-omkf=<Q8cXqI_R6cM;tzmnJSTwWGM8#wLsA!@wU0RLC`OBx
zH~HFqcxnox^GxPsid)M-ya=MvLHsGM+9pQpO;)fqd`dxZ^%Vm=9sN;5k=W6F;S9{E
zYe?cA<csZ*md{u83K*Jd<6Q{SK9|@PV(i_1^Gmfp`_bu_&LdF$Igb-8GTT339Wumi
zU^jQsRdtB_l5RZg?VCx8`R^_6TqYG&?Hl|rKLnwCqSK!ARERNEOein^F*4}hxZ7=m
z!`m{G%sw9mkeo)0$=8aYla1bwDnHq1f#%dP2OzWYL<8X?FI0Gje58Y_Vf6G6iHjEL
zoZ~0ganFk~E$N*A$nmxbkMyJiHTn-f%gTl`Yhua^u#QdO&;{?uwcq>?n20hdUrg)}
z|0eUJw?24j`sK<cLv9U&)qNkj3_NdOsvsIW#cM?RWs<H}@Z5Rq(9>lx>pdy^b)GRX
zh6Qt>SPeh$ylXvY+bJiktamacGeHe}_m~D*UR2u<tkhIvI5iwM7m4gi5K`d*OXj)k
zLnHoJgi&V+^Wxhnv~GF`BsWjG3E*fxX63?a5u1582hDE6S~lEO{l742qC21fs}*Io
zsg<D@W&R|u=Lc!f@>fOYDg1}%Zr7H#r<73{pkRq6Za&xnFF{EMG0vPVp|c^z9tY8r
z*Ug*=u=A*O3T@xZ-zk?)X?Yr<QK{IFIt4oNIc@Q<Jhix~0=BLD6yG8qR=ftCUDA>R
zm|R;E>|a`=iB%6C17YT&Nx+U0!jDim)uSb?vv_1sQB(eJhWCXP#HW(a2hT7iIYTXU
zp*FQzmeCqz9WSk^<J9A~jtos=xz(i!F2Ids%a_4)c|9R{Exso6P9+{3t@_QqaZ1O6
zu3zon=k5XCq+3h}qe)-H&ZP@%hobk4zkQw>@ha14=2clJJXw-FvG=w3)0p^2@I^B0
zN5K)-LS<fo9-kAltvU^LFY5<DI;o~TA!GfcIP4$8#Fjl?Q0JLH7>OB;QOe&ktoirW
z>pJT0X(&2Ifl=lpyYVwf4Q{5R-c7J{$C^$2?yiDCKcU=S#~;RYKhG0PH%LvbX;xVu
zrImeCDpII_J2x5slr!lH$9aPNtUAwfhr0LrO4Izq_2epJlwJ@fgHSAbd98w5q$Rjw
zU-mK-eTSna83k6l=rJ~BkwiK8XTd_vh2ywsvME?9J+RldZTAl%MfuWS$*&$w49Ui|
z$4UKT5}QDPYMcJ4P_*MF{H>D7IEO-YqL@Om3ui-c*ahb_mnV{mmNX0{_7FtQo*2pN
zz5!<whz4}clZTuf(v}cQG9!@TPj~mJpNojaGx)H~svnN@gxXFFdI+estzMf15{Qn~
z5T~O1L@>F`TS1trwk7O%TJ8|6KU2-+O^J8JE>>W?7&CxHYu(>Q>s%<?8JtueKH_Va
zn(yvv<&_L_TJ>QW$l%daH6yaMl(;`Y5O`f&B}|>re?T?(5z#g$oxm)Gd;A63js-@l
zzk(Y+-hpm(#euXGo_2Oa9M9Vn$*0BlIds@Ub(o!0tHP8!!yB?38`#j0NUt+tiED-C
zF$_pPQ0cJ|^-ynUT@4i6wcI&CbpsPS6gjmq5NEM<^D>uZ{OLqN`fgAqTJj3N=NvvO
z7ZMJy6K-m2z+!7JAtt_Qmxu!OQcJI^wQ6<gq){(t8D{={etB)EkUMu&Gs(ntMW1fR
zmuI;qT3V=Db2mGv^kY1Dr++00#J}1TjyCpHamf=t1TB1_o|F~$Jo1TFSz~?LGH_Z>
zT%J&)5{qXQxG=e>p8jt;>Bx{UDnjHL6<T(3K*W~cPpqA2qav2KvLvARkPYA8Go1*<
z&;{s!;ecToiFJ==?aDi9%_2QMq?zP`RGCSOpSPin-kaJSm|V6Vl3A@Nl+`Uv0#6fD
z+E97%=i-GGkP+-wmPQeJcCjG%@*_)0(soM=l?};DF`@#02I)ZLjYv`ta}6lF*a)xD
z{dlE+@ZoNdc2Ewyc?&xOLAF>B8os1=)Y_Cj0k#y+Y=WIT({=*yE#rXGCFdukSiKhH
z<Fg|pJA)KuK(;y6?%C}ENhKMw6?It1l$f3_b5c0a%w}DxW;WwwpyPXs-UFo-=CYQX
z0<TX>!^v_eL}<2F_`hO+Iw)-~1nsZ2&wPnrw#D|YsSiocymK8Qk_~Lv<L!`67*8SD
zr!X9eHc;k&K!W|X@!pEuKgr;Ym#;+f$Su9E{aX*%ImR#Rm_R<oBDP~5cc!~Kj?<in
zR<X}U<9)5jp$v=Cja^moAX2cv3rR1-d2NBMEM;Et3PK7WP`0FKDviA#74MOud@Bu;
z$0hyLxL3YAi`90uSJYsqu$dhEFc@!qU{zXOF7N8jk7yftDHbgYfbMKh>DEj56Yegx
zhJ`lp_FA7Nq-|Da0CUvUr%bIy^4Qf4045P!NXm^ON%Q62Zg(zHJGvt%SFd`kB9)PW
zJRlBTZXM##)))3~A(He%bFjn<eo3tLYB!6_60}JxKNPZ0h?L>&nR2F$^*@ywld<$B
zUt^9BfCChcbKoh(3ZWxOoyHXgX7v>U*HyrkSoDZpeIDpv(CvQ6eCU*ZLORhC2Oyob
ztJWWBFX8R*_Z_LC&ddh^UM0z{bR~dprj=0`F4f7+MZ@SPwzI=b!m9_h7~P)q_L~hn
zJLMd1`U*7{X1?6I9kjQsLJAngOjBYj=G8qOruHC~!y|@H0quu+&BjfEc|acSC%F^r
z$ie!f6zI>@hAh2zx%m=vpi0xP{vo6<T1L#@O@xxoB#{6#!xZR7tz{+Y-I<H{d!nbk
zt|t$HNW$1XZFc$;pDe~n!o$d5#TWz4vJ%gY?RoqXVWTDX9j-FZT~3&GC!K#(qC0AH
zelRI)z5cM=3#g=>ANq>)#R4bZOKY6+Su?bNdRl(@fOiO??`;~jBFU^%gOj4G(fZw(
zzzwxb=G<o-lG+x;H(WW!o}hUbr5ho`C8=P$@2fM>1uU`pxap%OZ{6im;y)sc2LoOx
zE`l%_<ct&wvhxtW#R{qnX%PU0KwfiRy5e#1ijAec#a3`9w%!Mo!4&Q_oMaTjoh0Zh
zqrcW<84NHh$&YXXfFlbfyqB-sT&#fmn)YM%O%c@omq(q@2ypjZ*c2+GC@G7#bn->J
zrb&sYJ&)v|RMWZxms&)Xm+f@lkjb4g%5SRSNHJ_S7w-d*#MdMKcqV#!A9MPgSu~kA
zBFbWW8=>_CN_vK~I1B3##OUHJck~Cy`vjGqo3V-lcJ>Q`3}@2*+P`RI%<h=~Ts_$)
zuEJZV@B-Jzu}|IrboY1#tR-kQ7l#ZL+8k@`;X|NKzQxam9*=*SqGu8z3ASy+U{=j+
zHuax(4i)1Sy3G%gXZR7tM`7Ff^yDj&VZhx&(?lgI@pQn`uM}bsI4l4u47J_-y1CNs
z0BO8^3Y`<u<0GL@FoP@<n<RoEnS4KZA?$dj?K|Gp9#TBE5^fkA?I{V$PHdi#T$EeJ
zf0Ite(g2U57ZE>Bt-kbKmQby??851|uI1x$A;iXdU&G~Vx-8$TM3m6FqPK}8;AzT@
z)u{kM<uvM2ds^Truf9t{z(7=U$Dul@X!|&cEA=B&n&t{phu;bP;8QTG84hd2Fg_`v
z0ef-(H)+L}EU~}JwGeB|S^C|>hnC*TQ3vPJIB>MV#Gr$>o$135mlSq!6o`XnW!#ln
z#f`INgPQeR(|oP(r>nEBYK@2IHf6w~qtZY~5Ei|Zw_maLn)>g>W~3$Wh|I~nc(OIL
zL?)?YoH4w{<ykn<DX3Kn{d2vJz)adxakC_SUr+RAi&Gh9FVs{o0Yf6A8U^$cgK1}U
zMmH3DFpfY^3HLX|`$9T4JX-q_{Xcz$*X!7W#8ohk2De&S_2HsA&I3&C!}ZJMHAosC
zxgM4+N9W!WHY*Mx4e}-1#1Y=?y#kbqo6nP6W8oH0elozV6vsBNG?qm;KpZzzG6y`8
zU;|YE0KUIlf<h|;5%fZ4h*SXnV=}aU-z?JoQ$)KNlk1`KoY)MV>fyN=aaX9q@Rgyo
zkF#dwpppXVyw;@J2hq9pXA^%Us_11XYNLFlfqXE9C6<=4i<owpoEsb+=a<E%D>ik{
z2E|Bv9#>BU-Z{Av;pgdMYCKe3k$XQ?@j$1W$g;)IHO1QgOpe}JQk%_qH^2q2_V&12
zb+Oox0ej!A%D}^$z%BniVX)&yDkAKqsJ_-*7i1@ao5p|GpdF$Crp31#Zpoj*?9qW_
zwVB4oUpEM>=y?@ah#WT3nCG&s!|?a-&3mhG=7;UoKM>J&N5Oa9wi@bQ#;q(p;}+{>
zLGY}MNS9qZJa(;HVv-RzW$9cnr`cm0<NewU=!09)H<#ISq7GU(^H4-Bq901!D%iai
z>}b^fm%OeoEaBj<2(Im=q*3#|Hd_R)4K23qOB11=7)zm4KHIY$B4$)~$RJue_8$Af
z_@CCDdx^cvPjR=8A6^c+03~blEyDMFU!<0p91OT@f~biv_s77%%cee&+H-g-E<zcg
z{M5BVQ!?%k+We;?518)YaoJvsOy)8yVNkHRH!;m;t?mZPs`c~qGU({)9ec<9<on(e
z&&sEk@pZ+S?)$D(K&08UNx0luZaFxgs5buE+>Tx9Ctre*oOI0ADojt!%>P1{AZ>xP
zVxc|V;B3_@W8I>aZI7%iSO_>@W6a-_wFa&J<IHh>MlsNpuJhUH{aWp7!3v@^voCBJ
zUrCPz_Mzspfp}<Vro~LPLmpD43%Gtx@CJ^|=~{$O0DAq(?mGIU@mt(X?eAaeiSpgP
zV32889OOcyZx|!Zb1$~;CL}HIv?^YBcW(Qmwv^WOB~DqvGxS_au=bhFlvO}Vc}*z9
zkvyN8{_jp5P(Q&3xz;k<5M(gwMakFHtk3mm5n|QXsSI@X@l#%dZ}S`-=$rm56s+yk
zdI0Z6geY`~!~y@e_Ie8-Vk7{FkYgBnI%q|nnmtzvdYD%GmPwbUvn}yw=TZrP=PQ3a
z2Bqz8aa1UK()`L?Gkv>!d~8OzVtAu_WCD=3QYv;u))imaASntBreDUSSdEH^B712z
zs*%XcP8KkJ`$7NZ0}-`V|7`dwNw=Qr$j1UA)X6(DHUKW7$!UzWB1(7i<5SPgp*hz@
wFx<8Mo4_DgB^83)))kSq%WzQRGuCRaR0_z);_s#}07GO1p6)17L(BCG3g7%2u>b%7

literal 4028
zcmV;t4@2+*Dc`Wd&Gq;iwcw`JdmO^_4jh_?W0@6OOsjT2Bgt^7I#6xE3+;4UIM+di
zwh;)bdci;0ry^~2`>ydWR(vO6c0?sEB=VSR-{fUDGr>ANpV$84E23$dWav0UCkdRq
z&H4HNFW);RU7V3}Wyh@qgs;($!Zo6yy#lR2k!AyNqoze;k+&}%#0~uFS7yPM_*E}M
zIJnQ<i#4N?ELa`lIjp9iEcES;uzF17kAPp*ld`%6w4I{l!bBmmlh>VluGOzK?!L&9
zRt(+DxiUkfnxH4xGZ(OeVig;v7ua@cPThZuVD21yhzY{$X3K(92s;xF+Q>c>Hr*}a
z79<X<NXro~rkSDU@#WW8lb!a-x3bQ%4>L->KM9~cnjuNVeVYsqa1PTE_{PF-lx8;Y
zZEtE?;yZseJI4p~U0adUPJ&e0l<P>W_GCQ!7rEs}A@nm3m9n|OMK4CxMr7+@T;qN^
z->><>_1Eyf-Wnuc&%L_SyUWRrfHV%nnHo7_1gj-zL2$>@W$IbcZDd?enF%aXeQm>h
zj22NJV01Cl4q33wsz_8zG}JmT_Q7JTO6^)vbppJjh2CF6gF_s@!UtytCw7%~a&Bqx
zxUugE4i=olwreF41UNU1O%Q?31tKJR2;qAIq&bFJ(Vrx#yVYwTtM5Ajk_RQv*{fY-
zCYz_NuRj_2zbn?@fNWIaKalV$%Bn4ctu(3A<6CXMuPf*z1v9E#2+*2GQ>P!8T0d+Q
z*4CZ|WoJ%WTdL!kV<pVrp_HTFu|kd@<3dRs<EDUClUbsO*N`O?#~$}Z4e%fTC>x2Y
z$dB%3EyA1no&06?(h;jC^U2{MfKPQSDUr0LNBP0SiRibl`4o;u8kfe1YqV?;x}{MM
z1@!t6%FD#dMS$j4OA!kp#vomz<z%ZwSDpkY;Ua+~6j8&rlTtuTPe+7#l(3n)Up*PQ
zl)v*IF)+~z0+BgGsKP(5HLbquPng1z*kt|Kq(7y?vIj-}iS9$ZPu}?1Ecs@J$McfK
zxRYRgL|=w!4+LDRA|EWmz{>Z7NhsHgwLMT{S@OcfXfk;NEu;-Ho`ce>V7qB5b8+i4
z?X+SEa-d;*M0SXAvi7Qgd#9_L10|xvAaa@2rgu3&j=H^V;ga6M<b2fY-O>EM6+h8j
z4z~owK##@<3?#)45ld0n1*EA0?4QH9MeUzMV=-h^#1z&5h3pu6<edg&djmrMPuq=f
zXhb;-S#MScra8k>iYij)cQM>fM5c{%$66pU`&)!+X@aTVZQ=`qdU6eOt#)fjgyJjB
zZ)eClm{{9EN4C&b;B2tNs`DilW4C>lH<m@C@q#gSTLdmP`Gfo_V4s4$-&PytBju+v
z`Ko|_50kk4XA9ZN9il)|Mi~(Cj`o<AcLTGQ3b9ttXAU+#@!eg@q|Zq(<=~fSqqA{(
z$}{eDcVX+(V@Z6%RN1jQSjFF0%n^AoKqNQZ6B)D+gY<g3l_w`<Ez1-WYE1&lj;vEs
zJau$Mg}ijHTru}Pepd^XZ7vU~_toY;fq!jOIe!+0k{`?+kLX2lCqqh+TX<%#Pdsw6
zF+wf-L)cW?5Tnki30pF)q%IBF8|Q%|#t^vp24G56WTfC}vi5s>5LpkYj<=`zy+0@K
z-9mOnf|ZWC!LZKFG_6FzPloq8N$iU~J6SE@-P+@o92b<cH(u^B4MVwnRAPW>bI+0G
z1z!akOc(vyoXai%azQT1WBtzfF8(loSByFj_)y<rM-8N3mhchg+R}|a7r-TDDLuw!
zW;;GWJhFo8XzKYby2Y_&Ww;)hu7!2`hL{dY=}dO%ZeRcqVpGUjBQYG!@RcHgn1|6H
z@uZ1R*N}{=tf!Ox+{+xX19pw9BV@~8{A&>T@vfnz<YlPUU?HMjT6W>$*Wi!>2TUn*
zi@hrs-paVh6!-GA91xry_@=iFXOe~Lwe6SW3X@Rcwx1}3=#e>P&>*wyH;TnY2c-XG
zhPEt6ohlna)w<E6-FR+`uUN_aatAHN6=u!_kEdmk$BL!A$OqzrsObK2eV;3G(E-Mn
zCkaIaLcj-B!m5I?_6wd_3rxwgU(!3(?&dZiqrJ>PLeukOfdtOS_uu7ME?Jsll)W}U
zjW|Yc3QA>X*(!=0!F5ofdr0_wu0CU}A(na8pk5%|Ivbp0Qv0dN>7x0W#&V&wZ%*y@
zdSggbf_#xld$mz+Lp3$&Y2NFC=j0}fmi*tk1fverHi1qQiz;{b^f=0QCT~BShVvrw
zS)Cyfu?Fl6{jt$GN4-XB0O6oF5GnK-ED<qy%ZyNk70)~Z#)2g4^4xBC_JC4SFka=7
zSas$l&ZVZ8U-vD-?ZxHT+^dGqs&kaSFYtI`XsxDMryax244|_hL*^=i8aw`XW&M8c
zEd<1a|7}qne{Kz9La&?e7lesW@!ru#TF9-u$o&oZrf24_)RQ4P;?J}PF0$yYRuReD
z!2ekOG$2=WNcgkWXukg+CuO0SMoOrxI^IAvsNheo(I$dX?!RcSJ>`a1vrdrsq$1QY
zKt}_9PHt^9Rw2*x!g*8$mR<KFOOJrVb(?qeevF7OYUMLJ)I5i|{8ksYvyOos4OlHh
zE+fshw83L3d?Fmhd$I_VB&_E7!6f?P;gP(1?)J58TShJ@)h1F4F2+y4Njm9brrurV
zVcnMuo2!?O5DlJdTM>{0GN<D-ki5DwX`D(?j-qOK87oLh4zXbve86!d;yl=WR%!%D
zLL|?Akews+?@^-?7;rU-yOBk=oiBd?=G1cx>ZJ6ym(Y0=N13DRdRXTyFy`_Wmj9Vf
zdyNz_>$N%d1}}bI4$(S{ad*M-XH*o?M%by>gSR|JhS4*(vM3P&lh%HaNUcP-qn<(a
zRNw3Kwv%A)%I?lnVt*32RX_9+xuLAm!u?bp9pql>Ysy6zdl41<1oBSrzwRK}7<Zay
zbsQsd|G8#WKe?5|mu1hTP?LH6yq17&k6rorg8<8RLbjek)YzB0n)FO-AH-jREo}0;
zFAi=E>fK~X5AMP3x{3aN)2_TqXr#TaMZO$?w1*OI!ZUE`whVj;)RYlu=N1^Vrqq#<
z`+=a8IHX!*`@*#l<>~M00Ws0%L@WY{40~PV592-R+~;Y~_UzBmb3-AM_`I~}<46qw
zBgA4~YtF0MCGs|Lhq~HQ{NN0tmZf|;SByuO9FCeAaOo$fgvV=<#TRwyKcz~<$qxy(
z##TLuG>-f=!|t!(0&%V=nnxFwVZ8$GC@_ELShVqA7p8RH2Y_RRnF_?*<k|t=38gp#
zm(9@XH-?GjR^J#nH5(ec%Gee>o-8w?7O5w^O%iPa`4GJ6=67)Nr|X5`Wc#Wzm6$f|
z^;E$r-~CORMQVxQF(Bq9zA@Zi@D<R8sPBZpUOa3|V6Pqdp^0RmA^ihH`GffaO(ak2
zTrLZ*4mH3<UzJiIa3}-R9X;Z8q?b|Dw-FZLGRBe$>3i_NQL*$7*Zmft%lKUZLE1n*
z2oTw(ue{_(8kEK+C0ag%j9^EuJFgrdQv)R|FI6zy5n!Bxr5klvhL?s68}5+fu{Rg_
z&LdYDS?uFtIZ0q`Li2DP>=7lP1y~`+7_Fff%vOEumfauG_duj;qp7mXC9Psv_)m&k
zZ5jfg%v{`jKqa!Qlt0&(yL?fB!)u*7aO$pBOe}{*3DoZK;mSs58+$G~90BMMS|(^<
zuQ7%aGpBZ|16fBphJSnZ$<p(u0)-4)%o9f(bA-appk}s!3N+J-YYx4hosWx0yx0yp
zHA{AsfOl&8xp0~GhX#DdT#2T4d<{`l*({d2jrBj+=0VTN_O-E5>zY9b;P5ZXQ!vVr
zf^4(3n$<=G1QYb(GMD-%r>&jhuaX2*@`DW4#shtUw#-cCoR<?=o5xMJWtX^0YfAEz
z=APSa^kp*M)@EH*O3+FzuH&r;cM1WG^*WLP*v2Zd94VKpjfD#wmwO8HJ<?HZ!;PhW
zVia<{dF`9cTCd0(IpWZ)PL)pnuB^cbqXGUs$0VAsg=p<YKQb?y>A^)==VZVCyvQl^
zQFXi`iS*)DVUF+*<!!QrgOLa9ToP22*?x6|7E%4+a=TjZx$IXK=P?=#TMx0np1N)8
z6HI1&qNghy7<M0V@t$r8m|9YnZ%r^Izo2iXn!<^adTGyCENS&*M?4=jgqhQG(#wL7
zUR2DgD9_!m`UEgY2+#8V2)`e6(_tfrcB`+oubR5i6K<APu@{7$sS#<o;CUGzIb-`+
zt0h%TTl)X>l=lbei2EX1NZsGiX{q+-RJhBwt2S50%0)<X!N7dJp=_uqsNjDe6Bstq
zflTkpD;Nj~-6j9hWRdP`&A;YW<OmD11rFQCrXDrl1xl9Oh@c-bkz+Ydux}2Bz`GME
zap+sM3yc!5QTHIQGcD?#Sl-MkrGA-)N9M!&X3zldKOD;A>g`>MBnPlh4r2rdN;?Nf
z2EZ=#g<C0qiuEV*=YQ6>y<FMVqC0eQ97}GqP%r0I&K5l-$VJdLF!<IRkyu%@J)(E0
zoHXw-vey*Rd7OYcM72ae{S@Fo8Nu%ZB0iCX5a^DZN@!XM_$U8?M;^GVs8F((Ax};X
z31~L%ToUsHpjMsn$DXFss8Yy+!)z+c-90j38$D-)`arY%NY7|3P>AWUjQfN&)G+z_
z5!)A^T&INd9pH<%;MEBY8@th8;e_6xF#Gb3OvJ<*?l>0}57z&wO>ms`ofu4C2mQoB
zF{EW2Z7$LtQ<<0m7?EbwAdj@l*81j)Q>$R8$0IqSfaKY#Pg)0@+4`K##`{onFsUg@
z7C8<f_`uZ$?$Uc7q9L}xtIy~fc5$E484o8xPE<{r4S2OsLerenDp+jA+Qy|3bStle
z4C6OYXP^(0h^z8`=>4`zAf(%xlW}9`gMFO5{F>H>{HKHyN((`NQ%!OOLLQ@d=gi%x
z(W1=mzXMC~-rfLPI_aYaS9~fSH4-z{ZIF6!A5k^~be}P3GkIcz<1E7C$>z_Xz@f`Q
z-yT%;-0-Jt*6?)_cHHJ7+?w^3hj=M;{nelike@Y-e#a&HuKqkot$`!v@e0c!=q9?+
ze@1(J=b1A|0ma%G5H7VbA)R+K0YSUf7>^kSM5}uEOcBi;(OunhYR2=@jkOmxAfmr-
zXxeZ~FH47>$%!?s)DVw?X1Dpeh|CAc6-Yj^0N^5!2E@hQmmN{YE;&M>BakTf4ela%
znlFnL?Fh{Rk3*lx91R;7A@^zcP!__fqmNO0NlXhfoYnWEAOefVnA*9%cxE<cKl=L<
i&tF-3f&W9jqehMEyMF=RA6(FhTTkEOsZ|u5Ilo2+sNj77

diff --git a/platform/src/platform.cwa b/platform/src/platform.cwa
index db1e2f9..e211f89 100644
--- a/platform/src/platform.cwa
+++ b/platform/src/platform.cwa
@@ -353,11 +353,23 @@ export fn line(x1: f32, y1: f32, x2: f32, y2: f32, col: i32) {
 }
 
 export fn blitSprite(sprite: i32, size: i32, x: i32, y: i32, control: i32) {
-    let width = size & 65535;
-    let height = select(size >> 16, size >> 16, width);
+    let lazy width = size & 65535;
+    let lazy height = select(size >> 16, size >> 16, width);
+
+    let lazy x0 = select(x < 0, -x, 0);
+    let lazy x1 = select(x + width > 320, 320 - x, width);
+    let lazy y0 = select(y < 0, -y, 0);
+    let lazy y1 = select(y + height > 240, 240 - y, height);
+
+    let lazy numRows = y1 - y0;
+    let lazy numCols = x1 - x0;
+    if numRows <= 0 | numCols <= 0 {
+        return;
+    }
+
     let trans = (control & 511) - 256;
-    let flip_x = 1 - ((control >> 8) & 2);
-    let flip_y = 1 - ((control >> 9) & 2);
+    let lazy flip_x = 1 - ((control >> 8) & 2);
+    let lazy flip_y = 1 - ((control >> 9) & 2);
     if flip_x < 0 {
         sprite += width - 1;
     }
@@ -365,17 +377,21 @@ export fn blitSprite(sprite: i32, size: i32, x: i32, y: i32, control: i32) {
         sprite += (height - 1) * width;
     }
 
-    let ly = 0;
+    let srcRow = sprite + x0 * flip_x + y0 * flip_y * width;
+    let dstRow = x + x0 + (y + y0) * 320;
+
     loop yloop {
         let lx = 0;
         loop xloop {
-            let col = (sprite + lx * flip_x + ly * flip_y * height)?0;
+            let lazy col = (srcRow + lx * flip_x)?0;
             if col != trans {
-                setPixel(x + lx, y + ly, col);
+                (dstRow + lx)?120 = col;
             }
-            branch_if (lx +:= 1) < width: xloop;
+            branch_if (lx +:= 1) < numCols: xloop;
         }
-        branch_if (ly +:= 1) < height: yloop;
+        srcRow += width * flip_y;
+        dstRow += 320;
+        branch_if numRows -:= 1: yloop;
     }
 }
 

From c8a9f533efc35ccef24f5b9fc298d712053cd345 Mon Sep 17 00:00:00 2001
From: Dennis Ranke <dennis.ranke@gmail.com>
Date: Mon, 3 Apr 2023 23:44:12 +0200
Subject: [PATCH 3/3] copy optimized blitSprite impl to grabSprite, add simple
 docs

---
 examples/include/microw8-api.cwa |   4 +--
 examples/include/microw8-api.wat |   4 +--
 platform/bin/loader.wasm         | Bin 1282 -> 1282 bytes
 platform/bin/platform.uw8        | Bin 4146 -> 4097 bytes
 platform/src/platform.cwa        |  50 ++++++++++++++++++++-----------
 site/content/docs.md             |  19 ++++++++++--
 uw8-tool/src/base_module.rs      |   4 +--
 7 files changed, 56 insertions(+), 25 deletions(-)

diff --git a/examples/include/microw8-api.cwa b/examples/include/microw8-api.cwa
index 60c9478..f7c7456 100644
--- a/examples/include/microw8-api.cwa
+++ b/examples/include/microw8-api.cwa
@@ -30,8 +30,8 @@ import "env.printInt" fn printInt(i32);
 import "env.setTextColor" fn setTextColor(i32);
 import "env.setBackgroundColor" fn setBackgroundColor(i32);
 import "env.setCursorPosition" fn setCursorPosition(i32, i32);
-import "env.rectangle_outline" fn rectangle_outline(f32, f32, f32, f32, i32);
-import "env.circle_outline" fn circle_outline(f32, f32, f32, i32);
+import "env.rectangleOutline" fn rectangleOutline(f32, f32, f32, f32, i32);
+import "env.circleOutline" fn circleOutline(f32, f32, f32, i32);
 import "env.exp" fn exp(f32) -> f32;
 import "env.playNote" fn playNote(i32, i32);
 import "env.sndGes" fn sndGes(i32) -> f32;
diff --git a/examples/include/microw8-api.wat b/examples/include/microw8-api.wat
index e006e59..55c43ce 100644
--- a/examples/include/microw8-api.wat
+++ b/examples/include/microw8-api.wat
@@ -30,8 +30,8 @@
 (import "env" "setTextColor" (func $setTextColor (param i32)))
 (import "env" "setBackgroundColor" (func $setBackgroundColor (param i32)))
 (import "env" "setCursorPosition" (func $setCursorPosition (param i32) (param i32)))
-(import "env" "rectangle_outline" (func $rectangle_outline (param f32) (param f32) (param f32) (param f32) (param i32)))
-(import "env" "circle_outline" (func $circle_outline (param f32) (param f32) (param f32) (param i32)))
+(import "env" "rectangleOutline" (func $rectangleOutline (param f32) (param f32) (param f32) (param f32) (param i32)))
+(import "env" "circleOutline" (func $circleOutline (param f32) (param f32) (param f32) (param i32)))
 (import "env" "exp" (func $exp (param f32) (result f32)))
 (import "env" "playNote" (func $playNote (param i32) (param i32)))
 (import "env" "sndGes" (func $sndGes (param i32) (result f32)))
diff --git a/platform/bin/loader.wasm b/platform/bin/loader.wasm
index 0055ae6e59db4d745a7fd862e19853f030cd623d..ac3ef2a9f65fc995f60da4cab334e51306687cc9 100644
GIT binary patch
delta 503
zcmV<T0SNwr3W5r-76X6(pO?HdX37#Qs;05%WPG2fUM$xq$t#Q+`ZFF~T10*6re{MX
zmKmk<LDiXlmmT$SX>{LPtWOyQ3N)W}tNzchanV#;tvmEF91jTCn!I4<n?>S|$drk&
z#7Id=YQb*OUZysl3xnv5Ude(Q^;G-=vClU~%dQI|^xwaAy9s}Ai$wgGlzy^N{MpG0
zlrB>%tS3Jz0ryWNN#fY}NN$`sZCG$S5o|DZ3*v!;Ax#c~$}g9CSrV(DrwIw!tO}Q|
z@hnO1{$Sg89t{i^Cl`6p$e>US1U#QTtf$dhawH$(fx^;JS>Os*A?m1`kNS*Ins-pj
zC_Jx59tVM+lK6iRz{<9by_};nxND{TPu#M!=^FDaHXG0Oh>>h!)B4hl^^H7}d!_>7
zpl0LVjue_k?){0n(_+D9r|8W3y7;QZ?QUJ~jjaQ>wMj(*s>c4%B}iD2+iVFsfX(OS
zZ3mra^5pPpff{Uo*Ae^rYinS*yjS-rS>GD--3?3y$@6bQk64!?xe+OrWW}^*y5b6g
z4ID6R?CgKXCV#0Hjlgmu)P1W?du65K&|8IGZTXsrWO|FmVdR%9_Z7o4rp8oqG9?q9
t#*o|Ja<lCCM0uwi@~l1;ljCUrpIf4EIk|ycaN)F%ITlLv-0zdzxB8T20!;t_

delta 503
zcmV<T0SNwr3W5r-76X43|JV0NafSCQr=jHS28m=CwtN)c5c^gi<T7;vF*X#BkV$7<
z{I_c+zt(3u1w|Cf$}U60fYTY7fUwx50xe8u+@0@}9)rPo1vb~PB}H@x5hFqoP4nA<
zfM!44q0K^@j;qW)^vCWMtDgXT>A8;c)Un}f@PjazZ+=rEc#D6v<tSI&=3|L4(qI$e
zz1QNHC0gF;Lll#NesGT+C9baY;wNht#<#miiAY1O**T!Ci7^D~3sLXZm98sj7lFEq
ztz7oZDy|Z;u$Z#H*bW-m;wLg}7s3@V-5T6yma?7H7*cS5(u|PL<%X2?*yV>8F*jmp
z#jNJnTYW~EUb=q~IS2Hh7B>BXZnY(n|4|(0tp3KmK<pO&+LACN$-@MaR>j1^cLmt}
zG*!@A7o*;-K}5P52O_SJqTitfI+_0==Np5EmRi_yJOv0$IghWd9;#EH;~0b)2dvBf
z$8qm5;2ik;O@?kcbhD#xgv2R(Z@cm6(YG6W>;bD`YSC|P!Y-r{>JA1VVXlTQdAJ;;
zY;~Vi#+AOZG<ndw!F+C7T7vzQ(XY98wK#<7UUXg>JD<%9=FBff<8${l8olj%6=9mD
t5`dd|S*(DTTSnnuZbr49(27)dMXB_123q15u>BQZH5dWik7CpOxB5uf{$Bt9

diff --git a/platform/bin/platform.uw8 b/platform/bin/platform.uw8
index 33b8e166afb379b646676d46934033d18a3cdf19..16b588b0380e69117f013b69dcc52c8b3dac69d8 100644
GIT binary patch
literal 4097
zcmV+c5dQB10nfX!mlX-`5*TUS$+q`RyQ(+^D_a-6b^lyd!0h=}Wc9~r<mQ}}9oFnY
zK1x7`pWSpI+m5O^&#*wUUd7nHxJ_YXX@7dq+A+PuqnGfoBcUvV_39KeHI_n*AAiO$
zW;xfj=q&dq7RsiOjYO>Q#vpI9vtVqI-TJ%q)BRUx^Hft6#E{qhd%6$)AYC0b(2%D0
zj7zd&Vgcgnc(Ku_HPY7GEE~2|czW@3xAN&)zPkQg6JL-^30{txElw=qIiZ^U>YZgK
z8RE&EF0fs`T%g)Bje4VlDDeh(2?=uOuK8=aU0*7?Ut|Cq>z#d5B55KspL<oRI!8Xd
z4^5SiZh<DN<G4)ojNF?y%HHL8a;62Q%M{d6Mn!-R40e0rA0LGSUL)IO__Pnhi#aa2
zNDQ%I|4-mic;qN97&~jqIcn4}cz8GDb-bv49D;=^5T`2##>|922ya@|1iS;&D%lQS
zMn&3rIazX0umeuPWsGmu)TBSHX)F>Z2PoGL1qth*Br|7~1hr>*3-Y!^F8~@>lhkkF
zjdCRp_T7)k9NUnK-b%+h8qxv>i~xmQ28JSCn>~MZ-RmW(2*Fgqc41#F6`Z)eS%;$+
zleNbn4Tsy^zClR~%N0Sk4vNPj5Uqr~7ALkjwL^<&ia;^1WZX#-6~Kj9tq3gKv2pPw
z*O$Lru+w?w{Rd{8dIGy1al<-c%F2GEuoRm$2V$46c=a-RQC&vljNb$>xf4Z-u^D0j
zo5Ron9ZJFq)u`^Ox`Vl0)3ICfRuPCK%gmj{pyTrky#Q;9i`(y>hLs73h4Yf}DO;`8
zhitxZ19Y2F?p8Ol-a3{Sp<#j#gj}gKX@sdIyDsUMSFGaApnI9CeSU%UwxMu5mF84S
z3rxHdG%%puvd5kWau_}elaTDiq{YKPI}ac0H4&B#Dx{*!0MJJq3wVM3NuqD?gg_eC
zX;ifs5x34X5&~VQv)fYB55jPE1KF~F<F~&|y4|9sHfeAVYUf-R;{bqeN_*?Ovrq)G
zTSS(gZw;?M843W!yEI8-v#@EVP(L?{^j}>ZAi#ME7lU{Uyb~frx$F!cN!v!bz%wE$
zL3?IXt^_%FVNW^pJqc*g)Tm7qV=a2vOsR{{L8hBu+i3v{bfuHtC;Zts!~OcU8i-Ew
zW(|MXC0*~$40W~*B0u!Kf#&5>umPBnw<&^$6i%e{S02xDf6`ipsM>&+H7`lPcE6!x
zS`Lf^T<RCcn6kjU(cUL!lWYy^Ie50Ra{@pmeN6%Rc3g%&K}o!I7hWcu<+HPiZiC~E
z8g@8$Z;m?{CepEsFX41fIgG+@4uO>4BbG*ewG|I0Qi2w>{F>1-cC%hcql2H6_(+jJ
zwR&UD0m`4<&Zc+6`J|n5su^6V?1^t~eKiV))UvmXBtckpYUD@jc;<IA4S|F%u7d9n
z%0&eT0XBs0dK<I55Vc1j0qXg>#3+P3<wovLNMz~&>Ze=Lj3}=nZ?b94j^9Cy6L-ze
zPdM+8$cd6RXZT$WX*75|{?D5E{<n>mqpOW5QpyQ7p%`^Ki2g~D2#x!DjH(}AGuW%#
zX8lzA*N-q3g`Rf#4qB1#-;y;LLVh@=6MNXp%2<gD<?pBkeFsq?Bu#Hcf#r4w<D>!=
z8hc(Gvv31k9%gKC$VtTex0rtUE1)=&I^j>%XE9}58dxHg1Ta|CfpHrn<3c}L__RVA
zjuae%xPi9y<-CIVu^*nb5ji-<?>Ytgwe)M7*yq^wom!b?$Mi_@z5aM?eZWTb0J=G4
z<JVq39LN8Mi;0+?Y|D1{E$4Lf%Q``643V7BWid^S<lT&ZO~|9qdLY|G`*$GRWeXp4
zJQ>9u0$l;Ilf7_EJjb2zE2yYTaz);K)wk;vxJN772u>aj@h15uK}9GOw*N&0*c&?E
z_t2qvX%Oq=Mitgdk6674o6#$f0iBwehpYS3-IW6pbsIDaN;~{70)nh8qW9IJ+4vlR
z*CIgwXK<F`#60_ob*L^2@fTxxB8my|sW2Sy_w(p|N0n02GK4zwDd7FjN{>%lUm9dd
zDkWN(+N`Nz@x}_)e11EmgB_s^{T&H!@jEk|QgAhyv=$YIQ*0PDk=pIw<f9F3YA}#V
zf+U~E!rxOxJN@HUM=SsJ%7AR%6E#sFKEP7jF!QmA`+RjR{ZG}h(zwu%K{J!m^JrWE
zKv8{c5C#-h<1d+5M<Vl?g>bumATx-+_7PkG8ul0|d#LAw$g^Ow4vI>Qv^MDSuv0aE
zZ1l#vHt2Rkx#i36%2b2BO!*K&@8(o>f-R2_PF5E^VgJH|=eIZLzo*0KiUSV+f!;S{
zT%+*XqKLPdGd?b7Cefh)0{JW?5J=Hi8C^sZ@4XeQ1X=hDmkS3aABARHr{F{b0A&R~
zJB9;gQ;2@LXC+sT(tS8_G~bru2N3_*-gd<Nbl_A7NoxJM9~?pO`btp%fDh$SE8+em
zZLKKQ(!M-e0UZ6j*XV5Ww{9bM_rH$xuBbjbFUD`G0oj?FfV*4LUXg-T{srtVUpJnC
zEqOT8kw{o3ObxY<91vq)HgpO5UGc-@_tD<XP#+)o2J>xG4d`?jHG9Fm7?VYnEJI1t
zkOr#)^W)$<&f-84#Rc$Avw^TBq#xP<kSv`V-%9d5JT7R#QOL-iammZVGIebbD$-12
zdWMd1&N{CY#sM@2xAI6Ym^(J0%vep>=$9SReH)O<-U>9!vjyt2&l{@Ca0r~&zhA6%
z=M4uh?+-c#{xP7uxmRbu+qRf?sxO(QpJEyss=(-%n7ln2+(9l%Vj1tvKjM^8Wp(DB
zPFI=<uWD}X{|silh0i_%rHmf%nLK9he<$>#nTXr@m}-uTqa0i4Ls*XMlRJNbRH!(9
z)7fGmb{Tqa^JRxbXJ>eWNJ=$<$P8B+Tml6mMQYM?nBU@*x;3H%U|;u`+*uSwOBsv}
zV3wJh_<6swhEbx=T~m~ZX5o_rt0FRvkL^)68dGVn1w`URw)Rbyf8Ziq#;>_)q%eVU
z@ORopW&PB7zzjzq!`4&TTvSA;I%DnD;+<LByAlAgk^zq(0zc=)_i%G|2TJEf<s>G3
z*?$1>14fT+hc2v~!(U+h`V5JVtJ%B`xoe!YTY~bJ1y<Hn)f@?SZm|HlIh2Tly|R3P
zc}ZBox-2T;^bL}hkMB-V=|gLlTX%6#fVP0*3a!bzH@fhTvyB}lXtH6rJQk-2qb)}?
zE&<m;SqqQ1-1Ea9$Pcpo*H*J30HKw12HUAV)z7xz0631;7wTsP#pIWQV4^Kz{<w_l
zIV(cIJ_q9DO9vQi9}%ekW-}(T8;2}VH|nq(E$aP<t^cTj?ALmK2{T@HTh`FAhGG&(
zDjoKj6}_gmzP(^fye?vR1U%@ASyU96NISFU+GtUwDV{naxM(zfy(yG`d=tpke@X&u
z5~0S*0m^guSNPjUhKO^$e6<?Wrv`5!22{}aaD=XGut?e&pRgr*UsX+L-Gm9vW#Y*C
zy*U@(aBer^x%WE*6!LGsrM``&quIHwmTZ>{&to*a5){ypkI}ZZAuw7&j?`vP073(M
z<FTAAym<in8b6yITMN`8G+Zxw*(B+Q@zj=q7Gbvi-O9r>1j^+WnETMX$aZB*9@X1T
zyZy6x0`w@T*Elb><Q;7kY<p)g&N5qeZR{t~2uF^{47ZZzETk=W_ZZxr6+P;(>z1%{
znru@sgXH)t4BIg7rh~1Pkf&LapwUq^@U~{5^iHA<Sn5en9rMRd{Q;e0z(;(IpUH&;
zG8r{I;j|6B5h&SWtX}YNVi<^NkCMz#mL8wvYnur#1`aKM&sL*${k}~bOm@Js4^!6s
z>RMsg{4*(wq5k{PAEy)wG)sMpoi6kEOHn2{-ou#uti!z?zeGD8)aL5UaKIfz=z~Yo
z9rKi^*W|!Zho5+Klyk|ME;w=BYq$lz3RCXUL?NA4UthP<%H{IW&-fke>gbLS0`Um(
zfBX6P7DWI;P)97K6c&b~L%5k^c2GH?y~Kq*1-S+}jkMYwmlQD0bV8aGocaQ;3RU|}
z(c>KyH5w6{6IzIXHu2qR4mB&K%hbbEEuBypBJeZ7Q*uS=_x<86pDhtIEEuF-kq@!~
zI9}_hnNMmtjOnhgpZ9e7WkmQl<HNZX0eSkNi6NK#{^ePPX=)J;W`tB)0_?+R1N-{;
zCEQj3^MYUi2FR7nHFgxt0Y7JGANYOOq72hcN!klzgLx(|ch(C@7WKFWRxIIZIIjYJ
zYCZ;T4kO|PYy{HV@k6;u$i{&&O)n`1aRZvm=TNA(tl$=mbrrfMq0)!4u%MRC`JD~g
zTr7g=TL`1HYGDiXdxa=X^LFG%i^^rbqGpTm+q%u{NIJHXGUDYSDg)bf)5fQUMdVw6
zTf1q0z7UEiKdu7~2rnmfmI&zU|F{z`LYmwbI|}*;J^lpX1`G?;Az<(VM)Q`%1iEg5
zn!&0&CIs2g95dyP_|Uiu+VgL20na+vVto(WOk$ha;gRs?vX%CxS;h<eUG_GU93pBv
zTfcg2Gvo9_N8{mNG%rRekNXDynlwmFlcI&%Yv@Rmy5!I|jCPjOLv><3^8!=vXQtc&
zGY%BhY2o8|u9)Q=CPI+;t)GZ!kEavg0<SBAc2HyNgBVV#&Srjsve|<dg_5-*V*4}3
zUb#I9Lj8;tM4}n>b@$~TDx%~(NLz@ZVZMMM4$Sd@0~0FQ?{(3D({y>RNta?f?fFzp
zu{{F{{<<ReU3BGT@@9_f;~@K|wgT&nqmDNnKi9v$*Dz-3l5T01CK90)-?DIbkePoj
zl1C~dJ6dN5?S5r5ly-z!3^@<kcuqtPgk))%VgX3iqk33dtM`Rrwz(n~Refe6ZhC_X
zyy%N`1&c?+K)ZoB?t-Z22WA;0d;$Mpip6pF8aY)d^1CQ3gfKgt`sB34p!Pxdp3&%g
zM8I8mG06FzCH28(h^r2KEG&vT$5KZeE1E=vQo82O%}=4v{HRcM-^in}|1aLAy2!t!
zgxNnz_824NGMpE;D`?W39MT>b;gBnZ5@WIl{1z!gt>9am5!Y$X)3$J?i$hOocjQn@
z^+DQD>-i(!XnEO<!s_=;m5eWM`~Q2vXgcI_uyV1$0fA`n$Jtppgl_m(0ITEjOhfa9
zeoC4bmpLIf%6tUk-%fh6lh}Hh<JI*nP-!-t9`Q}%;47kGRv=Ts>q9>zO@qPj{tZyn
z)x~AkW7KNZ`ES2dA{(OM)&*JkuX{@RkK|5Cu)rKP-*M)l_+dE<l4$nvh6CUXF^S<I
zVQ(YaMT18rxGIk;3LCFHMO{3AgZnKswqQKl*%&E|vds5@zD=@n?#Adcv|C_WP1Stk
z&^eY>->u`RXp^5)K&hnoe9fn!EGF`ym6@lS<FVZ@{CZg}CtC#Z%$zD-<7SruIxgY(

literal 4146
zcmV-25Y6ubPw%h;aeDA#0)ei?3zkLX3+>}9JcWyV_l4|+pfo^wLZotf40jT0kNse#
zmAwzknvQ0QjMwLfK|>x`$ysfUn>r@p);aYq!zmDwE9bum+Cr}C#xX9XtCnHvbQ0Fu
z9n|yy!u!-5od!%aJ=sX`sl^n$?#_tOhST0yep4~QJXuvDe8Hs_gn;z`&#CrELJp(a
z_+X6P7~)a{R*)0Zjm9hD;TKenI|v>E#h&cTdX%a$*2Nt4t_l;I%ELi3_u-@-QBK1g
zlQS*taON#$*Q(&a8T-omkf=<Q8cXqI_R6cM;tzmnJSTwWGM8#wLsA!@wU0RLC`OBx
zH~HFqcxnox^GxPsid)M-ya=MvLHsGM+9pQpO;)fqd`dxZ^%Vm=9sN;5k=W6F;S9{E
zYe?cA<csZ*md{u83K*Jd<6Q{SK9|@PV(i_1^Gmfp`_bu_&LdF$Igb-8GTT339Wumi
zU^jQsRdtB_l5RZg?VCx8`R^_6TqYG&?Hl|rKLnwCqSK!ARERNEOein^F*4}hxZ7=m
z!`m{G%sw9mkeo)0$=8aYla1bwDnHq1f#%dP2OzWYL<8X?FI0Gje58Y_Vf6G6iHjEL
zoZ~0ganFk~E$N*A$nmxbkMyJiHTn-f%gTl`Yhua^u#QdO&;{?uwcq>?n20hdUrg)}
z|0eUJw?24j`sK<cLv9U&)qNkj3_NdOsvsIW#cM?RWs<H}@Z5Rq(9>lx>pdy^b)GRX
zh6Qt>SPeh$ylXvY+bJiktamacGeHe}_m~D*UR2u<tkhIvI5iwM7m4gi5K`d*OXj)k
zLnHoJgi&V+^Wxhnv~GF`BsWjG3E*fxX63?a5u1582hDE6S~lEO{l742qC21fs}*Io
zsg<D@W&R|u=Lc!f@>fOYDg1}%Zr7H#r<73{pkRq6Za&xnFF{EMG0vPVp|c^z9tY8r
z*Ug*=u=A*O3T@xZ-zk?)X?Yr<QK{IFIt4oNIc@Q<Jhix~0=BLD6yG8qR=ftCUDA>R
zm|R;E>|a`=iB%6C17YT&Nx+U0!jDim)uSb?vv_1sQB(eJhWCXP#HW(a2hT7iIYTXU
zp*FQzmeCqz9WSk^<J9A~jtos=xz(i!F2Ids%a_4)c|9R{Exso6P9+{3t@_QqaZ1O6
zu3zon=k5XCq+3h}qe)-H&ZP@%hobk4zkQw>@ha14=2clJJXw-FvG=w3)0p^2@I^B0
zN5K)-LS<fo9-kAltvU^LFY5<DI;o~TA!GfcIP4$8#Fjl?Q0JLH7>OB;QOe&ktoirW
z>pJT0X(&2Ifl=lpyYVwf4Q{5R-c7J{$C^$2?yiDCKcU=S#~;RYKhG0PH%LvbX;xVu
zrImeCDpII_J2x5slr!lH$9aPNtUAwfhr0LrO4Izq_2epJlwJ@fgHSAbd98w5q$Rjw
zU-mK-eTSna83k6l=rJ~BkwiK8XTd_vh2ywsvME?9J+RldZTAl%MfuWS$*&$w49Ui|
z$4UKT5}QDPYMcJ4P_*MF{H>D7IEO-YqL@Om3ui-c*ahb_mnV{mmNX0{_7FtQo*2pN
zz5!<whz4}clZTuf(v}cQG9!@TPj~mJpNojaGx)H~svnN@gxXFFdI+estzMf15{Qn~
z5T~O1L@>F`TS1trwk7O%TJ8|6KU2-+O^J8JE>>W?7&CxHYu(>Q>s%<?8JtueKH_Va
zn(yvv<&_L_TJ>QW$l%daH6yaMl(;`Y5O`f&B}|>re?T?(5z#g$oxm)Gd;A63js-@l
zzk(Y+-hpm(#euXGo_2Oa9M9Vn$*0BlIds@Ub(o!0tHP8!!yB?38`#j0NUt+tiED-C
zF$_pPQ0cJ|^-ynUT@4i6wcI&CbpsPS6gjmq5NEM<^D>uZ{OLqN`fgAqTJj3N=NvvO
z7ZMJy6K-m2z+!7JAtt_Qmxu!OQcJI^wQ6<gq){(t8D{={etB)EkUMu&Gs(ntMW1fR
zmuI;qT3V=Db2mGv^kY1Dr++00#J}1TjyCpHamf=t1TB1_o|F~$Jo1TFSz~?LGH_Z>
zT%J&)5{qXQxG=e>p8jt;>Bx{UDnjHL6<T(3K*W~cPpqA2qav2KvLvARkPYA8Go1*<
z&;{s!;ecToiFJ==?aDi9%_2QMq?zP`RGCSOpSPin-kaJSm|V6Vl3A@Nl+`Uv0#6fD
z+E97%=i-GGkP+-wmPQeJcCjG%@*_)0(soM=l?};DF`@#02I)ZLjYv`ta}6lF*a)xD
z{dlE+@ZoNdc2Ewyc?&xOLAF>B8os1=)Y_Cj0k#y+Y=WIT({=*yE#rXGCFdukSiKhH
z<Fg|pJA)KuK(;y6?%C}ENhKMw6?It1l$f3_b5c0a%w}DxW;WwwpyPXs-UFo-=CYQX
z0<TX>!^v_eL}<2F_`hO+Iw)-~1nsZ2&wPnrw#D|YsSiocymK8Qk_~Lv<L!`67*8SD
zr!X9eHc;k&K!W|X@!pEuKgr;Ym#;+f$Su9E{aX*%ImR#Rm_R<oBDP~5cc!~Kj?<in
zR<X}U<9)5jp$v=Cja^moAX2cv3rR1-d2NBMEM;Et3PK7WP`0FKDviA#74MOud@Bu;
z$0hyLxL3YAi`90uSJYsqu$dhEFc@!qU{zXOF7N8jk7yftDHbgYfbMKh>DEj56Yegx
zhJ`lp_FA7Nq-|Da0CUvUr%bIy^4Qf4045P!NXm^ON%Q62Zg(zHJGvt%SFd`kB9)PW
zJRlBTZXM##)))3~A(He%bFjn<eo3tLYB!6_60}JxKNPZ0h?L>&nR2F$^*@ywld<$B
zUt^9BfCChcbKoh(3ZWxOoyHXgX7v>U*HyrkSoDZpeIDpv(CvQ6eCU*ZLORhC2Oyob
ztJWWBFX8R*_Z_LC&ddh^UM0z{bR~dprj=0`F4f7+MZ@SPwzI=b!m9_h7~P)q_L~hn
zJLMd1`U*7{X1?6I9kjQsLJAngOjBYj=G8qOruHC~!y|@H0quu+&BjfEc|acSC%F^r
z$ie!f6zI>@hAh2zx%m=vpi0xP{vo6<T1L#@O@xxoB#{6#!xZR7tz{+Y-I<H{d!nbk
zt|t$HNW$1XZFc$;pDe~n!o$d5#TWz4vJ%gY?RoqXVWTDX9j-FZT~3&GC!K#(qC0AH
zelRI)z5cM=3#g=>ANq>)#R4bZOKY6+Su?bNdRl(@fOiO??`;~jBFU^%gOj4G(fZw(
zzzwxb=G<o-lG+x;H(WW!o}hUbr5ho`C8=P$@2fM>1uU`pxap%OZ{6im;y)sc2LoOx
zE`l%_<ct&wvhxtW#R{qnX%PU0KwfiRy5e#1ijAec#a3`9w%!Mo!4&Q_oMaTjoh0Zh
zqrcW<84NHh$&YXXfFlbfyqB-sT&#fmn)YM%O%c@omq(q@2ypjZ*c2+GC@G7#bn->J
zrb&sYJ&)v|RMWZxms&)Xm+f@lkjb4g%5SRSNHJ_S7w-d*#MdMKcqV#!A9MPgSu~kA
zBFbWW8=>_CN_vK~I1B3##OUHJck~Cy`vjGqo3V-lcJ>Q`3}@2*+P`RI%<h=~Ts_$)
zuEJZV@B-Jzu}|IrboY1#tR-kQ7l#ZL+8k@`;X|NKzQxam9*=*SqGu8z3ASy+U{=j+
zHuax(4i)1Sy3G%gXZR7tM`7Ff^yDj&VZhx&(?lgI@pQn`uM}bsI4l4u47J_-y1CNs
z0BO8^3Y`<u<0GL@FoP@<n<RoEnS4KZA?$dj?K|Gp9#TBE5^fkA?I{V$PHdi#T$EeJ
zf0Ite(g2U57ZE>Bt-kbKmQby??851|uI1x$A;iXdU&G~Vx-8$TM3m6FqPK}8;AzT@
z)u{kM<uvM2ds^Truf9t{z(7=U$Dul@X!|&cEA=B&n&t{phu;bP;8QTG84hd2Fg_`v
z0ef-(H)+L}EU~}JwGeB|S^C|>hnC*TQ3vPJIB>MV#Gr$>o$135mlSq!6o`XnW!#ln
z#f`INgPQeR(|oP(r>nEBYK@2IHf6w~qtZY~5Ei|Zw_maLn)>g>W~3$Wh|I~nc(OIL
zL?)?YoH4w{<ykn<DX3Kn{d2vJz)adxakC_SUr+RAi&Gh9FVs{o0Yf6A8U^$cgK1}U
zMmH3DFpfY^3HLX|`$9T4JX-q_{Xcz$*X!7W#8ohk2De&S_2HsA&I3&C!}ZJMHAosC
zxgM4+N9W!WHY*Mx4e}-1#1Y=?y#kbqo6nP6W8oH0elozV6vsBNG?qm;KpZzzG6y`8
zU;|YE0KUIlf<h|;5%fZ4h*SXnV=}aU-z?JoQ$)KNlk1`KoY)MV>fyN=aaX9q@Rgyo
zkF#dwpppXVyw;@J2hq9pXA^%Us_11XYNLFlfqXE9C6<=4i<owpoEsb+=a<E%D>ik{
z2E|Bv9#>BU-Z{Av;pgdMYCKe3k$XQ?@j$1W$g;)IHO1QgOpe}JQk%_qH^2q2_V&12
zb+Oox0ej!A%D}^$z%BniVX)&yDkAKqsJ_-*7i1@ao5p|GpdF$Crp31#Zpoj*?9qW_
zwVB4oUpEM>=y?@ah#WT3nCG&s!|?a-&3mhG=7;UoKM>J&N5Oa9wi@bQ#;q(p;}+{>
zLGY}MNS9qZJa(;HVv-RzW$9cnr`cm0<NewU=!09)H<#ISq7GU(^H4-Bq901!D%iai
z>}b^fm%OeoEaBj<2(Im=q*3#|Hd_R)4K23qOB11=7)zm4KHIY$B4$)~$RJue_8$Af
z_@CCDdx^cvPjR=8A6^c+03~blEyDMFU!<0p91OT@f~biv_s77%%cee&+H-g-E<zcg
z{M5BVQ!?%k+We;?518)YaoJvsOy)8yVNkHRH!;m;t?mZPs`c~qGU({)9ec<9<on(e
z&&sEk@pZ+S?)$D(K&08UNx0luZaFxgs5buE+>Tx9Ctre*oOI0ADojt!%>P1{AZ>xP
zVxc|V;B3_@W8I>aZI7%iSO_>@W6a-_wFa&J<IHh>MlsNpuJhUH{aWp7!3v@^voCBJ
zUrCPz_Mzspfp}<Vro~LPLmpD43%Gtx@CJ^|=~{$O0DAq(?mGIU@mt(X?eAaeiSpgP
zV32889OOcyZx|!Zb1$~;CL}HIv?^YBcW(Qmwv^WOB~DqvGxS_au=bhFlvO}Vc}*z9
zkvyN8{_jp5P(Q&3xz;k<5M(gwMakFHtk3mm5n|QXsSI@X@l#%dZ}S`-=$rm56s+yk
zdI0Z6geY`~!~y@e_Ie8-Vk7{FkYgBnI%q|nnmtzvdYD%GmPwbUvn}yw=TZrP=PQ3a
z2Bqz8aa1UK()`L?Gkv>!d~8OzVtAu_WCD=3QYv;u))imaASntBreDUSSdEH^B712z
zs*%XcP8KkJ`$7NZ0}-`V|7`dwNw=Qr$j1UA)X6(DHUKW7$!UzWB1(7i<5SPgp*hz@
wFx<8Mo4_DgB^83)))kSq%WzQRGuCRaR0_z);_s#}07GO1p6)17L(BCG3g7%2u>b%7

diff --git a/platform/src/platform.cwa b/platform/src/platform.cwa
index e211f89..24cd220 100644
--- a/platform/src/platform.cwa
+++ b/platform/src/platform.cwa
@@ -171,7 +171,7 @@ export fn rectangle(x: f32, y: f32, w: f32, h: f32, col: i32) {
     }
 }
 
-export fn rectangle_outline(x: f32, y: f32, w: f32, h: f32, col: i32) {
+export fn rectangleOutline(x: f32, y: f32, w: f32, h: f32, col: i32) {
     let xl = nearest(x) as i32;
     let xr = nearest(x + w) as i32;
     let yt = nearest(y) as i32;
@@ -212,7 +212,7 @@ export fn circle(cx: f32, cy: f32, radius: f32, col: i32) {
     }
 }
 
-export fn circle_outline(cx: f32, cy: f32, radius: f32, col: i32) {
+export fn circleOutline(cx: f32, cy: f32, radius: f32, col: i32) {
     let prev_w: f32;
     let y = clamp(nearest(cy - radius) as i32, -1, 241);
     let maxY = clamp(nearest(cy + radius) as i32, -1, 241);
@@ -377,30 +377,42 @@ export fn blitSprite(sprite: i32, size: i32, x: i32, y: i32, control: i32) {
         sprite += (height - 1) * width;
     }
 
-    let srcRow = sprite + x0 * flip_x + y0 * flip_y * width;
-    let dstRow = x + x0 + (y + y0) * 320;
+    let spriteRow = sprite + x0 * flip_x + y0 * flip_y * width;
+    let screenRow = x + x0 + (y + y0) * 320;
 
     loop yloop {
         let lx = 0;
         loop xloop {
-            let lazy col = (srcRow + lx * flip_x)?0;
+            let lazy col = (spriteRow + lx * flip_x)?0;
             if col != trans {
-                (dstRow + lx)?120 = col;
+                (screenRow + lx)?120 = col;
             }
             branch_if (lx +:= 1) < numCols: xloop;
         }
-        srcRow += width * flip_y;
-        dstRow += 320;
+        spriteRow += width * flip_y;
+        screenRow += 320;
         branch_if numRows -:= 1: yloop;
     }
 }
 
 export fn grabSprite(sprite: i32, size: i32, x: i32, y: i32, control: i32) {
-    let width = size & 65535;
-    let height = select(size >> 16, size >> 16, width);
+    let lazy width = size & 65535;
+    let lazy height = select(size >> 16, size >> 16, width);
+
+    let lazy x0 = select(x < 0, -x, 0);
+    let lazy x1 = select(x + width > 320, 320 - x, width);
+    let lazy y0 = select(y < 0, -y, 0);
+    let lazy y1 = select(y + height > 240, 240 - y, height);
+
+    let lazy numRows = y1 - y0;
+    let lazy numCols = x1 - x0;
+    if numRows <= 0 | numCols <= 0 {
+        return;
+    }
+
     let trans = (control & 511) - 256;
-    let flip_x = 1 - ((control >> 8) & 2);
-    let flip_y = 1 - ((control >> 9) & 2);
+    let lazy flip_x = 1 - ((control >> 8) & 2);
+    let lazy flip_y = 1 - ((control >> 9) & 2);
     if flip_x < 0 {
         sprite += width - 1;
     }
@@ -408,17 +420,21 @@ export fn grabSprite(sprite: i32, size: i32, x: i32, y: i32, control: i32) {
         sprite += (height - 1) * width;
     }
 
-    let ly = 0;
+    let spriteRow = sprite + x0 * flip_x + y0 * flip_y * width;
+    let screenRow = x + x0 + (y + y0) * 320;
+
     loop yloop {
         let lx = 0;
         loop xloop {
-            let col = getPixel(x + lx, y + ly);
+            let lazy col = (screenRow + lx)?120;
             if col != trans {
-                (sprite + lx * flip_x + ly * flip_y * height)?0 = col;
+                (spriteRow + lx * flip_x)?0 = col;
             }
-            branch_if (lx +:= 1) < width: xloop;
+            branch_if (lx +:= 1) < numCols: xloop;
         }
-        branch_if (ly +:= 1) < height: yloop;
+        spriteRow += width * flip_y;
+        screenRow += 320;
+        branch_if numRows -:= 1: yloop;
     }
 }
 
diff --git a/site/content/docs.md b/site/content/docs.md
index 71a8f41..1b414f2 100644
--- a/site/content/docs.md
+++ b/site/content/docs.md
@@ -146,13 +146,13 @@ Fills the circle at `cx, cy` and with `radius` with the given color index.
 
 (Sets all pixels where the pixel center lies inside the circle.)
 
-### fn rectangle_outline(x: f32, y: f32, w: f32, h: f32, color: i32)
+### fn rectangleOutline(x: f32, y: f32, w: f32, h: f32, color: i32)
 
 Draws a one pixel outline on the inside of the given rectangle.
 
 (Draws the outermost pixels that are still inside the rectangle area.)
 
-### fn circle_outline(cx: f32, cy: f32, radius: f32, color: i32)
+### fn circleOutline(cx: f32, cy: f32, radius: f32, color: i32)
 
 Draws a one pixel outline on the inside of the given circle.
 
@@ -162,6 +162,21 @@ Draws a one pixel outline on the inside of the given circle.
 
 Draws a line from `x1,y1` to `x2,y2` in the given color index.
 
+### fn blitSprite(spriteData: i32, size: i32, x: i32, y: i32, control: i32)
+
+Copies the pixel data at `spriteData` onto the screen at `x`, `y`. The size of the sprite is passed as `width | (height << 16)`.
+If the height is given as 0, the sprite is is treated as square (width x width).
+
+The control parameter controls masking and flipping of the sprite:
+* bits 0-7: color mask index
+* bit 8: switch on masked blit (pixel with color mask index are treated as transparent)
+* bit 9: flip sprite x
+* bit 10: flip sprite y
+
+### fn grabSprite(spriteData: i32, size: i32, x: i32, y: i32, control: i32)
+
+Copies the pixel data on the screen at `x`, `y` to `spriteData`. Parameters are exactly the same as `blitSprite`.
+
 ## Input
 
 MicroW8 provides input from a gamepad with one D-Pad and 4 buttons, or a keyboard emulation thereof.
diff --git a/uw8-tool/src/base_module.rs b/uw8-tool/src/base_module.rs
index afcf077..7192d61 100644
--- a/uw8-tool/src/base_module.rs
+++ b/uw8-tool/src/base_module.rs
@@ -152,14 +152,14 @@ impl BaseModule {
         add_function(
             &mut functions,
             &type_map,
-            "rectangle_outline",
+            "rectangleOutline",
             &[F32, F32, F32, F32, I32],
             None,
         );
         add_function(
             &mut functions,
             &type_map,
-            "circle_outline",
+            "circleOutline",
             &[F32, F32, F32, I32],
             None,
         );