home *** CD-ROM | disk | FTP | other *** search
/ HOT Scene Stuff / hotscenestuffzyklop1996.iso / diskmags / deutsch / microcod / stod2 / sources / sequles.bas < prev    next >
BASIC Source File  |  1995-01-30  |  139b  |  8 lines
  1. OPEN "I", #1, "Daten"
  2. CLS
  3. WHILE NOT EOF(1)
  4.    INPUT #1, N$, VOR$, GEB$
  5.    IF RIGHT$(GEB$, 2) = "77" THEN PRINT N$, VOR$, GEB$
  6. WEND
  7.  
  8.