dash-it V1?R Dash it! by Arjun Nair 2004 Version 2: Modified Sep 2005 **************************** : :hiscore=0 Qk$(4):k$(1)="p":k$(2)="o":k$(3)="q":k$(4)="s" 6060:init graphics 8000@:main menu 1000:game loop 2 20 dInitialise game nMlives=3:dir=0:score=0:seedtime=502:level=1 s8quanta=5*level:time=seedtime+(level*30): x|1,0;3;"";20,0;3;"" f=119 2f,0;3;"";f,31;3;"" f x=10 :y=10 f=15*level p=(*17)+2 q=(*28)+2 T((p=yq=x)((p,q)=5))260:don't overwrite player or another quanta! "p,q;5;"" ,f  main game loop 100d:initialise =21,0;"Lives: ";lives;20;"Score: ";score )0,0;"Time: ";time;" " #0,20;"Level: ";level a$= $a$=k$(1)dir=1:right #a$=k$(2)dir=2:left !a$=k$(3)dir=3:up #a$=k$(4)dir=4:down )dir0y,x;1;(143) dir=1x=x+1  dir=2x=x-1 dir=3y=y-1  dir=4y=y+1 *((y,x)=3ū(y,x)=1)f=04:y,x;2;6;1;(145+f);0:0.4L,*f:f:10 :6000p /(y,x)=5score=score+(level*10 ):quanta=quanta-1:0.01z# >,0.1}L:quanta=010 ,3;1;5;1;"Space-Time Jump! Get Ready!";0:f=110 :0.03{u],*f:f:502:level=level+1:6020 y,x;4;"" time=time-1 time=010 ,5;2;6;1;"S-T Field Collapsing!";0:f=10 1-1:0.1}L,f/2:f:502:f=219:f,1;1;2;"":0.05|L,*f/2:f:6000p  1010 plives=lives-1 zQlives=010 ,10 ;4;1;" GAME OVER! ":100d |lives=0score>hiscorehiscore=score:12 ,10 ;5;1;1;"New High Score!";0:100d lives=0 Ndir=0:x=10 :y=10 :a$="":100d:115s:1010  0: ********UDG data*** n=06 g=07:a (144+n)+g,a g:n X/66B,60<,126~,219,255,102f,60<,66B,161,60<,111o,94^,122z,254,60<,133,128,60<,122z,120x,100d,120x,546,1,8,524,28,128,228,44,,144,1 Y0,0,20,502,32 ,18,0,0,255,255,255,255,255,255,255,255 ZC0,0,0,24,24,0,0,0 [ @*** Main Menu *** J%0:0:6::a$="": T6"Dash it!" ^*5,7;3;"1) Play game" h.7,7;4;"2) Redefine Keys" r-9 ,7;5;"3) Instructions" |)11 ,7;6;"4) Credits" 415,7;7;" High Score: ";hiscore 2#0;2;5;"(c) 2004 Arjun Nair" a$=: a$=""a$>"4"8090 0.3,10 Ia$="0"#0;"For my parents and Lina, Shreya & Hazel":200:  a$="1" a$="2"8400 a$="3"9000(# a$="4"8300l  8010J l*** Credits *** v "Dash it! was originally written":"especially for the CSS Crap ":"Games Competition 2004.":'"This version is an updated one ":"with some bug fixes and sound!":"It's still crap though! :) " ;:"Developed on the BASin IDE written by Paul Dunn." [:"Hello to all WoS regulars (and irregulars) and to folks at CSS.Speccy forever! Amen." 5#0;5;" www.yantragames.com " 0  *** Redefine keys *** @k$(1)="":k$(2)="":k$(3)="":k$(4)="" !10 :f=1502:f :15,7;7;"Press key for left":0 k$(2)= k$(2)=""8420 0.1}L,20 ;15,7;7;"Press key for right":0 !k$(1)= ! k$(1)=""8450! !0.1}L,20 !<15,7;7;"Press key for up ":0 ! k$(3)= !*k$(3)=""8480 ! !/0.1}L,20 !4>15,7;7;"Press key for down ":0 !>k$(4)= !Hk$(4)=""8480 ! !M0.1}L,20 !RE15,5;7;" Keys Redefined! ":100d !\ #(*****Main Menu******* #-0:0:6: #26"Dash it!" #7 #<"Krapz the mysterious alien findshimself trapped in a Space-Time continuum warp. The only way to survive is to keep on the move, and collect the quanta particlesin the vicinity that will give him the necessary boost to jump out the warp." #A #F|"Be forewarned though that there are other warps in the vicinity too and you may well jump into another more tricky one." #K #P"You must also stay clear of the ST fluctuations you leave behindin your wake. Touching them willmean instant death. Avoid the walls of the warp too for the same reasons." #Zb#0;"Keys: Left=";k$(2);" Right=";k$(1);" Up=";k$(3);" Down=";k$(4) #d 0 #n aiscorApoqs