From b23d82b7fed6b060a329ef56553324084d2f0b01 Mon Sep 17 00:00:00 2001 From: Myles Skinner Date: Sun, 11 Oct 2020 18:43:36 -0400 Subject: [PATCH] fixed menu after loading... kinda. --- README.md | 34 ++++++++++++++-- build/.DS_Store | Bin 6148 -> 0 bytes build/cc64.sav | 1 + build/cookie.prg | Bin 6981 -> 7112 bytes build/cookie.prg.out.prg | Bin 5883 -> 5963 bytes prg.txt | 82 ++++++++++++++++++++++++--------------- 6 files changed, 82 insertions(+), 35 deletions(-) delete mode 100644 build/.DS_Store create mode 100644 build/cc64.sav diff --git a/README.md b/README.md index 4c22f08..95bca36 100644 --- a/README.md +++ b/README.md @@ -21,7 +21,7 @@

-Cookie-Clicker-C64 (or CC64 for short) is a Cookie clicker clone for the Commodore 64. +Cookie Clicker C64 (or CC64 for short) is a Cookie clicker clone for the Commodore 64. ### How to play : @@ -29,13 +29,39 @@ Cookie-Clicker-C64 (or CC64 for short) is a Cookie clicker clone for the Commodo - Buy items by pressing the letter beside them. (the one in brackets) +## Saves: + +Saves must be named cc64.sav and placed in the same directory as cookie.prg. (to copy the save onto a d64 file, use DiskImagery64) +
Currently saves are only available in the nightly builds. + + +### Save file format: + +

+Cookies +
Cookie gain +
Cursor amount +
Grandma amount +
Farm amount +
Mine amount + +### Example save file: + +3426597 +
0.9823 +
230 +
54 +
32 +
1

+ ### Credits and Notes -Credits: [@Orteil](https://orteil.dashnet.org/) (for making the original cookie clicker game) +Credits: +- [@Orteil](https://orteil.dashnet.org/) (for making the original cookie clicker game) -Note: +Notes: - Due to the way I have everything set up my commits will appear as commits by drskinner. -- Editing program lines larger than 80 characters in CBM BASIC will result in parts of them being deleted. +- Editing program lines larger than 80 characters on the C64 (or on an emulator) will result in parts of them being deleted. diff --git a/build/.DS_Store b/build/.DS_Store deleted file mode 100644 index 5008ddfcf53c02e82d7eee2e57c38e5672ef89f6..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 6148 zcmeH~Jr2S!425mzP>H1@V-^m;4Wg<&0T*E43hX&L&p$$qDprKhvt+--jT7}7np#A3 zem<@ulZcFPQ@L2!n>{z**++&mCkOWA81W14cNZlEfg7;MkzE(HCqgga^y>{tEnwC%0;vJ&^%eQ zLs35+`xjp>T0h z_(5&PBnDhedBk=f1UgJZc_fWOGbF=gim@F?0lPq$LYqvQl7^uv(}6V5nTGc4?!D4Q zHU!T&Mb=!MJ$Jvedmg)c&ibMBIq3ks#2O0|+R)YFPEGyz}{_BmqJua6E{*m4a19ZEIf-Pg~Lu_U)N1XPT9lzU0`=*RS zea25Y%FR%NIK0@KCjJ^DoM|mY|7bU5m{y_?RGG69=E3mJ2gga+Zrjx_b zSe+2SVDDrc;V>`422^=}tG+jkLVxB5ykm`~RY>iv3cDO3}YI>$X5L=W?U~CXtDew8qCVS7oKAu~>35-zSiKI6gt7 z)H$Xg4`t;FB#VSeAwSA07RW>}Boq{S-ep9RJx|~gv9VKY9EP13NnmNVOF$D5a_5jq zPo!wMJ-bc-lQE(oQ_VwCkf*a71yU0<0;(X@xsp_*Zf1)>YNCcD=9`42;=VR>3CDSo z@skYAB$X07t7a}2s6^}}yK1OGUDOwgHMaz!_Nap`o&z)22%LzV#U5v^)1?6@m|5hFHkmY_6rZ|kERXqUE1Y<0{w{6a65i$ zmt_ao^C>i(k*ZnW zfCL@-Y=u+ffNlB$rBTa8d0@AmC>&hQ5Z9NfEjK$D{4k{VsvM8tT+r96oC?9YqHj_; zUcvcHA5l3t!*s)AYO9L94?&S(h05VaObE&iD^*U7=u>Z4t8(}u6@s9lOW|PXz&8zB z)Rx-;PZ;{umd62W3Z6*pTU%oA~6#76R8bz38}FWo-lrI z1||=(yk8DLw{gvk0cxU{0HhqEBI33iJ7#R;s>31Uh*n;y9Bh^s;rc0sH;iM7L^oVC zUb?5i%f`#9z`UH7vosS_@{Z%DhL4>g=TDqGM~;sU4U>`4v&7?cIo(j2b0ljsk>%H9 zH!9Ap?#&s@;<_A=-LO9A?W_rPNm;}cBa8VsO8k*d}@gQ(K!D}Sw7v8xw8$^Vgg>g;+ezsnqw;vr_&O$8fO$rIZ0 z9?UPp%pnQ-3bvRPGrM7L!FFK$h zBfPq0`)|y*BnBB~V=1>ho_}ciEs$?6D&?mzR;m$m37$Hb+w(#(k)o@KE6=snY;sV? zmWbW&V4FWn@4C#6(g7llx_ej=UnxVt@61jyTq2Q7Q?tvR(NV$<*qtTxRHnk`HfK(#?pI5J67XG zPMPN{bZo5qpC}xsACK)rWv1v*HXu zagP7bFOCQw&pJ98)hxv$LbYI6Y9#g`5Bob6O17A4+l$8@lxl;;mnNgyjpEBfwJ5uj z!x}rO$aspW_Wjw{9+Yaon0;$9s-2mgwuZ%TaeH&Cj|lzR@1`G9t$9v113ZX;{NbDe zKG*R!AJ4&=9-2ee^pe&{b4%?07wCs`$|eso&-G3o6r5W>c~IxvCN1dQbHn7+vGc=c z$;lCNar9ksY-os_9z8ouM#s*d96fUm@2@DlJ~yHTjW^af4ubwZ_p!-?ipdJ@A)RkY zb1b<7+kF#76pN-lvhqPi(+F8RnP~bK>B8>!eJ*5KEzj;@S15RcLMh&h@EV_3>9d^E zfUJ$Ag5RK2TFV79D46^TWudi7Fr$LW?@*Rm9~I1Y!Q_`H&sY}ofO`*-t2gh)ReP7D$7+~C+-5}(eem|A?trSx@yX0 z8O~U5b1DFTv_dE2N${aHjZs(@eqw!?QCP@)W}VI`%(ZV@OFDOx8YrO7&H<_pEr&y` zL0`;A;j6TwQ#p#=UiB=lf@)gRxsg=kMUanS&4EoKQdET@;cP=)qLGrQ+ZQK5rg z?n3pNZ;Wim-6KBi;?x)HM)7u=*rx_e1t8wHbXuzP^Egkz+c=^XOmRZJsU>Wf(^ z*lnk}HPKN~>GHV1YrD{m!npsMY`c4U$sMZ*BDVcK;-5@U+79V5jZztC$4J1a{e;VpIV3*`8s9L?CWkhg1Nmqqc6O{74PkwjqUv G0QesYjBHB) literal 6981 zcmc&(e{5679sf4qkze>Zc48+X!1)puJ4C6U?F1)UXNrH>uu~>_JvvO6I@*lJ68?!rjzQ)UJ3U7AGyS?hZJR`#Fg7K5wI;FWwezO~SEU1tJ1iZ$w6dp(LEi4Z(Mb z8mV%5eQwCf+j$>rd)z5HP;=sTA7f7qg~fT#ag@wZBPQ}ltc$cNtAd0=Ti!w5<<+`` zYZ4^;GcZEo>v=D8ULW!rN0_Vyj`zd7*Epje8Aq}urQcEFc-{zSte=t5I2KC(Fz*Zp zHOvS?=`{as&bZ=EjM4lnoH1Zv+*PA}2GR->l-ZkqowGJ(Sar^wH8s0xGTg{Koc{r5 zmRY!jBN+2e_|6LXTtS6ErURZfP}q5!5ib^eR^Za{-(_?T!%mMRU@r6sXgUif51ENXmX)oA zO#+z73Jsa<9+HK8s<1^M4QV2v8dBGlWFwChb_k>)Ye-t(3@jV>kHXa)=gs6#CK)rW ztlV)e>=CGR?qpaEtr1fqm`t{HgcGiWn@#U8E?h5gB6C)G>pXR`0iZQU_H=cI<4Q{~ z;p*bJ-8$|L>w;mKz*#)B@OwGgYwRx<9?co#Yn{gp?=3u~y~ysLyHwRpjk@46Ce~M% z>L!G#Z!(W-{9ZRTQB_IvvtDYxto8b^SB)i-O+p;&e9(MV>-2M|tV3C6#C${RtaroX z<_Ybk0XfkP9W7DC6?StCwwQC~3H4VnG2zJ?95fedy@9D3yl%E@osC=ruciT0;H;Tw zeYlRm6?2XLCbOL+1UJooo#GXg`O-?A;u93R)T&ebf>I^Lbqd2E;k#NCdZj*%f;kIYrKj~b*$um;0sYPEhJ(^e`Wx zwi7KM$RUCoEAFV{(oLjlJ20a%GW<jMl(tJ(gjOmeA#Spx4r~pr0g? zN<2woA)<6)siCyAz!u9B3$V6O)gd(uhb-$C3{o4#5+Q37=GhG?%f^*L zT8*@+?Ko4b;ZK%vO`;4Fmdi5=oL6*J7w9W`xxk>HR+*eQGkW|ix$x%c^W?>S~f9zsR06>KM}`l>3U;oR$qqLBh_%ZsWE2a4V(nAR5K6vZ~hR7xacoe2_($D$+} zOeD|@($z_ltwEy3x;m1Hfk_)+uE8(XNpt&E6|h?0F2Dj$4G-0M>S3w%im-*n z20ARF74J23a~6xl_42kv3~feYRcCwc-?wS*9hGKzqigS)Dq((>u$*qM{WHf zw-2Ob+b@Ygdi6k7*oGu6kY4zz?Pt>51#-P@Si<5t%v^Qd_A6bo2&?glcFt{xQCe7m z3EMF#6J=BJo5D~Qa^bakekeV*b!OPZ5|#ox9WoE%c((FCk6-f9z$^y!ZLQt|g~ znj?MiYVjW1+&S{M#XquzlvId0vbp4dF4^e9Y1?z|R18!|fzFbj*mS=(z!yqh6m~Pe zeyilLuHCeL-CA4=U0cl z&k=0fi z;BZLQ1~+$gL}F^Y(i{mAe)whUZ!)+#3CkUpYVLX5|G4XA53F#MSMyC+rtl3%6>dCu zkl<&{5w^0kl2xygd10@Yt|KNkOI#r=#Y8c-*Ws=nBr~{BlMI&}bz+osv6`-n^^r1z z5D$~jKddl%&*8&CxFjquDoX=G(p?;UvI{`D^Z{KGmL^{-Z5EQI9)!5nnL~+*mn0dD zHk5{SIat&Tmqvsf!?DP4_G7Yi+a{Or1V&0fuM6_K;jPkD)hxUip}&?+)bOaWYJ`Q& zkHj0LIm>yKgkh^GD_qW9!VX3Q>97gK+0$?`GO;=6il(F1Q&zNm#;9clR2v8OmD$CZ zcX6gNWd-r2vPC#1m$bqS*UE^HbQfo=>>&QTY?&@8;08~5jgWN5GZzMtm5S-KT3LR- zE~n8A>&pFH&aBR01in+=s0m?(@YCfhmtz1~tX?Shti$Q49lf-ou{9VE!s+s+b$jZ4 z-hijp)5IGxHWCqjqtt-;^xyIytQ(}y?lC5d;ZT*;#50zA(LMz591uA=!xQJzql;eP z?51X=Js5w4bSTjvaW%WOlhS1H9t2!mlwtsiI{rVuI3moiI652C>MKqO(;_jYg}5R- zt{A^prv0Vj@@!1AEWRpCORyU~Jj-Vcnc8BeZC`xjUYT}e@x*LQdw+4x zdX~Qx-EEygBJAtFoqf!-HA@N^;9ex;t|fM^>r|glrJ$z2TSC_Nlg@ZsNAm6`=qF2R zW)Jc&_0Jyk_|lcL2kl$hY6M+8KT6IVzc6}^oIXV^ja?+iPo5-ijh!1MW8)W2kDWb_ z_hb~#FO3^PQ=K)1f}mXT*z7@#WDSpyDY&{VnOT8d!Ra!JWz#TOd#|$TUD7+7Y_dB0 zko~Ur1(&mQ!vS`Ig7+ts;;jfj;XmM{8#tvIN!y5z-=D;twSpKCM1FztWoLsRCIpe+ zpnTK$kRWyoBELd;#`&-y1_hDdp*-)rwy~eEl^BarIO@E)5qCB1Rm}1hC8^Za)lvAP z^FJG(CxKe_M^&}KUx%weZK5_#;T`8k8~XyastWHrZ}CQn$R6@WA~|9ChVnG`_d*ng#S0nSkX=45WUeiz^!LFN%J;1b@%_XJ$Hdp(F=v zo0;c%=lQ+Q-+ABXon$bRO>b8?grRax{m^II}ne<1Ng}RhgH)nd@ZT1U4=`rcPLfMRJ#Ee6u#o#+A{cNJ~cN*u{#`$n?7~2HdvQ~NN7sx`5 zK_Vhf?$f}aL=-X_9V3GLrbdQpMnV-*n`%UnH#9O-G=^_)0E^<@Q#dCmpP(`WDpESh zb?V*sOD7NwQH@wNU#pcyiq&M*;&mWJaWk!%rcKUL!^ zC0hVHNJrwUBwI1(9GkupUoF`x*erb`zJ~W(&%5Fk=~A3Gxi%BKW@M9+Nq#H7mL?s# z8egX{HvQ%?kUzv*81lDxoTfbQnrF{B^lxB<&Uw$Kj`dA+MylDQ6H;=9&BH%7^AGkP zMSB`5(0F*oD}AXfU1Uzj=0-C+O&Ob;EbP`j_lixut-`0LW~qF`J}$MWaM0e?^&IKZ z)>av52a*0PL{y|5Iu*z-%H0cOKn-wvHY8g?+J z)8Gc?EObJpVc&)g9EI@>Z88dJMB#{@VBSm9Yt1HjC<-%>EV%UoM`3&0Bcc$F$kQlH zM7iLS1ru~oa+G6E2jyU3-J(JHTw6N_<;!gwWl%B*$}v5`yqBTN%_ev#C_jc|#jRI3 zD7)L29+YPgql!yqSfpZP(;;Sbh`tusx@d?_wr}DPooU}JLX=6R=FZSXfW%6T)5Pz2 zHnjbsJ)H47F5QTT)=75LPNSr7!>;`()Ehg!#!t^E@>)XLrrI_QX0u8D}J_q z&YI*l7%AIFvm)kb9+quZJ}#kcjYX2z0<82BjmM|-L`&#mqsg1_CqmQm9X-)wn_47~ z&$}XfoV-i^G-!8jscD|9$Gxkk;3nxFm^1Xx&0En>wrnAq&ZeD#RBviX5H^TvSsdAO zD3;w2z@d9OTnVAhG(w_LJt_d8Uh?)jq+g3KH zVZz2|`45d$lByTl)P#fh*OhpzJn9Y`$+9T!CgKLW_TT5{TK6^))n?W$7>A|fN<3EO z??Aos-;CW>2!IQa`+Abr}F;O~@H>7_P&HQ86<|W{HxOPX`8VUHKEG%8q zAzh2*KU1n1`Z#MO^NYF1uAP#A=i%CQW$U88L+3V=TX^`!KrjE9o|nt?q1bw>y<;Yw#*>!^dOeS(6;-6migIaQQfShz zOA4Lo+mb^6braP02k1|@&6--VH(EJR&e!r-V=%53d^@98{2aZX*g=yvE$=j8byugb zdSa}^-#a2!e*zD+)qC)jHZXj`qyiq!2*VF3sz`?w<OPwD@bC{(!JG)`wJ3?q=v}Tmpu}XfVmLE0_oRvy3y+=QwziyB3Fu#gbJU`#NeCK!1%hDdzS#GiQ1{h67ac1xQ8-8S2M zde3*xcfNb~-ZQ(XLaP9?w<{>-P6gDFoe2xZ7qVX>odtIa#Dp1_&z_Hp;3JMwLv>k{Q` z9oN+}nhN9+`Fu}bG8fKi^y#i&B~AjqakiPQdaL09h~d=Oz}95e>PqCo0}PjvxZ4~H zo>Kxp#7`s2e{Al;|4s1I4UWmNp?wmzZB6wu!86Pr$mTNHu&pTyk^fA(o0=L>ZOd_| z$t!X)f|GV8m+#=gXzq787iB<00%`6aIoGB^!)n1ThJILoUsu`+CpDJ5P0qDbjAUu@ zemNPRo_v>_+rpBYB01&WC#Uf2fJ2U9XfWy+rUoY*122aU93!g18OK2O7aSv|!4=2A z+vOL>h-+}uG4LAtTN=3ipdu*BH<3Y|V;}?7F_3{7Tm&OxSqr8Kox%HHMBIu6GYa|O zVtBW=sbi!UFHE&y=&&QW1em3uX~GM^05@$kqwq@ber_hwjKPuMQf_vm8HeM+3T~#= zf~muY!DZacp&5fOg3IZ$w(V1P5`H3q8vqS1C zR}n<5Tn!_(ecCn(25d$Q%QnZ76>aO30XuPwI^H#=?86Itc@`lDyj&F|rC+bAzK{g~5ThNsAqTXermr?d#M z3v936sqj5|c3Z`6Qek_|EGl>vxf>f3RqnRn8KfXZ ziNS8Nq$r~2HPDb&<*QKBfy$1=dA9fj-V0!$O-SM*F<#WacXV(r{Txd$4h zEf_{dLL&p-CPPZ}smpaniO$y6kwlkj>zPDRT`!n$6+!HrHdMfQ_DsRL)bS}2hME)E z53vqTHYrnqZY!G(cjL9oFWyHHJmHhTYtnU2SJ+;e#OX?$21q7yb0|86XD_-74^j>m z2rr+nWS}|pxBkoivJ(g|u8Mk5_Vjj_mF%{j0fipkTt0P(%mk6hw zRk}r~yvs8Cm}!lj!lpGsqB%6n0pFr^AeM`SUB(_6Xb!!zf6)#&fv`h4D+ArOmBvM* zCv9gFU39`=Zvzdyu=#b?s}RLXqK>GxVJ!?tU|qvHcmp26nX$Hr8P{9%4mL1wkV~-# z{21<%T?AD}$Gls>(-8ZH*dHHb0QOqwzS%PQZt*#^hx2qVX$XwLgDodmaC6SyT$f3ejSLD$Kx&ZquO>X+KQX4CD)S08xv<uJI8zY!+aC9OLD;h}"1"thendim cl$(23) +30 dm$="1" 50 ds$=chr$(17):rem cursor down 60 rs$=chr$(29):rem cursor right 65 ls$=chr$(157):rem cursor left -70 dim cl$(23) +70 c1=15:c2=100:c3=1100:c4=12000 +80 print"{clear}{home}" 400 cl$(0)="{grey2}*CCCCCCCCCCCCCCCCCCCCCCCCC*CCCCCCCCCCC*" 410 cl$(1)="{grey2}B{wht} you have " 420 cl$(2)="{grey2}B{wht} cookies {grey2}B" -430 cl$(3)="*CCCCCCCCCCCCCCCCCCCCCCCCC*" -440 cl$(4)="B B" +430 cl$(3)="*CCCCCCCCCCCCCCCCCCCCCCCCC*{wht}cost: {grey2}B" +440 cl$(4)="B bakery B" 450 cl$(5)="B *CCCCCCCCCCC*" -460 cl$(6)="B B" +460 cl$(6)="B B{wht}grandma(g) {grey2}B" 470 cl$(7)="B B" -480 cl$(8)="B {brown}********{grey2} B" +480 cl$(8)="B {brown}********{grey2} B{wht}cost: {grey2}B" 490 cl$(9)="B {brown}*******{blk}**{brown}*{grey2} B" 500 cl$(10)="B {brown}***{blk}*{brown}********{grey2} *CCCCCCCCCCC*" 510 cl$(11)="B {brown}***{blk}**{brown}*********{grey2} B B" @@ -28,21 +30,21 @@ 590 cl$(19)="B {brown}********{grey2} B B" 600 cl$(20)="B *CCCCCCCCCCC*" 610 cl$(21)="B B{wht}settings(s){grey2}B" -630 cl$(22)="B v2.0.1 B{grey1}upgrades(u){grey2}B" +630 cl$(22)="B v2.9.0 B{grey1}upgrades(u){grey2}B" 630 cl$(23)="*CCCCCCCCCCCCCCCCCCCCCCCCC*CCCCCCCCCCC*" -650 ft$="0":mt$="0" +650 rem ft$="0":mt$="0" 700 print cl$(0) -710 print cl$(1)int(cc)" {grey2}B{wht}cursor(c) {grey2}B" -720 print cl$(2)"{wht}"ca" {grey2}B" -730 print cl$(3)"{wht}cost: {grey2}B" -740 print cl$(4)"{wht}"c1" {grey2}B" +710 print cl$(1)int(cc) +720 print cl$(2)"{wht}"ca +730 print cl$(3) +740 print cl$(4)"{wht}"c1 750 print cl$(5) -760 print cl$(6)"{wht}grandma(g) {grey2}B" -770 print cl$(7)"{wht}"ga" {grey2}B" -780 print cl$(8)"{wht}cost: {grey2}B" -790 print cl$(9)"{wht}"c2" {grey2}B" +760 print cl$(6) +770 print cl$(7)"{wht}"ga +780 print cl$(8) +790 print cl$(9)"{wht}"c2 800 print cl$(10) 810 print cl$(11):rem f 820 print cl$(12):rem f @@ -58,20 +60,19 @@ 920 print cl$(22) 940 print cl$(23) -1000 if ft$="0" then 10000 -1010 if mt$="0" then 11000 +950 rem stop + +1000 if ft$="0" then gosub 10000 +1010 if mt$="0" then gosub 11000 1410 get k$:if k$= "" then 1900 - 1415 if k$=" " then 2000 1420 if k$="c" then 3000 1430 if k$="g" then 4000 1440 if k$="f" then 5000 1450 if k$="m" then 6000 1460 if k$="s" then 30000 - 1890 rem start of auto add - 1900 cc=cc+cg 1910 print"{home}"ds$"{grey2}B{wht} you have "int(cc) 1920 goto 1000 @@ -146,10 +147,10 @@ 9999 rem start of unlockable building text -10000 if cc<400 then 1010 +10000 if cc<400 then return 10010 ft$="1" 10020 cl$(10)="{grey2}B {brown}***{blk}**{brown}*********{grey2} B{wht}farm(f) {grey2}B" -10025 print ds$ds$ds$ds$ds$ds$ds$ds$ds$cl$(10) +10025 print "{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$cl$(10) 10030 cl$(11)="B {brown}********{blk}**{brown}****{grey2} B{wht} 0 {grey2}B" 10035 print cl$(11) 10040 cl$(12)="B {brown}********{blk}**{brown}****{grey2} B{wht}cost: {grey2}B" @@ -158,14 +159,14 @@ 10055 print cl$(13) 10060 cl$(14)="B {brown}*{blk}*{brown}************{grey2} *CCCCCCCCCCC*" 10065 print cl$(14) -10070 goto 1010 +10070 return -11000 if cc<6000 then 1410 +11000 if cc<6000 then return 11010 mt$="1" 11020 cl$(16)="{grey2}B {brown}*************{brown}*{grey2} B{wht}mine(m) {grey2}B" -11025 print ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$cl$(16) +11025 print "{home}"ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$ds$cl$(16) 11030 cl$(17)="B {brown}******{blk}**{brown}****{grey2} B{wht} 0 {grey2}B" 11035 print cl$(17) 11040 cl$(18)="B {brown}*****{blk}**{brown}***{grey2} B{wht}cost: {grey2}B" @@ -174,7 +175,7 @@ 11055 print cl$(19) 11060 cl$(20)="B *CCCCCCCCCCC*" 11065 print cl$(20) -11070 goto 1410 +11070 return @@ -227,7 +228,7 @@ 33060 close 8 33070 print"loading complete" 33075 poke53280,14:poke53281,6 -33080 goto 400 +33080 goto 700 34000 rem saving @@ -243,10 +244,29 @@ 34070 print"saving complete" 34080 goto 30000 +35000 rem wipe save + +35010 print"not implemented yet!" +35020 getk$:ifk$=""then35020 +35030 goto 36000 + + + + + + + 36000 rem exit settings -36010 print"{clear}" +36010 print"{clear}{home}" 36020 poke53280,14:poke53281,6 -36030 goto 400 - +36030 gosub 10000 +36040 gosub 11000 +36050 goto 650 +60000 print cc +60010 print cg +60020 print ca +60030 print ga +60040 print fa +60050 print ma