Stuneris

Matuokliai

Sep 17th, 2011
313
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 1.18 KB | None | 0 0
  1. #include <a_samp>
  2.  
  3. forward Matuojam(playerid, Float:X, Float:Y, Float:Z);
  4. forward Baigiam(playerid);
  5. new bool:pamatavo[MAX_PLAYERS];
  6.  
  7. public Baigiam(playerid) { pamatavo[playerid] = false; return 1; }
  8.  
  9. public Matuojam(playerid, Float:X, Float:Y, Float:Z)
  10. {
  11.     if(pamatavo[playerid] == true) return 1;
  12.     if(IsPlayerInRangeOfPoint(playerid, 10, X, Y, Z))
  13.     {
  14.         if(GetPlayerSpeed(playerid, true) > 70)
  15.         {
  16.             SetPlayerWantedLevel(playerid, GetPlayerWantedLevel(playerid)+2);
  17.             SendClientMessage(playerid, 0x0000FFFF, "Jūs viršijote leistiną greitį (70km/h)");
  18.             pamatavo[playerid] = true;
  19.             SetTimerEx("Baigiam", 2000, 0, "i", playerid);
  20.         }
  21.     }
  22.     return 1;
  23. }
  24.  
  25. Matuoklis(Float:X, Float:Y, Float:Z, Float:A)
  26. {
  27.     CreateObject(18880, X, Y, Z, 0.0, 0.0, A);
  28.     SetTimerEx("Matuojam", 1000, 1, "fff", X, Y, Z);
  29. }
  30.  
  31. GetPlayerSpeed(playerid,bool:kmh)
  32. {
  33.     new Float:Vx,Float:Vy,Float:Vz,Float:rtn;
  34.     if(IsPlayerInAnyVehicle(playerid)) GetVehicleVelocity(GetPlayerVehicleID(playerid),Vx,Vy,Vz); else GetPlayerVelocity(playerid,Vx,Vy,Vz);
  35.     rtn = floatsqroot(floatabs(floatpower(Vx + Vy + Vz,2)));
  36.     return kmh?floatround(rtn * 100 * 1.61):floatround(rtn * 100);
  37. }
Advertisement
Add Comment
Please, Sign In to add comment