From 3df912a84c3b27f302f3a49c645e339ea9af68a7 Mon Sep 17 00:00:00 2001
From: stevenhowes <38082088+stevenhowes@users.noreply.github.com>
Date: Tue, 10 May 2022 20:53:04 +0100
Subject: [PATCH] Display Torrididdle logo

---
 !Arcle/!RunImage,ff8 | Bin 5420 -> 6100 bytes
 !Arcle/c/Arcle       |  47 +++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 47 insertions(+)

diff --git a/!Arcle/!RunImage,ff8 b/!Arcle/!RunImage,ff8
index d4b0d5427f88425847233f09b2ba4abff4592b14..32db34afce3988d0095c7cf7c6cfd6d49a5b5f60 100644
GIT binary patch
delta 2159
zcmb7FeQXp}5TCcZ_u0Glt`yQz;I6%vg%%10D<r72ks3q{*D40ZhSmV0LO?_Ph$Ouu
zTnPyTufqX?<TjDSB0Z6S2IXS-jxlIzsDFrH?snaT_Dm>7Q9|lE@Ai%sqb5%K-t5f$
z<~Q@+?t9l)Gcc<HKuPoA0?6DHA>#$OnH&#LDnM3lL@QRg*Kd4r<EquKb-Y0?7pAS_
zy1FGe4ULr6|D;;CNzojjXm;48$4CQdfRrYYb`!PYiIW}9K1-zc_~Uv#;g(2{fgs`A
zdF~;?1hq1Nt3b~Zgi_Ny<+{}qPO)e>wL=W0BIMg^W2qJXc!w@fz`}zeCC&VbwvChJ
z67ygNA=U0N<69`s+PhV=&@*Y>Fg|C&h-!o7=^yEN_~^>PWDMXZ8m_$n(NI-mb8e9n
zsM$q9A2k@!7q|O#t6xc5h?n+F^Aaz&p)sQ8eVf*m4;Dx;6#dy>Ju}B)A?#tEOL<=C
zzR^c~7Rs}e{|?r(fTKRU0!3@XHdf0t+`;Av1N-nCt8DpQG<TbmZ0Q&!+14^ja-LqE
z#~;&2F1M;{;rW0S-~h~y>2lFBb*)FyMka;TyM*CQ%h({)S`#7+4PU^u!qn=o#}ue~
zVYI-E*3km*;&Gwec_l|-i1?sT<BkwVavy-xuW0+xEy|8$rBCOJdL17Y1CITi_>7|c
ziZ6+Q%92NYx<rc>X%oVPVYZOkmL=SydwN$6&Yz1Pi4)3}27Ee)0L1kcDzMBZfp|tq
zufyx2?A@7*cIOBhal9m3I;hZPY?8)#uRUe<ED?jB7-rxa$;YZNBFQtG2_*!nfkq`w
zjcAKkQzhsg1b??4-0ahB)Es|9&BR@V-&39q??^J6h833W_0}=jt0{ZYn$hf~o%d(=
z3y@iZ*QIjyCH`iS8wLe9-P>#~|KxbmRN*ti0GLa6k$su`{Gjw#bFFB{vBf%TIx(FV
z$+E)+y^!>z2_}jkEq<J)O{L1@KZr-HGW!C*wFV}ipq%-1G&xHtKaTBm%;=bwKtk_B
zudTf6xj&7};iBCt@1d9UVY0dYgzTfFUncvKVPq1%kXkUYNmW|ox`o&ru8<1F5$dlc
zZQ+NtIHuqAgjMIHrhEQ7hVc~$F~S5j5#YlE#1|*tL!?g<@B4<aF!Kw2lM{(hAi~=t
zMrJ<+OZ<xFCx41SK(B(|FhF*Zi-t9%-Xedg5Z9p+ui7fvEgZ4UV}D?SU1l=2(R=|T
zG+)GoeJ(qNX?wu^5Us%oL3St3qSp~%<FJ9|WB9B?W`JQwtusQjR}5o_PTQxBM}%Yy
zZ#!y)zI|BftYfcYi&JLj@Ga*o_81;<ma{kUqBFqiaL_rIO~J_pve!oh67|bJ9fNK@
z4=yjLWz`s_xf2rwK4D}8zbRPahT^EsD)`N{HMIq+U9Ye-MqTpsIYht{zoU(C5J}bS
zU8)=KhVyU42~4|cSpwbea&{1>yO%xw0c9LpsAx~rDO%YSMVmugIzm3qru;)}fPAHN
zPcoRT@s^*a%b8<4@vOVHtdpXWMBi8OJ36Dc3dM?U&;_ypErknMJ2n-*?c8vl!5+FL
zuWiRmg<FN8A5JVOYGq4@qW~ZG0IWF2VDm)={P%;~9LnuvKLdj#6f%AMvgN+KaC?Am
z5*|M>?0HY@@!D}`iG51{Zh-YPHqqe1Nl(%^MI+gRXG>bUIPd=ulLtz;Jiw)sOCy(F
zE`?ljAWoa@`#<=*?vD|i|KA&sd(LZ<kodD{<Q?;u%`~U6UhWx-&T;3^U1q_131)GQ
pA4|=1Oix~$(X2a1eqV$dG#8QAgv|Q#&192ks>nb5tERV9^B35<+06g|

delta 1426
zcmZ9MeN0?M5Wr{O$9;c10*K^V@8H14aZu2v_797IZB1J>d}tGiqDMRv5;ZYe6B}c~
zm4YFmS~8qkZF0{@VyiTY9REOLX;V$nqBVX*4GD0MO*lwn8bge!@|@+af^IUqZ+2&X
zGdsI)f2bR+E(0(Yg?Io~&&jY_0PtJ72;ddSwb)SEQ`o~Q4(wH63Yv_?+rThuT2maL
zk5|P~+!itxRc!-e`W09eIyCk1TXQdT2eM8DR?@=&b0oOLLY0v`OeNT!SdiNYPyqeQ
z`&xrsC4htG*DxZ5owbCd{LBtKEJfKoCZyd`O%f-i^0wdQTt)&?)U^rO*0u?`KwHv6
zN#6K%duAS<2-^VOh597d{Vkb!%`h7SiOe5lBSM6+R*u@v%CK_a5<V&4Svj*M!1*l!
zE^i5t#Ith1^=%$;Q^p-~wKqYGq9lMTWSI4+D!TL0@*o$RdJ%UiVdt;_PaEbSb}8Yu
z(ffm3p-szFgap|zdrzig131jJGmmGl-7S23xsTR7G%8vzhfptHBBt;GNb!d$VvAh?
zd75<mQPB%3!nxJ{JaG?tRXx&4k>h)Vbb7~07EFj4W-}bm9(g2JGlh5|;#Fa%8e}1S
zP1S3g$wz9X{F;nK%F|qUn#j<fg-}0VeksW9l)E^<{S?WK-;tk;H&mTfV5#l(T4{@S
zoV@4ao8C)D{_A}eXKg`t8L!*)U0i~xrv16fJXB00(I+HvQn{*lNRQJzK!SHyiqSC7
z;X!*{<SKc}q&eXEjhdzNR$id|$$FZs?X><jzHisrB+l5w>=V3h53tkdbOg3Pwr;H&
z{x>rs+6av!q>FKk^bfJwQP_F1J;hZbI6Xa?nAS(J+ZI)TUt?O5-_#Nr*S6+==l`^<
zuVRoSn^sc>_~<Pny+@=|G^UCCfn}|}L*GRq!wk`lT*8Zv64x57+%BbfEQA?HIa@>3
zxtslk4Njd!@fqr`;0fwyaKgEhoyV**>}?{D)dLw(h%d0z6=o&aK>av&xpb!BfGg@6
zAnf;+wL*W;=dSyt^f0cwswE|f)$SeaW$bY4>`P3z>)0V2a|c*A&bq^_5O275vU05S
z=mlW{DEafY=>8O8rzgrHI6(bTobUuCwvIn}4tZnR5NBnH1ywt?@Eq29pJg0RdG*LW
z1Q3qD{B5l|>C#lxpU8Ltmwo>Ok73pu-9AQEthFzr!eMjDvL;1npdtxE3h(l@u#Yj}
zD|E6vbwp_FXB_jDP&zZdXz5WRC`ypWw3D3C(Zn=^TlDicqSt>fi{nB6tFDG=27~l8
zE%oC!{$o<j+<3dz&K_7k32<fzpy~pHeU}(W^dbsfm<oMxmVrgBrzbZjUN|v#s|md(
jIlfZxnS95UHvr-!-6Wz3&M3*JB<Uf%So|PfE3W$ow~8!#

diff --git a/!Arcle/c/Arcle b/!Arcle/c/Arcle
index c0c35cd..1d7fc18 100644
--- a/!Arcle/c/Arcle
+++ b/!Arcle/c/Arcle
@@ -10,11 +10,56 @@ _kernel_swi_regs outreg;
 char answers[11545];
 char dict[64870];
 
+char logo[46*9] = {
+0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
+0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
+0xFF, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x14, 0x14, 0x14, 0x14, 0x14, 0x34, 0x34, 0x34, 0x34, 0x34, 0x75, 0x75, 0x75, 0x75, 0x75, 
+0x40, 0x40, 0x40, 0x40, 0x40, 0xA8, 0xA8, 0xA8, 0xA8, 0xA8, 0x0E, 0x0E, 0x0E, 0x0E, 0x0E, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xFF,
+0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 
+0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
+0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0xFF, 0x00, 0x00, 
+0xFF, 0xFF, 0x00, 0x00, 0x00, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0xFF, 0xFF,
+0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 
+0x00, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0xFF, 0xFF,
+0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 
+0x00, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0xFF, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0xFF,
+0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 
+0x00, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0xFF, 0xFF,
+0xFF, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0xFF, 0x00, 0x00, 0x00, 0xFF, 0x00, 0x00, 
+0xFF, 0xFF, 0x00, 0x00, 0x00, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0x00, 0x00, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0xFF, 0x00, 0x00, 0x00, 0xFF, 0xFF,
+0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
+0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
+};
+
 // Should be enough (famous last words)
 char textbuffer[16];
 
 int arclenum = 0;
 
+void logo_draw(int x, int y)
+{
+  int i, j;
+  int width = 46;
+  int height = 9;
+
+  int input[2];
+
+  input[0] = 149; /*Hardware memory*/
+  input[1] = -1;
+  inreg.r[0] = (int)input;
+  inreg.r[1] = (int)input;
+  _kernel_swi(OS_ReadVduVariables,&inreg,&outreg);
+
+  for(j = 0; j < width; j++)
+  {
+    for(i = 0; i < height; i++)
+    {
+      memcpy(input[0] + x + ((y + i) * 640) + (j * 2),logo + (width * i) + j, 1);
+      memcpy(input[0] + x + ((y + i) * 640) + (j * 2) + 1,logo + (width * i) + j, 1);
+    }
+  }
+}
+
 void display_mode(int mode, int height)
 {
   int pitch;
@@ -273,6 +318,8 @@ int main(int argc, char *argv[])
 
   screen_clear();
 
+  logo_draw(538,242);
+
   font = font_find("Corpus.Bold",32,20);
   font_colour(0x00F00F00,0x00000000,font);
   sprintf(textbuffer,"Arcle #%d",arclenum);