'=========================================================================== ' Subject: REAL-TIME TEXTURE MAPPED TUNNEL Date: 05-24-97 (15:20) ' Author: Daniel Davies Code: QB, QBasic, PDS ' Origin: ia53@rapid.co.uk Packet: GRAPHICS.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"TUNNEL.ZIP",4^6:Z&=6042:?STRING$(50,177); U"%up()%9%'%R-%mU91G<&%Z)4)7%%H.%%%/%%%%yz%ssjq%SgfxJdz<>]Sm5w5]= U"N=Y$IQXHPA]D3j*T#:<7ZRvsvSZK1L;/+QA=;_gJ5+dX= U"rRvjKcCkZUVAWkc.<$_irE?1/WcV=Tu2J[ozsgOHE#tFmGa)daZO>nn2B_8&*bv U"rO_.N8Cc*XSp=0:_sIbtiq7[vm^_R>u3+F5x*G+1RXpM0l?h><9[Jn/qqw.qW'x U",]''6f8E,G4\Yb=F[Aj1.1ja15G)6m(ms&0.e%&1_R0MU3ga4?7_QDa8_N_>F0= U"SF87fBW.v:IB%6;/8aK9mPos(0DJeBnFI[GXB>>gEl3v52UnI5nWN/d:r5vc[#rc<#J=:Vb1pY)D^jA< U"Q0o4gE_tz[uL3.lh3$M%o:]ULz7qEYf^u)D$u,0O%lmv?hQa3]A>X?^GiH7)QVU U"])$[Y_l*iNyeknB*vtlR2AP:z^c2rd%V&+rLc3c+mxGPE^Kz8&p\9Zu?U2>;lP] U"V>MG8O?6nBj??,.$7J,UueNOhUmHHMmG>l?7_fL$9*lD]-'0t5Gh3UW&#>ar&k, U"VTWFUPn-2g)1,zR=sh6_ZOER^gpTU;C9M'i\<*si-J8)Sjl15\U*m3fpgI)Fu_G U"_:BJ'gs9ueFWOJRu_]DYVuIp45li(co2AT_<*h6DY%j#'_8j6-U8&_/wOM:Vz2U U"/;e5p1+J\3Ld+P/S]QY4LL&gA/']BvLFw5d6=o*&PRuU*N':yJDF[KJ'Dl*AWI0 U"f/hl3AtRtg1xEQDF^vVL6gQ;pXuDt#A$I81VD=(.(OT5De/r&Zq89KVvwt?>>nhYM(ul7j0MP1I U"_9T>XzUwGcc2Wkac,JBh]3%nu(EDg?6FMc=mm.RuTY5OC*Ao-ET9RI=ztSNY*ns U"VekQ4bWD&wC57GBlx3j]n/G7/3&rni4774Yz:Z/(m\xWgi_ML*V:xuSAa2UFY4(1N. U"N>dT#6sGG1V3$k?nbv^L3L&61ZkFMoj9=r0=8+3J2z*Y,7v(H>d1/=.^/)Acom6 U"w7gD\,enuTgLHg*9lo$_,[-]x(u%p()9%%'%-.%,bIOG&4M*$7(%%%n.%%%,%%# U"%lk'%SufqE6%p][H$1Ta,Ar-u)nj$Bw<#a2ysJb*h0%(7[O/iLvcc0uQWu5l1Zj U"v=Hrk?eAlkqb' U"V?LRSq4om-d.PCYAQh,GcDI[*r;+Y/%U+STdh9P4,4)?-[H1kv*9]&>_lOgjCVV U"3PF-Z(5]j#M16/->PkJa1=CXnB#n7D_Uq0hTgPE)'2_PH98aSU1IlKDe*6E3,w3Vqx^z^'? U"nP=h5Y'IX0-'2H&d/0[=>Am;/Dk[w9tY U"fp0k>(6',5??Q$JLOh*<'CEc><:9RLnLDY0Onu>cPJS-TC;O,'B7O2'HiD'0 U"NyNM0zvQDyrgpf6JK-TP*nb7=&byNKLbzdKoA^>-v&8IR>+DE)=jcY2/k]B3*of U"M9=pui&^wkYr,qCtM_[X_m_CD;=7d$j3?&usDfH(Wmtut6oN1pWbmS4e^G:DsYJ U"M7,)'wKmx_##.V#GTAxyQk43gKuJS,MO;zL-I]e2a&nu2*15Q/G8cp9t7.k0Z?sf U"(=)nb$[RaxrAN.qX1CPO\SmD?v\l1rtb7qy:YR U"0hYjWdxg*wKvm:mK5r3m%%LS%%%,% U"%%%lk&'SifOyfl(,A\_7Fjx$q6pieemq)1xM\DSW=3V=jgKbed;(AZL0Dj\[M]= U"]O9w.td?xvHdoDS4ec+DS4?e+DSu4e+DsS4e+Ld:BMBQm[NrdB_nlPwtu4Mdj8o U"Qa+::d.I-f/am,ZM$H:#:cv2Dw=:R^no,^NnLORbH4UgWXIi8.<3 U"&n_by(&nzl7gKJ3RlZbJK-j7fIg<63'%g?v2Zt>E)Vd)HJn_ItcBsOcN]Y];QFR U"c&%n/joO9M8PcXvI$c57mq)1S8nMN'B;4#$&K_H(W6*Quio0BBzh:QcL=6xeCJX U"uM6wi1lLPGv07iPBUZNc=vZ'OaW38x&_ U"ks=2&EazLzbk,8(x[f>7MV=B?t96k0j8>(:5Nh;CLENG)]-AMid^:OcdQkia]Pv U"T.BHDSN;?HpbyI'P3vNLRiR3k#L^>1gCYD>ADwI\kklh2?_%sWslo]3[Z_yA-Z, U"o()DQlR8.KAVc\]#]t/GNEJw$h#kGquE3DKcE#lvI\Gt8xT9)xIR6]_,PM_k7Dm U"DSqJVCXdMtKdPqKRA#$h($%tM4\182YzN\djGF_)]HH+;qr;(]cICTec]e+4R.A U"=f_1+MSz\,ff*N-%2]m7g%vFpzb:%Yw.2X,n/*O7_MV,b+pgsmhZ?G4e,u]7s7[sDya:Ms U"GUx)uqZX>^z2y32z9,mrl4^pRq[_wB]xzx9lu(fUxmBBDeHkusOH'if17l1D[q# U"/#j#v2[2N;9R5pvUGtwjL+bn/UvsKt(vccT:;1HJq1mk]CL%X&0CoT,;WY#aKWs U"XqexaaLe<(MI=tNj^C$&#x=5=Qm,oYLuIbX+:V]N?J-[>Gz-&dLN'HIL'_Mq>H& U"?9IG\kkC$_gBG1HKq&^=HuMkem-rg>3r1=p:MeSqu(f2TDwh][6jDLJpuq$H'lz U"XPNK+H#)F$?G'_ct$(2J>hZBZ-kWaiX2Hkz5SJkgs*=l_Z_jxIB%BS_7_,OouU)1\0f64WDZ(vmk/c9jt,4Mfz;3YHg8pd8$ng)DOegb&Pf2S U"q/wl=tlFt]?b>TGMa2mOdAE>=Oo0b'%\gP2$,4:KP$_l?27'W$WpEgc6MciNTQ^ U"_$hn7*R7_Sk\*.Pbnv>^Hs.mwO5)sDfIsAo-m7BV/%C+HdKoK7\G+QLNc6Y3F3i U"3wL14[h^LL8c2c0CB#?v)9,RJ6k24LfikGwkYQw*[^FR)P?r#HM\8iG-GOs/L() U"H.TKnclB[p8F*DuAH=LE:.c1L3dOe^odnaMmFnT$RL#b'cCRf=ANa:uTlRi=8V6 U"hYQPFcpXQSmD;wfMhlPqoMswsjRZhLf$6B;H,lC.vW#DnmkF[C^ON)iXnCKG\qt U"=p*QhO(9cilc7+oaT(RTNIH1ao=I^A(.nAG(IOWKfx#,t?vQ4KI3jM1a2k-35be U"?SiOVR4Y.2pm>V)Rj7IRBeK=8ayFef4MQMBW\9i4U-(1Jx,U4^jS'1I1yW+r8y,OmVZ6>FiNYm]mGRg=_0/H)x048ZSc1Oy)9>3I;SHd3Y%;\w5kFd&uM7lgPinAnZye0.Fz]+dqYfAoG%q;gwt*>eVcNsCy1HnO;%LLU-_9=7H4L9& U"[Y$v%N2?2\oW'MQJBYmpjzuIdVO2Ri(1s7R(efxRbAu+q;>vQ0F>gqp0C-*9p[/ U"G2Bu59%+g'H]xd3Y)=/yAp%pF]rMoGbc;AVLfAULgICV$mIVecUPDpfx:p]wf%z U"H\dBFPzK'x.j$'6\dj8PMCiC6m6cEHJ.j2;q. U"&OMwUQ]j7H'%jI$PuWwmQawQfEXIImD)TIW.5JPzdy)x2XZ#gqQC%>Q'Ic;%:j7 U"]-/YiA+f,=6&tO\b4h6zZ+TnTv-,]ByvFwG'v1CW'Nh%rELn:f_o*xSTH4fin.d U"f,DY\a$7CZ]=MfCnP?jiqCn;B=KsRGbW?5*YKBlqV?_i=uspzIFlbmceVl83AhktYdF8 U"6C[4Mg5bl)+V%8wr5]fD6cP91&J?vhIks#'#foP^&^gZ>x=N(%dAy/N,SF6736S U"R$:P:Xi8ITkU+Cd^:r9(NHGC3M'$g88&A'd;M_WlAOk93NChuu%Nx U".H94jMTyRq%m(>aIc#wLjza6Uopf420>mMI_A/4t4G$VtgTvXQ8XT,HJngB6)h= U"jpqJT='1hgE:j8H_3]\>c$g$.:sa;$9Ze7vmpR_S[6q\\ei8+qG[?o.)%0mN6eo U"vjnAI[W/&7>LWR[P^<)rMv5A3o,V3tAo3q2HFMy\Y[C*6?J\nhnR6U#Gu(j.(L$ U"s^JE?]M-ZoF:KWOB+^sdft#W98B9-&q3+0fBC*l3%n*FIT7(idC\j^ATpA\s%Hi U",hx+ULf/kda)uB5dd+0ofYOXBp:8tM-/$,Z(VRR;^1JtHjlw7N=kH]u6xMU9qk7 U"a^m6uci*##)+H;d*h+-7hVV>C'*R[j;Vd;t,a(kvOu-c6ljlXuWUuA5qx_w16B: U"E=VfoPi]7*dR(A63T(uckR0SH$8l$#<)EN)=:V4N1TJ$9Mi%7F$M\1:7rR<1Mf5 U"RG0UPraM[h'*\)_n0+H+)c1))BB+xB]uIdnnm]=/H9\i7.#Yc5P/lSPDsFg2X-A U"yD.5xCNIPh)mH(#?Qor#W;k$RQT&mbZ*];/RBrKXVD*TqYHMOOJ9-oW24kD_JN' U",Bs8<8.]d6$hv?-104bypdEFH#ZYTi%Z\WmVTu8+HCy?4W#_'/o9iibQt8q/3Jh U"hRG[r3gE4dUjqrmWFmZ&_VD]5#]i\K?>,upr U"/\ue$Ns-3IFGe=[YyD9E_$8JCQ.J9(xUg3tYCzMe*XU\_2tW=jnJXQMtBDcCCJ^Q,?Q['5z&eNOo-=.xypt.MK%dHKphQ U"h;>1In=LZuiw3esMbkjI^COCay>>VTnquhwGz4l/79.;=lIV&/nJLE1DEKMzLT\ U"kj(qkl<7[8*aHHrP]Pd<$UMM7?S<-[#4\nu$v&$AF.3YXa#*9tjDorNO^G's6(Q U")]HiJp-4s?pu4<8UQvEUjt:mGsX8xQ6l=,,*'GPI8_e/x#T7xo6#D35-//Ni6ue U"d]uSX-rJtraPb-sLQNg,Owrc1?w.b]4v0_GjQf9T\vJNXVkFP/eDeEUY9^m