Something a bit like this????
_loadStats:
Filename$=Station$ + ".dat"
Open To Read 1,Filename$
Read String 1,T$: systemName$=T$
Read String 1,T$: stationX=Val(T$)
Read String 1,T$: stationY=Val(T$)
Read String 1,T$: stationZ=Val(T$)
Read String 1,T$: stationScale=Val(T$)
Read String 1,T$: stationName$=T$
Read String 1,T$: stationMapfile$=T$
Read String 1,T$: noOfStock=Val(T$)
Read String 1,T$: stationAlign=Val(T$)
Read String 1,T$: stationAban$=T$
Read String 1,T$: stationHull=Val(T$)
Read String 1,T$: stationShields=Val(T$)
Read String 1,T$: stationGunMounts=Val(T$)
Read String 1,T$: stationMinCrew=Val(T$)
Close File 1
return
` ----------------------------------------------------------
_saveStats:
Filename$=Station$ + ".dat"
if file exist(Filename$) then delete file Filename$
Open To Write 1,Filename$
Write String 1,systemName$
Write String 1,str$(stationX)
Write String 1,str$(stationY)
Write String 1,str$(stationZ)
Write String 1,str$(stationScale)
Write String 1,stationName$
Write String 1,stationMapfile$
Write String 1,str$(stationAlign)
Write String 1,stationAban$
Write String 1,str$(stationHull)
Write String 1,str$(stationShields)
Write String 1,str$(stationGunMounts)
Write String 1,str$(stationMinCrew)
Close File 1
return
If we could strike, I guarantee you there would be martial law.
http://www32.brinkster.com/boegiboe
