Ayuda con fileWrite

[Mr.Lag]

Buenas, estoy haciendo un script para crear muchos árboles en todo el mapa de mta ,darle un ColTube y luego darle sus funciones. Para intentar quitarme la complicación de estar repitiendo diezmil veces el createObject, decidí hacer un comando para crearlos y editar un archivo donde guarde la ubicación de todos los arboles.

El problema es que en el momento de editar el archivo me añade la ubicación del nuevo árbol pero me borra la de los que ya creé dejándome un solo árbol. Quisiera saber cómo hacer para arreglar ese problema 

Aquí el script:

file = fileOpen("arboles.lua",false)

function creador(thePlayer)
	local x, y, z = getElementPosition(thePlayer)
	arb = createObject( 773, x -3, y, z-1)
	if file then
	fileWrite (file,"createObject(773,"..x -1 ..","..y..","..z -1..")")
	fileClose(file)
	end
end

addCommandHandler("crear",creador)

 

Edited February 28, 2017 by Mr.Lag

[#Dv^]

Intentá usar esto

function creador(thePlayer)
	local file = fileOpen("arboles.lua") or fileCreate("arboles.txt")
	local x, y, z = getElementPosition(thePlayer)
	arb = createObject( 773, x -3, y, z-1)
	if file then
		fileSetPos(file,fileGetSize(file))
		fileWrite (file,"createObject(773,"..x -1 ..","..y..","..z -1..")")
		fileFlush(file)
		fileClose(file)
	end
end
addCommandHandler("crear",creador)

 

Edited February 28, 2017 by #Dv^

[Mr.Lag]

15 minutes ago, #Dv^ said:

Intentá usar esto

function creador(thePlayer)
	local file = fileOpen("arboles.lua") or fileCreate("arboles.txt")
	local x, y, z = getElementPosition(thePlayer)
	arb = createObject( 773, x -3, y, z-1)
	if file then
		fileSetPos(file,fileGetSize(file))
		fileWrite (file,"createObject(773,"..x -1 ..","..y..","..z -1..")")
		fileFlush(file)
		fileClose(file)
	end
end
addCommandHandler("crear",creador)

 

Funcionó, gracias.