API tools faq
paste
Advertisement
Noneatme

Untitled

Noneatme
Sep 8th, 2012
86
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 9.16 KB | None | 0 0
raw download clone embed print report
  1. local marker = {}
  2. local setting = {}
  3.  
  4. setting["slowtext"] = false
  5.  
  6. marker[1] = createMarker(1399.1143798828, -4128.4008789063, 1,"corona", 6.0, 0, 255, 0, 50)
  7. marker[2] = createMarker(1359.2703857422, -4128.2709960938, 75.321502685547, "corona", 13.0, 0, 255, 0, 0)
  8. marker[3] = createMarker(1226.1231689453, -3913.8400878906, 57.632041931152, "corona", 16.0, 0, 255, 0, 0)
  9. marker[4] = createMarker(1352.6397705078, -3855.8037109375, 259.93884277344, "corona", 16.0, 0, 255, 0, 0)
  10. marker[5] = createMarker(1961.2800292969, -3856.6745605469, 89.224143981934, "corona", 13.0, 0, 255, 0, 50)
  11. marker[6] = createMarker(1882.7630615234, -3853.2702636719, 206.26626586914, "corona", 16.0, 0, 255, 0, 0)
  12. marker[7] = createMarker(2521.2473144531, -3758.3637695313, 2.5284581184387, "corona", 16.0, 0, 255, 0, 0)
  13. marker[8] = createMarker(2521.775390625, -3958.671875, 2.5284581184387, "corona", 16.0, 0, 255, 0, 0)
  14. marker[9] = createMarker(2575.3298339844, -3858.7507324219, 17.68745803833, "corona", 16.0, 0, 255, 0, 0)
  15. marker[10] = createMarker(2893.6801757813, -3860.6647949219, 32.618919372559, "corona", 16.0, 0, 255, 0, 0)
  16. marker[11] = createMarker(2380.3046875, -4000.3295898438, 64.416488647461, "corona", 6.0, 0, 255, 0, 50)
  17. marker[12] = createMarker(2384.2841796875, -3540.5651855469, 1, "corona", 16.0, 0, 255, 0, 50)
  18.  
  19.  
  20. local magnet_enabled = false
  21. local magnet
  22.  
  23. addEventHandler("onClientMarkerHit", marker[1], function(element)
  24.     if(element ~= localPlayer) then return end
  25.     local veh = getPedOccupiedVehicle(localPlayer)
  26.     setElementVelocity(veh, 0, 0, 2)
  27.     setElementRotation(veh,90, 0, 270)
  28. end)
  29. addEventHandler("onClientMarkerHit", marker[12], function(element)
  30.     if(element ~= localPlayer) then return end
  31.     local veh = getPedOccupiedVehicle(localPlayer)
  32.     local x, y, z = getElementVelocity(veh)
  33.     setElementVelocity(veh, x, y, 1)
  34.     local x, y, z = getVehicleTurnVelocity(veh, x, y, z)
  35.     setVehicleTurnVelocity(veh, x+1, y-1, z+1)
  36. end)
  37.  
  38. addEventHandler("onClientMarkerHit", marker[2], function(element)
  39.     if(element ~= localPlayer) then return end
  40.     setTimer(function()
  41.         local veh = getPedOccupiedVehicle(localPlayer)
  42.         setElementRotation(veh, 0, 180, 270)
  43.     end, 200, 1)
  44. end)
  45.  
  46. addEventHandler("onClientMarkerHit", marker[5], function(element)
  47.     if(element ~= localPlayer) then return end
  48.     local veh = getPedOccupiedVehicle(localPlayer)
  49.     setElementSpeed(veh, "kph", getElementSpeed(veh)+120)
  50. end)
  51.  
  52. addEventHandler("onClientMarkerHit", marker[11], function(element)
  53.     if(element ~= localPlayer) then return end
  54.     local veh = getPedOccupiedVehicle(localPlayer)
  55.     setElementSpeed(veh, "kph", getElementSpeed(veh)+120)
  56. end)
  57. addEventHandler("onClientMarkerHit", marker[10], function(element)
  58.     if(element ~= localPlayer) then return end
  59.     local veh = getPedOccupiedVehicle(localPlayer)
  60.     setElementSpeed(veh, "kph", getElementSpeed(veh)+120)
  61. end)
  62. addEventHandler("onClientMarkerHit", marker[6], function(element)
  63.     if(element ~= localPlayer) then return end
  64.     setTimer(function()
  65.         local veh = getPedOccupiedVehicle(localPlayer)
  66.         local x, y,z = getVehicleTurnVelocity(veh, x, y, z)
  67.         setVehicleTurnVelocity(veh, x, y-0.07, z)
  68.     end, 200, 1)
  69. end)
  70. -- MAGNET --
  71. local function magnet_render()
  72.     if(magnet_enabled == true) then
  73.         local veh = getPedOccupiedVehicle(getLocalPlayer())
  74.         local x,y,z = getElementPosition(veh)
  75.         local underx,undery,underz = getPositionUnderTheElement(veh)
  76.         setVehicleGravity(veh,underx - x,undery - y,underz - z)
  77.     end
  78. end
  79.  
  80.  
  81. function getPositionUnderTheElement(element)
  82.     local matrix = getElementMatrix (element)
  83.     local offX = 0 * matrix[1][1] + 0 * matrix[2][1] - 1 * matrix[3][1] + matrix[4][1]
  84.     local offY = 0 * matrix[1][2] + 0 * matrix[2][2] - 1 * matrix[3][2] + matrix[4][2]
  85.     local offZ = 0 * matrix[1][3] + 0 * matrix[2][3] - 1 * matrix[3][3] + matrix[4][3]
  86.     return offX,offY,offZ
  87. end
  88.  
  89. local function enableMagnet()
  90.     if(magnet_enabled == false) then
  91.         magnet_enabled = true
  92.         local veh = getPedOccupiedVehicle(localPlayer)
  93.         local x, y, z = getElementPosition(veh)
  94.         magnet = createObject(1337, x, y, z)
  95.         attachElements(magnet, veh, 0, 0, -1)
  96.         setElementCollisionsEnabled(magnet, false)
  97.         setElementAlpha(magnet, 0)
  98.         addEventHandler("onClientRender", getRootElement(), magnet_render)
  99.     end
  100. end
  101.  
  102. local function disableMagnet()
  103.     if(magnet_enabled == true) then
  104.         magnet_enabled = false
  105.         removeEventHandler("onClientRender", getRootElement(), magnet_render)
  106.         destroyElement(magnet)
  107.         if(getPedOccupiedVehicle(localPlayer)) then
  108.             setVehicleGravity(getPedOccupiedVehicle(localPlayer), 0, 0, -1)
  109.         end
  110.     end
  111. end
  112.  
  113. -- SETTINGS RENDER --
  114.  
  115. addEventHandler("onClientRender", getRootElement(), function()
  116.     local sx, sy = guiGetScreenSize()
  117.     if(setting["slowtext"] == true) or (setting["slowtext"] == "true") then
  118.         dxDrawText("Slow!", sx/2-(30/1920*sx)+2, sy/2+(150/1080*sy)+2, sx/2, sy/2, tocolor(0, 0, 0, 200), 4/1920*sx, "default-bold")
  119.         dxDrawText("Slow!", sx/2-(30/1920*sx), sy/2+(150/1080*sy), sx/2, sy/2, tocolor(255, 0, 0, 200), 4/1920*sx, "default-bold")
  120.     end
  121. --  local veh = getPedOccupiedVehicle(localPlayer)
  122. --  if(veh) then
  123. --      if(isVehicleDamageProof(veh) == false) then
  124. --          setVehicleDamageProof(veh, true)
  125. --      end
  126. --  end
  127. end)
  128.  
  129. addCommandHandler("setting", function(cmd, param1, param2)
  130.     setting[param1] = param2
  131. end)
  132.  
  133. -- HIT EVENTS --
  134.  
  135. addEventHandler("onClientMarkerHit", marker[3], function(element)
  136.     if(element ~= localPlayer) then return end
  137.     enableMagnet()
  138.     setting["slowtext"] = true
  139.     setTimer(function()
  140.         setting["slowtext"] = false
  141.     end, 3000, 1)
  142. end)
  143.  
  144. addEventHandler("onClientMarkerHit", marker[7], function(element)
  145.     if(element ~= localPlayer) then return end
  146.     enableMagnet()
  147. end)
  148. addEventHandler("onClientMarkerHit", marker[8], function(element)
  149.     if(element ~= localPlayer) then return end
  150.     enableMagnet()
  151. end)
  152. addEventHandler("onClientMarkerHit", marker[9], function(element)
  153.     if(element ~= localPlayer) then return end
  154.     disableMagnet()
  155. end)
  156. addEventHandler("onClientMarkerHit", marker[4], function(element)
  157.     if(element ~= localPlayer) then return end
  158.     disableMagnet()
  159. end)
  160.  
  161. addEventHandler("onClientPlayerWasted", getLocalPlayer(), disableMagnet)
  162.  
  163. -- ONRESOURCESTART EVENT --
  164.  
  165. addEventHandler("onClientResourceStart", getResourceRootElement(), function()
  166.     local sound = playSound("http://noneatme.vps20642.alfahosting-vps.de/doa_spin.mp3", true)
  167.     addEventHandler("onClientPlayerRadioSwitch", getRootElement(), function()
  168.         setRadioChannel(0)
  169.     end)
  170.     setRadioChannel(0)
  171.     setRadioChannel(0)
  172.     setWaterColor( 0 , 213, 255 )
  173.     setSkyGradient(0, 0, 0, 50, 50, 50)
  174.     bindKey("z", "down", function()
  175.         if(getSoundVolume(sound) == 1) then
  176.             setSoundVolume(sound, 0)
  177.         else
  178.             setSoundVolume(sound, 1)
  179.         end
  180.     end)
  181. end)
  182.  
  183. -- SKYCOLOR --
  184. local wr, wg, wb = 1, 1, 1
  185. local curframerate = 1
  186. local wrd, wgd, wbd = false, false, false
  187.  
  188. addEventHandler("onClientRender", getRootElement(), function()
  189.     if(wr > 0) and (wrd == false)then
  190.         wr = wr+curframerate
  191.         if(wb ~= 1) then
  192.             wb = wb-curframerate
  193.         end
  194.         if(wr > 254) then
  195.             wr = 255
  196.             wrd = true
  197.         end
  198.    
  199.     elseif(wg > 0) and (wgd == false)then
  200.         wg = wg+curframerate
  201.         wr = wr-curframerate
  202.         if(wg > 254) then
  203.             wg = 255
  204.             wgd = true
  205.         end
  206.  
  207.     elseif(wb > 0) and (wbd == false)then
  208.         wb = wb+curframerate
  209.         wg = wg-curframerate
  210.         if(wb > 254) then
  211.             wbd = false
  212.             wrd = false
  213.             wgd = false
  214.             wb = 255
  215.             wr = 1
  216.             wg = 1
  217.         end
  218.     end
  219.  
  220.     setSkyGradient(wr, wg, wb, wr+wg/2, wg+wb/2, wb+wr/2)
  221.    
  222. end)
  223.  
  224. -- FUNCTIONS --
  225. function setElementSpeed(element, unit, speed) -- only work if element is moving!
  226.     if (unit == nil) then unit = 0 end
  227.     if (speed == nil) then speed = 0 end
  228.     speed = tonumber(speed)
  229.     local acSpeed = getElementSpeed(element, unit)
  230.     if (acSpeed~=false) then -- if true - element is valid, no need to check again
  231.         local diff = speed/acSpeed
  232.         local x,y,z = getElementVelocity(element)
  233.         setElementVelocity(element,x*diff,y*diff,z*diff)
  234.         return true
  235.     end
  236.  
  237.     return false
  238. end
  239.  
  240. function getElementSpeed(element,unit)
  241.     if (unit == nil) then unit = 0 end
  242.     if (isElement(element)) then
  243.         local x,y,z = getElementVelocity(element)
  244.         if (unit=="mph" or unit==1 or unit =='1') then
  245.             return (x^2 + y^2 + z^2) ^ 0.5 * 100
  246.         else
  247.             return (x^2 + y^2 + z^2) ^ 0.5 * 1.61 * 100
  248.         end
  249.     else
  250.         outputDebugString("Not an element. Can't get speed")
  251.         return false
  252.     end
  253. end
  254.  
  255. -- CRANE SPIN --
  256.  
  257. local crane = createObject(1384, 1069.5888671875, -4075.3041992188, 33.477073669434)
  258. local crane2 = createObject(1388, 1131.7967529297, -4175.3701171875, 33.552200317383)
  259.  
  260. setTimer(function()
  261.     moveObject(crane, 700, 1069.5888671875, -4075.3041992188, 33.477073669434, 0, 0, 360)
  262.     moveObject(crane2, 700, 1131.7967529297, -4175.3701171875, 33.552200317383, 0, 0, 360)
  263. end, 700, -1)
  264.  
  265.  
  266. -- IMAGE --
  267.  
  268. addEventHandler("onClientResourceStart", getResourceRootElement(), function()
  269.     local shader = dxCreateShader("textureshader.fx")
  270.     dxSetShaderValue(shader, "Tex", dxCreateTexture("image.jpg"))
  271.     engineApplyShaderToWorldTexture(shader, "prolaps02")
  272.    
  273.     local shader2 = dxCreateShader("textureshader.fx")
  274.     dxSetShaderValue(shader2, "Tex", dxCreateTexture("sandtextur.jpg"))
  275.     engineApplyShaderToWorldTexture(shader2, "corr_roof1")
  276. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!