Hi all, this script is in mta community i just edited it, i dont own it. I need it to have it so its not manual to create the lasers, the script does it automatically and after a few seconds they come back. i dont know how to do it lol please help me
g_Mines = { }
g_Plant = false
g_Distance = 6000
g_Radius = 2
function plantCommand()
showCursor ( true )
g_Plant = true
end
addCommandHandler("p", plantCommand)
function onClientClick ( button, state, absoluteX, absoluteY, worldX, worldY, worldZ, clickedElement )
if(g_Plant) then
plantRequest( absoluteX, absoluteY)
showCursor ( false )
g_Plant = false
end
end
addEventHandler ( "onClientClick", getRootElement(), onClientClick )
function plantRequest(w, h)
local tx, ty, tz = getWorldFromScreenPosition ( w, h, g_Distance )
local px, py, pz = getCameraMatrix()
local hit, x, y, z, elementHit = processLineOfSight ( px, py, pz, tx, ty, tz, true, true, true, true, true, false, false, false, getLocalPlayer() )
if hit then
triggerServerEvent ( "onCreateMine", getRootElement(), x, y, z )
end
end
function getTopPointRelativeOfElement(element,distance)
local x, y, z = getElementPosition ( element )
local rx, ry, rz = getElementRotation ( element )
y = y - (distance * math.sin(math.rad(rx)) )
x = x + (distance * math.sin(math.rad(ry)) )
z = z + (distance * math.cos(math.rad(rx+ry)) )
return x,y,z
end
function onClientRender ( )
for k, v in ipairs(g_Mines) do
processLaserMine ( k, v , g_Distance )
end
end
addEventHandler("onClientRender",getRootElement(), onClientRender)
function processLaserMine(index, mine, distance)
if ( isElement(mine) and getElementType (mine) == "object" ) then
local x1, y1, z1 = getElementPosition ( mine )
local xp, yp, zp = getTopPointRelativeOfElement( mine, 0.1 )
local xt, yt, zt = getTopPointRelativeOfElement( mine, distance )
local hit, x2, y2, z2, elementHit = processLineOfSight ( xp, yp, zp, xt, yt, zt, true, true, true, true, true, false, false, false, mine )
if(elementHit) then
explodeMine(index, mine, x1, y1, z1)
end
if(hit) then
dxDrawLine3D ( x1, y1, z1, x2, y2, z2, tocolor ( 255, 0, 0, 0xAA ),1)
else
dxDrawLine3D ( x1, y1, z1, xt, yt, zt, tocolor ( 255, 0, 0, 0xAA ),1)
end
return true
end
return false
end
function onClientExplosion(x,y,z,type)
-- explodeMine(0,nil,x,y,z)
end
addEventHandler("onClientExplosion",getRootElement(),onClientExplosion)
function explodeMine(index, mine, x, y, z)
if(isElement(mine)) then
createExplosion ( 0, 0, 0, 3 )
createExplosion ( 11, 1, 4, 3 )
createExplosion ( 0, 0, 3, 3 )
table.remove(g_Mines,index)
destroyElement(mine)
end
for k, v in ipairs(g_Mines) do
local x2, y2, z2 = getElementPosition(v)
if(getDistanceBetweenPoints3D ( x, y, z, x2, y2, z2 ) <= (g_Radius*2) ) then
explodeMine(k, v, x2, y2, z2)
end
end
end
local checkSize = 0.1
function lowHitCheck(x,y,z,name)
local t = checkSize
if(name == "xu") then
if isLineOfSightClear ( x+t, y, z, x+t/10, y, z ) and
not isLineOfSightClear ( x+t, y+t, z, x-t, y-t, z ) and
not isLineOfSightClear ( x+t, y-t, z, x-t, y+t, z ) and
not isLineOfSightClear ( x+t, y, z+t, x-t, y, z-t ) and
not isLineOfSightClear ( x+t, y, z-t, x-t, y, z+t ) then
return true
end
elseif(name == "xd") then
if isLineOfSightClear ( x-t, y, z, x-t/10, y, z ) and
not isLineOfSightClear ( x-t, y+t, z, x+t, y-t, z ) and
not isLineOfSightClear ( x-t, y-t, z, x+t, y+t, z ) and
not isLineOfSightClear ( x-t, y, z+t, x+t, y, z-t ) and
not isLineOfSightClear ( x-t, y, z-t, x+t, y, z+t ) then
return true
end
elseif(name == "yu") then
if isLineOfSightClear ( x, y+t, z, x, y+t/10, z ) and
not isLineOfSightClear ( x+t, y+t, z, x-t, y-t, z ) and
not isLineOfSightClear ( x-t, y+t, z, x+t, y-t, z ) and
not isLineOfSightClear ( x, y+t, z+t, x, y-t, z-t ) and
not isLineOfSightClear ( x, y+t, z-t, x, y-t, z+t ) then
return true
end
elseif(name == "yd") then
if isLineOfSightClear ( x, y-t, z, x, y-t/10, z ) and
not isLineOfSightClear ( x+t, y-t, z, x-t, y+t, z ) and
not isLineOfSightClear ( x-t, y-t, z, x+t, y+t, z ) and
not isLineOfSightClear ( x, y-t, z+t, x, y+t, z-t ) and
not isLineOfSightClear ( x, y-t, z-t, x, y+t, z+t ) then
return true
end
elseif(name == "zu") then
if isLineOfSightClear ( x, y, z+t, x, y, z+t/10 ) and
not isLineOfSightClear ( x+t, y, z+t, x+t, y, z-t ) and
not isLineOfSightClear ( x-t, y, z+t, x-t, y, z-t ) and
not isLineOfSightClear ( x, y+t, z+t, x, y+t, z-t ) and
not isLineOfSightClear ( x, y-t, z+t, x, y-t, z-t ) then
return true
end
elseif(name == "zd") then
if isLineOfSightClear ( x, y, z-t, x, y, z-t/10 ) and
not isLineOfSightClear ( x+t, y, z-t, x+t, y, z+t ) and
not isLineOfSightClear ( x-t, y, z-t, x-t, y, z+t ) and
not isLineOfSightClear ( x, y+t, z-t, x, y+t, z+t ) and
not isLineOfSightClear ( x, y-t, z-t, x, y-t, z+t ) then
return true
end
end
return false
end
function toang(value)
if(value > 360.0) then
while(value > 360.0) do
value = value - 360.0
end
elseif(value < 0.0) then
while(value < 0.0) do
value = value + 360.0
end
end
return value;
end
function lowHitGetNormal(x,y,z,name)
local rx, ry, rz = 0, 0, 0
local t = checkSize
if(name == "xu") then
rx, ry, rz = 0, 90, 0
elseif(name == "xd") then
rx, ry, rz = 0, 270, 0
elseif(name == "yu") then
rx, ry, rz = 270, 0, 0
elseif(name == "yd") then
rx, ry, rz = 90, 0, 0
elseif(name == "zu") then
rx, ry, rz = 0, 0, 0
--hit, x1, y1, z1, elementHit = processLineOfSight ( x, y+t, z+t, x, y+t, z-t )
--rx = toang( math.deg( math.atan2(t,t-z1) ) )
--outputChatBox("ang=" .. rx )
elseif(name == "zd") then
rx, ry, rz = 180, 0, 0
end
return rx, ry, rz
end
function getPointNormal(x, y, z)
local rx, ry, rz = 0, 0, 0
if lowHitCheck(x,y,z,"zu") then
rx, ry, rz = lowHitGetNormal(x,y,z,"zu")
elseif lowHitCheck(x,y,z,"zd") then
rx, ry, rz = lowHitGetNormal(x,y,z,"zd")
elseif lowHitCheck(x,y,z,"xu") then
rx, ry, rz = lowHitGetNormal(x,y,z,"xu")
elseif lowHitCheck(x,y,z,"xd") then
rx, ry, rz = lowHitGetNormal(x,y,z,"xd")
elseif lowHitCheck(x,y,z,"yu") then
rx, ry, rz = lowHitGetNormal(x,y,z,"yu")
elseif lowHitCheck(x,y,z,"yd") then
rx, ry, rz = lowHitGetNormal(x,y,z,"yd")
end
return rx, ry, rz
end
function getNormalPlane3(x1,y1,z1,x2,y2,z2,x3,y3,z3)
end
function onCreateMine( x, y, z )
local rx,ry,rz = getPointNormal ( x, y, z )
local mine = createObject ( 1213, x, y, z )
if(getDistanceBetweenPoints3D ( x, y, z, getElementPosition(getLocalPlayer())) <= 10 ) then
local sound = playSound3D ( "plant.wav", getElementPosition(mine) )
setSoundMaxDistance ( sound, 10 )
end
setObjectStatic ( mine, true )
table.insert ( g_Mines, mine )
setElementRotation ( mine, rx, ry, rz )
end
addEvent( "onCreateMine", true )
addEventHandler( "onCreateMine", getRootElement(), onCreateMine )
