Guest User

Untitled

a guest
Jan 22nd, 2019
76
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.42 KB | None | 0 0
  1. #define PUB->%0(%1) public %0(%1)
  2. #define STR->%0(%1) stock %0(%1)
  3. #define FUNC->%0(%1) forward %0(%1); public %0(%1)
  4. #define FORM->%0(%1) format(%0, sizeof(%0), %1)
  5. #define FRE->%0 TogglePlayerControllable(%0, false)
  6. #define UNFRE->%0 TogglePlayerControllable(%0, true)
  7. #define TIM->%0(%1, %2, %3, %4) SetTimerEx(%0, %1, %2, %3, %4)
  8. #define PLAYERNAME->%0(%1) GetPlayerName(%1, %0, sizeof(%0))
  9.  
  10.  
  11. PUB->OnPlayerConnect(playerid)
  12. {
  13. TIM->OnSpeedHack(1000, false, "i", playerid);
  14. return 1;
  15. }
  16.  
  17. FUNC->OnSpeedHack(playerid)
  18. {
  19. if(GetPlayerSpeed(playerid) > 150)
  20. {
  21. static plrName[MAX_PLAYER_NAME+2], output[200];
  22. PLAYERNAME->plrName;
  23. FORM->Output("%s detected using speedhack at (%d km/u)", plrName, GetPlayerSpeed(playerid));
  24. SendClientMessage(playerid, -1, Output);
  25. Kick(playerid); //or Ban(playerid);
  26. return 1;
  27. }
  28. return 0;
  29. }
  30.  
  31. STR->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. }
Add Comment
Please, Sign In to add comment