From 9234b288ed96e7bf50625b654c9525fc51fc7dab Mon Sep 17 00:00:00 2001 From: Pecusx Date: Wed, 14 Aug 2024 21:24:55 +0200 Subject: [PATCH] Music and player --- dino.asm | 42 ++++++++++++++++++++++++++---------------- dino.xex | Bin 5061 -> 9697 bytes intro/wait1.sfk | Bin 104 -> 0 bytes music/pl_2000.bin | Bin 0 -> 1726 bytes 4 files changed, 26 insertions(+), 16 deletions(-) delete mode 100644 intro/wait1.sfk create mode 100644 music/pl_2000.bin diff --git a/dino.asm b/dino.asm index 717eb11..7ce3dc0 100644 --- a/dino.asm +++ b/dino.asm @@ -30,34 +30,24 @@ swap_table=$0600 ; table for swap bytes in left characters :) ;--------------------------------------------------- .IF ALONE =1 ; dark screean and BASIC off - ORG $2000 + ORG $3000 mva #0 dmactls ; dark screen mva #$ff portb ; and wait one frame :) waitRTC ; or waitRTC ? mva #$ff portb ; BASIC off rts - ini $2000 + ini $3000 .ENDIF ;--------------------------------------------------- - org $2000 +PLAYER + ins 'music/pl_2000.bin' ; MPT player $2000 + + org $2800 PMgraph org PMGraph+$800 ; P/M graphics for clouds ;--------------------------------------------------- -; 4 charsets for fine scroll -font1 - ins 'artwork/dino1.fnt' ; 1 charset -font2 = font1+$400 - org font2+256 - ins 'artwork/dino2.fnt',+256,256 ; 2 charset -font3 = font2+$400 - org font3+256 - ins 'artwork/dino3.fnt',+256,256 ; 3 charset -font4 = font3+$400 - org font4+256 - ins 'artwork/dino4.fnt',+256,256 ; 4 charset - org font4+$400 ; display list GameDL :8 .byte SKIP8 ; empty lines @@ -1313,6 +1303,21 @@ pressed icl 'artwork/shapes.asm' ;-------------------------------------------------- .ALIGN $400 +; 4 charsets for fine scroll +font1 + ins 'artwork/dino1.fnt' ; 1 charset +font2 + .ds $100 + ins 'artwork/dino2.fnt',+256,256 ; 2 charset + .ds $200 +font3 + .ds $100 + ins 'artwork/dino3.fnt',+256,256 ; 3 charset + .ds $200 +font4 + .ds $100 + ins 'artwork/dino4.fnt',+256,256 ; 4 charset + .ds $200 ; and 4 charsets for left game :) font1l .ds $400 @@ -1326,5 +1331,10 @@ font4l ; SCR_HEIGHT lines 256bytes each screen .ds $100*SCR_HEIGHT +MUSIC1_DATA + ins 'music/ingame.mpt',+6 ; ingame music +MUSIC2_DATA + ins 'music/game over.mpt',+6 ; bame over music + run FirstSTART diff --git a/dino.xex b/dino.xex index e2e855d84824d2063aaa0c2e7db4b768ed8ddf51..16fc19498454f024171a194c36de6a8783b23b8e 100644 GIT binary patch literal 9697 zcmeHL3v?7!n!a7t>F$J1x(IiUP>c02>kNf@q{qL)~RTXi=xd4(T5dl>){9#Ah+iB4rt;v5vd`ch=(Jid1BKkG9 z=mjSjGHlm4Ht1s8FEEYEJ95}4S@ZTiwz(?Pq!Rlel>-SrZ$b+mtn6uz|i?lcU30qf0a2( z9S^oLE-IP^9$sNyevJuT&q5=#nU(f4O=Pnv^a|rg$3lCU_W+ah8;*sJFv$!H13h}Q zo;odAj`1yD;!%AKqe{q7jQ%|gfA9?^Oh=vjGTavv+1vwclyF5s4kMPvvb}FG@Nt== zqly+eTRvu@si!_?lw|+sOv@g|Ws8!h_ApJ**MEd*d6%)TVRpJm|GNw%s_HP~*P{2o z!n7FJsPUA6OaBoZ9?O;ws7OPg@Cl$#VLu~7umpf(eCUvI-1zf z!!+bzCU}8?d4+~6-#?r!dMTS;?7&nqP6nzCg@uLwi#Xp&NeclxfnDti`#;43|Hlkunh%a+UFO2V zMoLL*>16EwOtuOp`V|J}D3j&g0d%pGDLUwAIl<5e9iXs7tEy8QT+0E*eepzWDvCaI zw7jD6xOITBSDj#rzH!iFoX{Ieyxxi`oB{P6#_iM;22{8!=ixoj6;WS%S#Nb zOxy|x@rD66CL|rhCj66=*anW3Cd25#kIYD6XXt50deaH(rg;Nk{|9qaId2bwO*SiS za7bm2H3iZ?WlK+I2Pd(TgOwg}Nac<-NO~$;`dv2ItqDu>oxTjvf^dP;mw6_$DREzh ze2%H7x;uK9qD2h7hygX;-_2xzT*9%91bBKKcHcLa6$y}%?O3x4+v4n#6IdSY zcC0sY)}CGawP4vj|IAZ2e!q7;_xrlV#F7tRmJGOVsw8odY~AU6eDjjdhkZL@&?k1htZn#n@TpWFWF=m zDA(F6ldEeGg$bd12ee~`G0mWEhD{~wHCjaA_cze1C({{I=xMX) z&u^g5&!lq)s18l03*xF}Hxx~r%;P@aPv5akxtadW%)ngfTO#&GK}yEsfrb4%0X%(f zDqS-zP}DCqVCi3{1q%8_Mi3RP2ION?>9!ehm|ftBC3>TEsrJvIXa zFau*SOV`XsfEfy*0vXMf(Lxy&$>4j0$D6L`KCjxa9VM>Y_nG>Z1PmT9to+(QcQ@JW{zws_;ma z9vNLHqg)wHkkLdLO=?xTn#`fdY`HX77AA!v#d7IHS(s2yeaSZ!1dx21tEbNMO}WrS z56Z|ZqY@cCAfx+bbf1h?$%wC4{>;O&Y(`saTTXMFaVI@{`kC4nY9j^8*KtK)ysr)` zO*>zxqy5w0sf!tW$WAO>>)B(c~sz2v@I^H91j` z=*fInnWwAV(^cW=s*II8OmAd{;RaEa%!rDYFBVRL*skaltaoP6f7% z>#Fi#&%+h6qsr4&$^}cYE**5GT-Re<@G;C;RSp%C%?$y)d}eho#uAA zYNAPPmc6DY78$f$f4O7JB7<+s4quy5vFzB|W{#$u+1f;g%3$IYSo?70`L_Ce(XRqk zQX&`Nq$G|HOz3Nd=6ZZW=r)f}Y(o14j`X7k>^p=tgimNB&WO6CgQnc9Rdof-FbO^F@s z?XvYXaIp2%GrZ>GDsp@o?BG>B8205p*ej&_GNi%78;lg{L%Qavtf$`L@i`QA1xpDR z5zWPwA(|1SlxTX;cC77(=*TuTY7QnIYs-!%z`^9>14f?@pHO^&0FHigDll7oKB>y% z+ZLdjjsDG?|3wb|IcOr`gqF)ZaHP@p>3ncC*S?u+bSZ3b4cGn{*T^Ut!L?j_Dc6{- zqy``2+RM1cOvMsh$F-MpjU)NsW=>j-PgrRUK6a(G_+XYE!l$*gPCsf_bMmYDQ5(Fc z4}C=+`pQ1^d;8G&0qFN==qohzl^XiJ8al6|-^0mo#tw4S@HWx#4$;s`G=zzUH;INr zM8o0OD^+WlQa%k>r7$7ANl1qX=`aDWDL-XhPyHGHrhy-*oHUsTiQv{Me={-{JYWpo@p;Vk?L(SWFfzp7j$QcsgfX zuA0rbRMo+bSJi%Y!o*1fS#I(aRi~-bre8n9J@bZH9*x)7U*+Y`@-+NzSE#CLmPWd1 zaWSq7Zp3xLjjCE)j7wbOa`qft&z^&MT*l?|7tEc9xx&Q@7pdwkw=TK4=q6RYQ@ul7 zs`a}|U8dEldfV;TPF0r|A3y%#x1aTVWz5L2rsYoa=t0c##3*&BEqO?y#f*QT3?Td( zUhVOD33S_lIwQ0Mf$n%jYp9U-sRtI52o7e2_I$9qhbSia8AdFP{y>oeRBduJhp z%`v59*zFl92yJlN?d}a==TSWv!EUdPS>QJQ9aD|XHNpy$)z0w+2zk8gH+wx`1O4q_ z;_-q4>T0XqisjY}&$?%-Jd@Q8@OT(FG_B@pF7`yi zZ?$)7?g6$}RTmsSckZ0#2ah*Kf^hhARjtX-vYAarQ(THrR{o6q{QSK9${zJ%PfvGu zG{Vy~9!-oQQA{Wt=YOikxZjz=C>n92b5`9P*I70b8HF0-J~vI!x@&sjv=$9QJ=&C` ztQk=EK7%xe{r=3P(S-Y}-<%Hr_C16Icn0EQK+Ky-v*}wCwv#npvjZ42IrU+cgkO_F zIMUm_C5jO6kOG8szOyDTMNR2Q5n?#Tl$4Yu9UYyB=7A#N{rgL~bDk(V^@V$Xw6K##?yO5GlC?8t4mV|(afGI>D0t`y^gRFflbP0d61LqCAmwiqm1ypFX% zcs_<_!aO(zxwi2D7q*cd_7~omS{%3=_J99FHF?)#xyP<;IIOmoY8wad9}Expokt>3 zwFYwfDQQ-FHJEBpfEkVp?B=QSK&lZe?3wv^2axzrjJOmbvn|<%DJvf@#opeY?)U30 z4gLD=9!vtPop3?F^zs(Q{U$k#db&G=sj>e0+B9f$-qXFkH4)YbCT$JVZY>&wYOrG! znUit#Ino?re>xeE!JzGd9`|17Gyz2lc)fodCst!S>|gCUqxtW%Tcj?EK_QF9nqtEl zhznx1LHm=3B+a(`8XSb$yZOG^csgU$t737aCmfC{;jkdY<(JkN7mrQteUzWG4r>LC z@0WY0)RJMW(8pj&iA9qI_>cp`VO;%)dTXGH^k{~$0^`=?FIk6k*iG55n1eWOO@5i? zznj{w+ufwz6vrY6JlIP!5Z5APAZ^cpb2y(e?ck=5YSfQG+O0;TJ>N#7kqD$g5W;e`O z8#emTkTB|fYwI9fY@w~ISe<1XqxtWB%d5**FMTwr?1r+nWlxtKEjwQ}zI=K46XpM2 z{zdty3LX7w%EF3AE9xpvR?wAImA|cQuT(3qrq|!i=9|w>yc>RX*R$Jyy{)En<3lC) zE?;`f;stZ^J?`mKCgqMF$2haIGBZZm(?_HYOC3ttQs6I5_(K!k6|`3Z^tUq~biDC< z-2ZW*{1NDX&mFhiv|w(Y)_=k;_gBC9?ERzRS6^zDpWIec_UH!hs^v?I7cYbWX3m(( zVSt?MtT7p*N2ZS$ex(4;o%zrA-h4IKEH~B*WgFLd`Ma0iTC{L(foCSf|I7Z5e(=Tl zQlJ8}0VTj=M7TB@R74;XvS>0Bln9ZaGa@rC4Hj5lxSa@(1tl61f$v1^=v{OawV@;E z9rQMO3mt~%5Ik?f14QGZpLRNSq8HH%Xa{97JcEse*p=RxQRu}(d z=`++CM2PEZ=^qWd={=61W7q5#W;f6NnO>=cru;Q(K=sInwxBvxi^QMlpsThSeDG|6 zrw*Rl*ds!WSB^5^+=X_b0MfJcf|jWrkOlnUj2Vm;9oVW@o#?$wa<6Blfrh|4WV(IzCBNy3zf^(h1nZl2)o3r=rq;pt61Jlu{4 zc$IP(`CK1aNBYQ1iUmHKkXk!T9BLaX*hH&fO{ukswiIEARZOZIEo6#Wfl$ zu?<}yrr3tnjSz;ViBOCX?Lr#lY?zof6qLh+tYOdxJdU=H8ZD&TQqxDLj~+8(ROYBm zN9KqRO0Rr*;KgutG^(Pc;<<{CuHmw|I^3(Y`oDg4bR7Fr{OZ8h1->HiwebH}!7r_! zdc#(D23`m8D*@MA;L_5sm^jWJNBpSP59s(c5WhNC5&yGS!Ao!{=@&P?46b+)z#kF+ z&8wi6oFj~zFXqj)2;`h`+U;<4B2uu37WkTkggN8H-a?U@=P9hCL>sPbKg%V9N%B0w z<0%|6&m-R8UMN~D_}sLSq+l|ONk7LWBnW1UXf+rFV}fW|Af}}WsUlUID%flkC8nkc q>1pZWNFjY|D#$@OTrX0Ev{VWVh2&&POcs(w%0{I|h|`2)@_zx!h~ZrT delta 2343 zcmb_eYfKbZ6h1qrxK_JL71+n5e+2c1X3tJ}8%(AeJiwoyds?e8leqKeU2w_;9WLl}L6-~MF7UX( z>jGa3U}@d5XQ4WD`T%OLLwOFgzX542NUcMkx1w%4+I#@*b)cVH(eoBmmE*c&N6quD zQ?1UOc7d&V+AwxSJBqHg$W`JW+}sY#qUBq;CaZH)N59vhP`$j@u!h)1P0ajjy=U0B|)frLc`AAqj&PN8La64RM9szgRSh$Cagon9@gNDVk$l_gO@!_%X z-Fn_xH{GpIYFxGcG#}$q@5IcS+1c0>v(TTbP4o2b-1T~Gvg?-` zUHW3x#!wfl-2#p!gbh~C~oIMV!F8(g<6?YEw?1B-dNtTXx$5#q>ol_ z%56axZNbT?g+^X#5f(-BNySBL^%lIXw_rt!-h%d)dHN;QXCeKf10cO$RQ7+iV95Hh zpyx@;{erSB%7*QwFmqhpQnj`0UpC;3^;oEmUgq~A5i!U|uE^F=%SbOCxq-j7K8u>^ zd?J3HUU*d2ASm5Mf9yWi(Gi*YMXW7^i&lxkP8x!F(W9BIC4812q@6FKrGW0?Yy<4aE==5Hl z-lx+G2E7}TudqalJ4>)w%gK#$Bl}asKI}4*@=9JaIiw>cJ^2p(k-jVm6&a#~pL?XX WHJgk12yf!d7K@oPCAeAcW&1ze$-6iJ diff --git a/intro/wait1.sfk b/intro/wait1.sfk deleted file mode 100644 index 3f1ac3cb07c011e0b80c953544a52eaf8e84fc20..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 104 zcmWG`3-D%SU|?_nV!lYG=>k9+#Aje(VDM1`F~H*O5EdrMe5&0>;p26e-0xFuKfUB* cu72KWW&hI0Y{{wr_42#sST!8E;{?(L0Pp7(mjD0& diff --git a/music/pl_2000.bin b/music/pl_2000.bin new file mode 100644 index 0000000000000000000000000000000000000000..619e986dcf7d86b24ac88ac258e80e8ff0f2995e GIT binary patch literal 1726 zcmd5+|8G-O6o0Q>*R@#Jk&zT_$Lo7NXM1d8Ly74xX7~%T+VF!>fA9zLelW`T!HmQx zf>mN{GM3(@KZpU$Gfksrg>_pq&1mS8DIr_Sm%c3EOr`@RfhjtQC=j;pd2Ypo=s)1i z`*Q9%=brodoOABAEI~Sf(a)8PzyO!pFstJEWk|k!A%qosbWlnQ#z`pJlkLWBi2IGZ z5D$zfIFs}19vsN|ifLV9A%T5ekh?Tkp5w$`U^80}e z1oQ6zI~a^w)gWtt8))Z5&d2^CTepoO@c2r2hm%y)S}R8`tp8@?pHEap$y%&jL7Z!9Q;rQvw?Q* zwe&I=lrgm@a1}T!jkp~I_NtN}1ooPeZABsziMZN^sd**KB7oDtF+KoHO+o$4q0?&| z2kJ~NWe)r!h+OD&&vF-Ss0$O_$Tkyu+UE$cDJ6dt*w+g6O}d|Ae+4D;zAsBYL1g_h zdt2_?%03LTqrq$!G8x$(neCJN1a>IMJ`R#!-xS-X#QkI?<+DmWa4nE><@`r(!+`hR zg%ybQg47FS=I1+Y&)9c#W70-Dout!uYjhbFhg8gnwUeC902MWR45*@H)cC568&&%; zO?n|jOPY}10AsvqxJiANE{cpqZAUohF3H#^D0ii)bS@~pB$HR_Qe@ngx_FqCLToNX z8+9VrB-=L+wXh!eew{ zBz5WE!KKkqwiC^JH5^??9ZhJ|9$%j*-3Zbd$cP*y>Eg>2Aih#Vq-BFhIg~LT(9%v~ zI>v7uD%_R2@khy@mwXaxR7>6~89Qs7OeJK7C>&eKa}n-roM*uj~{& io=4WKal2g&4Nj-CzTV+*)X}i>Vf%ZC4~_q__WlJ&u6+0a literal 0 HcmV?d00001