Subj : File Access
To   : Jim King
From : PistolGrip
Date : Mon Apr 02 2001 03:09 pm

Here's a simple example for a text based file.

##### START ##############################################################
!include file_io.inc

# Variable Definitions
int file_handle

str string
str string2

# Sets a variable to a value
set string2 "Hello, World."

fopen file_handle O_RDWR "%n..\baja\somedir\somefile.txt"
if_false
 print "\r\nnError opening File!\r\n"
 return
end_if

fread_line file_handle string     # reads line from file into variable
fset_pos file_handle 0 SEEK_END   # sets file position to end of file
fprintf file_handle "%s" string   # writes variable to file

fclose file_handle
##### END ##############################################################

PG

---
� Synchronet � WasteLand BBS � telnet://wasteland.darktech.org