DSKB:UTTREK.HLP[30,1257]         13-Jan-114 4:47
Page 1

00100	1  PRINT "U. OF TEXAS STAR TREK GAME BY GRADY HICKS AND JIM KORP."
00200	2  PRINT "GENERAL IDEA STOLEN FROM PENN. U. BY HICKS."
00300	3  PRINT "VASTLY IMPROVED, AND ADAPTED TO TAURUS BY KORP, 5 APRIL 73."
00400	4  GOSUB 9980
00500	5  PRINT "   BE CAREFUL AND HAVE A GOOD TIME."
00600	6  PRINT
00700	7  PRINT
00800	8  X8=RND(0)
00900	9  DIM Q$(10)
01000	10  DIM G(8,8),Q(8,8),D(8),K(9,3),N(3)
01100	11  DIM C$(20)
01200	12  GOSUB 8050
01300	13  PRINT "   TO PLAY SHORT VERSION, TYPE 1 ---"
01400	14  PRINT "   TO PLAY REGULAR VERSION, TYPE 2:";
01500	15  INPUT V
01600	16  IF V = 1 THEN 20
01700	17  IF V = 2 THEN 20
01800	18  PRINT
01900	19  GOTO 13
02000	20  T0=INT(RND(0)*20+20)*100
02100	21  T=T0
02200	22  T9=40
02300	23  E0=3000
02400	24  E=3000
02500	25  P0=10
02600	26  P=10
02700	27  S9=200
02800	29  GOSUB 8200
02900	30  DEF FNO(F)=SQR((K(F,1)-S1)^2+(K(F,2)-S2)^2)
03000	32  Q1=INT(RND(0)*8+1)
03100	34  Q2=INT(RND(0)*8+1)
03200	35  F=1
03300	40  FOR I=1 TO 7
03400	42  D(I)=0
03500	44  NEXT I
03600	62  S1=INT(RND(0)*8+1)
03700	64  S2=INT(RND(0)*8+1)
03800	65  DIM F$(12)
03900	66  DIM N$(15)
04000