From 26f82b59c11326acbf68bd68e5b673aae75837b0 Mon Sep 17 00:00:00 2001 From: pkali Date: Sun, 22 May 2022 11:25:40 -0400 Subject: [PATCH] code cleanup --- scorch.asm | 30 +++++------------------------- scorch.xex | Bin 37721 -> 37728 bytes textproc.asm | 23 +++++++++++++++++++++++ 3 files changed, 28 insertions(+), 25 deletions(-) diff --git a/scorch.asm b/scorch.asm index 8857257..5a2c199 100644 --- a/scorch.asm +++ b/scorch.asm @@ -123,26 +123,7 @@ START lda escFlag bne START - ;entering names of players - mwa #NameDL dlptrs - lda dmactls - and #$fc - ora #$01 ; narrow screen (32 chars) - sta dmactls - VDLI DLIinterruptText ; jsr SetDLI for text (names) screen - - mva #0 TankNr -@ tax - lda TankStatusColoursTable,x - sta colpf2s ; set color of player name line - jsr EnterPlayerName - lda escFlag - bne START - inc TankNr - lda TankNr - cmp NumberOfPlayers - bne @- - + jsr EnterPlayerNames jsr RandomizeSequence ; for the round #1 shooting sequence is random @@ -150,17 +131,14 @@ MainGameLoop VDLI DLIinterruptText ; jsr SetDLI for text (purchase) screen jsr CallPurchaseForEveryTank + ; issue #72 (glitches when switches) mva #0 dmactl lda dmactls and #$fc - ;ora #$02 ; 2=normal, 3 = wide screen width, 0 = no screen (?) + ;ora #$02 ; 2=normal, 3 = wide screen width, 0 = no screen sta dmactls - - - VDLI DLIinterruptGraph ; jsr SetDLI for graphics (game) screen - jsr GetRandomWind jsr Round @@ -315,6 +293,8 @@ SettingEnergies jsr placetanks ;let the tanks be evenly placed jsr calculatemountains ;let mountains be nice for the eye ; jsr calculatemountains0 ;only fort tests - makes mountains flat and 0 height + + VDLI DLIinterruptGraph ; jsr SetDLI for graphics (game) screen mwa #dl dlptrs ; issue #72 (glitches when switches) lda dmactls and #$fc diff --git a/scorch.xex b/scorch.xex index 30471a34837e96e7a71e7533b2d2722f76c96d87..f814a1a4f404beb75e6c39fe3a7f46ec4b8388e7 100644 GIT binary patch delta 12594 zcmbVS3qVy>x;}@)TLd(vqh@Zk$IwHm%hb^_RwBV>Pdyf1S?Z%9A^WvlZ1^N z_FCGmPIE#xvXM;(>pD@L(iG)zh1oXtaAxc_-hp5eI+hQ})cdV{4v6O5y5r;Qz1II& z|NpOlt@Z!^+DEEFzN!lG{7166#j` z9pm|X@8!}mSo_-HC)n_EZfp?g z+$e@*-*m5P0u^4H61yxvn825bxy#}gMA zjUwt|*NwzAfw+>1+Tof*REz5gqAqZy6V>dRMYy@?u7%*-40h8DB_7Y^cIR>%o^!We zVg+@%m=vNWi?@Xsc8CgLmKgG^p}tV+HW`{vAbxXGbNrdzAs*fu?9oG;<9i(1G-6#h znYbnsht?ytv`FRg7_moEM~Y`8&h)fB@4l*1?~jsDQscdm=oWjzeK4L$7t|)`s_;7cR#O<4p&Z?3xZzSBbx!McF{|H#~|4GGNlzTN} zTM1g{WbR02?Q)`rSCzct$|6dMu)S~klrubi#0pCSm#f&25hb2cMdH4nK1_J)n2NUGM=HT zNhnnlpub_MWa1C=!hi|Q@!#7Mrvls1Ks9sq8TOB-V*bi}GAwq{lHJpY8V+(T`V-$B z<-NY=J*UJbxz;B`ymJ<4EZs8cS{}`y{&hat>Rm;$Lxp_rT9R!N3T)m2(itigLX!1j zIT4*CIB2R^2LBK@5%5kN;~VBVQ{7-If+Xs23}`<%we(iv9ZRe^w=y^LjsiFM8jR6$ zD=81_x|PI-zz=UE8#AU=l~}#Q2}2xCym1UMjx4QlfN{%n#M2|LAdv4_61##-xY92Z zz$`v5#Z4Y}%Wmp2ZFZ$@cI9t&?cVG%ZE1!P7wccgw>b>siYZhKA>wJNT0JezpKQJ6 zy#5UU|CH5G@f%saAa1APW~P^ea_>vd$;0DsqH4VBdaNZ^GF30QCQ7>|-htu`vDO z>_1?zGg76=?NLpf=?!-e)>1h4BPGQ~S67;V759cg z!&%-~TD`PpseR!;DosrJ2>6QUwChJU&B4Y?&TY;kKT7_t;`p8pKwfgTI~6DJ_S|*V zEpv$A^gcm^3g8O{kwqX{r`$;NFs(ywlsxU)H-XkaE2dn-rxS%>BXDpVR#cUE7ZPjs zJi)1DvS*{y&y~lWUr6+0YLZaQ)vvI>o&M!Q68~p)LSNIt)c;Xp>Yu4Jd9lP(Nyl-v zWSCdKR8eVqN%E$WqiMuHwtNgkOJf*{)0IZpa(B-0o|8b2j&oAG)bWoB{S!sfn;lr* zTHGhT3;togGyZrj>XXD2-!=N^N^==D>I5w>Br(nx=MS%LuovkOT2Y98NR6qqmYtD6 zDRocb_@D!0vJA(DZdoL{#_P?<@P3ey;W(c$Wcqc}@0>nkx_|od>Dr8Q8Rs(YoOv$8 zHgoFC*)wO&a?E;S=F>A*&D=Cooq53icl%lU@LA($-8O6Gtdv;{SD58c!!XC)yQn%y z+)26n=G*IM_je89FZP87(MJ5VYs|&2K4wD#U0nU_i~EgIk^$EmaM=8oZM;i`lG#?8 zdo|VmNW}!I#$X&yd6eyd5376}<8$kLLn1Kyf3t{J2M^!?-5gLgptClJig!^hhKf_D z7E8susTN1YdnmKT@Bk6V|BU>X=mSk4=VXe`6bio;uV$}S_BtbROnJ!k3rs(g7)`~& zRJ)6cgQzxziZN8Xn~JeiyN8N#{rY1jV1haR$UfCuCsVx&)G3sypayM@JptybpKVj} zJI4$8o{;?opzQ0lD*4&dg#7Z5_5r=p{FEDbgGec~0$ix9_nGuirO?;piR_~^c1VXY z67viDh6no05`1Oj2VaA8ZO<}rMl;jFjj|q4he0+-{4rs)gGCqHv|cCneKS@5ryxrZ z^ixPg0HWlJuMnj`l!;O(zDkt!;%lVtb)w|E-axmj3f-p*VPe> z;N8Wx|6RmeM|@4?Vd??&+1J<;BLt@neQnMF4)`%awm?L1#9>uMgaW{YLNMTk^&2xF z;?kPt_+zau0{N0G_E>ws>}-z=w`Sjw^Dz;Ml>(m`vy<_)2vsGiv0OjQUeZ zpG|)P;o()rOt6`W3C`G5WBw8@Y4t7b0POA{Y{En85Qs6r5A8Qx?CQfp*C;0Jd2u&8 z9rqCX`wtnLbG4Pn3I5_2zY~fAN4UU_@ZK-h2`}Lc-=Lln8wnz{{g_+vU5Y7hpqTRa zD5m^62-=5KcuC_wq8O)-iXElDgz6HaUpmw!M13RimkY?Hu7vO}5bp4kZ08GeFX1NM z@4$L#CG4D^o73G&@K0+cEjwxXx0R+c2kj_pMdZsM!S3&X@1SZ=pZWTt*)&+&nr$(x zZAHW+c=-Zi>kJ8)8;*F@GfQi<7NU>P4l@3pA=*xA>pBP`b98icHALB{?+W;)8qKEk zqFn8T5Mh5|zYzL24#PK~%>dB@0_p()9bDna2h~{cVJkFMzzk<^5jML`^;FzKq=}QR zmTtap6n_aoDD-ExY$5)T@&z^^b()33(ifP23}XHf!~7$b`9~ZLSWv%{TlKuQnfT0p z45DLO+@G)HBkS1ufKp&Q{KMPP-(JwazET6weDP0gm(h8)%^ZT`3i(2TdO#>-4F80M ztm#I& z5M{G(3l=u@rTP;T3K2K&r}Y#{>Lw4uvM?6prApK9zvl6LKi3X~c5n-Thd{IV2>9=2 zghK{L))A$etvTaZaL58l2esQCQm+ckmV?4n0lk81nZ><^srlNy#tvupN0sg)aKqYt zBw(0g{pG;K4OC%y7mQ3(TM=Obtl!|yv#NZ4EQ0@J_Ht5 z_~4Z$I?#9RfY}!cp&q9A&b}$uHcQV$&Owu zoX1ycyOD^s?jfzaiMEH}qzglj&xFa|{g4CO(G%q8EM!#PIpkmce~vE#k7ILuWAV6uuJ0B+ zBIeqg9`1|uB3PtnKlv~V^%w>~RVC-sA>sL1Y>zx6T`Etx#lG?3fJl5mCbS`RI+kWM zBrHD&I{VZ)1}T!qbOMm?f`oXo3hffIAIB#u!LRe`P>31_t#)g2)-v z5y8ONx6RMc)Okp*?R-BTLTTUuD-ccleiOh_7#5JOHkh5yA_!G|N$^h-QdPWjN9X&G zAs_}0#>yh`Vd}(-kmCUe%cy*JczTfnB5*_o$WmS->g9c$9%uNq8iB|Pag`neZSd-y zMbH9h1ch7!Vk~t8Gw3RUO#`oBB2mMU94gN?ERcRm#LtNMIZ=Pj6tZ-GP9WYYxH*Qv0bjs2P2{4HVg}`;m41uO zW42C6r2(&P&7gW`T`Ki{u~s}x^x+06A`y%InMXBnK1{klBiiQ#T_fFQ?J!>aL#j%! z0c&H>2-m{`jn4^67oQV`5bn1?Chc>nYx)>|7184$haSx!p_rFv9yOBXNTe)AvRt85 z7~zD|ml{9{F_54m;_?kEjG_Ibs!G&kp%}W@IwKLU^lQf<{$MqRs*>4kEMUIMNDNbUx?F)s%`q-=K z1S_pepk;rg@xyH!I~BpH&TDhlFh^rMI`eQmyoX;D`O#E^YmTIvm5QU7qg_KQBXdX7 z@@uTxNSXuoW2iQY=3o$xYS+*l3^kTc7)d9Lq7$y6&HA4;;Dk^O2o|aV8p^nYv7bKK z)Ooh91X{z!yL>qQ-y1L77%##YFOm%vg_SUvc10M8N-XV)H1d-;+7-o86q^=7yK;#L zf=ISXBB>U|o>7#Kj|teE?S?0w&|sV~RxO(5SSYd{SUo4y$a-REP8dsk>`NZE0o>IG z?&IZTm4~p_;0XkAv9+NVFt3$oM#EMQ7Buwp%jN~wuy(O>>q+>2<_@a z>*_;;ga#U(VN@H!g2bULNF2tF=;16#9K?de7#1YPvLG=IF(N{vfzASe*zZIsRFBjg ztlHMaay9*SjgO7M+ua29V0Nc>uZAPa2+QaA4**(2&Tey8mq~57Wq%B6|n3jViyU_)OQS= zjgt;hgoSo45xW@xbMid{;MqeAiYD>fAjQcbMQ?zjN%RLPP6a7`K%5k)^zob6A~q@| zl^4oPwA(~A6ZM4|OVmW`OjMur?|C++*n5^$tyer5@M`ZDWZiKBV|b5}bteey;XOw9 zb*BkzV*mATY=EEZgP-ezpEJNeb!+d}1a1vGdXE#hHB9L}!II1q#Cw`OPosbimR}Qi zbpQ)q9l*ktYGC1cn(%P1q-Z!A+|Ocv>`91(xM^tljRTx&&GUBmJP7SeEl2UXKe#oz zL9QnQ#=PYiJ1}8QBPW67n1@fc0*Hv+2`EDL3bzSk9ddfcp&JL_F`oHxzngPwo(COl z=AMUtmyCsew}~+mSOUP<2`mSwsCNp5MeDht(}8d~0VY$mX&_+P|fR1<3)eV%&JQH{DAqS&0BR3yke za^9vQB^t%dAyg&Amr@?BrT~NiD6uK|T|le=Viyo4qDe-ehaNO|Z4+sc5Y1|3q@{wC z$7tv-V>qk`?j$Xg!OBSsL8J@bSSlC@1#=b%BSO>Xi_1|%Jvx84$scCxG&^@XssZ^! zp0Lxa8+5p3&|&}CX8n{yon+jrNNXRC<@4tD`~wFg5`FU{(B|+%?o_7`ry`HDgIMRRU z&o>%a5&Bi=L<5~z*4qJQ#4)$ z0jc4IJTaHlHc1UH=84adTA$SL`#kZWRNE{ytj`mFkZS)+YADVVTcii)+!Nj?MMtk| zl*pWM=3eQKb7t`F`yt^^?vUVjB`_2&c*40IYwYhWyLI{6pO#+s+nOHLX@kkYd+(sU+v8bu{gc)K3N@XxyTSwG`KDqDECJc+@nZp1W;Irh2_l zq~0kAr~z!FWeP2;qTXU278v!^wvqMXJdyZsQIa&Xx{{9Ts?~UX!EH@=nac00D(6dx9@XUR91|{^aa9hHiH&hhI z_gWQa_U!;yWakU@?(lk#v#4ozf_~=s_K8#U+e$0Dj!+a_s`OfoC@y+*P;I-1|N2p(l5SW_1H zV*GK)#bQuOza6R9|Jau@G2M*W)CXUjYy12~Y9pKYDVTU;+SY(sY)RAvyq#-VjEiYMyYlT@6m1S%H5)5N+<`(?Emac*-h&cKJ^YFr zl3B@;*W^@OOa<15+k_S3kCKy9jWzO}nvd7g8rr|DR9=7d$)do)Fxp#CR9Az7Nn#3E zbg23G{VLLbxU7cShb}QTi@z-K-QvI17vWFDW;PjqGadfJKjll--vXuI+-wj*gkPt+ z?nn&~cJH9t4(f|Cf{7gzLV{bX(FwnbgdTw|AfecXrZ1{I3JqIl)IgZ6lfmK{#F~8( zQdOdb?x3z#Dej5kH&ZE~rNjHh?_I&hN#l~$Q5oqKnJ;XHFSw(Q?~opNVjN#fCusC0 zUvzm`XLNTh(ul4aZ%d|JM~mbCTdSijEt&c_?TbvYj%sfitzoS77S%jPE1b1F)NN^~ zqfQU5;~Z`?n}FEbOPKomnH~!=H3;kI4Q_KkW&Dt#R}CAUaJ6;BNK*q6M`r`l;)=Q^ z*}GLrm^aS6Rhl$!)UURdMMtAtuBNm(kxiM~DufEfDSj*~72;lC0$R;>lT_(<^TzP| zWba3!*eH8%D--v#d*B1I)+pn8Z@(;5)ELA3~51H&2ugfXr!{><2*JEUyG&Ci=c zzEUX^IMjGn+{hQdXVRXO)%ymh!FS8r_c9dGPRjk7AQ(YuW`H`{JGAAXe{5a(aB@Fxban8B`u#Ro>hh#};n^?ZHSyAsI&*+Q5mU;IL3V_q)j%wJh; z)X%}1mDtNp%Q&AYRNh>7T4wjbCH->ZQrzM?EE$_vbv;c?=|HRLt4RHOoYj-r0S|-Y zd_NjA8IJdn;!#Pph<}$5Bpj2}!~D;iuzxu9a^bHad+TXADFze)1?*R4tMC1v=HZQr zMuhl57HR0=#i41~w~cZhlYUq*FhLx_da;@>4+(67(+CMF+~MxHdZ&DK8g>|bWWlJD z22vxDMc{#A9_%qA2$+&t#k2eTq){p_rli4GQ_@fXIfpu5Ev;^N@kOCnPq1|=M(bL% z)Za4<0R-%YZ7&Jc%KEkqf@*)6T~Qs7)PLtmRptD z%sQb~(K6o>H0=N?efm|(YcTWc*hb$FB;^kRu?x%5C83L;%ZaWEhH2L0t%{V1txX}B zuL|q!>T;VRw@GNf+D1^C08R+Qab|A8-cXVGicny00nQfe)cMLQZ56ywzz}~UEk=RpLb{|9?ue$}`OQq1ks9sob!@x4hdzJP2 zJ;AG*JFuBLl>)>zY|A&i#mFs{!b8sT5m@)eMNbn_9wb%Dv_d3R%6gVlU6%d9^EL_P zxN5?dY!Y1T1uhrvR@}nYaJN<2iYu_KimTD>N#;J4K77i`f0VO-n@w?}$mv$L+S**5 zq1H?w+lzC!PjfEI9UWG5WNyOgpd%&6`EZD2Vha^NVV5R0wA#=zUjIbe0%)B;WBPu= zDm$qw4F=l=Fqp{r4dj4UABO%$cdUjBO#$Q0zqP-Z-NA zAilKu4o9!vg`-#Ruxilvm-iuI^=2TSn!zq#Gp9Q1*>WW8f2=G1hh9&2Y}I zB}UaY4lR%6%e4eqaN>D1kVNs4{%41AvABvf=IbMn6gL*=LviYo01xv=p1%a%e z*;XoBG72di(ql}+CKMg4cx66^2CF|9%>rRNYrY~>!;K1A5q}UCdZBYWBJ6|DwzE62 zCcR@|*LEz1>UJl7D}uLE1uafo%_;dU<)pm9|Hpv?KK6f(XcosaEw=j(cqW#PM~G;4 zZa0L`IYUF-XaS5eNxhT7oTbJkmr?QNGZXlWqpJSx+IZ9|?A@%Wfooy*%^Nl+0d;K@ zT|ec> zlhdOurT%d?Et7UFri&P#EZVh%f-7EpNuC>#r!J*-?s+Rva^M;UMovG*E9GJM9BL_Q zqkX0`E-3PGEgISSG}TM&mCpsmHU^hgXN?_;Qy1S|utm^=Volj~)O!=fCjr+}q0F01 ztGyGYceBRvDJ!wF6k%r(l%m84@hLh@$STST{@+$qcO88NU(8h%dMEx?C<1xUZv{ap zt9y!S4rFrmMdBnnde2&Ck=?w~Xx!~X160~1>Y7Lu(RCA5%JAV`WoYen^!Rnue=Wo~ zaud}PAjy&I4*ky8F zYG|d<))`S_SlP=nBSTyNGqY1^ZU&v5Msugr+4s`i8Fcnknmd!uzK`bG>FoPy?kqZc z8qJ+eXQ$KL2dFLgL7MwG9uLvnC-8Wf=FY=o4$b`y9&>5#lXyHrbLZpnD9v4f$73{i zA+jN=iNqhLUZ{+4J;+nnmv3`?Fnm+pS=k?oQcm@Q*s}_8{$}Qs4+4kQokJjbUf0O;=@M_HtON#W(Lph^L$3{fFx{OO} z@84wHUfVxg%}xMzdx_Yl0=Fxniqq%z#IpTq3@Cwb|7dlvwSx`2Wfzu-ZD~{g<34JDf-pogNPSqZl ztuMZ|h6#HM6V}XZ^Z~O`2y6uVElP)t`b$0orQ7-5$IYMo<=8*tt=zAYY^fQ>Of;;? z@V>hy!*O6uLf*sye;w5gO}sxHMI@x*k-SiW0@DORLUjp2A!)3DEu}_h`HeP3!dGii z=xeJ$(dpvI4aJge`IwQuHT$XF?NB2H6snjaW+*bobBgmx&n)Bo|G8JRNk$)zh+7t3$Gd!+r;m>VZOmbG$y<<1ZE@1sUen7K@F?fF}8 z+;wR)*OtDq@6TOfqf(|$e|W*-tY@AR-+6D({?EVrA;fy~?UUxLERf#W+tzjBRPXt5 z$r;OEcE7z(?>cEsS^AQz<=YXrr!HK)u5@dW@dw*C`y(wcyip>B@mJpIf0xV!)#XB`B8a3*MQ%O`HzDm2Td@BR##@96xf3V^WTGSkjM6Z`?JU|3mdub$7YRQen1; ziSMZwcGn)7(^M#t)G1{s@3Zm<%2 zz(Q6h5}$v1Sq<7$p;Rklc;9j6yoqq_01*Cwq~%KWK3grfupg&;r_FfdF^mM{y}4gLV1i8ggOBov9$&Pn&>vM@7TT}L|Zvj!tgxcN(QfdW8vX*Es(omFR z<%0$iHsKg`N3R_mV?_O&db{$~F_0G86PJ)Gt7@_@D_BB2QTDv}QvDcvhb}eza?s!h z#u!jnd%051Y%3aeSFVo0{0&V_AfcE5^f#i}_AQrtQ|}B^v!g4UJ9QJ*r(&-RjrD7? zd(v2<#-hI#|4#54Pfze6|8a4TT)$U_d~C*2$T^lrD>DD>du4l|faFCB?!dz&&mKd;ofh6j1jK^7TF28^TMiYDf z10WCf-YJvAfA}63y94EJ9ChA*;8uD?14nW2op)b$_TAw=~fpQw=5(6@5QAA z^5v1lrR1_-`eg!`#pTkw8RIW)q`n^N%h=$1e1orXgRf^pGnBYU|I*gxGL$PisraKL z9+v9V!_s*Z?O7-EuYvfttVWAp$m(gaii+#myyj8IiOH%38(vKi4_MSR@tCDLTDAGk zr}!C*z2loe)ziL zvkL3)lZO21Vm>6LCC1lPn?RMc(dgrd+PJiC>DHy(f-kB~Oc`;o9shT}<80Le%`KcX;ZjbBXO;^|Icki)rb&#I$sx+7y6i$RHix@DTYJ z+YM_gt4(XAKnD3_A_<-683&;!G7`n>n@E_O@CLq<&>!vZq;{#}i%R_+MbevH@CsVe zJHgYTrO&j!1>ZIVgdP=pq0&abTR%l603MPeO>l!DQ=y6(!ML(z}RNE^;lF^fA z^sWe%eggQ=QG=cSwX1(mV7-mKf_X0>@mm8u+1Y{bv$I_jr_G$^nznM<+G&?gzi4{r z^o(g4(^k&NnD+1te#W{PPtSaQCY`Z)M#GG^X0*+Snwc{5+L^OwE|{4=^TnA@%w)8C zX7VmI26oc@B2@>A+o;2RFV{7z4>YtN6dj=&^>fg;eo!y3NJmH4tbP}!l$~`#t%NJ* zA6P1s%^FGzY*h18F^OV(z&(F za5Kc1J`g&9)~QIBPqM=YFx?j0L0qh?37W9^ zii1slYcC(e1-p!KnUQdB-qNe1$Sad3^4e=M)do!p(<5xE`W7`Al0yF13F|vV+`zmd zC7g*<`JbbrBB-BZ;=&lkEqaMkBvuloSd@seMkHiAC5qek48Xok0Q+hI_Pq!P+3D!u zm@aS(F`o@nPAvQ=Y6#HS5XFz%w|S&_A$=beh0|dyKOKmKTBH9NA=?PEVyd zQseBaYY9dOyvWX%7fGO&1e-iD>H)yG9b9Uh;B^Al<_*(;9~0ymhzO224L1>?2za3w z40vJ9x@?HJbZfKi^VSUn@})&_)48zPVLqv`_PlHIUnfGTQWP{}b=<*;{?E9!mFhW6 zsn%ao>d!H~I{g`jhm9F4!B!?AvSPfkek0Ck^=|Yq?)nIB*=%(v#28?e+x@pncc?Qu^^U}!EubS~C4|o>4x8Zv zVyYH9mQQwJzZ@VekeHd@eSqMfc7U{Oqn^XnriyvAqv8MwV|^G3+3Cm5m@1PBfmKYyuFzaJ=CmQVNZ0^VEY?mDn^hY_2bsk&i1!d2 zg0qJx8-mYZU(;YlXoNx`;)eaSfnt)n$&WBEh6Rxs(vZpL-t~CM(GG%ka0{b{VrI5D znD2T7R0c-|7^Ir*`D0k{$pY1RlzVu#IxM_c^C(mmo>ydAW^pGpJ&NCHxHofXP&!%l*YT5>AKy(7lu3pSF{T0WvE+!h%cEomxp{!sM8jW*;v3Q)A6O6-S?Crtx@F==Hcqtw? z-OfeN=?(qjSm?*4&0(=0qX4R=>{KSCJT-;6!jN>POr9ui|7~Hh_^@1PL-0)Oz<5aM zc^myWevZ)U&Mn}dNL}?!}q!|OF_gsQd8olEp zk#cZLh>@xDk%V)|b|Z9%tw9H>aCjZOJ4~f8DiDn{n4MZc5T6FqV2388ym)tv$_agr z2pKdOYXPyvsF(L+z6oQDjNux84>Czai{V5v*9dj_phHhG>{pFLIE7$JPrz*O8kj=R z0_q$JxdsGQ>L{kr0s?1%;{@IShY8#PD6O16 z$Pj%R#^h3Y=9kd5m5Bc!qE6JS*@U9Hbpr7UV9*!>=lCk-8LFh>Nh?gxyaLt|>n)O4W~b8&WB5tj7L&Vew4)hcSrX0;H{pzvgUs|afi#XvmC zGy4jNF_iD&FxZLioe?NPpND_nFxo#@8Rn`x!ZHP;^otDTMvv52DEsu-*2&%y}hf!@P6_c5v4X4%Cf)Uhnu3Z~O^TFOu zwPc!)K}Jz+IL*gUqv>VC=w-?Dvf;E@e^&#|k3<8(PecRuBy$U=*iWx)>U?Kc65Yzi zJ9{|(zZ>tgF`kLC@ytwW3wA;*?J^nJNgVAm8##%Uc3D_j;?zvE>wY4lgPH9TGu15Y zX`#F=A*^%e4JXXkpqz1bEsEy-i_yW`yGNPqF>TRn2t*-PMck>P2@MXx2YY zTTb)|p%^?u7udBQN&Zs86!a6x&m&AnClPc*OE^sPOguEj{Q#anlCEB|u3j=oXprG~ z3Wpnu1qZWOa0ok!6Im=6&0@hA77NC)SkQ`45E0NoV>!c!oK&}J^H|j`H3#{bex=4+ zsd31}QI-IJf$a*$)XkU{F{Z_g=^70^qYyT5=g!skumf{1iyYo$kwd{lX9gB$qU(Pk zp}0~QGq-1+YUF=V_W&Qr13175&ZFT36FU%E$F79Rv1i5qp9`#73^R99E_7#gG#1Nu zkYG-}4+tjZ`-ni*zC&y|d~HPIPZHl(Y$<$)VX?krNOM~4z~wC#+aoLWb$F%35aNZO zNatelONPLje8UiU9wA1LCb1*Zqbt(mXt+m{*cs{39qI8c>8+0NrEH@Z<&o;s6+NW8 zhiE+{7-MYF99XLo_Gg%S5FNih3=&q*&$E@We zW-ZXBk$OOL%)%$yfka^L1s0KcWt9nI9rXIg1B?UkBc9oDpP4%zd_6_TM`pFu?d{ zg`WcpP`^-uNA(@1o=;F7#Aa!Up$H8NNJ}*JXWH|ub%5oW7&PkbXzH1OozxOXJ%8+s z#=}3B_2k*s5cjaHA?`I!oHq${D*m0gI=(@5aqBPC@r+s$)%0cgR!B+?cYk;;P+YvzZd$kSwHSlGsHBDnl4ScEs?+Kj2kIf&{4^evVdJT z9hO377Xs#Ux{pfQQ3=6vJ8lq;O5FW9!9;yX>ru(}zCq6bvHH;MN2O19Nr7FGZP%$? z234Fs3_vsh#I~*ln$afcQJkKGxB6XDc2iUNF{%Cy)VmuO72Rr;@ zIpfVor6=Z0=Rckd3E5o5D=fw(90IY+QG^%DpeS4v#X7b;#(lTIVRH4}-hAm&|0oVg zSFaTl(?Mh0^dUE^Vw>v)TBnpDlinJrkYsmON7HVrek>9}G!LJB;CZPd+z}_L|)_56wOdmXp!2@O6iMfGIu1*#9yd{o>-xvLgx8`;acLuvlO^*$=+(rzEn z^&6=y((a9v32>26f`XjTaVSljdEt%e`GLZ4+&&rv50gnrc4j&v#^)H{$nP z>A)Q+ylD|E%Sf~e?+Ye`l8}=npvHbBQm}t>Tkdl~j?j?SP1KeGbwie~7P1Bl**4Ju zd;w>a!@I-KjZ{yAbfx7+j|dPV$3c1q)T*gHFR5h{<^6-4VAGid*}^=gnX#(+kp4C2 zhth6_HA1~s)BfY`J9$Z6tz2#LD)dF1WdA;1_E~)3vafz5vTCXa%Z;~#!>vHoZ z>CU^xnyaNp?sD+eG!$L^e$_Pm_vi)^i0E?kE(9GmT#tg9-#V< zpWIOriiu}VJSDKIWcy}m;oM<^H&br#Vq+`6EAewj^P6eN+^o968vL)$^j(u#VUToh zq1qN29Aq5oTPP$zzg7c?b+tmqFbG7bZJ`+)&MiT0pL3z zRo!4($2O*xo|(#rk{a2=S0RO`ovbS-}xI}eTTLWv^+N{UgR1NxOi*)C_@w`GW ztDzSM<2^B*@!bl-`>w5l{kd{2Ew%kitEDabbM^7s!CbMHYIQ~{nYHSurW&nS)>3Iz zRAVjm`f8vZo|jVQk2gOrWzHYNKVK0ak7~6#sm+Tl$J|yaR4QKaby=wtcY+ewI=0JkWGj{I zyjGh8sexV2Sp=zc_i6oG+#+-i5d(7IRZ-j}2QID<-(WYuyJc;cj2pT)WTCQtx7^@$ zb~?o4vbI}}kGJQ)E(>nel)qEv5k3TDgu#O!>E10H!d0~Fmi0GLMl0`->pNtvow4~6 zY#O|%L8US#o#?K8C8O`xtnZVL*a6Cm7CU86RQFeMcZbaFT!PAz@Pbk#R4c{87BxxO ztZYtYIKl{QVl8|8u~RdjQFF}udKbj^ZE_hENmhNe+Mz& zw+_FLH452a&1&5hhh?=wpqTQ8?T2M{gIm@oC$77rd@YjUyXqQf>ZA^|nhsg@Z*iJl z#g1U;8z=Aw0w2~HPT9vQw@{i ze_j2E;dU+{jYoL#oGf^2qu|D*PmY8RIO!P_`}*ud`wC+_yWzNEtCAYL^2jXs8hlQ{ zdZ+dGzSqb#5gVZ128B$IV6J9-=aRHBDlbmTg0im5LW$xeDsc*}YkcT&p;RB?>{N`_ zNVL=^83jJ*$x^THW3DZiKFt{&yA=J0Vho})8wE+(BoOY&6#z*95rDh^RWeGmZnG;=F8r24a{otI!&R?v zDsr2I_W!gIlnOv&VKm;{X9TxWnft6z#O(*oGw{%E<=M7M_)N#wE83sKJ;3wI^ZTlC zb@1H27Z5j1SfQ{k=%9eTYsD_YWvuMR=M+)h`|%x=lMX>OAqus9mf78?tkG|XT#;M@ zSLs!X5MvB<^-y^6L9b^NcDZrEvIi*$k{spYV)0E}uCg5GtZWQ+wqEeyh6fJUB>1!g zlDcrr=+^x9^>)RVXBB+P=1@XfytB=RuYfjluS%aT9LX2uJ6iM4O50p^0CLyE%LkEx z!Ou67+$}<}_!hgFaH7?Qmhsv|+QMX=AY)T|ixpKeRvHYpoWWrI84S=e7>opmFx{CP zq_X=SKy?-6OO!jCZO33s_fc^X^9_qBTnxLJjjMYbAIBWU>8f|(bk#fT+I@6&^An(y z3-Do9_adq-qVmI}8(kJtmJsd>e^oQiz8bt4&8dfpQ7}zH%OCaW!vqOv>M1mkzwna& zuFJT(DpBjK=`_pyZAiZ(-}wxHWs^~L zZuer6mF*b6y{_HO<58p(we*XjhHABQQ9DXubk{n|nr8lUIX za%dN90(=(Gu6rrC;w6~ozYy8uLduPL$PSA9UW)uaif27B_-bh(Dwbz2SjgJyqIwzk z+@B+28-q)$mz;MVPFj5Q!1l-YD4|rO(7^dr5CdbWP!X6w>jD=^Z!8(lJ6FQLl)%3T zN=a&*IG;`tmXs`s{NGZtJ%v7t@84>Q0~f6lO3?ktDnSq`w$G=iwdz9}O2jK^%4<(} zOSm5%G8)(KMFYLGE2-}ys)+cEPN~3Wbk))IDfF8Z8X5~RK0Kf5BOu9#V{KGVgft&c zVAY+AsC<$1;Qbf#^YQt>6k*x)>2;BTjbS5$S{q7?5nT->#$YU#95{jh&=u6LJ#p`A zPcS{LQJb7?#p2!UR+4*fWrR^*-W%O6wB9YHEIoHbh48epE^ocCt}3qK>1n6sX}B4d zXG^y%9l>Y7BIGRO4oA)!|4aoc#m>&St%mk`ClOjcD}xqf(ODB|!Hsm*pJ>5Nbk=pW z;AT4OdRj1<&bomXOrf(T(SoUTRwgaTrp|(Cv|u(K(`mtNc+8*${2V+vT5vlaGikvc zc+8>&cj9piEw~GhTWP^uFPM&H0qlTZ-j5`pur4!{WR(=X~Jt3y?!=c zOZ(=}@_wuSPnY(c%r*tSWRkVxGEDs#doII{5RY8SV)bw3`Xh2<;`;5!@gy%BW7Q&l|Dgh>R@b2+*y7f@4V5x4C|q`G4k}5S9rea0eby&CV`E z#Gem1blC|07Y5wms*35)x29As@v{GlS9X(9Te~ZMYjbnpl1H-x7eAWq%6N3%qu&kq zi@QG0R56FBw~C*!sQ+_Wb+GSAqwqbcW8+lj%-@t#f^y3Ha%enWFR8 zZh}1V55EHc#!{ieVc55 zoIJ*4y_CsnX8PF4^kIQMpsS5jp^&};NxyVb>++HFUwSM%(C}EcYxiSGg%=I@>#A$q z!-uA#z=D(*C6-DQUj+8?JK{95uM*Lew9o6g5P2=W-?9MKR*8B{|1gb3(xesR%zLE; zEA03!TyalAV^7B8jXjiZz@Ht5RwNJSH#N6@+!-3?y!noWOCKnztZR7ZU)^@cmA5Wf z@t5be{WbWFW!Qx`FM4vrYwsVmrcAu~Vd0s;+wG^4o!8wsjS~|uA$C_{D%D<=UkF8_nt?E=Sz$~aGdOq bw6gd@NiP1wj$Or*W1?E5?j5nE^9TPQaje}X diff --git a/textproc.asm b/textproc.asm index 9a38ef6..b075064 100755 --- a/textproc.asm +++ b/textproc.asm @@ -825,6 +825,29 @@ NoArrowDown rts .endp ; ----------------------------------------------------- +.proc EnterPlayerNames + ;entering names of players + mwa #NameDL dlptrs + lda dmactls + and #$fc + ora #$01 ; narrow screen (32 chars) + sta dmactls + VDLI DLIinterruptText ; jsr SetDLI for text (names) screen + + mva #0 TankNr +@ tax + lda TankStatusColoursTable,x + sta colpf2s ; set color of player name line + jsr EnterPlayerName + lda escFlag + jne START + inc TankNr + lda TankNr + cmp NumberOfPlayers + bne @- + rts +.endp +; ----------------------------------------------------- .proc EnterPlayerName ; in: TankNr ; Out: TanksNames, SkillTable