'=========================================================================== ' Subject: (SONIC) SPINBALL Date: 04-08-96 (16:48) ' Author: Eric Carr Code: QB, QBasic, PDS ' Origin: FidoNet QUIK_BAS Echo Packet: GAMES.ABC '=========================================================================== 'Hey! Here is a little sonic like game that i made about 1 1/2 to 2 years ago, 'and just thought I'd post it.It's call Spinball..It's in screen mode 7, i 'think, so it uses page flipping. To move the little guy use the left [Ctrl] & '[Alt] keys for left & right, and the right [Shift] key for jumping. I also 'made a little save feature( [s] to save, [l] to restore) but caps lock has to 'be off for it to work..Also, if it's too fast or slow, adjust the DELA, or use 'the white -/+ keys to change. It runs fine on my 486sx when compiled. Again, 'remember I made this a couple years ago, so..... DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"SB.ZIP",4^6:Z&=6196:?STRING$(50,177); U"%up()%9%'%.-%#./REab,sDC%.%%6%%%%-%%%%xf&%jSi%fyxU%ye+k+KAa8103 U"mVAYoyL&5Map1p3\+4/5+%%up()%9%'%%-%%9#HB=>;$5u&%%%v6%%%+%%%%xg% U"SvuhEF&fA]>C\/)&Fl8;^PA>ZWNPWSme7>^C9ejL6<]I)jW?DGe<.rfulh.0;y.F-, U"#Go^Ndmi8m6)8p*98R'Hd%up()%9%'%.-%*.8RER(=tl*'.%%JJ%%%1%%%%xu%nsgf%qqSiRfYf U"g<8]UEX5?tb0oButIXvy6Z>^ U"X#1:C27btsurwU(M6NKx/n>t>ptvuoo^oKODY-Y_LM3'XY9yG;%o_$3Y$S<[tUJ U"s+(_Gfc\+?OB_2')?6t]]WBT,UgKi2VVwJ7e$RJ3bH,T\-Mufsues,1ig?9=9=e U"OYu3prHKIuD6;I43hiXW3Kb_uLT$4ZBq1==Hzk/QW]t[;54mgrRZDit(U&s$o%Y U"NYiYeQAF9o'MWVjL;,K2x--nCM*:F$J7C6euXggpiP3eM]%X,CcHqFlKdQg^'VL U"1rlH(2p8zV*[Y=5b<-k4X.cMFgUf<&hq*L+mpYY8uGWVN1\'/yxH4($)/c$C'3C U",F>)FuEZi#=/)B'3B,X8>E%oU2i*[0CA$kn,?LJxpk8b/:j*jo(P#2c9 U"_JVf2-LB-Kh3m?:GSu0+Z- U":Fe86#5f4F5*(j\w$)971'%P)YhJ<0Qmv_S'x(;Q*xR*iKX0Istg#_&m0#/CLd& U"PVk-vs'%Di[FP/Z=j-*JHH8[; U"1KrNc82\rwV$7sRl5olD_Kv^]rUzfjKfSnp.be[E>)-YFmRr/\>7WRZ2#a4^,$f U"#RTIW>]\ds[Kc.t?l9O^7Mwn&0>\3L$RD-[9hwB;:3w>J5Z])Ah,^hSY7Ger=sD U"CL%+j$]?V9_)J1>V00aI-)JDKCKm1cTAaPAYOl6V2M[hvyMOCAKU$i)Z3\Iz^IS.?T5u?1>Sr-VLORwBL6n$?^&&up(%)9%'% U"%-%q(.RE3KRMQZ%&%%*%2%%1%%%%x%unsg%fqqS[ifFVJfr=SdU1Tp=mU:lFmN: U"*BMv:xhi$_3fb>Aj;moT7$)X(H1Fs9ODhK4+ct=PoU4;>4%3g U"/oj-QdnoRZ[SW-^RSX[g.SU1Wk_4(#J=st%V5[PC[A=y:Im_K[RxBWz8MI%+s+S U"AES?Cnzb/i-F<\abeo#OI3T6wgtO4I#'UBht\.6Jc>\a$Vm(eBBZP[MrecZU^\# U"p=$tCJU1xqe0T4Zq(Q?r+2N+pW_hx:&RG>IB0 U"_//uXFRT]$GXP%0fZ:IP6(ex31q=[TRtH$.R&(_=6dX+/(#KHg'i#M1YS+JpxM1 U"gf7-GYZl#3,>n?r2FF0P>S='Y3)vQHQ=VL'2;/fAKY#;T.a6p%8ug/[#u;%1fj(m;JWITpi%FXX9F U"v)1U-f9*-oXsNEqnp8#*i&e?hXrM.6*0B&&NemhpT1:+Yo*SpP_le-+0fQghFXf U")*#/N<\C%'eQp&IK6Y+bA\:]\7nsd4/TdqE&Oxq&nTz&INXqkQ2bq4v.-[4KL*. U"]7.NMX.'$ro\l#vc<(JFNIJ&l#'&Q4H2X=1HeNNL7kT[&]wtl$tmJ3V&)jM)tDC U"-##bgMYR,f,Qp,6Rf#gOq5,9-0aQ8-GX._=:MQJHbRf)e2PTdf_MQd&l8c3heZ^ U"ks]vV^$#hZS$'E5C-khBLAlB76I[leIW6B+Iu&$[m1kST8qXc29bwS>tUFkHK.f U"8kVT,qfo?a4T,tFfx4<\3mC(*G8dFL6U#p?AX1n#Ofmh0m,4ZnjX?lTx$j%0up( U"%)9%'%%-%z^.REqGNuMf#&%%+%Q%%1%%%%x%unsg%fqqS[ifXfMh,=RdU1OXP$1 U"R^:5xT(l(WyBFwNodco+Xqu[4>C&OS&7IZ&k]'QgJg7ucxItEE$rrvGv1h-=6qN U"3k^?Mwzu8?cciwk&(u'+U01-'Y6&)rQ'CK3kjw%7Rf.yXRx2eXivTFVs4JhO)Nf U"y<^b'c$OdvAequ$b[h%jaIaF]?F#,H(C5A$1DQO*(,0iash1Pt&GOrBP-rWi_Gu%+j[sJvkv[E)AZT&hoTF5.j^%j=t63X>i:/Up1MghTwOA'F U"aF2XO9*FjQ30Tk-F>)*x<90A>Y5Xe9MD&0b)uDSHdw^HCk17-#m%7x5/5DKKk;f U"I-\0=g=PfYmX.^H(wJ:*ttFl.-F/-o:%Q#Kc-,CQqPT(.)H[e(.%U.>]ip#Ja5u U"%[U05iDP'UMg)2*:IQe_g=6:?t6pZM]neE-x_E9*\eItvn.i6a5&M%up%()9%%' U"%-%.R.RE>Y=VM&s/%%'=N%%%+%%%%xgSg7fxf?q,>TANj,Om9t_J>(Udm&8FJR7 U"BHVe$%Pj/J]+GBD/INkiooBY,YQQPVPoA>9ottsUe.5ohlpShvLEfa4e*sY/*9( U"K^WUl(lhlllVA4M+rJ8+MBOv&SrI.QuJU3BVI%(F'?>oWK>8B1=249^4vn-[GD* U"?uQn%ZU2BD]O,nFd;P/ZNC$^/&3z81q4&3jL1zYj;:=.(7\+-3-ydE4o:RYAg.V U"TK<+o972g9K.eOU/.$9$ts5%xfkvD*1?vb$#E1,&0tl:>cg8+kX]USd:-tNTDSN U"jYuD)X83e.pbJc-hlJQDIN%ARfaR'JY^f:hti(mO3t))Wv'=Oqus)CvDdoUc'36 U"E86vx2E-I$Dz%s.\^G&L%](64oI;NCj'N.9I0W^Tu3$B')(_v;+MZyq#hWnkC/x U"5yhSN)p-wDdKi:,)\t.:l.P66k%7PRp%)51ge3Dy(Q15>O4g]U-(O,R:c:V[,=) U")=#i\S/9AVBj$h)V,TWG?_-2MZG,#HL=Rau=aOOg'-$,.VRP-/$.z\gBEOH4(^T U"C[iHY5W\1X2.z,nBfkRKo7,^h(6VQQRi8^HZ=uT>%kJ^FR%cGJIgXUGP'y=3MAo7wlIuL/ydxDg6E7R)r U"\?(iiu=]jXD3b\<+duY&PdC:+>#]^SGF&SDgM.llW:QrYgXgYZ6;L(TO[%hJRQ; U"sd1V]Pwska0Y=-f#+yN9+u[xtpZa_j:5+::_T%EA]u?:;J_EM3QvXD/WbVxpI][ U"9TH))%eRIzsJ)5^u;x&t6m-Um6-tA$[&HY?-Cn]%i(W%_G#P>fCbza:ngLfrqps U"FRqJ>8U+tcp-:;nU]v^lWTZ]HDv5L[nkNZiOMe_,rf5E/p^Qq%h_>I?29z]9s&c U"U&$q$fAu20pF6-HFDdO-k)^=GBd=*$gqQ^Y=u;Qgq6UH$\O+EBawE_hc']F6ipg U"kWZ'gB(YfcIOZS:^rAxbrfV U"=+5>UD1nKtjv?4O^aBtbaGP+o2+u)\)>tm3cZk=%L?A_K/4dr<[28muInMccmB7S9v-]*9QN9(*>11+ U"bFet&K'vhmT+Boo0m76RSgv&-e&2 U"BspK-m^aEKe#:%Htr(D:TRHSHa2L8tieX\/^\Fv,rQ$/vB)SxX6#5m_pRi*5k4K U"R=]_#XRH_$-=$(hptSQ9kzDzRrS58QZfmxHes5TGT6VkO/n\FKa+y5\CorJC(*u U"5gaw%KU\2()9bxCm'tO.cJ\pFdF(AWl')oYJ%zTNf5a3A5chS+>O2&yFRe+q%;S U"P2.7(OhzcBjc&8g.duI40(J]A/rR:?>&NoXnL.owN0VHKo-Gr4w^fOgTutof6QC U",q'ySIhn\>,E$81kh46'hi[v'7:tVw4aNy6_e-pCWCm&);Fl23fMl/j#zx))-oa U"=r1er?wWmPU;r9*7%cB%:2NWWw%L;FVsShckV*w>ekpfuxW$8llDZ^>VpAh_hV:*JqU69njXN_=QFHOeJxoS U"E.?pjs;kJ-VbA.JWWEV7#wSM-.Q2gmV=svEZt507=).,>*/W=uLA U"k3V.=fT6;H-p;UZK?jiBmmhrejj%slP6*l?U9/Md=*7hVih^wZQ8^hG'=Mf*R2- U"6lZ>Oo:bG1K/KW.nEXt3>[kG8k1.Jh7MofCV5K&T2R_)hIn=J_jNt6],-F5$6o2 U"IZ+_R7#GE7R?eR\Z$P,=R8,=&$B$ko6>)uNK7XP.IDWbXHUk1U6%WE$iP[>Ka(g U"GAC2x*?A7M-Nr[HF7c+0b7xg6(17WQ17K7DVvyQF>FWLX:u,r456X>*QHluM#oq U"tLj6#f(wkfYsrxWWOI[b[VGP_Re_#$S6\_CdejX].s?M<4207ItdC5gJfY2HOO) U"]M)f_>T=]lt^gl:kr$vkH]IAKm3Ctr]nO,M_u04nipNN*Iw22I/W0UxV+&a2Pr6 U"RXxx#X/R(_#mEXZnG*SS(6:iM4PULT4Ypj&_kGab:dfN26$a7KV>uY4-*E[Xh#) U"T$9mJIL(BG$r$CrgnoalmiE(vxb%51vgqlE?gL(MU;8'Jn83IW[5O3d+7DB5[n/ U"AIZ\;ht6_axJePy-Mm[jjziVIUv?_w&IbV(iJ$88sqoO8cB7HrIxSgnZ+T-)kI? U"ADzdM]d8uVGp0hrCf,RLYK>?tnaS^-0ri9\Nc:d U"%(LhLDBo%C7nK%\]>XR5SGbDi_9Td5(mb$^73&sFyk31[_>A0Xg6YSH3C+h3+L# U"/s9k#M]v?bqYi:)XQ8*%L/s9+R0vY73#SU\\B.HgccAP*HsqQkel'D_\*Kf(?WU U"=lq<0XL49ml;nLXqS?K+b?Rmph)a>bIirL>xXd00N\fktVs_XIaXnT^j6tK/t(b U"IylOq_&bbME(Ja9F&VaguDKA9oLu.AFJr[iaHHg_z4'd3?9VgrFYHCKpj#qIT's U"ab.Ks8keG0E_B,,>/&^ZKwEiy:*lvjqaT?0_q##&9.:&zcTUe1O(&H^VYa.Et*Mmg)s U"?]xWRH_4G\S[CXcWXa0U4.d(P-c(-Wc('Ib%4k2>RbLFlQe07r.V&hZV/_cG*ue U"u[D9x5S9j(PKFL]C1\.45Gk$JtU52(c\6Lx[*p>up%&'9%%9%'%.-%#./REab,s U"DC%.%%6%%%%-%%%%%%%%%&%%E%%%%%%%%.xf%j%Sify%up&'%9%9%%'%-%%%9HB U"L=>$5'u&%%%v6%%%+%%%%%%%%%&%E%%%%i%%%%xg%Svuh%up&'%9%9%%'%-%/*. U"RE]R(tl'*'%%&JJ%%%1%%%%%%%%%&%E%.%%3'%%%xu%nsgf%qqSi%fYup%&'9%% U"9%'%.-%5.nRE**;U