From 4bfce2b3c0eb6bde7cfd466b3433832662bfde5d Mon Sep 17 00:00:00 2001
From: Myles Skinner <mskinner@partner-path.com>
Date: Mon, 10 Aug 2020 19:57:53 -0400
Subject: [PATCH] added color

---
 build/cookie.prg         | Bin 2505 -> 3132 bytes
 build/cookie.prg.out.prg | Bin 2257 -> 2827 bytes
 prg.txt                  |  98 +++++++++++++++++++++++++--------------
 3 files changed, 62 insertions(+), 36 deletions(-)

diff --git a/build/cookie.prg b/build/cookie.prg
index 0b40a39177c80417bd8f552ad909c08ec99dcfda..d44474fc04934dfcbefcf054a0df3ad00ff3b159 100644
GIT binary patch
literal 3132
zcmb_eZD?Cn7(Qi-O>%SZO>!G*CdlzHr44iDChO{=xW&`twsvj0Bz5>l|BU^tAM?kY
ziZDc!R#%mdcBo7pZghSTKM;leh=uis_)&&}7VHnH;tv^{AnH)xbI&>Vp5C--#1Kwy
z&Uv5r<GIg$-`f$sHjL0Qd|kbQ$?fAqdk1c!mCEo?Y5Q2!A*dXVB1#+C0(IC@gvDV?
zxxTeQvZOG=f6+bRE=28y-B+NwhMfh|e8Yxc^l&(b25MUy=X>n_-oi0V$E&qU6%SPQ
zkD}S|t*Gjr<#s7&)gfoFjuyiQ&>We~e7w;|J;@M+A`{HM8Nzo}#_?eB&Jrf?^-$VN
zu=0U(o<R@o#dx+!P$qH+?af0q49ZKdDFA*6X9N`^htV9E(xT^*Id~v)6auT+tj#zR
zqLo^`ARQ6(YGeuk&6Xf?17cBIhF}pcM2;(fnT+_%N&v=cbl@TqJ?R6a{d6WXlkqXl
zkW(#=4vZ9goL-lR-O+gu#4yuf9*hL3IcuwbF#4`UagdMlf&u4i88{O?r-IxlZhCMf
zGh{5}1PhFWZ=#F;hzZaT)0SEwydp1%Pa%dFyR~H>pw!Pm8$j;YR(%L}&R3sn^-e>O
zQ`$v|z=Gjm?KlAWO8d=&2#kQptZ)z#j&1JnMb>&JTLAqrLjfqfh|54q2V+;aV?Glj
z?U*mbwzXq^IkvMMbE5BQ$9$iD2binc3OwM-UwHTq>OX9n#G*ms)3`4SZSXPu(x#X3
z@Ycd4EDcNu9N2Jzp4Wc?YuF>0?d6#9Y5j`WqiiqF_CC_D+RW`7wzq@reWq^_du6uQ
z$NVkp%OPmkl+IHJUC~!VbHpOhfY<AcsMEL@dJ03E&LYeByp!W>lsCTa{5#lf#&?|p
zw$J!Lo5Ym9Lv6^w^>nw<)Lc(zsg2GW=QZg{ZOs9F5tt0MdS$GJ%hk#V9x2soL!%BJ
zAH(&*5_IM9(R!(h7K|^XGpNYx!~`uFUurO*s58Gky90e|tndUF1%DbpO3b<xXy(rv
zj5S)Ex6u~!S7{6W(e>sZnke&T^Q6hk%*irK=DaD&%%Nw^w@j~0e*pcbDql1|(O||p
zETa`utr(J0zfg}GfcM?jN8D}J=qK}>DY@xGznhCZYsSqr@g*<obp|K8A--%10t)db
zEtde$n9G2jMdkQ&mMe3cpqJt=Sb_jG#nx+)w3jV!ma>gCL*-(1q^AtCnNQ~n@z=nw
zTjz{Akr>Pek@DK16i&SDqj&_qDor^!lWs|TC@~wiWtd5M;*!or(nMmxgKX56)wTi6
z;i1H*7NZpCn@T*A;+o1!P0b~qNC{2l(Q0Bc<!MTJt8v5o%fEYcE+wW@<zl1EM1_(w
zDXEB^NKc;NF_|K^B~PszlfOx!{^Xk}A&BAReceGp>`xx)mV$UA`FM9bg2?z4!Rw6p
z(;|nJ<TKz^$U(iaz8Hd9NLaHHl97IydwJdRa<a#IMFND8i<9=4y_hH>xYv5!Gw1fq
z+_Mh8njNv;?-l}h+B%R92;hV@k@f`ey>%%4zX{;7bvP{r(9!j1+82P)b(F_s0=Thj
SYTcMZ0K2-5r?~(yLg+8Loj20}

literal 2505
zcmb`IQHUEw7=ZuMUN6aJceBJu5tVVchg>K%oAi_mBF0IwcV2UQY?78fiPC3Zs-mDi
z^g*nrUQw)E=|e?nOG;Iu6;Z6RO52CFw0%%0_t1y7h^^2TQ4mr8*_qv)<l;e~LzvzC
z^UXj1|Ifewzb^4$0$_<e)OHDdvNOA__AqnZx!L-b1<#@Icp?Ri^@<hd@TrQE!>2}j
zqDPAqb|mfrX7}u=3M=*OA|mCUjZfH}C_$|?(L0^DADyf$5!Ufqu19L_j(OOZcnrK?
ztu(Eyd9%(;8@@~If@NCx;s1uZQlM}r@f_kl+39x3Om%ym&=YyaCMi*dFAmSMNkV)I
zo07X>TN&;5iEy>0u;LY|V)7+eMvRg?WmSq>aiIL^<es(dV{WTmiPXH4d@Ha|2v*NN
zWp-#RYX3I5U%?A<#M=hEznMG~;{}1?o{0AyuR33AR`bpzxBdQ9H^LDLx$sGR^wm*(
zolAWY@*I!2@Wt=<_2tw_1rLk}_Cz>kCFv^~b2N2kO?tr9pHr6xadCol){mSHu4$vT
z65+AovCjkely*JF6-|-piVSVvrQHf~8O1(FF_7^<{5|cj2p2rZL)~a^O!I5<wGHcd
zPK&WR3Bnb=j`(fOP;j|Rc?{qry=fHOP18~E*V3Cu!H=gO83kWSKQRif=}#f9CQ^S@
zQCF~*5dD|+i$s<-a)eA3v5-ycch-MM<|ZnOIQ0mnxM1T7H1$7`Mj0hsR^sq8`rlH<
zxU9@&FX$UL2+rZMtz5QOzfZ~<TsFn^?blbvu+%cvWe%Lsua7O$EX5K!q`1NN`mM3O
z1nX=O&gvJ&#Wovm=$FUW*!72gbzJUB8eeIPgt5<=jpql7?lpWZP;`vh@T_rK8=^_c
zD*j5bu(#UoLW?v!w@I4yR%>?NA)N)%o~dJT?aa699=vK?40WM9N=c>grty=8orO8w
zEjD~$ToDHF0DNiu8g3dE0N?ms!*0Z?T^r6B|7g;!E5;#HxK#?>`pxK?(ybCqo1dC@
z%dNV3R>NNCa1-7(RTt4q^(Vh%<%^HL{K0~Iz&vTnc$DCXc}7^y<8jKoG|Y0@?ck!h
zV#*j?GvCMtF~Fn>f?yZnw)t*0$ZMNIEpsp{W1w2O`d!!^*~%|G{Np#OUNheanj%)9
z=QD><Wl(3-?i1tKR~kxR`6%;Q%yYeRMC$wd%7x6=Aud%8R9ni*G*E%I{G0hPf(6}Q
zYX`phlyyGK1BXF+z<MPolBXOdPr-UUCzGcPFItPayOlh9tbMsgwb$Uuvt+%Wlb5~~
b4q6AqiTu*Pu|6JlVtDDNtWR?C(gFShr<Q}D

diff --git a/build/cookie.prg.out.prg b/build/cookie.prg.out.prg
index bffd7cae3844dac5d4033b0d89e711deb148d68f..4612162180e0ba52c28e483ebda039ce07583931 100644
GIT binary patch
literal 2827
zcmb7GO=uHA6n<4#qju9YQN)9=3;~lxWH)KknoHSE%__A<(^e2cFCyqcC@OdndhwtY
zDN3OVf}SE35h5N$PZ1O^3W^}!^rA-*uZnMGc6KI{#5PNq?8|)L`<;0&eTjSmfYOFn
zrXgDbTtc=~X0i?9k@A%IhH-}T8~$*a78<^X&|<^KZ#aS*6Vutoo18zAhm$DPxK!Ae
zhnpzfA<OQoZjZj>5_m1}P0Kl6oplZb$M!qqS&q^?akOW-Y0=r*bhVbFdB<6968MR{
zLq&8Lw;WonP9EGptr5g4?h)9u89hQM4Puo{!6^Hg=-#w?>{_%sJyVv72%P1FW}6ZD
z1KOg#G{G#~Z6PeV(X%WGj-y-0T)fu_62IuWORnNHt*{mxo|p=9VV)<#+QQ-xZZXax
z!c9x)TG$$WS+N93v0`JG^VSTUZzXXn+&z4g9<nSHqAai^JXizANW+H?6cJHuM5WL{
z8`jo11xtGTjMRlPqEm!&v8r6_l}01y6vK%!Y{u>wlzSQ_;zShbm19!g=@e;4MS*b}
zHvY5_w7f*G27FI{oT_$gyY>^k!LRoQf8HDXM{n>Q_9_=#yYG1Ub|ZWtYJqis2uAHb
zcrckQFHB;SA@vee>~+8ehtx-5)?P0pO6tA`r|k_w3{fn=1=|v01;rA~+Z$QOrF4ac
zaG(2?A=p8A^D_D#)a^}h&4Z_QBI5Y)aTUrJdo!bax3|CorBA6}_uw~jxXnk@hh0gQ
z3t>}lwZ<7BP*OnjFYcNICU67i1r1mBdP8uONiv{0#pxK(6$TC(G+6QBhQgwLxSia}
z9KWCJ7mgRu@yAm4BU*q@3XeT5PF0)VUlE5xEMzva197lu!}y?woc!Nb2?bOkqaB7Z
zCdp_|DeWDjJu_glkS-1+c}T;aSNCBaN&Ia21U@SThHr)#xf-`~(V%4OXj+w^HkGU3
zJQNc#nToG=_bzCWO6wpP*I8W}p*aUGDUNJW?X3{!K#}lNvoY{cqjYP9#u#{#8h~p)
zyiBFU*(l=Kc#CSHLtTVlT<01N^<M;5f<}cMj{ZSa*%ItzlC10~3Y{*A_&)+;gM+NF
zQ-f)(u*Z=j3;RUzjY=9~R9Kg1Ct9S?R@QG^D?hZ|PJ&s}OgcUZuGGuS$oICvKCTE6
zi1Q@gVMARj=9~r>cm|Kr=HHsj=?p96)$}%1$Xlo)F60ZYZw-ZfgFsoxPfSD9kV^1P
T>SG<YFZ16*CNkSuAp!mY745eh

literal 2257
zcmb7`&ubGw6vtov*{0njMZD@dRM<q6ousWc9(0*@w^C~$X$tk^A0S>l>p>AL0T13p
zMD!AA#lwo|c|G(ZLcyyAJ$UgTc<`bJ-<#Rpncbu<8OrXy?&p2;ee>fbBcrEA0fY$M
zh6w25;U%DpzcLjvmqCNx^N`OpL@nelBK45t9TxG$e0wU~a`^cQtYXxXQEjdQ4={Sd
zsvmb7=9?;m4-${;wPwd&^i~&a_RbNa!faziqSI<OTaKvMcEn%@Q?Az0Vq}YEbLq-L
z+hElrQh!JoF=jhVcnni<;QvpL?c+~0+bfM!W<}zWiU(XHCU{~N)$eEUYCLpauKLi#
zs|v%Ml#hazcWr*zbAk$a|8C$2C0ug1Bdj$rYMm@lt<pT<DVID%*;+4UaA`v3q&O3`
zxK=cCYacpS>a%`aeL`HUImM{{$-uR7U2_iqYvSqj?TS~&(}{^^F;gf`q#kHy&A=5;
zcrq=xtu#%`^w7j{+SSlZ4u7A)HI_W(@E^nB$0u~DiK2PWsm~9G-yRNsIUK$%adRVO
zyNdY+d&xJ%yK(dC@oD%yF#<1^rW)NPY!<9H3t$}p8Q83M0ZP_E6$#ekE}XCqsW8B>
z24}6qD)cd&g@$#6dZiE>B7ilE=JXiD9*Cza-@4$2brjZJxM_{XDIB_cXFRsXDC4<R
zfUXd41@F1=8dKyaZVC=x2Ird#iO&pvX%5X9?T^7f(hEWnY@FjTR*c1|90!9v%9$qC
z3x&7A;bL)|j4l=@l+hX*?Ic>8q6T*cYxNmjM-IPi0utTUIcPffr`i`Cw&c7e_r7+w
zLq=4EHTX$EvS5YMo)u1(EUM~csVJ+Oaorw=GngYc6K8N&=jZI@!nE1yf)l%u@3od4
zUw#o`lXxQ~<>@m!ep)5<a^L9XUrk=CYd+h{3uS%mm4jS|W1`Na40@R}U?rICZ@F`J
zxm<#E4$I}T+5~mn1lLg_-mP`GC-wTyhvAwY89YMH_d=gG!BY}Yi#H9g5;fYMTZ7f&
N9}4ifJV}cO@E`ET6wm+w

diff --git a/prg.txt b/prg.txt
index 91a5e02..84eabef 100644
--- a/prg.txt
+++ b/prg.txt
@@ -1,26 +1,26 @@
 0 rem !to "build/cookie.prg"
-10 cc=0:cg=0:ca=0:ga=0:ft$="0"
+10 cc=0:cg=0:ca=0:ga=0:ft$="0":mt$="0"
 20 c1=15:c2=100:c3=1100
 50 ds$=chr$(17):rem cursor down
 60 rs$=chr$(29):rem cursor right
-100 print"*CCCCCCCCCCCCCCCCCCCCCCCCC*CCCCCCCCCCC*"
-110 print"B you have "int(cc)"            Bcursor(c)  B"
-115 l3$="B cookies                 B"
-120 printl3$" ("ca")     B"
-130 print"*CCCCCCCCCCCCCCCCCCCCCCCCC*cost:      B"
-140 print"B                         B"c1"       B"
-150 print"B       ********          *CCCCCCCCCCC*"
-160 print"B      *      ***         Bgrandma(g) B"
-170 print"B     *  *       *        B ("ga")     B"
-180 print"B    *  **        *       Bcost:      B"
-190 print"B    *       **   *       B"c2"      B"
-200 print"B    *       **   *       *CCCCCCCCCCC*"
-210 print"B    *            *       B           B"
-220 print"B    ***          *       B           B"
-230 print"B    **           *       B           B"
-240 print"B     *     **   *        B           B"
-250 print"B      *    **  *         B           B"
-260 print"B       ********          B           B"
+100 print"{grey2}*CCCCCCCCCCCCCCCCCCCCCCCCC*CCCCCCCCCCC*"
+110 print"{grey2}B{wht} you have "int(cc)"            {grey2}B{wht}cursor(c)  {grey2}B"
+115 l3$="{grey2}B{wht} cookies                 {grey2}B{wht}"
+120 printl3$ca"        {grey2}B"
+130 print"*CCCCCCCCCCCCCCCCCCCCCCCCC*{wht}cost:      {grey2}B"
+140 print"B                         B{wht}"c1"       {grey2}B"
+150 print"B       {brown}********{grey2}          *CCCCCCCCCCC*"
+160 print"B      {brown}*******{blk}**{brown}*{grey2}         B{wht}grandma(g) {grey2}B"
+170 print"B     {brown}***{blk}*{brown}********{grey2}        B{wht}"ga"        {grey2}B"
+180 print"B    {brown}***{blk}**{brown}*********{grey2}       B{wht}cost:      {grey2}B"
+190 print"B    {brown}********{blk}**{brown}****{grey2}       B{wht}"c2"      {grey2}B"
+200 print"B    {brown}********{blk}**{brown}****{grey2}       *CCCCCCCCCCC*"
+210 print"B    {brown}**************{grey2}       B           B"
+220 print"B    {brown}*{blk}*{brown}************{grey2}       B           B"
+230 print"B    {brown}*************{brown}*{grey2}       B           B"
+240 print"B     {brown}******{blk}**{brown}****{grey2}        B           B"
+250 print"B      {brown}*****{blk}**{brown}***{grey2}         B           B"
+260 print"B       {brown}********{grey2}          B           B"
 270 print"B                         B           B"
 280 print"B                         B           B"
 290 print"B                         B           B"
@@ -37,53 +37,54 @@
 1050 if k$="f" then 5500
 
 1500 cc=cc+cg
-1510 print"{home}"ds$"B you have "int(cc)"
+1510 print"{home}"ds$"{grey2}B{wht} you have "int(cc)
 1520 goto 1000
 
 2000 cc=cc+1
-2010 print"{home}"ds$"B you have "int(cc)"
+2010 print"{home}"ds$"{grey2}B{wht} you have "int(cc)
 2020 goto 1000
 
 3000 if cc<c1 then 1000
 3010 cc=cc-c1
-3015 print"{home}"ds$"B you have                ":rem stops from messing up the counter
-3025 print"{home}"ds$ds$l3$" ("ca")"
-3030 cg=cg+.1
+3015 print"{home}"ds$"B{wht} you have                ":rem stops from messing up the counter
+3025 print"{home}"ds$ds$l3$ca"   "
+3030 cg=cg+.04
 3040 cc=cc+cg
-3050 print"{home}"ds$"B you have "int(cc)"
+3050 print"{home}"ds$"{grey2}B{wht} you have "int(cc)
 3060 ca=ca+1
+3065 print"{home}"ds$ds$
 3070 goto 1000
 
 4000 if cc<c2 then 1000
 4010 cc=cc-c2
 4015 print"{home}"ds$"B you have                ":rem stops from messing up the counter
 3020 ga=ga+1
-3025 print"{home}"ds$ds$ds$ds$ds$ds$ds$"B     *  *       *        B ("ga")     B"
-4030 cg=cg+.2
+3025 print"{home}"ds$ds$ds$ds$ds$ds$ds$"{grey2}B     {brown}***{blk}*{brown}********{grey2}        B{wht}"ga
+4030 cg=cg+.05
 4040 cc=cc+cg
-4050 print"{home}"ds$"B you have "int(cc)"
+4050 print"{home}"ds$"{grey2}B{wht} you have "int(cc)
 4060 goto 1000
 
 
 
 5000 if cc<500 then 1010
 5010 ft$="1"
-5020 print"{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$"B    *            *       Bfarm(f)    B"
-5030 print"B    ***          *       B ("fa")     B"
-5040 print"B    **           *       Bcost:      B"
-5050 print"B     *     **   *        B"c3"     B"
-5060 print"B      *    **  *         *CCCCCCCCCCC*"
+5020 print"{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$"{grey2}B    {brown}**************{grey2}       B{wht}farm(f)    {grey2}B"
+5030 print"B    {brown}*{blk}*{brown}************{grey2}       B{wht}"fa"        {grey2}B"
+5040 print"B    {brown}*************{brown}*{grey2}       B{wht}cost:      {grey2}B"
+5050 print"B     {brown}******{blk}**{brown}****{grey2}        B{wht}"c3"     {grey2}B"
+5060 print"B      {brown}*****{blk}**{brown}***{grey2}         *CCCCCCCCCCC*"
 5070 goto 1010
 
 
 
 5500 if cc<c3 then 1000
 5510 cc=cc-c3
-5515 print"{home}"ds$"B you have                ":rem stops from messing up the counter
+5515 print"{home}"ds$"B{wht} you have                ":rem stops from messing up the counter
 5520 fa=fa+1
-5525 cg=cg+.4
+5525 cg=cg+.06
 5530 cc=cc+cg
-5540 print"{home}"ds$"B you have "int(cc)"
+5540 print"{home}"ds$"B{wht} you have "int(cc)
 5550 goto 1000
 
 
@@ -95,6 +96,31 @@
 
 
 
+6000 if cc<500 then 1010
+6010 ft$="1"
+6020 print"{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$"{grey2}B    *            *       B{wht}farm(f)    {grey2}B"
+6030 print"B    {brown}**************{grey2}       B"fa"        {grey2}B"
+6040 print"B    **           *       B{wht}cost:      {grey2}B"
+6050 print"B     *     **   *        B{wht}"c3"     {grey2}B"
+6060 print"B      *    **  *         *CCCCCCCCCCC*"
+6070 goto 1010
+
+
+
+6500 if cc<c3 then 1000
+6510 cc=cc-c3
+6515 print"{home}"ds$"B{wht} you have                ":rem stops from messing up the counter
+6520 fa=fa+1
+6525 cg=cg+.06
+6530 cc=cc+cg
+6540 print"{home}"ds$"B{wht} you have "int(cc)
+6550 goto 1000 
+
+
+
+
+
+