1. --[[
2.         Developrs: Ylos
3. ]]
4.  
5. -- Position vehicles
6.  
7. function getVehicleHandlingProperty ( element, property )
8.     if isElement ( element ) and getElementType ( element ) == "vehicle" and type ( property ) == "string" then
9.         local handlingTable = getVehicleHandling ( element )
10.         local value = handlingTable[property]
11.  
12.         if value then
13.             return value
14.         end
15.     end
16.  
17.     return false
18. end
19.  
20. local asapd_radiowozy = {
21. --{-1640.31, 653.80, -5.52, 0, 0, 90, 597},
22. {-1611.96,750.00,-5.62,0, 0, 180, 597},
23. {-1607.93,750.00,-5.62,0, 0, 180, 597},
24. {-1603.95,750.00,-5.62,0, 0, 180, 597},
25. {-1599.93,750.00,-5.62,0, 0, 180, 597},
26. {-1595.89,750.00,-5.62,0, 0, 180, 597},
27. {-1591.57,750.00,-5.62,0, 0, 180, 597},
28. {-1587.56,750.00,-5.61,0, 0, 180, 597},
29. {-1583.54,750.00,-5.62,0, 0, 180, 597},
30. {-1579.56,750.00,-5.62,0, 0, 180, 597},
31.  
32. }
33.  
34. local asapd_holowniki = {
35.  
36. {-1640.21, 670.16, -5.37, 358.0, 0.0, 269.7, 525},
37. {-1640.21, 674.06, -5.36, 358.3, 360.0, 269.9, 525},
38. {-1640.25, 678.24, -5.37, 358.0, 0.0, 270.4, 525},
39. {-1640.19, 682.35, -5.36, 358.3, 0.0, 270.5, 525},
40. {-1640.29, 686.39, -5.36, 358.2, 360.0, 269.4, 525},
41.  
42. }
43.  
44. local sapd_premiery = {
45.  
46. {-1608.37, 693.82, -5.50, 0.0, 0.0, 179.6, 426},
47. {-1604.17, 693.80, -5.50, 0.0, 0.0, 179.8, 426},
48. {-1600.09, 693.79, -5.50, 0.0, 0.0, 179.6, 426},
49. {-1596.05, 693.82, -5.50, 0.0, 0.0, 180.0, 426},
50.  
51. }
52.  
53. local sapd_sultany = {
54.  
55. --{-1596.70, 674.97, -5.61, 0.13, 0.00, 358.53,560},
56. --{-1600.68, 674.92, -5.61, 0.13, 0.00, 359.72,560},
57.  
58. }
59.  
60. local sapd_radiowozy = {
61.  
62. {-1572.40,742.39,-5.62,0,0,90,597},
63. {-1572.40,738.14,-5.62,0,0,90,597},
64. {-1572.40,734.28,-5.62,0,0,90,597},
65. {-1572.40,730.09,-5.62,0,0,90,597},
66. {-1572.40,726.07,-5.62,0,0,90,597},
67. {-1572.40,722.03,-5.62,0,0,90,597},
68. {-1572.40,717.71,-5.61,0,0,90,597},
69. {-1572.40,713.64,-5.62,0,0,90,597},
70. {-1572.40,709.77,-5.62,0,0,90,597},
71. {-1572.40,705.49,-5.62,0,0,90,597},
72. {-1592.21,705.01,-5.6,0,0,270,523},
73. {-1592.38,707.86,-5.6,0,0,270,523},
74. {-1592.82,710.04,-5.6,0,0,270,523},
75. {-1592.86,712.81,-5.6,0,0,270,523},
76. }
77.  
78.  
79. local sapd_cheetahy = {
80. {-1596.37,676.05,-5.40, 0,0,0,415},
81. {-1600.61,676.49,-5.40, 0,0,0,415},
82. }
83.  
84. for i,v in pairs(asapd_radiowozy) do
85.         local vehicle=createVehicle(v[7], v[1], v[2], v[3])
86.         setVehicleColor(vehicle,255,255,255,255)
87.         setElementRotation(vehicle, v[4], v[5], v[6])
88.         setVehicleEngineState(vehicle, false)
89.         setElementFrozen(vehicle, true)
90.  
91.         removeVehicleSirens(vehicle)
92.         setElementData(vehicle,"vehicle:police", true)
93.     setVehicleSirens ( vehicle, 1, 0.802, 2.300, -0.013, 255, 255, 255, 255, 255 )
94.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
95.         setVehicleSirens ( vehicle, 2, -0.795, 2.300, 0.000, 255, 255, 255, 255, 255 )
96.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
97.         setVehicleSirens ( vehicle, 3, -0.775, -2.700, 0.047, 255, 0, 0, 255, 255 )
98.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
99.         setVehicleSirens ( vehicle, 4, 0.768, -2.700, 0.039, 255, 0, 0, 255, 255 )
100.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
101.         setVehicleSirens ( vehicle, 5, 0.522, -0.405, 0.900, 0, 96, 255, 255, 255 )
102.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
103.         setVehicleSirens ( vehicle, 6, -0.479, -0.424, 0.900, 255, 0, 0, 255, 255 )
104.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
105.         setVehicleSirens ( vehicle, 7, 0.054, -1.873, 0.407, 0, 96, 255, 255, 255 )
106.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
107.         setVehicleSirens ( vehicle, 8, 0.053, -1.836, 0.430, 255, 0, 0, 255, 255 )
108.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
109.        
110.         setVehicleColor( vehicle, 0, 40, 0, 100,100,100, 0,0,0 ,0,0,0 )
111.         addVehicleUpgrade(vehicle, 1025)
112.        
113.         setElementData(vehicle,"vehicle:rank",1)
114.        
115.         setElementFrozen(vehicle,true)
116.         setElementData(vehicle,"vehicle:fuel", 100)
117.         setElementData(vehicle,"vehicle:ownedPlayer", 1)
118.         setElementData(vehicle,"vehicle:id", i+660606)
119.         setVehiclePlateText(vehicle,"S " .. i+660606)
120.         setElementData(vehicle,"vehicle:desc","Radiowóz\nA-SAPD\nSan Fierro\n001-" .. i+660606 .."")
121.         setVehicleDamageProof(vehicle,true)
122.        
123.         local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
124.         local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
125.         local masa = getVehicleHandlingProperty(vehicle,"mass")
126.         local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
127.         local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
128.         local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
129.         local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
130.         setVehicleHandling(vehicle,"engineAcceleration",fast+6.5)
131.         setVehicleHandling(vehicle,"maxVelocity",maxfast+115)
132.         setVehicleHandling(vehicle,"tractionMultiplier",xd+0.25)
133.         setVehicleHandling(vehicle,"mass",masa+150+100+200+55)
134.         setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
135.         setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
136.         setVehicleHandling(vehicle,"driveType", "awd")
137.  
138. end
139.  
140. for i,v in pairs(asapd_holowniki) do
141.         local vehicle=createVehicle(v[7], v[1], v[2], v[3])
142.         setVehicleColor(vehicle,255,255,255,255)
143.         setElementRotation(vehicle, v[4], v[5], v[6])
144.         setVehicleEngineState(vehicle, false)
145.         setElementFrozen(vehicle, true)
146.  
147.         removeVehicleSirens(vehicle)
148.         setElementData(vehicle,"vehicle:police", true)
149.     setVehicleSirens ( vehicle, 1, 0.614, -0.522, 1.400, 255, 0, 0, 255, 255 )
150.         addVehicleSirens ( vehicle, 3, 2, true, false, false, true )
151.         setVehicleSirens ( vehicle, 2, -0.603, -0.509, 1.400, 255, 0, 0, 255, 255 )
152.         addVehicleSirens ( vehicle, 3, 2, true, false, false, true )
153.         setVehicleSirens ( vehicle, 3, 0.015, -0.500, 1.400, 255, 156, 0, 255, 255 )
154.         addVehicleSirens ( vehicle, 3, 2, true, false, false, true )
155.        
156.         setVehicleColor( vehicle, 0, 32, 0, 0,32,0, 0,0,0 ,0,0,0 )
157.         addVehicleUpgrade(vehicle, 1025)
158.        
159.         setElementData(vehicle,"vehicle:rank",1)
160.        
161.         setElementFrozen(vehicle,true)
162.         setElementData(vehicle,"vehicle:fuel", 100)
163.         setElementData(vehicle,"vehicle:id", i+707010)
164.         setVehiclePlateText(vehicle,"S " .. i+707010)
165.         setElementData(vehicle,"vehicle:ownedPlayer", 1)
166.         setElementData(vehicle,"vehicle:desc","Holownik\nA-SAPD\nSan Fierro\n002-" .. i+707010 .."")
167.         setVehicleDamageProof(vehicle,true)
168.  
169. end
170.  
171. for i,v in pairs(sapd_premiery) do
172.         local vehicle=createVehicle(v[7], v[1], v[2], v[3])
173.         setVehicleColor(vehicle,255,255,255,255)
174.         setElementRotation(vehicle, v[4], v[5], v[6])
175.         setVehicleEngineState(vehicle, false)
176.         setElementFrozen(vehicle, true)
177.         setVehicleDamageProof(vehicle,true)
178.         removeVehicleSirens(vehicle)
179.         setElementData(vehicle,"vehicle:police", true)
180.         setVehicleSirens ( vehicle, 1, 0.798, 2.300, 0.017, 255, 255, 255, 255, 255 )
181.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
182.         setVehicleSirens ( vehicle, 2, -0.772, 2.300, 0.007, 255, 255, 255, 255, 255 )
183.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
184.         setVehicleSirens ( vehicle, 3, -0.792, -2.700, 0.025, 255, 0, 0, 255, 255 )
185.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
186.         setVehicleSirens ( vehicle, 4, 0.773, -2.700, 0.037, 255, 0, 0, 255, 255 )
187.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
188.         setVehicleSirens ( vehicle, 5, -0.093, -1.915, 0.379, 255, 0, 0, 255, 255 )
189.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
190.         setVehicleSirens ( vehicle, 6, 0.164, -1.931, 0.358, 0, 96, 255, 255, 255 )
191.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
192.        
193.         -- Police Siren: 3964
194.        
195.         --police_object = createObject(3964,0,0,0)
196.         --attachElements(police_object,vehicle,0.75,1.15,1,0,0,0)
197.        
198.         setVehicleColor(vehicle, 0,0,25 )
199.         addVehicleUpgrade(vehicle, 1025)
200.        
201.         setElementData(vehicle,"vehicle:rank",5)
202.  
203.         setElementFrozen(vehicle,true)
204.         setElementData(vehicle,"vehicle:fuel", 100)
205.  
206.         setElementData(vehicle,"vehicle:id", i+997010)
207.         setVehiclePlateText(vehicle,"S " .. i+997010)
208.         setElementData(vehicle,"vehicle:ownedPlayer", 1)
209.         setElementData(vehicle,"vehicle:desc","Premier\nSAPD\nSan Fierro\n002-".. i+997010 .."")
210.        
211.         local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
212.         local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
213.         local masa = getVehicleHandlingProperty(vehicle,"mass")
214.         local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
215.         local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
216.         local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
217.         local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
218.         setVehicleHandling(vehicle,"engineAcceleration",fast+6.5)
219.         setVehicleHandling(vehicle,"maxVelocity",maxfast+115)
220.         setVehicleHandling(vehicle,"tractionMultiplier",xd+0.25)
221.         setVehicleHandling(vehicle,"mass",masa+150+100+200+55)
222.         setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
223.         setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
224.         setVehicleHandling(vehicle,"driveType", "awd")
225.  
226. end
227.  
228. for i,v in pairs(sapd_sultany) do
229.         local vehicle=createVehicle(v[7], v[1], v[2], v[3])
230.         setVehicleColor(vehicle,255,255,255,255)
231.         setElementRotation(vehicle, v[4], v[5], v[6])
232.         setVehicleEngineState(vehicle, false)
233.         setElementFrozen(vehicle, true)
234.         setVehicleDamageProof(vehicle,true)
235.         removeVehicleSirens(vehicle)
236.         setElementData(vehicle,"vehicle:police", true)
237.         setVehicleSirens ( vehicle, 1, 0.736, 2.400, -0.178, 255, 255, 255, 255, 255 )
238.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
239.         setVehicleSirens ( vehicle, 2, -0.727, 2.400, -0.155, 255, 255, 255, 255, 255 )
240.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
241.         setVehicleSirens ( vehicle, 3, -0.749, -2.300, 0.191, 255, 0, 0, 255, 255 )
242.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
243.         setVehicleSirens ( vehicle, 4, 0.712, -2.300, 0.168, 255, 0, 0, 255, 255 )
244.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
245.         setVehicleSirens ( vehicle, 5, -0.150, -1.542, 0.467, 255, 0, 0, 255, 255 )
246.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
247.         setVehicleSirens ( vehicle, 6, 0.185, -1.545, 0.465, 0, 96, 255, 255, 255 )
248.         addVehicleSirens ( vehicle, 6, 2, true, false, false, true )
249.        
250.         setVehicleColor(vehicle, 0,0,25 )
251.         addVehicleUpgrade(vehicle, 1025)
252.        
253.         setElementData(vehicle,"vehicle:rank",5)
254.  
255.         setElementFrozen(vehicle,true)
256.         setElementData(vehicle,"vehicle:fuel", 100)
257.  
258.         setElementData(vehicle,"vehicle:id", i+910290)
259.         setVehiclePlateText(vehicle,"S " .. i+910290)
260.         setElementData(vehicle,"vehicle:desc","[SF]-[003-" .. i+910290 .."]")
261.         local acc=getVehicleHandling(vehicle)
262.         local val=acc["engineAcceleration"]
263.         setElementData(vehicle,"vehicle:ownedPlayer", 1)
264.         setVehicleHandling(vehicle,"maxVelocity",450)
265.         setVehicleHandling(vehicle,"engineAcceleration",val+5)
266.  
267. end
268.  
269. for i,v in pairs(sapd_radiowozy) do
270.         local vehicle=createVehicle(v[7], v[1], v[2], v[3])
271.         setVehicleColor(vehicle,0,0,64,255)
272.         setElementRotation(vehicle, v[4], v[5], v[6])
273.         setVehicleEngineState(vehicle, false)
274.         setElementFrozen(vehicle, true)
275.         setVehicleDamageProof(vehicle,true)
276.         removeVehicleSirens(vehicle)
277.         setElementData(vehicle,"vehicle:police", true)
278.         setVehicleSirens ( vehicle, 1, 0.802, 2.300, -0.013, 255, 255, 255, 255, 255 )
279.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
280.         setVehicleSirens ( vehicle, 2, -0.795, 2.300, 0.000, 255, 255, 255, 255, 255 )
281.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
282.         setVehicleSirens ( vehicle, 3, -0.775, -2.700, 0.047, 255, 0, 0, 255, 255 )
283.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
284.         setVehicleSirens ( vehicle, 4, 0.768, -2.700, 0.039, 255, 0, 0, 255, 255 )
285.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
286.         setVehicleSirens ( vehicle, 5, 0.522, -0.405, 0.900, 0, 96, 255, 255, 255 )
287.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
288.         setVehicleSirens ( vehicle, 6, -0.479, -0.424, 0.900, 255, 0, 0, 255, 255 )
289.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
290.         setVehicleSirens ( vehicle, 7, 0.054, -1.873, 0.407, 0, 96, 255, 255, 255 )
291.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
292.         setVehicleSirens ( vehicle, 8, 0.053, -1.836, 0.430, 255, 0, 0, 255, 255 )
293.         addVehicleSirens ( vehicle, 8, 2, true, false, false, true )
294.         setVehicleColor( vehicle, 0, 0, 32, 100,100,100, 0,0,0 ,0,0,0 )
295.         addVehicleUpgrade(vehicle, 1025)
296.        
297.         local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
298.         local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
299.         local masa = getVehicleHandlingProperty(vehicle,"mass")
300.         local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
301.         local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
302.         local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
303.         local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
304.         setVehicleHandling(vehicle,"engineAcceleration",fast+6.5)
305.         setVehicleHandling(vehicle,"maxVelocity",maxfast+115)
306.         setVehicleHandling(vehicle,"tractionMultiplier",xd+0.25)
307.         setVehicleHandling(vehicle,"mass",masa+150+100+200+55)
308.         setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
309.         setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
310.         setVehicleHandling(vehicle,"driveType", "awd")
311.        
312.        
313.         setElementData(vehicle,"vehicle:rank",2)
314.         setElementFrozen(vehicle,true)
315.         setElementData(vehicle,"vehicle:ownedPlayer", 1)
316.         setElementData(vehicle,"vehicle:fuel", 100)
317.  
318.         setElementData(vehicle,"vehicle:id", i+808010)
319.         setVehiclePlateText(vehicle,"S " .. i+808010)
320.         setElementData(vehicle,"vehicle:desc","Radiowóz\nSAPD\nSan Fierro\n003-" .. i+808010 .."")
321.  
322. end
323.  
324.  
325. for i,v in pairs(sapd_cheetahy) do
326.         local vehicle=createVehicle(v[7], v[1], v[2], v[3])
327.         setVehicleColor(vehicle,0,0,0,255)
328.         setElementRotation(vehicle, v[4], v[5], v[6])
329.         setVehicleEngineState(vehicle, false)
330.         setElementFrozen(vehicle, true)
331.         setVehicleDamageProof(vehicle,true)
332.         removeVehicleSirens(vehicle)
333.         setElementData(vehicle,"vehicle:police", true)
334.         addVehicleSirens(vehicle, 2, 2, false, false, false, false)
335.         setVehicleSirens(vehicle, 1, -0.3, 2.7, -0.1, 255, 0, 0, 153, 140.3)
336.         setVehicleSirens(vehicle, 2, 0.2, 2.7, -0.1, 0, 214.2, 255, 168.3, 140.3)
337.         addVehicleUpgrade(vehicle, 1025)
338.        
339.         local fast = getVehicleHandlingProperty(vehicle,"engineAcceleration")
340.         local maxfast = getVehicleHandlingProperty(vehicle,"maxVelocity")
341.         local masa = getVehicleHandlingProperty(vehicle,"mass")
342.         local masa2 = getVehicleHandlingProperty(vehicle,"turnMass")
343.         local xd = getVehicleHandlingProperty(vehicle,"tractionMultiplier")
344.         local coef = getVehicleHandlingProperty(vehicle,"dragCoeff")
345.         local stdg = getVehicleHandlingProperty(vehicle,"steeringLock")
346.         setVehicleHandling(vehicle,"engineAcceleration",fast+6.5)
347.         setVehicleHandling(vehicle,"maxVelocity",maxfast+115)
348.         setVehicleHandling(vehicle,"tractionMultiplier",xd+0.25)
349.         setVehicleHandling(vehicle,"mass",masa+150+100+200+55)
350.         setVehicleHandling(vehicle,"steeringLock",stdg+0.25)
351.         setVehicleHandling(vehicle,"dragCoeff",coef-0.25)
352.         setVehicleHandling(vehicle,"driveType", "awd")
353.        
354.        
355.         setElementData(vehicle,"vehicle:rank",2)
356.         setElementFrozen(vehicle,true)
357.         setElementData(vehicle,"vehicle:ownedPlayer", 1)
358.         setElementData(vehicle,"vehicle:fuel", 100)
359.  
360.         setElementData(vehicle,"vehicle:id", i+808010)
361.         setVehiclePlateText(vehicle,"HOT-P " .. i+808010)
362. end
363.  
364.  
365.  
366. addEventHandler("onVehicleEnter", resourceRoot, function(plr,seat,jacked)
367.         if seat == 0 then
368.                 setElementData(source,"use:player",true)
369.                 outputChatBox("* Wszedleś(aś) do pojazdu frakcyjnego, dbaj o niego i odstaw na miejsce.", plr)
370.                 outputChatBox("* Wszelkie zostawiania pojazdów będa karane banem.", plr)
371.         end
372. end)
373.  
374. setTimer(function()
375.         for i,vehicle in pairs(getElementsByType("vehicle", resourceRoot)) do
376.                 local x,y,z = getElementPosition(vehicle)
377.                 local r1,r2,r3 = getElementRotation(vehicle)
378.                 setVehicleRespawnPosition(vehicle,x,y,z,r1,r2,r3)
379.                 toggleVehicleRespawn(vehicle,true)
380.                 setVehicleIdleRespawnDelay(vehicle,3600000)
381.                 setVehicleHandling(vehicle, "driveType", "awd")
382.                 setElementData(vehicle,"vehicle:duty","SAPD")
383.         end
384. end,1000,1)
385.  
386. -- Zsynchronizowana do licznika
387. function setElementSpeed(element, speed)
388.         if (speed == nil) then speed = 0 end
389.         speed = tonumber(speed)
390.         local vx,vy,vz = getElementVelocity(element)
391.         local acSpeed = ((vx^2+vy^2+vz^2)^(0.5))*180
392.         local diff = speed/acSpeed
393.         if diff ~= diff then return end -- if the number is a 'NaN' return end.
394.         local x,y,z = getElementVelocity(element)
395.         setElementVelocity(element,x*diff,y*diff,z*diff)
396.         return true
397. end
398.  
399. -- odmrażamy pojazdy pociagniete holownikiem!
400. function detachTrailer(theTruck)
401.     setElementFrozen(source, false)
402.  end
403. addEventHandler("onTrailerAttach", getRootElement(), detachTrailer)