Wipeout %(#'h******Wipeout(V1.4)**** **** 1984 Scorpion**** ****By S. Campbell***** "" &0:0:7::1 ph-high s-score o-objects l-lives k-level c-best level v-sound on/off h=0:c=0 ,k=0:s=0:o=5:l=3 :7;"################################":f=120:f,0;"#";f,31;"#":f:"################################"  7000X Z10 ,2;1;"Which level to start ? (0-9)":e$=:e$<"0"e$>"9"27 e$="0"k=0:30 k=e$-480 x=11 :y=16:f=120:f,1;" ":v=1du,pi:du=999:35# v=035# (g=110 :g:du/200,pi #f (o=(k*2)+2 2 3000 <a$="q" F@(x,y)=68Do=o-1:s=s+100d:.05|L,6 Pk>34000 Rx,y;2;"" U!du,pi:du=999:87W Vv=1du/200,pi W'=""f=114:f:85U Zx,y;2;"" ]v=0100d _!du,pi:du=999:95_ adu/210,pi d,("q")("a")("p")("o")120x ni$= s$i$="q"i$="p"i$="o"i$="a"a$=i$ x.x=x-(a$="q")+(a$="a"):y=y+(a$="p")-(a$="o") @(x,y)=68Do=o-1:s=s+100d:.05|L,6 5(x,y)="#"ū(x,y)=66Bl=l-1:2000 o=01000  90Z 6x,y;2;"":du,pi:du=999:1010 v=1du/200,pi Ss=s+(1000*k):k=k+1:o=k*5:k/5=(k/5)l=l+1  30 Df=130:.01z# =,*30:f:l=05000  30 of=1o:m=(*19)+1:n=(*30)+1:(m,n)=71Gm,n;4;"":3007 f=f-1 #du,pi:du=999:3010 v=1du/200,pi f  f=1(k-3)*3:m=(*19)+1:n=(*30)+1:(m,n)=71Gn16m,n;7;1;"#":4007  f=f-1 #du,pi:du=999:4010 v=1du/200,pi f  x9 ,11 ;3;6;1;"Score ";s;10 ,11 ;6;0;0;" Level ";k;" " s>hh=s:k>cc=k z11 ,11 ;3;6;1;"High ";h;12 ,11 ;6;0;0;" Level ";c;" " 0:0:20 X>10 ,6;1;"Do you want sound ?" bH="y"v=1:10 ,1;" ": lH="n"v=0:10 ,1;" ": v 7000X #(4,7,4,7,8,12 ,4,11 ,4,12 ,8,14,4,12 ,4,14,4,16,4,16,4,17,4,16,8,9 ,4,14,4,14,16,12 ,16,11 ,32 ,12 ,6,7,6,12 ,6,19,6,10 ,6,16,6,19,6,9 ,6,16,6,19,3,17,3,16,18,12 ,4,14,2,14,2,14,12 ,14,4,16,4,12 ,4,16,16,19,999,999 # &2"Wipeout"9000(#:"Guess What""a",16 '*******Pecuniam****** *******Habere******** *******Nobis********* *******Necesse******* *******Est*********** hcksLolvE5x y  m nIaAaGuess WhatX<~~<88|(l