Brauche hilfe bei meinem Infomarker script

function checkForXML()
	if not xmlLoadFile("infoicons.xml") then
	local infoxml = xmlCreateFile("infoicons.xml","Icons")
	xmlSaveFile(infoxml)
	xmlUnloadFile(infoxml)
	end
end
checkForXML()




function createPickups()
		local infoxml = xmlLoadFile("infoicons.xml")
		for i,node in ipairs(xmlNodeGetChildren(infoxml)) do
		local x,y,z = xmlNodeGetAttribute(node,"PosX"),xmlNodeGetAttribute(node,"PosY"),xmlNodeGetAttribute(node,"PosZ")
		local header, text =  xmlNodeGetAttribute(node,"Header"),  xmlNodeGetAttribute(node,"Text")
		local rot, gruen, blau =  xmlNodeGetAttribute(node,"farbeRot"),  xmlNodeGetAttribute(node,"farbeGruen"),  xmlNodeGetAttribute(node,"farbeBlau")


		local pickup = createPickup(x,y,z,3,1239,1)
		addEventHandler("onPickupHit",pickup,function(hit)
		outputChatBox(header..": "..text,hit,tonumber(rot),tonumber(gruen),tonumber(blau))
		end)
	end
	xmlUnloadFile(infoxml)
end
createPickups()


function insertToXML(player,cmd,header,text,rot,gruen,blau)


	local x,y,z = getElementPosition(player)
	local infoxml = xmlLoadFile("infoicons.xml")
	local nNode = xmlCreateChild(infoxml,"Icon")
	xmlNodeSetAttribute(nNode,"PosX",x)
	xmlNodeSetAttribute(nNode,"PosY",y)
	xmlNodeSetAttribute(nNode,"PosZ",z-0.5)
	xmlNodeSetAttribute(nNode,"Header",string.gsub(header,"_"," "))
	xmlNodeSetAttribute(nNode,"Text",string.gsub(text,"_"," "))
	xmlNodeSetAttribute(nNode,"farbeRot",rot)
	xmlNodeSetAttribute(nNode,"farbeGruen",gruen)
	xmlNodeSetAttribute(nNode,"farbeBlau",blau)
	xmlSaveFile(infoxml)
	xmlUnloadFile(infoxml)


	local pickup = createPickup(x,y,z-0.5,3,1239,1)
		addEventHandler("onPickupHit",pickup,function(hit)
		outputChatBox(header..": "..text,hit,tonumber(rot),tonumber(gruen),tonumber(blau))
		end)
end
addCommandHandler("insert",insertToXML)