", mydata.dat" )
<br />
; Open the file and change the Third Integer
<br />

<br />
file = OpenFile("mydata.dat")
<br />
SeekFile( file, 8 ) ; Move to the third integer in the file
<br />
WriteInt( file, 9999 ) ; Replace the original value with 9999
<br />
CloseFile( file )
<br />

<br />
DisplayFile( "The file after being midified", "mydata.dat" )
<br />
WaitKey()
<br />
; **** Function Definitions follow ****
<br />

<br />
; Read the file and print it
<br />
Function DisplayFile( Tittle$, Filename$ )
<br