home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 April / CHIP4_98.ISO / software / ccconrad / basic.exe / CHIP / Programme.Bas / Beispiele_3 / BSP28.BAS < prev    next >
Encoding:
BASIC Source File  |  1997-08-29  |  146 b   |  14 lines

  1. DEFINE  i  BYTE
  2. DEFINE  a  WORD
  3.  
  4. PRINT   "Beispiel 26"
  5.  
  6. OPEN# FOR READ
  7.  
  8. FOR i=1 TO 3
  9.  IF NOT EOF THEN INPUT# a: PRINT a
  10.  
  11. CLOSE#
  12.  
  13. END
  14.