houdini ,˨ m HOUDINI was written Janson Allen of Alnwick,Northumberland SU feb-84-81   0 ?:236099\,502:0:7:0:5050 # 2000 ( 1000 20:0:7 P n=10 Z0,0;"Guess any number","from 0 to ";n-1;5,26;"Right";7,26;"Wrong";9 ,26;"CODE" _H;4;5,24;"";2;7,24;"" `\207,88X:33!,0:0,-9 :-33!,0:0,9 d a=(*n) b=(*n) , c=(*n)  d=(*n) y=5172 "Guess first number ";e "Guess second number ";f "Guess third number ";g "Guess fourth number ";h y,13 ;e;f;g;h 0ea;2;3+y-3,18;"" 2e = a;4;3+y-3,18;"" 0fb;2;3+y-3,19;"" 2f = b;4;3+y-3,19;"" 0gc;2;3+y-3,20;"" 2g = c;4;3+y-3,20;"" 0hd;2;3+y-3,21;"" 2h = d;4;3+y-3,21;"" V37%,81Q:41),81Q:;5;19-y/2,2;"" bz=130 lZe=af=bg=ch=d.05|L,z:z:11 ,26;6;1;a;b;c;d:640 vy:650 37%,83S:41),83S:19,12 ;6;1;" WELL DONE !";20,3;" You saved HOUDINI from";21,13 ;"drowning" ;7;14,27;"";5;15,26;"";15,27;"";15,28;"";16,27;"";17,26;"";17,27;"";17,28;"";13 ,27;"":680 t=301-1 `11 ,26;6;1;a;b;c;d;20,9 ;"SHAME he drowned":.05|L,t t T400::;6;11 ,0;"Do you wish to try again ? Y/N":0 ="y"Ŧ="Y":40( ="n"Ŧ="N" '101e,29:0,110n '138,29:0,110n '177,29:0,110n  l=14016-16 101e,l:75K,0 l %15,31:0,64@ 715,31:491,0:0,64@ 39',84T,7:41),86V:37%,86V:39',84T:38&,82R:3,0:39',76L:0,-24 $(39',524:-13 ,-19 .'39',524:13 ,-19 8739',65A:10 ,0:6,10 B939',65A:-10 ,0:-6,10  Ą143,502:0,20:20,0:163,502:0,40(:143,60<:20,0 ΃71G,502:15,0:78N,502:0,70F:10 ,0:-4,-10 :-5,11 ؜100d,90Z:-8,10 :100d,120x:10 ,0:130,120x:10 ,0:118v,70F:-8,10 M105i,105i:-9 ,5:135,90Z:-9 ,5 -x=130:.01z# =,x:4:x n=70-1 n:20:n:x: \'"The object is to guess a 4 number code,in the correct order, to save HOUDINI ." :'"ENTER one number at a time, between 0 and 9 e.g:-" '" 0 - ENTER" '" 6 - ENTER" '" 9 - ENTER" '" 2 - ENTER" 1 '''" PRESS ANY KEY TO CONTINUE":0: b'" When you have ENTERed your number,you will see which is correct and which isn't,e.g:-" 5,10 ;"0692";4;5,16;"";2;5,17;"";4;5,18;"";4;5,18;"";2;5,19;"" {7,18;"Right";9 ,18;"Wrong";4;7,16;"";2;9 ,16;"" F''" You have 7 chances to crack the code before HOUDINI drowns." n20,2;"PRESS ANY KEY TO CONTINUE";5;1;18,10 ;"GOOD LUCK !!":0:  a="a""i"+7 user:a,user a: O60<,126~,189,231,231,126~,102f,60< K0,128,193,162,164,43+,20,8 pP24,255,255,255,239,255,239,255 zJ0,129,67C,37%,26,196,40(,16 O239,255,239,255,0,255,255,255 C0,0,0,0,0,6,15,14 Q238,238,238,238,238,238,239,108l G0,0,0,0,0,192,224,224 D0,0,60<,66B,60<,0,0,0 se    bc d