VICIOUS VIPER k#d p SNAKE'S SUPPER p#n p p#x p BY J. YAU & S. PIRIE p# p p# p COPYRIGHT KNIGHTS pt F  : F,H(F),F, (F):[,F((F))]"":F:`R ,,@,: "VICIOUS VIPER":"COPYRIGHT KNIGHT'S"::"R9RR":[@,]""8[,]""'" ** VICIOUS VIPER **"A"USE THE CURSOR KEYS TO GUIDE THE SNAKE TO THE NUMBERS."R"BOTH THE POINTS AND THE GROWTH OF THE SNAKE DEPEND ON THE NUMBER EATEN."~"OCCASIONALLY HUMANS APPEAR AND THEY ARE WORTH THE MOST. HOWEVER, ALL MORTALS MUTATE TO LOWER CREATURES EVENTUALLY."1[`,]" PRESS ANY KEY TO START":[,]""9[@,]"";A$:A$"" 6" XY(@,z),PT():HC:`,X:Y:DSP:VSX:SC:ZZ:C :FL:DD:PT():PT():GK"6"":T:LLDST'@ LL ,&: LL,'J LLp,&: LL<,(T T:T p :LLDST ^ LL,&: LL,+h LL,&: LLp,: T#rP(()z)#| (DSP )4 r (DSP)4 rXY(,)PDSQ[,]"HIGH SCORE ";HC," SCORE ";:[`,]"0 "  "000000"  A$" A$"" C:GK! A$"" C:GK" A$"" C :GK! A$"" C :GK$JJDSPC:SPJJ:B(JJ). SP,: JJ,GK: DSP,: VSP,0PPC: (B&)(B) :  BFF FL: # Y{ X:Y FL &XY(X,Y)JJ0 ZZ NN: XY(PT(),PT()),: XY(PT(),PT()),`!DPT()PT()>N PT(){ PT():PT()@X(PT(){)(PT()) PT()bYYl () R vFLO FF &ZZZZ:ZZZZ  *** COLLISION ROUTINE **** J@: H @7 JJ,H: JJ,(J)+""(()`)"0"( H,J: JJ,: JJ,:" *****FOOD GEN. ROUTINE*****#R(()Hp) NNDSRMM(NN)"(MM&)(MM) $SS(()) FFSS SS FFJ& (X)(Y) ZZ* NN,FF: NN,r4!> *****MUTATION ROUTINE*****H2R FFJ NN, :"E0":FF :\FFFFEf FF "000000": NN,:NN,`:"-D0FBD": p"E0" z NN,FF"000007" *****END OF GAME***** HCSC HCSC&[`,]"";HCB:`,@:[,`]"PRESS 'S' KEY TO RE-START"; X$: X$"S"   ,**CHANGE SCORE** FFJ FF0-SCSC(FF):(x):ZZFF "E0"<[`,]"";SC