GTX Posted July 12, 2015 Share Posted July 12, 2015 Uff... Line 500, function notifyAboutExplosion: function notifyAboutExplosion() local col = getElementData(source,"parent") if isElement(col) then local x1,y1,z1 = getElementPosition(source) local spawn = getElementData(col, "spawn") if type(spawn) == "table" then id,x,y,z = spawn[1],spawn[2],spawn[3],spawn[4] setTimer(respawnDayZVehicle,1800000,1,id,x,y,z,source,col,getElementData(col,"MAX_Slots")) setElementData(col,"deadVehicle",true) setElementData(source,"isExploded",true) createExplosion (x1+4,y1+1,z1,4) createExplosion (x1+2,y1-4,z1,4) createExplosion (x1-1,y1+5,z1,4) createExplosion (x1-4,y1,z1-2,4) end end end addEventHandler("onVehicleExplode", getRootElement(), notifyAboutExplosion) Line 611, function onPlayerEnterDayzVehicle: function onPlayerEnterDayzVehicle(veh,seat) local col = getElementData(veh,"parent") if not isElement(col) then return end local id = getElementModel(veh) if not seat == 1 then return end local tires,engine,parts = getVehicleAddonInfos (id) setVehicleEngineState ( veh, false ) setElementData(veh,"maxfuel",getVehicleMaxFuel(col)) setElementData(veh,"needtires",tires) setElementData(veh,"needengines",engine) setElementData(veh,"needparts",parts) if ((getElementData(col,"Tire_inVehicle") or 0) < tonumber(tires)) then setVehicleEngineState ( veh, false ) return end if ((getElementData(col,"Engine_inVehicle") or 0) < tonumber(engine)) then setVehicleEngineState ( veh, false ) return end if not getElementData(col,"Parts_inVehicle") then setElementData(col,"Parts_inVehicle",math.random(0,parts)) end if (getElementData(col,"fuel") or 0) <= 1 then if not getElementModel(veh) == 509 then triggerClientEvent (source, "displayClientInfo", source,"Vehicle","No tank left in this vehicle!",22,255,0) setVehicleEngineState ( veh, false ) return end end setVehicleEngineState ( veh, true ) bindKey(source,"k","down",setEngineStateByPlayer) outputChatBox("Press 'K' to turn the engine on/off!",source) end addEventHandler ( "onPlayerVehicleEnter", getRootElement(), onPlayerEnterDayzVehicle ) Line 664, function setVehiclesFuelPerMinute: function setVehiclesFuelPerMinute () for i,veh in ipairs(getElementsByType("vehicle")) do if getVehicleEngineState(veh) == true then if not isElement(getElementData(veh,"parent")) then return end if getElementData(getElementData(veh,"parent"),"fuel") >= 0 then --setElementData(getElementData(veh,"parent"),"fuel",getElementData(getElementData(veh,"parent"),"fuel")-getVehicleFuelRemove(getElementModel(veh),getElementData(veh,"parent"))) setElementData(getElementData(veh,"parent"),"fuel",(getElementData(getElementData(veh,"parent"),"fuel") or 0)-(getVehicleFuelRemove(getElementModel(veh),getElementData(veh,"parent")) or 0)) else setVehicleEngineState ( veh, false ) end end end end setTimer(setVehiclesFuelPerMinute,20000,0) Link to comment
ArtekXDPL Posted July 12, 2015 Author Share Posted July 12, 2015 Thanks you, very much. Can you repair errors with debugmode? Example: DayZ\menu_client.lua:105: attempt to compare number with boolean DayZ\survival_System_client.lua:1382: Bad argument @ 'guiSetVisible' [Excepted gui element at argument 1, got boolean] DayZ\survival_System_client.lua:1383: Bad argument @ 'guiSetVisible' [Excepted gui element at argument 1, got boolean] Link to comment
ArtekXDPL Posted July 12, 2015 Author Share Posted July 12, 2015 (edited) menu_client.lua --Create Scroll Menü local spalten = {} local spalteGuiImage = {} local spalteGuiText = {} local optionsTable = { ["player"] = { {"Give Painkillers"}, {"Give Bandage"}, {"Give Morphine"}, }, } spalten[1] = "" spalten[2] = "" spalten[3] = "" spalten[4] = "" spalteGuiImage[1] = guiCreateStaticImage(0,0.45,0.1,0.025,"images/scrollmenu_1.png",true) spalteGuiImage[2] = guiCreateStaticImage(0,0.475,0.1,0.025,"images/scrollmenu_1.png",true) spalteGuiImage[3] = guiCreateStaticImage(0,0.5,0.1,0.025,"images/scrollmenu_1.png",true) spalteGuiImage[4] = guiCreateStaticImage(0,0.525,0.1,0.025,"images/scrollmenu_1.png",true) spalteGuiText[1] = guiCreateLabel(0.05,0.05,0.995,0.95,spalten[1],true,spalteGuiImage[1]) spalteGuiText[2] = guiCreateLabel(0.05,0.05,0.995,0.95,spalten[2],true,spalteGuiImage[2]) spalteGuiText[3] = guiCreateLabel(0.05,0.05,0.995,0.95,spalten[3],true,spalteGuiImage[3]) spalteGuiText[4] = guiCreateLabel(0.05,0.05,0.995,0.95,spalten[4],true,spalteGuiImage[4]) --guiLabelSetColor (spalteGuiText[1],50,255,50) guiSetVisible(spalteGuiImage[1],false) guiSetVisible(spalteGuiImage[2],false) guiSetVisible(spalteGuiImage[3],false) guiSetVisible(spalteGuiImage[4],false) ------------------------------------------------------------------------------ --MENU function showClientMenuItem(arg1,arg2,arg3,arg4) local number = 0 if arg1 == "Take" then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Take "..arg2) if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end setElementData(spalteGuiText[number],"usedItem",arg2) end if arg1 == "stop" then disableMenu() refreshLoot(false) end if arg1 == "Helicrashsite" then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Gear (Helicrash)") if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end setElementData(spalteGuiText[number],"usedItem","helicrashsite") end if arg1 == "Hospitalbox" then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Gear (Hospitalbox)") if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end setElementData(spalteGuiText[number],"usedItem","hospitalbox") end if arg1 == "Vehicle" then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Gear ("..arg2..")") guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) setElementData(spalteGuiText[number],"usedItem","vehicle") if getElementData(getElementData(arg3,"parent"),"tent") then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Remove Tent") if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end setElementData(spalteGuiText[number],"usedItem","tent") return end --2 if getElementHealth(arg3) < 1000 and getElementHealth(arg3) >= 50 and getElementData(getLocalPlayer(),"Toolbox") >= 1 then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Repair ("..arg2..")") setElementData(spalteGuiText[number],"usedItem","repairvehicle") end end if arg1 == "Player" then --1 if getElementData(arg2,"bleeding") > 0 and getElementData(getLocalPlayer(),"Bandage") >= 1 then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Give Bandage") guiLabelSetColor (spalteGuiText[1],50,255,50) setElementData(spalteGuiText[1],"markedMenuItem",true) setElementData(spalteGuiText[number],"usedItem","bandage") end if getElementData(arg2,"blood") < 11900 and getElementData(getLocalPlayer(),"Blood Bag") >= 1 then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Administer Blood Bag") setElementData(spalteGuiText[number],"usedItem","giveblood") if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end end end if arg1 == "Dead" then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Gear ("..arg2..")") if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end setElementData(spalteGuiText[number],"usedItem","dead") number = number+1 setElementData(spalteGuiText[number],"usedItem","deadreason") guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Check Body") end if arg1 == "Fireplace" then if getElementData(getLocalPlayer(),"Raw Meat") >= 1 then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Cook Meat") guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) setElementData(spalteGuiText[number],"usedItem","fireplace") end end if arg1 == "patrol" then if getElementData(getLocalPlayer(),"Empty Gas Canister") >= 1 then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Refill (Empty Gas Canister)") if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end setElementData(spalteGuiText[number],"usedItem","patrolstation") end end if arg1 == "Wirefence" then if getElementData(getLocalPlayer(),"Toolbox") >= 1 then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Remove Wirefence") if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end setElementData(spalteGuiText[number],"usedItem","wirefence") end end if arg1 == "Gear" then number = number+1 guiSetVisible(spalteGuiImage[number],true) guiSetText(spalteGuiText[number],"Gear") if number == 1 then guiLabelSetColor (spalteGuiText[number],50,255,50) setElementData(spalteGuiText[number],"markedMenuItem",true) end setElementData(spalteGuiText[number],"usedItem","itemloot") end end addEvent("showClientMenuItem",true) addEventHandler("showClientMenuItem",getLocalPlayer(),showClientMenuItem) function PlayerScrollMenu (key,keyState,arg) if ( keyState == "down" ) then if not guiGetVisible(spalteGuiImage[2]) then return end if arg == "up" then if getElementData(spalteGuiText[1],"markedMenuItem") then setElementData(spalteGuiText[1],"markedMenuItem",false) setElementData(spalteGuiText[2],"markedMenuItem",true) guiLabelSetColor (spalteGuiText[2],50,255,50) guiLabelSetColor (spalteGuiText[1],255,255,255) elseif getElementData(spalteGuiText[2],"markedMenuItem") then setElementData(spalteGuiText[2],"markedMenuItem",false) setElementData(spalteGuiText[1],"markedMenuItem",true) guiLabelSetColor (spalteGuiText[1],50,255,50) guiLabelSetColor (spalteGuiText[2],255,255,255) end elseif arg == "down" then if getElementData(spalteGuiText[1],"markedMenuItem") then setElementData(spalteGuiText[1],"markedMenuItem",false) setElementData(spalteGuiText[2],"markedMenuItem",true) guiLabelSetColor (spalteGuiText[2],50,255,50) guiLabelSetColor (spalteGuiText[1],255,255,255) elseif getElementData(spalteGuiText[2],"markedMenuItem") then setElementData(spalteGuiText[2],"markedMenuItem",false) setElementData(spalteGuiText[1],"markedMenuItem",true) guiLabelSetColor (spalteGuiText[1],50,255,50) guiLabelSetColor (spalteGuiText[2],255,255,255) end end end end bindKey ( "mouse_wheel_up", "down", PlayerScrollMenu, "up" ) bindKey ( "mouse_wheel_down", "down", PlayerScrollMenu, "down" ) function disableMenu() guiSetVisible(spalteGuiImage[1],false) guiSetVisible(spalteGuiImage[2],false) guiSetVisible(spalteGuiImage[3],false) guiSetVisible(spalteGuiImage[4],false) setElementData(spalteGuiText[1],"markedMenuItem",false) setElementData(spalteGuiText[2],"markedMenuItem",false) setElementData(spalteGuiText[3],"markedMenuItem",false) setElementData(spalteGuiText[4],"markedMenuItem",false) setNewbieInfo (false,"","") end addEvent("disableMenu",true) addEventHandler("disableMenu",getLocalPlayer(),disableMenu) ------------------------------------------------------------------------------ ------------------------------------------------------------------------------ --TAKE OBJECT FUNCTIONS function getPlayerInCol(tab) for theKey,thePlayer in ipairs(tab) do if thePlayer ~= getLocalPlayer() then return true end end return false end isInFirePlace = false function onPlayerTargetPickup (theElement) if theElement == getLocalPlayer() then if Edited July 12, 2015 by Guest Link to comment
GTX Posted July 12, 2015 Share Posted July 12, 2015 Line 103: if (getElementData(arg2,"bleeding") or 0) > 0 and (getElementData(getLocalPlayer(),"Bandage") or 0) >= 1 then Link to comment
ArtekXDPL Posted July 12, 2015 Author Share Posted July 12, 2015 Thanks you, im edit my early message. When im use: your Line 103 (menu_client.lua) errors: DayZ\survival_System_client.lua:1382: Bad argument @ 'guiSetVisible' [Excepted gui element at argument 1, got boolean] DayZ\survival_System_client.lua:1383: Bad argument @ 'guiSetVisible' [Excepted gui element at argument 1, got boolean] not show in debugmode. Next my errors: WARNING: [DayZ-MTA]\slothbot\sbserver.lua:1130: Bad argument @ 'setElementData' [Expected element at argument 1] WARNING: [DayZ-MTA]\slothbot\sbserver.lua:1131: Bad argument @ 'setElementData' [Expected element at argument 1] WARNING: [DayZ-MTA]\slothbot\sbserver.lua:1153: Bad argument @ 'setElementData' [Expected element at argument 1] WARNING: [DayZ-MTA]\slothbot\sbserver.lua:1133: Bad argument @ 'giveWeapon' [Expected element at argument 1] sbserver.lua --SERVER STUFF --when a bot dies, tells the bot what to do next function peddeath(ammo, attacker, weapon, bodypart) if (getElementData (source, "slothbot") == true) then -- if its a slothbot triggerEvent ( "onBotWasted", source, attacker, weapon, bodypart ) setElementData ( source, "status", "dead" ) local peds = getElementsByType ( "ped" ) for theKey,thePed in ipairs(peds) do if (getElementData ( thePed, "leader" ) == source ) then if (getElementData ( thePed, "status" ) == "following" ) then setElementData ( thePed, "leader", nil ) setTimer (beginsearch, 800, 1, thePed ) -- move on else setElementData ( thePed, "leader", nil ) end end if (getElementData ( thePed, "target" ) == source ) then setElementData ( thePed, "target", nil ) end end destroyElement(source) else -- if its a non slothbot ped if (attacker) then if (getElementType(attacker) == "ped") and (getElementData (attacker, "slothbot") == true) then --nothing (might add something later) end end end end addEventHandler("onPedWasted", getRootElement(), peddeath) --when a player dies, tells the bot what to do next function playerdeath( ammo, attacker, weapon, bodypart ) if (attacker) then if (getElementData (attacker, "slothbot") == true) then --nothing end end local peds = getElementsByType ( "ped" ) for theKey,thePed in ipairs(peds) do if (getElementData (thePed, "slothbot") == true) then if (getElementData ( thePed, "leader" ) == source ) then if (getElementData ( thePed, "status" ) == "following" ) then setTimer (beginsearch, 800, 1, thePed ) -- move on to the next target setElementData ( thePed, "leader", nil ) else setElementData ( thePed, "leader", nil ) end end if (getElementData ( thePed, "target" ) == source ) then setElementData ( thePed, "target", nil ) end end end end addEventHandler("onPlayerWasted", getRootElement(), playerdeath) --when a bot sees an enemy addEvent( "onBotFindEnemy", true ) function assigntarget ( player ) if ( not wasEventCancelled() ) then if (isElement(player)) and (getElementData (source, "slothbot") == true) then if (getElementData ( source, "target" ) ~= player ) and (getElementType ( player ) == "player") then setElementData ( source, "target", player ) if (getElementData ( source, "status" ) ~= "chasing" ) then assigncontroller(source) setElementData ( source, "status", "chasing" ) end elseif (getElementData ( source, "target" ) ~= player ) and (getElementType ( player ) == "ped") then setElementData ( source, "target", player ) if (getElementData ( source, "status" ) ~= chasing ) then assigncontroller(source) setElementData ( source, "status", "chasing" ) end end end end end addEventHandler( "onBotFindEnemy", getRootElement(), assigntarget ) --initializes the ped to start walking the paths addEvent( "onHuntStart", true ) function beginsearch (theped) if (isElement(theped)) then if (getElementData (theped, "slothbot") == true) then setElementData ( theped, "target", nil ) setElementData ( theped, "leader", nil ) assigncontroller(theped) setElementData ( theped, "status", "hunting" ) end end end addEventHandler( "onHuntStart", getRootElement(), beginsearch ) --detects what mode the ped is changed to and activates the correct behaviour (hunting, shooting, following, etc) function changestatus (dataName) if getElementType ( source ) == "ped" and dataName == "status" and (getElementData (source, "slothbot") == true) then if (getElementData ( source, "status" ) ~= "stasis" ) then local allshapes = getElementsByType ( "colshape" ) for SKey,theShape in ipairs(allshapes) do if (isElement(theShape)) then if getElementParent (theShape) == source then destroyElement (theShape) -- removes the target colshape that the ped was running towards in hunt mode end end end end if (getElementData ( source, "status" ) == "chasing" ) then local player = getElementData ( source, "target" ) local oldTx, oldTy, oldTz = getElementPosition( player ) local oldPx, oldPy, oldPz = getElementPosition( source ) setTimer ( chase_move, 700, 1, source, oldTx, oldTy, oldTz, oldPx, oldPy, oldPz ) elseif (getElementData ( source, "status" ) == "hunting" ) then setTimer ( findPath, 200, 1, source ) elseif (getElementData ( source, "status" ) == "waiting" ) then setTimer ( wait_mode, 200, 1, source ) elseif (getElementData ( source, "status" ) == "following" ) then local player = getElementData ( source, "leader" ) local oldTx, oldTy, oldTz = getElementPosition( player ) local oldPx, oldPy, oldPz = getElementPosition( source ) setTimer ( follow_move, 700, 1, source, oldTx, oldTy, oldTz, oldPx, oldPy, oldPz ) elseif (getElementData ( source, "status" ) == "guarding" ) then local px,py,pz = getElementPosition( source ) guard_move (source, px, py, pz) end end end addEventHandler( "onElementDataChange", getRootElement(), changestatus ) -- tells the bot how to chase enemies function chase_move (ped, oldTx, oldTy, oldTz, oldPx, oldPy, oldPz) if (isElement(ped)) then if (getElementData ( ped, "status" ) == "chasing" ) and (getElementData (ped, "slothbot") == true) then local px,py,pz = getElementPosition( ped ) local player = getElementData ( ped, "target" ) if (isElement(player)) then local tx,ty,tz = getElementPosition( player ) local pedhp = getElementHealth ( ped ) if getElementType(player) == "player" then if pedhp > 0 and (isPedDead(player) == false) then if (getElementData ( ped, "seestarget" ) == true ) then-- if the ped can see the target local inrange = 0 local tdist = (getDistanceBetweenPoints3D (px, py, pz, tx, ty, tz)) if (getPedWeaponSlot(ped) == 0 ) then -- fists triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 elseif (getPedWeaponSlot(ped) == 1 ) then -- melee triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 elseif (getPedWeaponSlot(ped) == 2 ) then -- pistols if tdist < 14 then triggerClientEvent ( "bot_Stop", ped ) inrange = 1 else triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 end elseif (getPedWeaponSlot(ped) == 3 ) then -- shotguns if tdist < 10 then triggerClientEvent ( "bot_Stop", ped ) inrange = 1 else triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 end elseif (getPedWeaponSlot(ped) == 4 ) then -- submachine if tdist < 7 then triggerClientEvent ( "bot_Stop", ped ) inrange = 1 else triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 end elseif (getPedWeaponSlot(ped) == 5 ) then -- assault if tdist < 14 then triggerClientEvent ( "bot_Stop", ped ) inrange = 1 else triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 end elseif (getPedWeaponSlot(ped) == 6 ) then --rifles if tdist < 22 then triggerClientEvent ( "bot_Stop", ped ) inrange = 1 else triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 end elseif (getPedWeaponSlot(ped) == 7 ) then --heavy if tdist < 12 then triggerClientEvent ( "bot_Stop", ped ) inrange = 1 else triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 end elseif (getPedWeaponSlot(ped) == 8 ) then --projectiles (dont work afaik) triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 elseif (getPedWeaponSlot(ped) == 9 ) then -- special if tdist < 2 then triggerClientEvent ( "bot_Stop", ped ) inrange = 1 else triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 end elseif (getPedWeaponSlot(ped) == 10 ) then -- gifts triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 elseif (getPedWeaponSlot(ped) == 11 ) then -- special2 triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 elseif (getPedWeaponSlot(ped) == 12 ) then -- detonator triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 else -- probably useless part. triggerClientEvent ( "bot_Forwards", ped ) inrange = 0 end local pdistance = (getDistanceBetweenPoints3D (oldPx, oldPy, oldPz, px, py, pz)) if (pdistance < 1 ) and (inrange == 0 ) then -- if the ped is stuck but not in range of the player local weap = getPedWeaponSlot(ped) if (weap == 1) or (weap == 7) then setPedWeaponSlot(ped, 0 ) triggerClientEvent ( "bot_Jump", ped ) setTimer ( setPedWeaponSlot, 850, 1, ped, weap) else triggerClientEvent ( "bot_Jump", ped ) end setTimer ( chase_move, 600, 1, ped, tx, ty, tz, px, py, pz) else setTimer ( chase_move, 600, 1, ped, tx, ty, tz, px, py, pz) end else -- if the ped cant see the target triggerClientEvent ( "bot_Forwards", ped ) local pdistance = (getDistanceBetweenPoints3D (oldPx, oldPy, oldPz, px, py, pz)) if (pdistance < 1.2 ) then --if the ped is stuck local decide = math.random( 1, 7 ) -- randomly decide to if decide == 1 then -- give up chasing and go back on the hunt setTimer (beginsearch, 800, 1, ped ) elseif decide <4 then -- jump local weap = getPedWeaponSlot(ped) if (weap == 1) or (weap == 7) then setPedWeaponSlot(ped, 0 ) triggerClientEvent ( "bot_Jump", ped ) setTimer ( setPedWeaponSlot, 850, 1, ped, weap) else Link to comment
GTX Posted July 12, 2015 Share Posted July 12, 2015 survival_System_client.lua: Completely remove lines 1372 and 1373: setTimer(guiSetVisible,5000,1,false) setTimer(guiSetVisible,5000,1,false) sbserver.lua: Line 1128: if (slothbot ~= false) and (isElement(slothbot)) then Link to comment
ArtekXDPL Posted July 12, 2015 Author Share Posted July 12, 2015 WARNING: slothbot\sbclient.lua:8: Bad argument @ 'getElementPosition' [Excepted element at argument 1, got boolean] sbclient.lua --CLIENT STUFF --detects when a bot changes status and starts the new behaviour function changestatus (dataName) if getElementType ( source ) == "ped" and dataName == "status" and (getElementData (source, "slothbot") == true) then if (getElementData ( source, "status" ) == "chasing" ) then local player = getElementData ( source, "target" ) local oldTx, oldTy, oldTz = getElementPosition( player ) local oldPx, oldPy, oldPz = getElementPosition( source ) setTimer ( chase_aim, 80, 1, source) setTimer ( chase_move, 700, 1, source, oldTx, oldTy, oldTz, oldPx, oldPy, oldPz ) setTimer ( chase_shoot, 1500, 1, source ) elseif (getElementData ( source, "status" ) == "hunting" ) then local oldPx, oldPy, oldPz = getElementPosition( source ) setTimer ( enemy_check, 600 ,1 , source )-- starts scanning for enemies setTimer ( hunt_move, 800, 1, source, oldPx, oldPy, oldPz, oldPx, oldPy, oldPz ) elseif (getElementData ( source, "status" ) == "following" ) then local player = getElementData ( source, "leader" ) local oldTx, oldTy, oldTz = getElementPosition( player ) local oldPx, oldPy, oldPz = getElementPosition( source ) setTimer ( follow_enemy_check, 500 ,1 , source ) setTimer ( follow_move, 800, 1, source, oldPx, oldPy, oldPz, oldPx, oldPy, oldPz ) elseif (getElementData ( source, "status" ) == "waiting" ) then setTimer ( wait_enemy_check, 500 ,1 , source ) elseif (getElementData ( source, "status" ) == "guarding" ) then setTimer ( guard_enemy_check, 800 ,1 , source )-- starts scanning for enemies setTimer ( guard_move, 400 ,1 , source ) end end end addEventHandler( "onClientElementDataChange", getRootElement(), changestatus ) --keeps the bot's aim slightly lagged function chase_aim(ped) if (isElement(ped)) then local player = getElementData ( ped, "target" ) if (getElementData ( ped, "status" ) == "chasing" ) and (isElement(player)) and (getElementData (ped, "slothbot") == true) then if getElementType(player) == "player" then local pedhp = getElementHealth ( ped ) if pedhp > 0 and (isPedDead(player) == false) then local x,y,z = getElementPosition( player ) local ex,ey,ez = getElementPosition( ped ) local isclear = isLineOfSightClear (ex, ey, ez+.6, x, y, z+.6, true, false, false, true, false, false, false) if (isclear == true) then -- if the player target is in sight if isPedDucked(player) then setPedAimTarget ( ped, x, y, z-.5 ) else setPedAimTarget ( ped, x, y, z ) end end setTimer ( chase_aim, 80, 1, ped, player ) end elseif getElementType(player) == "ped" then local pedhp = getElementHealth ( ped ) if pedhp > 0 and (getElementHealth(player) > 0) then local x,y,z = getElementPosition( player ) local ex,ey,ez = getElementPosition( ped ) local isclear = isLineOfSightClear (ex, ey, ez+.6, x, y, z+.6, true, false, false, true, false, false, false) if (isclear == true) then -- if the player target is in sight if isPedDucked(player) then setPedAimTarget ( ped, x, y, z-.5 ) else setPedAimTarget ( ped, x, y, z ) end end setTimer ( chase_aim, 80, 1, ped, player ) end end end end end --bot behaviour while in chase mode function chase_move (ped, oldTx, oldTy, oldTz, oldPx, oldPy, oldPz) if (isElement(ped)) then local thetarget = getElementData ( ped, "target" ) if (getElementData ( ped, "status" ) == "chasing" ) and (isElement(thetarget)) and (getElementData (ped, "slothbot") == true) then local pedhp = getElementHealth ( ped ) local tarhp = getElementHealth ( thetarget ) if pedhp > 0 and tarhp > 0 then local tx,ty,tz = getElementPosition( thetarget ) local px,py,pz = getElementPosition( ped ) local isclear = isLineOfSightClear (px, py, pz+.6, tx, ty, tz+.6, true, false, false, true, false, false, false) local angle = ( 360 - math.deg ( math.atan2 ( ( tx - px ), ( ty - py ) ) ) ) % 360 --set the peds angle to the target setPedRotation( ped, angle ) if (isclear == true) then -- if the ped can see the target local angle = ( 360 - math.deg ( math.atan2 ( ( tx - px ), ( ty - py ) ) ) ) % 360 --set the peds angle to the target setPedRotation( ped, angle ) setElementData ( ped, "seestarget", true ) setTimer ( chase_move, 700, 1, ped, tx, ty, tz, px, py, pz) else local angle = ( 360 - math.deg ( math.atan2 ( ( oldTx - px ), ( oldTy - py ) ) ) ) % 360 --set the peds angle to the target setPedRotation( ped, angle ) setElementData ( ped, "seestarget", false ) setTimer ( chase_move, 700, 1, ped, oldTx, oldTy, oldTz, px, py, pz) end end end end end --tells the bot when to fire its gun. (only run by the peds controller) function chase_shoot(ped) if (isElement(ped)) then local player = getElementData ( ped, "target" ) if (isElement(player)) and (getElementData (ped, "slothbot") == true) then if (getElementType(player) == "ped") or (getElementType(player) == "player") then if (getElementData ( ped, "status" ) == "chasing" ) and (isElement(player)) then if (getElementHealth(ped)>0) and (getElementHealth(player)>0) and (getElementData ( ped, "controller" ) == getLocalPlayer()) then local x,y,z = getElementPosition( player ) local ex,ey,ez = getElementPosition( ped ) local isclear = isLineOfSightClear (ex, ey, ez+1, x, y, z+1, true, false, false, true, false, false, false) if isclear == true then -- if the ped can see the local player local distance = (getDistanceBetweenPoints3D (ex, ey, ez, x, y, z)) if (getPedWeapon(ped) < 19) and (getPedWeapon(ped) ~= 9) then -- if its a melee weapon hat isnt a chainsaw if (distance < 2 ) then triggerServerEvent ( "pedShootTrigger", ped, "melee" ) setTimer ( chase_shoot, 2300, 1, ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 9) then -- if it is a chainsaw (watch out, the peds are deadly with these) if (distance < 2 ) then local length = 1500 triggerServerEvent ( "pedShootTrigger", ped, "chainsawA", length ) setTimer ( chase_shoot, 6000, 1, ped, player ) else local length = math.random( 2100, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "chainsawB", length ) setTimer ( chase_shoot, length+900 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 22) then if (distance < 35 ) then local length = math.random( 2100, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+500 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 23) then if (distance < 35 ) then local length = math.random( 2000, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+400 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 24) then if (distance < 35 ) then local length = math.random( 2000, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+400 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 25) then if (distance < 27 ) then local length = 300 triggerServerEvent ( "pedShootTrigger", ped, "gun", length) setTimer ( chase_shoot, 1400 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 26) then if (distance < 20 ) then local length = 1200 triggerServerEvent ( "pedShootTrigger", ped, "gun", length) setTimer ( chase_shoot, 800 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 27) then if (distance < 25 ) then local length = 1200 triggerServerEvent ( "pedShootTrigger", ped, "gun", length) setTimer ( chase_shoot, 1800 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 28) then if (distance < 40 ) then local length = math.random( 2100, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+500 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 29) then if (distance < 55 ) then local length = math.random( 2000, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+1500 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 30) then if (distance < 60 ) then local length = math.random( 2000, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+1500 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 31) then if (distance < 60 ) then local length = 700 triggerServerEvent ( "pedShootTrigger", ped, "gun", length) setTimer ( chase_shoot, 1200 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 32) then if (distance < 30 ) then local length = math.random( 2000, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+600 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 33) then if (distance < 75 ) then local length = 400 triggerServerEvent ( "pedShootTrigger", ped, "gun", length) setTimer ( chase_shoot, 1600 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 34) then if (distance < 75 ) then triggerServerEvent ( "pedShootTrigger", ped, "sniper") setTimer ( chase_shoot, 2000 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 37) then if (distance < 15 ) then local length = math.random( 2000, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+900 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif (getPedWeapon(ped) == 38) then if (distance < 65 ) then local length = math.random( 2000, 5500 ) triggerServerEvent ( "pedShootTrigger", ped, "gun", length ) setTimer ( chase_shoot, length+900 ,1 , ped, player ) else setTimer ( chase_shoot, 1500 ,1 , ped, player ) end elseif ( Link to comment
GTX Posted July 12, 2015 Share Posted July 12, 2015 Line 5: if getElementType ( source ) == "ped" and dataName == "status" and (getElementData (source, "slothbot") == true) and (isElement(player)) then Link to comment
ArtekXDPL Posted July 12, 2015 Author Share Posted July 12, 2015 Im wrong, again. This is correct error message: WARNING: slothbot\sbclient.lua:8: Bad argument @ 'getElementPosition' [Excepted element at argument 1, got nill] Link to comment
GTX Posted July 12, 2015 Share Posted July 12, 2015 It's impossible. Are you sure it's error on line 8? Did you restart resource? Link to comment
ArtekXDPL Posted July 12, 2015 Author Share Posted July 12, 2015 This error be solved. Im tested 3 times, and not show this error. Its error must be fixed. Of course, thanks you for help. WARNING: dayz_admin\client.lua:176: Bad argument @ 'guiLabelSetColor' [Excepted gui element at argument 1, got nill] WARNING: dayz_admin\client.lua:565: Bad argument @ 'guiSetText' [Excepted gui element at argument 1, got nill] WARNING: dayz_admin\client.lua:589: Bad argument @ 'killTimer' [Excepted lua-timer element at argument 1, got nill] client.lua local isVisible = false local items = { ["Weapons"] = { "M4", "AK-47", "CZ 550", "Lee Enfield", "Winchester 1866", "SPAZ-12 Combat Shotgun", "Sawn-Off Shotgun", "M1911", "M9 SD", "Desert Eagle", "PDW", "MP5A5", "Binoculars", "Grenade", "Hatchet", "Hunting Knife", "Baseball Bat", "Shovel", "Golf Club" , "Tear Gas" , "Parachute", }, ["Ammo"] = { "M4 Mag", "AK Mag", "CZ 550 Mag", "Lee Enfield Mag", "1866 Slug", "SPAZ-12 Pellet", "2Rnd. Slug", "M1911 Mag", "M9 SD Mag", "Desert Eagle Mag", "PDW Mag", "MP5A5 Mag" }, ["Food & Drinks"] = { "Water Bottle", "Soda Bottle", "Milk", "Cooked Meat", "Pasta Can", "Beans Can", "Burger", "Pizza", "Empty Water Bottle", "Raw Meat" }, ["Backpacks"] = { "Assault Pack (ACU)", "Alice Pack", "Czech Backpack", "Coyote Backpack" }, ["Toolbelt"] = { "Map", "GPS", "Toolbox", "Infrared Goggles", "Night Vision Goggles", "Box of Matches", "Watch", "Radio Device" }, ["Medical"] = { "Bandage", "Painkiller", "Morphine", "Medic Kit", "Blood Bag", "Heat Pack" }, ["Car Parts"] = { "Tire", "Engine", "Tank Parts" }, ["Clothes"] = { "Survivor Clothing", "Civilian Clothing", "Camouflage Clothing", "Ghillie Suit", }, ["Items"] = { "Wood Pile", "Empty Gas Canister", "Full Gas Canister", "Roadflare", "Wire Fence", "Tent" } } addEventHandler("onClientResourceStart", getRootElement(), function() local screenWidth, screenHeight = guiGetScreenSize() local windowWidth, windowHeight = 620, 520 local windowX, windowY = (screenWidth / 2) - (windowWidth / 2), (screenHeight / 2) - (windowHeight / 2) mainWnd = guiCreateWindow(windowX, windowY, windowWidth, windowHeight, "DayZ Admin Panel", false) guiCreateLabel(530, 22, 127, 15, "by Steady", false, mainWnd) guiWindowSetMovable(mainWnd, false) guiWindowSetSizable(mainWnd, false) guiSetVisible(mainWnd, false) guiSetInputMode("no_binds_when_editing") --Tab Panel main_tabPanel = guiCreateTabPanel(9, 20, 601, 490, false, mainWnd) --Tabs main_tab_players = guiCreateTab("Players", main_tabPanel) main_tab_items = guiCreateTab("Items", main_tabPanel) main_tab_vehicles = guiCreateTab("Vehicles", main_tabPanel) --Players Tab --Gridlists players_gridlist_players = guiCreateGridList(10, 10, 180, 446, false, main_tab_players) guiGridListAddColumn(players_gridlist_players, "Players:", 0.9) --Labels --Top players_label_targetName = guiCreateLabel(200, 13, 127, 15, "Name: N/A", false, main_tab_players) players_label_targetPing = guiCreateLabel(200, 38, 127, 15, "Ping: N/A", false, main_tab_players) --Gameplay Area local players_label_gameplayText = guiCreateLabel(200, 111, 164, 15, "Gameplay", false, main_tab_players) guiSetFont(players_label_gameplayText, "default-bold-small") guiLabelSetColor(players_label_gameplayText, 255, 0, 0) --x-- players_label_targetBlood = guiCreateLabel(200, 136, 164, 15, "Blood: N/A", false, main_tab_players) players_label_targetWeapon = guiCreateLabel(200, 161, 164, 15, "Weapon: N/A", false, main_tab_players) players_label_targetSkin = guiCreateLabel(200, 186, 164, 15, "Skin: N/A", false, main_tab_players) players_label_targetBackpack = guiCreateLabel(200, 211, 164, 15, "Backpack: N/A", false, main_tab_players) players_label_targetTeam = guiCreateLabel(200, 236, 164, 15, "Team: N/A", false, main_tab_players) players_label_targetLevel = guiCreateLabel(200, 261, 164, 15, "Level: N/A", false, main_tab_players) --players_label_targetMoney = guiCreateLabel(200, 261, 164, 15, "Money: N/A", false, main_tab_players) players_label_targetZone = guiCreateLabel(200, 286, 164, 15, "Zone: N/A", false, main_tab_players) players_label_targetArea = guiCreateLabel(200, 311, 164, 15, "Area: N/A", false, main_tab_players) guiLabelSetColor(players_label_targetMoney, 5, 255, 0) --Money Color --Stats Area players_label_statsText = guiCreateLabel(456, 111, 135, 15, "Stats", false, main_tab_players) guiSetFont(players_label_statsText, "default-bold-small") guiLabelSetColor(players_label_statsText, 255, 0, 0) --x-- players_label_murders = guiCreateLabel(456, 136, 135, 15, "Murders: N/A", false, main_tab_players) players_label_bandits = guiCreateLabel(456, 161, 135, 15, "Bandits Killed: N/A", false, main_tab_players) players_label_headshots = guiCreateLabel(456, 186, 135, 15, "Headshots: N/A", false, main_tab_players) players_label_zombieskilled = guiCreateLabel(456, 211, 135, 15, "Zombies Killed: N/A", false, main_tab_players) players_label_temperature = guiCreateLabel(456, 236, 135, 15, "Temperature: N/A", false, main_tab_players) players_label_humanity = guiCreateLabel(456, 261, 135, 15, "Humanity: N/A", false, main_tab_players) --Buttons players_edit_blood = guiCreateEdit(456, 13, 135, 25, "", false, main_tab_players) players_button_setBlood = guiCreateButton(456, 48, 135, 20, "Set Blood", false, main_tab_players) players_button_killTarget = guiCreateButton(456, 78, 135, 20, "Kill", false, main_tab_players) players_button_warpToTarget = guiCreateButton(200, 366, 135, 40, "Warp to player", false, main_tab_players) players_button_warpTargetTo = guiCreateButton(200, 416, 135, 40, "Warp player to..", false, main_tab_players) guiSetFont(players_button_setBlood, "default-bold-small") --Set Blood Font guiSetFont(players_button_killTarget, "default-bold-small") --Kill Font guiSetFont(players_button_warpToTarget, "default-bold-small") --Warp to Player Font guiSetFont(players_button_warpTargetTo, "default-bold-small") --Warp Player To Font --Vehicle players_label_vehicle_name = guiCreateLabel(456, 311, 135, 15, "Vehicle: None", false, main_tab_players) players_label_vehicle_health = guiCreateLabel(456, 336, 135, 15, "Vehicle Health: N/A", false, main_tab_players) guiCreateLabel(456, 286, 135, 15, "_____________________________________________", false, main_tab_players) players_button_fixVehicle = guiCreateButton(456, 367, 135, 20, "Fix", false, main_tab_players) players_button_destroyVehicle = guiCreateButton(456, 396, 135, 20, "Destroy", false, main_tab_players) players_button_blowVehicle = guiCreateButton(456, 425, 135, 20, "Blow", false, main_tab_players) guiSetFont(players_button_fixVehicle, "default-bold-small") guiSetFont(players_button_destroyVehicle, "default-bold-small") guiSetFont(players_button_blowVehicle, "default-bold-small") --Items Tab --Gridlists items_gridlist_players = guiCreateGridList(10, 10, 180, 444, false, main_tab_items) guiGridListAddColumn(items_gridlist_players, "Players:", 0.9) Link to comment
GTX Posted July 12, 2015 Share Posted July 12, 2015 Remove line 176. Remove line 565. Line 589: if isTimer(timer) then killTimer(timer) end Link to comment
ArtekXDPL Posted July 12, 2015 Author Share Posted July 12, 2015 WARNING: dayz_admin\client.lua:457: Bad argument @ 'guiSetText' [Excepted gui element at argument 1, got nill] client.lua local isVisible = false local items = { ["Weapons"] = { "M4", "AK-47", "CZ 550", "Lee Enfield", "Winchester 1866", "SPAZ-12 Shotgun", "Sawn-Off Shotgun", "M1911", "M9 SD", "Desert Eagle", "PDW", "MP5A5", "Binoculars", "Grenade", "Hatchet", "Hunting Knife", "Baseball Bat", "Shovel", "Golf Club" }, ["Ammo"] = { "M4 Mag", "AK Mag", "CZ 550 Mag", "Lee Enfield Mag", "1866 Slug", "SPAZ-12 Pellet", "2Rnd. Slug", "M1911 Mag", "M9 SD Mag", "Desert Eagle Mag", "PDW Mag", "MP5A5 Mag" }, ["Food & Drinks"] = { "Water Bottle", "Soda Bottle", "Milk", "Cooked Meat", "Pasta Can", "Beans Can", "Burger", "Pizza", "Empty Water Bottle", "Raw Meat" }, ["Backpacks"] = { "Patrol Pack", "Alice Pack", "Czech Backpack", "Coyote Backpack" }, ["Toolbelt"] = { "Map", "GPS", "Toolbox", "Infrared Goggles", "Night Vision Goggles", "Box of Matches", "Watch", "Radio Device" }, ["Medical"] = { "Bandage", "Painkiller", "Morphine", "Medic Kit", "Blood Bag", "Heat Pack" }, ["Car Parts"] = { "Tire", "Engine", "Tank Parts" }, ["Clothes"] = { "Survivor Clothing", "Civilian Clothing", "Camouflage Clothing", "Ghillie Suit", }, ["Items"] = { "Wood Pile", "Empty Gas Canister", "Full Gas Canister", "Roadflare", "Wire Fence", "Tent" } } addEventHandler("onClientResourceStart", getRootElement(), function() local screenWidth, screenHeight = guiGetScreenSize() local windowWidth, windowHeight = 620, 520 local windowX, windowY = (screenWidth / 2) - (windowWidth / 2), (screenHeight / 2) - (windowHeight / 2) mainWnd = guiCreateWindow(windowX, windowY, windowWidth, windowHeight, "DayZ Admin Panel", false) guiCreateLabel(530, 22, 127, 15, "by Steady", false, mainWnd) guiWindowSetMovable(mainWnd, false) guiWindowSetSizable(mainWnd, false) guiSetVisible(mainWnd, false) guiSetInputMode("no_binds_when_editing") --Tab Panel main_tabPanel = guiCreateTabPanel(9, 20, 601, 490, false, mainWnd) --Tabs main_tab_players = guiCreateTab("Players", main_tabPanel) main_tab_items = guiCreateTab("Items", main_tabPanel) main_tab_vehicles = guiCreateTab("Vehicles", main_tabPanel) --Players Tab --Gridlists players_gridlist_players = guiCreateGridList(10, 10, 180, 446, false, main_tab_players) guiGridListAddColumn(players_gridlist_players, "Players:", 0.9) --Labels --Top players_label_targetName = guiCreateLabel(200, 13, 127, 15, "Name: N/A", false, main_tab_players) players_label_targetPing = guiCreateLabel(200, 38, 127, 15, "Ping: N/A", false, main_tab_players) --Gameplay Area local players_label_gameplayText = guiCreateLabel(200, 111, 164, 15, "Gameplay", false, main_tab_players) guiSetFont(players_label_gameplayText, "default-bold-small") guiLabelSetColor(players_label_gameplayText, 255, 0, 0) --x-- players_label_targetBlood = guiCreateLabel(200, 136, 164, 15, "Blood: N/A", false, main_tab_players) players_label_targetWeapon = guiCreateLabel(200, 161, 164, 15, "Weapon: N/A", false, main_tab_players) players_label_targetSkin = guiCreateLabel(200, 186, 164, 15, "Skin: N/A", false, main_tab_players) players_label_targetBackpack = guiCreateLabel(200, 211, 164, 15, "Backpack: N/A", false, main_tab_players) players_label_targetTeam = guiCreateLabel(200, 236, 164, 15, "Team: N/A", false, main_tab_players) players_label_targetLevel = guiCreateLabel(200, 261, 164, 15, "Level: N/A", false, main_tab_players) players_label_targetMoney = guiCreateLabel(200, 261, 164, 15, "Money: N/A", false, main_tab_players) players_label_targetZone = guiCreateLabel(200, 286, 164, 15, "Zone: N/A", false, main_tab_players) -- DO SKASOWANIA -- players_label_targetArea = guiCreateLabel(200, 311, 164, 15, "Area: N/A", false, main_tab_players) -- guiLabelSetColor(players_label_targetMoney, 5, 255, 0) --Money Color --Stats Area players_label_statsText = guiCreateLabel(456, 111, 135, 15, "Stats", false, main_tab_players) guiSetFont(players_label_statsText, "default-bold-small") guiLabelSetColor(players_label_statsText, 255, 0, 0) --x-- players_label_murders = guiCreateLabel(456, 136, 135, 15, "Murders: N/A", false, main_tab_players) players_label_bandits = guiCreateLabel(456, 161, 135, 15, "Bandits Killed: N/A", false, main_tab_players) players_label_headshots = guiCreateLabel(456, 186, 135, 15, "Headshots: N/A", false, main_tab_players) players_label_zombieskilled = guiCreateLabel(456, 211, 135, 15, "Zombies Killed: N/A", false, main_tab_players) players_label_temperature = guiCreateLabel(456, 236, 135, 15, "Temperature: N/A", false, main_tab_players) players_label_humanity = guiCreateLabel(456, 261, 135, 15, "Humanity: N/A", false, main_tab_players) --Buttons players_edit_blood = guiCreateEdit(456, 13, 135, 25, "", false, main_tab_players) players_button_setBlood = guiCreateButton(456, 48, 135, 20, "Set Blood", false, main_tab_players) players_button_killTarget = guiCreateButton(456, 78, 135, 20, "Kill", false, main_tab_players) players_button_warpToTarget = guiCreateButton(200, 366, 135, 40, "Warp to player", false, main_tab_players) players_button_warpTargetTo = guiCreateButton(200, 416, 135, 40, "Warp player to..", false, main_tab_players) guiSetFont(players_button_setBlood, "default-bold-small") --Set Blood Font guiSetFont(players_button_killTarget, "default-bold-small") --Kill Font guiSetFont(players_button_warpToTarget, "default-bold-small") --Warp to Player Font guiSetFont(players_button_warpTargetTo, "default-bold-small") --Warp Player To Font --Vehicle players_label_vehicle_name = guiCreateLabel(456, 311, 135, 15, "Vehicle: None", false, main_tab_players) players_label_vehicle_health = guiCreateLabel(456, 336, 135, 15, "Vehicle Health: N/A", false, main_tab_players) guiCreateLabel(456, 286, 135, 15, "_____________________________________________", false, main_tab_players) players_button_fixVehicle = guiCreateButton(456, 367, 135, 20, "Fix", false, main_tab_players) players_button_destroyVehicle = guiCreateButton(456, 396, 135, 20, "Destroy", false, main_tab_players) players_button_blowVehicle = guiCreateButton(456, 425, 135, 20, "Blow", false, main_tab_players) guiSetFont(players_button_fixVehicle, "default-bold-small") guiSetFont(players_button_destroyVehicle, "default-bold-small") guiSetFont(players_button_blowVehicle, "default-bold-small") --Items Tab --Gridlists items_gridlist_players = guiCreateGridList(10, 10, 180, 444, false, main_tab_items) guiGridListAddColumn(items_gridlist_players, "Players:", 0.9) items_gridlist_items = guiCreateGridList(406, 51, 185, 300, false, main_tab_items) items_combobox = guiCreateComboBox(406, 13, 185, 190, "Category", false, main_tab_items) guiComboBoxAddItem(items_combobox, "Weapons") guiComboBoxAddItem(items_combobox, "Ammo") guiComboBoxAddItem(items_combobox, "Food & Drinks") guiComboBoxAddItem(items_combobox, "Items") guiComboBoxAddItem(items_combobox, "Medical") guiComboBoxAddItem(items_combobox, "Toolbelt") guiComboBoxAddItem(items_combobox, "Clothes") guiComboBoxAddItem(items_combobox, "Car Parts") guiComboBoxAddItem(items_combobox, "Backpacks") --Label --Top items_label_targetName = guiCreateLabel(197, 13, 150, 15, "Player: ", false, main_tab_items) items_label_targetSlots = guiCreateLabel(197, 36, 150, 15, "Slots: ", false, main_tab_items) items_label_targetZone = guiCreateLabel(197, 61, 150, 15, "Zone: ", false, main_tab_items) --Down items_label_quantity = guiCreateLabel(406, 362, 185, 15, "Quantity:", false, main_tab_items) guiSetFont(items_label_quantity, "clear-normal") items_edit_quantity = guiCreateEdit(406, 387, 185, 30, "", false, main_tab_items) --Button items_button_give = guiCreateButton(406, 427, 185, 30, "Give", false, main_tab_items) guiSetFont(items_button_give, "default-bold-small") --Vehicles Tab --Gridlists vehicles_gridlist_players = guiCreateGridList(10, 10, 180, 444, false, main_tab_vehicles) guiGridListAddColumn(vehicles_gridlist_players, "Players:", 0.9) vehicles_gridlist_vehicles = guiCreateGridList(411, 10, 180, 444, false, main_tab_vehicles) guiGridListAddColumn(vehicles_gridlist_vehicles, "Vehicles:", 0.9) for i = 1, 17 do guiGridListAddRow(vehicles_gridlist_vehicles) end guiGridListSetItemText(vehicles_gridlist_vehicles, 0, 1, "Bobcat", false, false) guiGridListSetItemText(vehicles_gridlist_vehicles, 1, 1, "Patriot", false, false) guiGridListSetItemText(vehicles_gridlist_vehicles, 2, 1, "Sanchez", false, false) guiGridListSetItemText(vehicles_gridlist_vehicles, 5, 1, "Barracks", false, false) guiGridListSetItemText(vehicles_gridlist_vehicles, 6, 1, "Coach", false, false) guiGridListSetItemText(vehicles_gridlist_vehicles, 7, 1, "Bike", false, false) guiGridListSetItemText(vehicles_gridlist_vehicles, 8, 1, "Reefer", false, false) guiGridListSetItemText(vehicles_gridlist_vehicles, 11, 1, "Maverick", false, false) guiGridListSetItemText(vehicles_gridlist_vehicles, 12, 1, "Police Maverick", false, false) guiGridListSetItemColor(vehicles_gridlist_vehicles, 14, 1, 255, 0, 0, 255) guiGridListSetItemColor(vehicles_gridlist_vehicles, 15, 1, 255, 0, 0, 255) guiGridListSetItemColor(vehicles_gridlist_vehicles, 16, 1, 255, 0, 0, 255) --Button vehicles_button_spawn = guiCreateButton(198, 387, 203, 69, "Spawn", false, main_tab_vehicles) guiSetFont(vehicles_button_spawn, "default-bold-small") --Functions local players_playerRow = {} guiGridListClear(players_gridlist_players) for index, player in ipairs(getElementsByType("player")) do local row = guiGridListAddRow(players_gridlist_players) guiGridListSetItemText(players_gridlist_players, row, 1, getPlayerName(player):gsub("#%x%x%x%x%x%x", ""), false, false) players_playerRow[player] = row end local items_playerRow = {} guiGridListClear(items_gridlist_players) for index, player in ipairs(getElementsByType("player")) do local row = guiGridListAddRow(items_gridlist_players) Link to comment
ArtekXDPL Posted July 12, 2015 Author Share Posted July 12, 2015 WARNING: login\login_client.lua:302: Bad usage @ 'addEventHandler' ['onClientRender' with this function is already handled] resourceRoot = getResourceRootElement( getThisResource( ) ) localPlayer = getLocalPlayer() versionstring = "MTA:DayZ\n[url=http://www.mtadayz.net]www.mtadayz.net[/url]\n\nVersion: 0.6\nLast Update: 03.12.2013" infoTable = {} Login_Edit = {} marwinButtons = {} sx,sy = guiGetScreenSize() font = {} scale = 1 if sx < 1152 then scale = sx/1152 end if sx < 1024 then outputChatBox("We highly recommend you to at least use 1024x768 as resolution", 255, 0, 0) end font[-1] = guiCreateFont( "font2.ttf", 8*scale ) font[0] = guiCreateFont( "font.ttf", 14*scale ) font[1] = guiCreateFont( "font.ttf", 18*scale ) font[2] = guiCreateFont( "font.ttf", 20*scale ) font[3] = guiCreateFont( "font.ttf", 24*scale ) --Button function createMarwinButton(x,y,widht,height,text,bool,parent,info) button = guiCreateStaticImage(x,y,widht,height,"images/button_standard.png", bool,parent or nil) table.insert(marwinButtons,button) guiBringToFront(button) label = guiCreateLabel(0,0,1,1,text,bool,button) guiBringToFront(label) setElementData(label,"parent",button) setElementData(button,"info",info) guiSetFont(label,font[1]) guiLabelSetVerticalAlign (label, "center") guiLabelSetHorizontalAlign (label, "center") addEventHandler("onClientMouseEnter",label,markButton,false) addEventHandler("onClientMouseLeave",label,unmarkButton,false) return label end function markButton () parent = getElementData(source,"parent") guiStaticImageLoadImage (parent,"images/button_mouse.png") setElementData(getLocalPlayer(),"clickedButton",parent) playSound("button.mp3") end function unmarkButton (b,s) parent = getElementData(source,"parent") guiStaticImageLoadImage (parent,"images/button_standard.png") setElementData(getLocalPlayer(),"clickedButton",false) end --Button end function build_loginWin() guiSetInputMode("no_binds_when_editing") showCursor(true) --transfer old login data to new secure place oldFile = xmlLoadFile("preferencesL.xml") confFile = xmlLoadFile("@preferencesL.xml") if not confFile and oldFile then confFile = xmlCreateFile("@preferencesL.xml","user") local usr = xmlNodeGetAttribute(oldFile,"username") local pass = xmlNodeGetAttribute(oldFile,"pass") xmlNodeSetAttribute(confFile, "username", usr) xmlNodeSetAttribute(confFile, "pass", pass) xmlSaveFile(confFile) end if oldFile then xmlUnloadFile(oldFile) end -- confFile = xmlLoadFile("@preferencesL.xml") if (confFile) then infoTable["account"] = xmlNodeGetAttribute(confFile,"username") infoTable["pass"] = xmlNodeGetAttribute(confFile,"pass") else confFile = xmlCreateFile("@preferencesL.xml","user") xmlNodeSetAttribute(confFile,"username","") xmlNodeSetAttribute(confFile,"pass","") infoTable["account"] = getPlayerName(localPlayer) infoTable["pass"] = "" end xmlSaveFile(confFile) --is this even needed? --[[confFile = xmlLoadFile("@preferences.xml") if (confFile) then xmlNodeSetAttribute(confFile,"username","") xmlNodeSetAttribute(confFile,"pass","") end]] --Create Window --Background background_front = guiCreateStaticImage( 0.2, 0.25, 0.6, 0.5, "images/background_1.png", true ) tab_front = guiCreateStaticImage( 0, 0, 1, 0.075, "images/tab.png", true ,background_front) --Header Text headline = guiCreateLabel(0,0.15,1,0.8,"MTA:DayZ I LOGIN PANEL",true,tab_front) guiSetFont(headline,font[2]) guiLabelSetHorizontalAlign (headline, "center") --Version guestInfo = guiCreateLabel(0.025, 0.1, 0.325, 0.3,versionstring,true,background_front) guiSetFont(guestInfo,font[1]) guiLabelSetHorizontalAlign (guestInfo, "center") guiLabelSetColor ( guestInfo,50,255,50) --Login --login_box = guiCreateStaticImage( 0.025, 0.1, 0.325, 0.85, "images/box_background.png", true , background_front) loginButton = createMarwinButton(0.1,0.825,0.175,0.1,"Login",true,background_front,"login") --Text loginInfo = guiCreateLabel(0.025, 0.46, 0.325, 0.175,"Login!",true,background_front) guiSetFont(loginInfo,font[1]) guiLabelSetHorizontalAlign (loginInfo, "center") guiLabelSetColor ( loginInfo,50,255,50) --Username username = guiCreateLabel(0.025, 0.55, 0.325, 0.04,"Username",true,background_front) guiSetFont(username,font[0]) guiLabelSetHorizontalAlign (username, "center") --Edit Box Login_Edit[1] = guiCreateEdit(0.1, 0.6, 0.175, 0.055, infoTable["account"], true,background_front) --Password password = guiCreateLabel(0.025, 0.675, 0.325, 0.04,"Password",true,background_front) guiSetFont(password,font[0]) guiLabelSetHorizontalAlign (password, "center") loginIcon = guiCreateStaticImage( 0.1, 0.46, 0.03, 0.05, "images/login_icon.png", true , background_front) --Edit Box Login_Edit[2] = guiCreateEdit(0.1, 0.725, 0.175, 0.055, infoTable["pass"], true,background_front) guiEditSetMasked(Login_Edit[2],true) --Register --register_box = guiCreateStaticImage( 0.375, 0.45, 0.325, 0.5, "images/box_background.png", true , background_front) registerButton = createMarwinButton(0.45,0.825,0.175,0.1,"Register",true,background_front,"register") --Text registerInfo = guiCreateLabel(0.375, 0.15, 0.325, 0.1,"Register!",true,background_front) guiSetFont(registerInfo,font[1]) guiLabelSetHorizontalAlign (registerInfo, "center") guiLabelSetColor ( registerInfo,50,255,50) --Username username = guiCreateLabel(0.375, 0.25, 0.325, 0.04,"Username",true,background_front) guiSetFont(username,font[0]) guiLabelSetHorizontalAlign (username, "center") --Edit Box Login_Edit[3] = guiCreateEdit(0.45, 0.3, 0.175, 0.055, "", true,background_front) --Password password = guiCreateLabel(0.375, 0.375, 0.325, 0.04,"Password",true,background_front) guiSetFont(password,font[0]) guiLabelSetHorizontalAlign (password, "center") loginIcon = guiCreateStaticImage( 0.45, 0.15, 0.03, 0.05, "images/signup_icon.png", true , background_front) --Edit Box Login_Edit[4] = guiCreateEdit(0.45, 0.425, 0.175, 0.055, "", true,background_front) guiEditSetMasked(Login_Edit[4],true) --Password #2 password2 = guiCreateLabel(0.375, 0.5, 0.325, 0.04,"Repeat password",true,background_front) guiSetFont(password2,font[0]) guiLabelSetHorizontalAlign (password2, "center") --Edit Box Login_Edit[5] = guiCreateEdit(0.45, 0.55, 0.175, 0.055, "", true,background_front) guiEditSetMasked(Login_Edit[5],true) --Gender --malebutton = guiCreateRadioButton(0.46, 0.65, 0.15, 0.05, "Male", true, background_front) --femalebutton = guiCreateRadioButton(0.46, 0.71, 0.15, 0.05, "Female", true, background_front) --News/Updates --News Headline newsH = guiCreateLabel(0.726, 0.115, 0.25, 0.05,"News:",true,background_front) guiSetFont(newsH,font[0]) guiLabelSetHorizontalAlign (newsH, "center") guiLabelSetColor ( newsH,50,255,50) --news_box1 news_box1 = guiCreateStaticImage( 0.73, 0.16, 0.244, 0.2, "images/news.png", true , background_front) guiSetAlpha(news_box1,0.-- s8) --> news1 = guiCreateLabel(0.025, 0.125, 1, 1,"-",true,news_box1) guiSetFont(news1,"default-bold-small") news_box1_new = guiCreateStaticImage( 0, 0, 0.15, 0.1, "images/new.png", true , news_box1) guiSetVisible(news_box1_new,false) --news_box2 news_box2 = guiCreateStaticImage( 0.73, 0.36, 0.244, 0.2, "images/news.png", true , background_front) guiSetAlpha(news_box2,0.4) news2 = guiCreateLabel(0.025, 0.125, 1, 1,"-",true,news_box2) guiSetFont(news2,"default-bold-small") news_box2_new = guiCreateStaticImage( 0, 0, 0.15, 0.1, "images/new.png", true , news_box2) guiSetVisible(news_box2_new,false) --news_box3 news_box3 = guiCreateStaticImage( 0.73, 0.56, 0.244, 0.2, "images/news.png", true , background_front) guiSetAlpha(news_box3,0.-- s8) --> news3 = guiCreateLabel(0.025, 0.125, 1, 1,"-",true,news_box3) guiSetFont(news3,"default-bold-small") news_box3_new = guiCreateStaticImage( 0, 0, 0.15, 0.1, "images/new.png", true , news_box3) guiSetVisible(news_box3_new,false) --news_box4 news_box4 = guiCreateStaticImage( 0.73, 0.76, 0.244, 0.19, "images/news.png", true , background_front) guiSetAlpha(news_box4,0.4) news4 = guiCreateLabel(0.025, 0.125, 1, 1,"-",true,news_box4) guiSetFont(news4,"default-bold-small") news_box4_new = guiCreateStaticImage( 0, 0, 0.15, 0.1, "images/new.png", true , news_box4) guiSetVisible(news_box4_new,false) --others news_box = guiCreateStaticImage( 0.726, 0.1, 0.25, 0.85, "images/box_background.png", true , background_front) guiCreateStaticImage(0.79, 0.114, 0.028, 0.045, "images/on.png", true , background_front) end --LOGIN function clickPanelButton (button, state) if button == "left" and state == "up" then local element = getElementData(getLocalPlayer(),"clickedButton") if element then local info = getElementData(element,"info") if info and info == "login" then local username = guiGetText(Login_Edit[1]) local password = guiGetText(Login_Edit[2]) if not (tostring(username) == "") and not (tostring(password) == "") then triggerServerEvent("onClientSendLoginDataToServer", getLocalPlayer(), username, password) else reason = "Missing Password or Username!" outputChatBox("[LOGIN ERROR]#FF9900 "..reason,255,255,255,true) end elseif info and info == "guest" then showLoginWindow(false) elseif info and info == "register" then local username = guiGetText(Login_Edit[3]) local pass1 = guiGetText(Login_Edit[4]) local pass2 = guiGetText(Login_Edit[5]) if not (tostring(username) == "") then if not (tostring(pass1) == "") then if pass1 == pass2 then triggerServerEvent("onClientSendRegisterDataToServer", getLocalPlayer(), username, pass1) else reason = "Passwords do not match!" outputChatBox("[REGISTRATION ERROR]#FF9900 "..reason,255,255,255,true) end else reason = "No password was entered!" outputChatBox("[REGISTRATION ERROR]#FF9900 "..reason,255,255,255,true) end else reason = "No username was entered!" outputChatBox("[REGISTRATION ERROR]#FF9900 "..reason,255,255,255,true) end end end end end addEventHandler("onClientClick",getRootElement(),clickPanelButton) function onClientGetNews(text1,text2,text3,text4,bool1,bool2,bool3,bool4) --workaround fix for line breaks local text1 = string.gsub(text1, "", "\n") local text2 = string.gsub(text2, "", "\n") local text3 = string.gsub(text3, "", "\n") local text4 = string.gsub(text4, "", "\n") guiSetText(news1,text1) guiSetText(news2,text2) Link to comment
GTX Posted July 12, 2015 Share Posted July 12, 2015 Line 302: if getEventHandlers("onClientRender", rollLoginPanel)[1] == false then addEventHandler("onClientRender",getRootElement(),rollLoginPanel) end Link to comment
iMr.Dawix~# Posted July 12, 2015 Share Posted July 12, 2015 Thanks you. Im found next errors: WARNING: [DayZ-MTA]\DayZ\spawn.lua:401: Bad argument @ 'destroyElement' [Expected element at argument 1] WARNING: [DayZ-MTA]\DayZ\spawn.lua:401: Bad argument @ 'destroyElement' [Expected element at argument 1, got boolean] spawn.lua local spawnPositions = { {-278.6669921875,-2882.1572265625,32.104232788086}, {-958.5595703125,-2887.9912109375,64.82421875}, {-1816.9375,-2748.18359375,1.7327127456665}, {-2816.166015625,-2439.0546875,2.4004096984863}, {-2941.5673828125,-1206.2373046875,2.7848854064941}, {-2911.51171875,-895.22265625,2.4013109207153}, {-2185.6669921875,2957.380859375,11.474840164185}, {272.2265625,2928.505859375,1.3713493347168}, {2803.943359375,595.9365234375,7.7612648010254}, {2883.7509765625,-178.4658203125,3.2714653015137}, {-233.46484375,-1735.8173828125,1.5520644187927}, {-1056.8720703125,2939.068359375,42.311294555664}, } local playerDataTable = { {"alivetime"}, {"skin"}, {"MAX_Slots"}, {"bandit"}, {"blood"}, {"food"}, {"thirst"}, {"temperature"}, {"currentweapon_1"}, {"currentweapon_2"}, {"currentweapon_3"}, {"bleeding"}, {"brokenbone"}, {"pain"}, {"cold"}, {"infection"}, {"humanity"}, {"zombieskilled"}, {"headshots"}, {"murders"}, {"banditskilled"}, {"Wood Pile"}, {"Bandage"}, {"Water Bottle"}, {"Pasta Can"}, {"Beans Can"}, {"Burger"}, {"Box of Matches"}, {"M1911 Mag"}, {"M9 SD Mag"}, {"Desert Eagle Mag"}, {"M1911"}, {"M9 SD"}, {"Winchester 1866"}, {"PDW"}, {"Hunting Knife"}, {"Hatchet"}, {"Pizza"}, {"Morphine"}, {"Soda Bottle"}, {"Empty Gas Canister"}, {"Full Gas Canister"}, {"Roadflare"}, {"Milk"}, {"PDW Mag"}, {"MP5A5 Mag"}, {"AK Mag"}, {"M4 Mag"}, {"Tear Gas"}, {"Grenade"}, {"Desert Eagle"}, {"Sawn-Off Shotgun"}, {"SPAZ-12 Combat Shotgun"}, {"MP5A5"}, {"Watch"}, {"Medic Kit"}, {"Heat Pack"}, {"Lee Enfield"}, {"PDW"}, --{"TEC-9"}, {"AK-47"}, --{"M136 Rocket Launcher"}, {"Blood Bag"}, {"GPS"}, {"Map"}, {"Toolbox"}, {"Wire Fence"}, {"Tire"}, {"Engine"}, {"Tank Parts"}, --{"M136 Rocket"}, {"CZ 550 Mag"}, {"Lee Enfield Mag"}, {"M4"}, {"CZ 550"}, --{"Heat-Seeking RPG"}, {"Satchel"}, {"Infrared Goggles"}, {"Night Vision Goggles"}, {"Tent"}, {"Raw Meat"}, {"Cooked Meat"}, {"Camouflage Clothing"}, {"Ghillie Suit"}, {"Civilian Clothing"}, {"Survivor Clothing"}, {"Painkiller"}, {"Empty Water Bottle"}, {"Empty Soda Cans"}, {"Scruffy Burgers"}, {"1866 Slug"}, {"2Rnd. Slug"}, {"SPAZ-12 Pellet"}, {"Radio Device"}, {"Binoculars"}, {"Baseball Bat"}, {"Shovel"}, {"Golf Club"}, {"Parachute"}, } local vehicleDataTable = { {"MAX_Slots"}, {"Tire_inVehicle"}, {"Engine_inVehicle"}, {"Parts_inVehicle"}, {"fuel"}, {"Wood Pile"}, {"Bandage"}, {"Water Bottle"}, {"Pasta Can"}, {"Beans Can"}, {"Burger"}, {"Box of Matches"}, {"M1911 Mag"}, {"M1911"}, {"M9 SD"}, {"Desert Eagle Mag"}, {"Winchester 1866"}, {"PDW"}, {"Hunting Knife"}, {"Morphine"}, {"Hatchet"}, {"Pizza"}, {"Soda Bottle"}, {"Empty Gas Canister"}, {"Full Gas Canister"}, {"Roadflare"}, {"Milk"}, {"PDW Mag"}, {"MP5A5 Mag"}, {"AK Mag"}, {"M4 Mag"}, {"Tear Gas"}, {"Grenade"}, {"Desert Eagle"}, {"Sawn-Off Shotgun"}, {"SPAZ-12 Combat Shotgun"}, {"MP5A5"}, {"Watch"}, {"Medic Kit"}, {"Heat Pack"}, {"Lee Enfield"}, --{"TEC-9"}, {"AK-47"}, --{"M136 Rocket Launcher"}, {"Blood Bag"}, {"GPS"}, {"Map"}, {"Toolbox"}, {"Wire Fence"}, {"Tire"}, {"Engine"}, {"Tank Parts"}, --{"M136 Rocket"}, {"CZ 550 Mag"}, {"Lee Enfield Mag"}, {"M4"}, {"CZ 550"}, --{"Heat-Seeking RPG"}, {"Satchel"}, {"Infrared Goggles"}, {"Night Vision Goggles"}, {"Tent"}, {"Raw Meat"}, {"Cooked Meat"}, {"Camouflage Clothing"}, {"Ghillie Suit"}, {"Civilian Clothing"}, {"Survivor Clothing"}, {"Painkiller"}, {"Binoculars"}, {"Empty Water Bottle"}, {"Empty Soda Cans"}, {"Scruffy Burgers"}, {"1866 Slug"}, {"2Rnd. Slug"}, {"SPAZ-12 Pellet"}, {"Assault Pack (ACU)"}, {"Alice Pack"}, {"Radio Device"}, {"Coyote Backpack"}, {"Czech Backpack"}, {"Baseball Bat"}, {"Shovel"}, {"Golf Club"}, } function spawnDayZPlayer(player) local number = math.random(table.size(spawnPositions)) local x,y,z = spawnPositions[number][1],spawnPositions[number][2],spawnPositions[number][3] spawnPlayer (player, x,y,z, math.random(0,360), 73, 0, 0) setElementFrozen(player, true) fadeCamera (player, true) setCameraTarget (player, player) setTimer( function(player) if isElement(player) then setElementFrozen(player, false) end end,500,1,player) playerCol = createColSphere(x,y,z,1.5) setElementData(player,"playerCol",playerCol) attachElements ( playerCol, player, 0, 0, 0 ) setElementData(playerCol,"parent",player) setElementData(playerCol,"player",true) local account = getPlayerAccount(player) setAccountData(account,"isDead",false) setElementData(player,"isDead",false) setElementData(player,"logedin",true) setElementData(player,"admin",getAccountData(account,"admin") or false) setElementData(player,"supporter",getAccountData(account,"supporter") or false) ---------------------------------- --Player Items on Start for i,data in ipairs(playerDataTable) do if data[1] =="Bandage" then setElementData(player,data[1],2) elseif data[1] =="Painkiller" then setElementData(player,data[1],1) elseif data[1] =="MAX_Slots" then setElementData(player,data[1],8) elseif data[1] =="skin" then setElementData(player,data[1],73) elseif data[1] =="blood" then setElementData(player,data[1],12000) elseif data[1] =="temperature" then setElementData(player,data[1],37) elseif data[1] =="brokenbone" then setElementData(player,data[1],false) elseif data[1] =="pain" then setElementData(player,data[1],false) elseif data[1] =="cold" then Link to comment
ArtekXDPL Posted July 20, 2015 Author Share Posted July 20, 2015 Next errors: ERROR: DayZ\inventory.lua:579: attempt to compare number with boolean WARNING: DayZ\inventory.lua:756: Bad argument @ 'triggerEvent' [Expected string at argument 1, got player] WARNING: DayZ\inventory.lua:761: Bad argument @ 'triggerEvent' [Expected string at argument 1, got player] WARNING: DayZ\inventory.lua:767: Bad argument @ 'triggerEvent' [Expected string at argument 1, got player] WARNING: DayZ\inventory.lua:773: Bad argument @ 'triggerEvent' [Expected string at argument 1, got player] ERROR: DayZ\inventory.lua:1126: C stack overflow WARNING: DayZ\menu_client.lua:337: Bad argument @ 'getVehicleName' [Expected vehicle at argument 1, got object] WARNING: DayZ\menu_client.lua:340: Bad argument @ 'getVehicleName' [Expected vehicle at argument 1, got object] ERROR: DayZ\menu_client.lua:391: attempt to perform arithmetic on local 'x' (a boolean value) inventory.lua --[[ #---------------------------------------------------------------# ----* DayZ MTA Script inventory.lua *---- ----* This Script is owned by Marwin, you are not allowed to use or own it. ----* Owner: Marwin W., Germany, Lower Saxony, Otterndorf ----* Skype: xxmavxx96 ----* *---- #---------------------------------------------------------------# ]] inventoryItems = { ["Weapons"] = { ["Primary Weapon"] = { {"M4",3}, {"CZ 550",3}, {"Winchester 1866",3}, {"SPAZ-12 Combat Shotgun",3}, {"Sawn-Off Shotgun",3}, {"AK-47",3}, {"Lee Enfield",3}, --{"Heat-Seeking RPG",5}, --{"M136 Rocket Launcher",5}, }, ["Secondary Weapon"] = { {"M1911",2}, {"M9 SD",2}, {"PDW",2}, --{"TEC-9",2}, {"MP5A5",3}, {"Desert Eagle",2}, {"Hunting Knife",1}, {"Hatchet",2}, {"Baseball Bat",2}, {"Shovel",2}, {"Golf Club",2}, }, ["Specially Weapon"] = { {"Parachute",1}, {"Tear Gas",1}, {"Grenade",1}, {"Binoculars",1} }, }, ["Ammo"] = { {"M1911 Mag",0.085}, {"M9 SD Mag",0.085}, {"Desert Eagle Mag",0.085}, {"PDW Mag",0.025}, {"MP5A5 Mag",0.025}, {"AK Mag",0.035}, {"M4 Mag",0.035}, {"1866 Slug",0.067}, {"2Rnd. Slug",0.067}, {"SPAZ-12 Pellet",0.067}, {"CZ 550 Mag",0.1}, {"Lee Enfield Mag",0.1}, --{"M136 Rocket",2}, }, ["Food"] = { {"Water Bottle",1}, {"Pasta Can",1}, {"Beans Can",1}, {"Burger",1}, {"Pizza",1}, {"Soda Bottle",1}, {"Milk",1}, {"Cooked Meat",1}, }, ["Items"] = { {"Wood Pile",2}, {"Bandage",1,"Bandage yourself"}, {"Roadflare",1,"Place"}, {"Empty Gas Canister",2}, {"Full Gas Canister",2}, {"Medic Kit",2,"Use"}, {"Heat Pack",1,"Use"}, {"Painkiller",1,"Use"}, {"Morphine",1,"Use"}, {"Blood Bag",1,"Use"}, {"Wire Fence",1,"Build a wire fence"}, {"Raw Meat",1}, {"Tire",2}, {"Engine",5}, {"Tank Parts",3}, {"Tent",3,"Pitch a tent"}, {"Camouflage Clothing",1,"Put clothes on"}, {"Civilian Clothing",1,"Put clothes on"}, {"Survivor Clothing",1,"Put clothes on"}, {"Ghillie Suit",1,"Put clothes on"}, {"Empty Water Bottle",1,"Fill bottle up"}, {"Empty Soda Cans",1}, {"Scruffy Burgers",1}, {"Assault Pack (ACU)",1}, {"Alice Pack",1}, {"Czech Backpack",1}, {"Coyote Backpack",1}, }, ["Toolbelt"] = { {"Night Vision Goggles",1}, {"Infrared Goggles",1}, {"Map",1}, {"Box of Matches",1,"Make a Fire"}, {"Watch",1}, {"GPS",1}, {"Toolbox",1}, {"Radio Device",1}, }, } ------------------------------------------------------------------------------ --INVENTORY local headline = {} local gridlistItems = {} local buttonItems = {} inventoryWindows = guiCreateWindow(0.15, 0.28, 0.72, 0.63, "", true) -- inventoryWindows = guiCreateStaticImage(0.25,0.25,0.5,0.5,"images/scrollmenu_1.png",true) headline["loot"] = guiCreateLabel(0.06, 0.05, 0.34, 0.09,"GEAR",true,inventoryWindows) guiLabelSetHorizontalAlign (headline["loot"],"center") guiSetFont (headline["loot"], "default-bold-small" ) headline["inventory"] = guiCreateLabel(0.60, 0.05, 0.34, 0.09,"INVENTORY",true,inventoryWindows) guiLabelSetHorizontalAlign (headline["inventory"],"center") guiSetFont (headline["inventory"], "default-bold-small" ) gridlistItems["loot"] = guiCreateGridList (0.03, 0.10, 0.39, 0.83,true,inventoryWindows) gridlistItems["loot_colum"] = guiGridListAddColumn( gridlistItems["loot"], "Loot", 0.7 ) gridlistItems["loot_colum_amount"] = guiGridListAddColumn( gridlistItems["loot"], "", 0.2 ) gridlistItems["inventory"] = guiCreateGridList (0.57, 0.11, 0.39, 0.83,true,inventoryWindows) gridlistItems["inventory_colum"] = guiGridListAddColumn( gridlistItems["inventory"], "Inventory", 0.7 ) gridlistItems["inventory_colum_amount"] = guiGridListAddColumn( gridlistItems["inventory"], "", 0.2 ) buttonItems["loot"] = guiCreateButton(0.42, 0.17, 0.04, 0.69, "->", true,inventoryWindows) buttonItems["inventory"] = guiCreateButton(0.53, 0.17, 0.04, 0.69, "<-", true,inventoryWindows) headline["slots"] = guiCreateLabel(0.62, 0.94, 0.29, 0.04,"SLOTS:",true,inventoryWindows) guiLabelSetHorizontalAlign (headline["slots"],"center") guiLabelSetVerticalAlign (headline["slots"],"center") guiSetFont (headline["slots"], "default-bold-small" ) headline["slots_loot"] = guiCreateLabel(0.07, 0.94, 0.29, 0.04,"SLOTS:",true,inventoryWindows) guiLabelSetHorizontalAlign (headline["slots_loot"],"center") guiLabelSetVerticalAlign (headline["slots_loot"],"center") guiSetFont (headline["slots_loot"], "default-bold-small" ) guiSetVisible(inventoryWindows,false) function showInventory (key,keyState) if getElementData(getLocalPlayer(),"logedin") then if ( keyState == "down" ) then guiSetVisible(inventoryWindows,not guiGetVisible(inventoryWindows)) showCursor(not isCursorShowing()) refreshInventory() if guiGetVisible(inventoryWindows) == true then onClientOpenInventoryStopMenu () else hideRightClickInventoryMenu () end if isPlayerInLoot() then local col = getElementData(getLocalPlayer(),"currentCol") local gearName = getElementData(getLocalPlayer(),"lootname") refreshLoot(col,gearName) end end end end bindKey ( "j", "down", showInventory ) function showInventoryManual () guiSetVisible(inventoryWindows,not guiGetVisible(inventoryWindows)) showCursor(not isCursorShowing()) refreshInventory() if guiGetVisible(inventoryWindows) == true then onClientOpenInventoryStopMenu () end end function hideInventoryManual () guiSetVisible(inventoryWindows,false) showCursor(false) hideRightClickInventoryMenu () end addEvent("hideInventoryManual",true) addEventHandler("hideInventoryManual",getLocalPlayer(),hideInventoryManual) function refreshInventoryManual () refreshInventory() end addEvent("refreshInventoryManual",true) addEventHandler("refreshInventoryManual",getLocalPlayer(),refreshInventoryManual) function refreshLootManual (loot) refreshLoot(loot) end addEvent("refreshLootManual",true) addEventHandler("refreshLootManual",getLocalPlayer(),refreshLootManual) function refreshInventory() if ( gridlistItems["inventory_colum"] ) then --If the column has been created, fill it with players row1,column1 = guiGridListGetSelectedItem ( gridlistItems["inventory"] ) guiGridListClear(gridlistItems["inventory"]) local row = guiGridListAddRow ( gridlistItems["inventory"] ) --guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],"ITEMS", false, false ) local row = guiGridListAddRow ( gridlistItems["inventory"] ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],"PRIMARY WEAPON", true, false ) for id, item in ipairs(inventoryItems["Weapons"]["Primary Weapon"]) do if getElementData(getLocalPlayer(),item[1]) and getElementData(getLocalPlayer(),item[1]) >= 1 then local row = guiGridListAddRow ( gridlistItems["inventory"] ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],item[1], false, false ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum_amount"],getElementData(getLocalPlayer(),item[1]), false, false ) end end local row = guiGridListAddRow ( gridlistItems["inventory"] ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],"SECONDARY WEAPON", true, false ) for id, item in ipairs(inventoryItems["Weapons"]["Secondary Weapon"]) do if getElementData(getLocalPlayer(),item[1]) and getElementData(getLocalPlayer(),item[1]) >= 1 then local row = guiGridListAddRow ( gridlistItems["inventory"] ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],item[1], false, false ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum_amount"],getElementData(getLocalPlayer(),item[1]), false, false ) end end local row = guiGridListAddRow ( gridlistItems["inventory"] ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],"SPECIAL WEAPON", true, false ) for id, item in ipairs(inventoryItems["Weapons"]["Specially Weapon"]) do if getElementData(getLocalPlayer(),item[1]) and getElementData(getLocalPlayer(),item[1]) >= 1 then local row = guiGridListAddRow ( gridlistItems["inventory"] ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],item[1], false, false ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum_amount"],getElementData(getLocalPlayer(),item[1]), false, false ) end end local row = guiGridListAddRow ( gridlistItems["inventory"] ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],"AMMO", true, false ) for id, item in ipairs(inventoryItems["Ammo"]) do if getElementData(getLocalPlayer(),item[1]) and getElementData(getLocalPlayer(),item[1]) >= 1 then local row = guiGridListAddRow ( gridlistItems["inventory"] ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum"],item[1], false, false ) guiGridListSetItemText ( gridlistItems["inventory"], row, gridlistItems["inventory_colum_amount"],getElementData(getLocalPlayer(),item[1]), false, false ) end end Link to comment
xeon17 Posted July 21, 2015 Share Posted July 21, 2015 This error for example clearly says, the first argument need to be a string (the name of the event which you want to trigger) and not a player. WARNING: DayZ\inventory.lua:756: Bad argument @ 'triggerEvent' [Expected string at argument 1, got player] Link to comment
ArtekXDPL Posted July 21, 2015 Author Share Posted July 21, 2015 This error for example clearly says, the first argument need to be a string (the name of the event which you want to trigger) and not a player.WARNING: DayZ\inventory.lua:756: Bad argument @ 'triggerEvent' [Expected string at argument 1, got player] Sorry, but im not understarnd this. Link to comment
xeon17 Posted July 21, 2015 Share Posted July 21, 2015 Check the wiki page of triggerEvent the first argument need to be a string and not a player element. Link to comment
ArtekXDPL Posted July 21, 2015 Author Share Posted July 21, 2015 Check the wiki page of triggerEvent the first argument need to be a string and not a player element. Im too stupid to understard this, and Im not good understand english language. Link to comment
TheSmart Posted July 21, 2015 Share Posted July 21, 2015 Check the wiki page of triggerEvent the first argument need to be a string and not a player element. Im too stupid to understard this, and Im not good understand english language. use this then : http://translate.google.com/ Link to comment
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now