5  DIM C$[12]
10  PRINT "12 JUN 74 VERSION"
20  PRINT 
30  PRINT "WANT LIST OF DATA FILES TO USE WITH IDA ";
40  INPUT C$
45  IF C$[1,1]="N" THEN 9000
50  PRINT 
100  PRINT "$ACKERM","$AT&T"
200  PRINT "$BLOLES","$BLUME","$BROWNL","$BOXJNA","$BELOIL"
300  PRINT "$COTTON","$CRSPP","$CRSPR","$CRSPS"
400  PRINT "$DJ"
500  PRINT "$ECDAT1"
600  PRINT "$HALSEY"
700  PRINT "$IBM","$ISAACS"
800  PRINT "$LMICH","$LONGLY"
900  PRINT "$M&MIND","$MCDERM","$MICH","$MICH1","$MICH3"
910  PRINT "$MILAGE","$MOBILE","$M1"
920  PRINT "$NFL69"
1000  PRINT "$ROCKY","$ROCKY2"
1100  PRINT "$SALES1"
1200  PRINT "$TJT66"
1300  PRINT "$VELMON"
9000  PRINT 
9010  PRINT "TO GET LIST OF IDA PROGRAM NAMES, GET '$IDAPRO'."
9999  END 
