0 ON ERROR GOTO 5000
1 GOSUB 40
10 PLAY "MBT180O1L8CDEDCDL4ECC"
14 SCREEN 1:PRINT"Billy Yost"        :WIDTH 80:SCREEN 0,0,0:FOR X = 1 TO 300:      LOCATE 1,1:LET D=RINT :NEXT:KEY OFF:CLS                                              'PLAY "l64DAD ADA ABCDEFG l5 abcd":READ BILLY YOST:EDDIE SEGOURA
15 PLAY "l64  DaD ADA ABCDEFG l5 abcd":                                            READ BILLY.YOST,EDDIE.SEGOURA$    :                                             PRINT"Eddie Segoura","Billy Yost",X,Y
16 PLAY "l64 D                        ":                                           READ BILLY.YOST,EDDIE.SEGOURA$:                                                 PRINT"Eddie Segoura","Billy Yost",X,Y:PRINT BILLY.YOST,EDDIE.SEGOURA$:
17 PRINT"Eddie Segoura","Billy Yost",X,Y
18 X = INT(RND*2)+1:
19 PLAY "mbo"+STR$(X)+"l32":GOSUB 15
20 PLAY "T160O1>L20CDEDCDL10ECC"
30 PLAY "MBO0L16>CCCE"
40 PLAY "MBO0L32EFGEFDC"
769 GOSUB 10
5000 PLAY "o3"
5001 'LAY"BILLY YOST AND BARBARA DOLGINS
5002 KEY ON
5003 ON ERROR GOTO 5000
5004 SCREEN 1:PRINT"Billy Yost"        :WIDTH 80:SCREEN 0,0,0:FOR X = 1 TO 300:      LOCATE 1,1:LET D=RINT :NEXT:KEY OFF:CLS  :                                      GOTO 16:  'PLAY "l64DAD ADA ABCDEFG l5 abcd":READ BILLY YOST:EDDIE SEGOURA
5895 DATA
5985 DATA 28,29,6,7,38,39,Kimberly,24,SIMBA,23,Rita Repulsa,                              12,Ryan Steel,16,MUFASA,12   ,Kwame,21,Wheeler,                                 25,Linka,26,Alpha,27,Mate,203,Barbara Dolgins.