home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / sys / amiga / programmer / 3767 < prev    next >
Encoding:
Text File  |  1996-08-05  |  1.8 KB  |  58 lines
  1. Newsgroups: comp.sys.amiga.programmer
  2. Message-ID: <22213481H000CD141H@ag01.bbrandes.berlinet.de>
  3. From: A.GUMTOW@BBrandes.berlinet.de (Andreas Gumtow)
  4. Path: tbx.berlinet.de!bbrandes.berlinet.de
  5. Subject: Re: AREXX beginner needs help...
  6. Date: Fri, 23 Feb 1996 06:57:53 +0100
  7. X-Mailer: -- The Answer V3.06ss7 (public Beta 1)
  8. References: <Dn16L1.9ID@emr1.emr.ca>
  9. X-Gateway: ZCONNECT zelator.berlinet.de [LEGO v0.10]
  10. MIME-Version: 1.0
  11. Content-Type: text/plain; charset=ISO-8859-1
  12. Content-Transfer-Encoding: 8bit
  13. X-ZC-PGP-KEY-AVAIL: 
  14.  
  15. On Mo 19.02.1996 at 16:17:25 wrote kpratt@emr1.emr.ca (Ken Pratt) 
  16. in Message "AREXX beginner needs help...":
  17.  
  18.  
  19. KP> Anyway, one of the first things I tried was to write a little file
  20. KP> to the RAM: drive.  A DO loop counts to 100 and writes the current
  21. KP> value.  Seems to work.  However, trying to read values back in is a 
  22. KP> different story.  I tried using a DO loop again, counting to 100, and
  23. KP> then using val = READLN ('RAM:test').  Following that I put a SAY val in, 
  24. KP> but when I run the program my only output is a series of READLN ('RAM:test')'s
  25. KP> on the screen.  Code looks like this:
  26. KP> 
  27. KP> OPEN myfile,'RAM:test,'R'
  28. KP> DO 1 to 100
  29.  
  30.     ^^^^^^^^^^^
  31.     DO WHILE ~EOF(myfile)
  32.  
  33. KP>     val=READLN('RAM:test')  /*Doesn't matter what's in the brackets*/
  34.  
  35.                    ^^^^^^^^^^
  36.                    myfile
  37.  
  38. KP>                             /* end result is that it just gets echo'd*/
  39. KP>                              /*on the screen*/
  40. KP>     SAY val
  41. KP>      END
  42. KP> 
  43. KP> When run, READLN('RAM:test') is written out over and over.
  44. KP> Can you help?  From what I get out of the manual, it should work.
  45.  
  46. READLN() needs a filehandle (the result from OPEN)
  47. Read the file until end ! 
  48.  
  49.  
  50.  
  51.  
  52. CU
  53.   Andreas
  54.   
  55.   
  56. Someone whom you reject today, will reject you tomorrow.
  57.  
  58.