Xmas Eve --Q/1:7:1: ******************** ** @ PAUL STANLEY ** ********************  8000@  hs=0 9000(# sk=.98zG:s=0 $a$="":b$="":c$="":x=27 d$(28) $g=1:h=(*28)+2 $0,18;"HIGH-SCORE:";hs  p=0  0,0;"PRESENTS:";s 9="x"x=x+(2x<27):a$="":b$="":c$="" #8="z"x=x-(2x>1):a$="":b$="":c$="" (P10 ,x-2;" ";10 ,x;2;a$;0;b$;2;c$; 2ipg=g+1:g-1,h;" ";g,h;6;"":g=10 h=x+2h=x+1h=xp=1 <,g=12 (g+1,h)=":"1000 AAg=12 12 ,h;" ":g=1:h=(*28)+2 FHp="m"g=10 :h=x-1+(a$="")+(3c$=""):p=0 P>skq=(*7)+1:e=(*4):3;16,q*4-e+1;" ":d$(q*4-e)="p":d$(q*4-3q*4)="pppp"2000 Z 30 12 ,h;" " (18,h)="_"25 -s=s+1:0,0;"PRESENTS:";s 518,h;0;6;"__";19,h;"__" +f=13:.001wn,30:f [f=4284:(18,f)="_"f:sk=sk-.02{# =::9030F#:20  25 '(18,q*4)"_"6000p  30 E5100:z=.3:c=.6:f=126:a,b:a,b:f  z,6,z,6,c,6,z,6,z,6,c,6,z,6,z,9 ,z,2,z,4,1,6,z,6,z,7,z,7,z,7,z,7,z,7,z,6,z,6,z,6,z,9 ,z,9 ,z,7,z,4,c,2,c,2 P ptf=10 1-.5:f,x;2;a$;0;b$;2;c$;f+1,x;" ":.005y# =,2*f:f r s>hshs=s u1,x;" " v g,h;" " z^1;18,q*4-1;0;6;"__";19,q*4-1;"_" .8,8;1;"G A M E O V E R"  5000 :11 ,2;1;"PRESS ANY KEY TO PLAY AGAIN" "":10  6060 @n1;5,0;" C H R I S T M A S E V E "'0''" @ PAUL STANLEY":250: J '"It is approaching midnight on Christmas eve and Santa is late.You play the part of Santa and you must deliver presents which are thrown down to you by your elves. Having caught a present (by flying directly below it) you must move over a chimney and drop a present down it." T'"When a present has been dropped down a chimney the famiy in that house immediately start work on opening up the present and they will turn the light on.Dropping another present down a chimney of a lit house will not count." ^1'1;"PRESS ANY KEY TO SEE MORE.":0 h:"Beneath each roof you will see a patch of snow which melts as time elapses. This melts at a rate which is proportional to the activity in the house." r'"As the presents must be placed down the chimneys before anyone sees you, if all the snow has melted under a particular roof without a present being dropped before this occurs it will indicate that the inhabitants are awake and you will have to return immediately." |`'" Z------------------LEFT X-----------------RIGHT M----------DROP PRESENT" ;'1;" PRESS ANY KEY TO START ":0:: #(,90102#:y="a""k"+7:x:y,x:y #2A0,0,1,0,0,0,0,0 #,568,18,252,1 #ZH3,2,5,7,254,126~,198,74J #dC0,0,128,0,0,0,0,0 #nE0,0,0,546,546,0,546,546 #xF0,1,3,7,15,31,63?,127 #O0,128,192,224,240,248,252,254 #H255,220,73I,65A,64@,0,0,0 #S24,60<,01010110V,60<,24,126~,255,255 $Tx=2264 $^3;13 ,x+1;":";3;5;14,x+1;"";1;"";15,x;"";7;3;16,x;"";17,x;1;3;"";18,x;" ";19,x;" ";20,x;"";21,x;"" $hx $cx=48020832 :1:3:x,0:0,39':x:7:0 $@x=2421632 :x,23:15,0:x % g