90 REM *** CONVERTED TO RSTS/E BY DAVID AHL, DIGITAL 99 REM Converted to Exidy BASIC by Pete Turnbull 100 REM HURKLE - PEOPLE'S COMPUTER COMPANY, MENLO PARK CA 105 X=RND(-1) 110 N=5 120 G=10 210 PRINT 220 PRINT "A hurkle is hiding on a";G;"by";G;"grid. Homebase" 230 PRINT "on the grid is 0,0 and any gridpoint is a" 240 PRINT "pair of whole numbers separated by a comma. Try to" 250 PRINT "guess the hurkle's gridpoint. You get";N;"tries." 260 PRINT "After each try, I will tell you the approximate" 270 PRINT "direction to go to look for the hurkle." 280 PRINT 285 A=INT(G*RND(1)) 286 B=INT(G*RND(2)) 310 FOR K=1 TO N 320 PRINT "Guess #";K; 330 INPUT X,Y 340 IF ABS(X-A)+ABS(Y-B)=0 THEN 500 350 REM PRINT INFO 360 GOSUB 610 370 PRINT 380 NEXT K 410 PRINT 420 PRINT "Sorry, that's";N;"guesses." 430 PRINT "The hurkle is at ";A;",";B 440 PRINT 450 PRINT "Let's play again. Hurkle is hiding." 460 PRINT 470 GOTO 285 500 REM 510 PRINT 520 PRINT "You found him in";K;"guesses!" 530 FOR I=1 TO 10:PRINT CHR$(7);:NEXT I:PRINT 540 GOTO 440 610 PRINT "Go "; 620 IF Y=B THEN 670 630 IF Y