Advertisement
VladaSavel

Police Lights SAMP

Feb 21st, 2015
446
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 2.98 KB | None | 0 0
  1. /* Police lights V1.0 */
  2. /* Autor : VladaSavel */
  3. /* For SuperKalba.tk */
  4. /*Address: 93.91.250.147:27023*/
  5.  
  6. #define FILTERSCRIPT
  7.  
  8. #include <a_samp>
  9. #include <sscanf2>
  10. #include <zcmd>
  11.  
  12. #define TYPE_AIRPLANE       0
  13. #define TYPE_TRAIN          1
  14. #define TYPE_BIKES          2
  15. #define TYPE_BOATS          3
  16. #define TYPE_CAR            4
  17. #define TYPE_RC             5
  18. new pouzilmajak [MAX_PLAYERS];
  19. stock GetVehicleType(vehicleid)
  20. {
  21.     new model = GetVehicleModel(vehicleid);
  22.  
  23.     if(model > 399 && model < 613)
  24.     {
  25.     switch(model)
  26.     {
  27.     case 590,569,537,538,570,449: return TYPE_TRAIN;
  28.     case 481,509,510,581,462,521,463,522,461,448,468,586: return TYPE_BIKES;
  29.     case 592,577,511,548,512,593,425,417,487,553,488,497,563,476,447,519,460,469,513,520: return TYPE_AIRPLANE;
  30.     case 472,473,493,595,484,430,453,452,446,454: return TYPE_BOATS;
  31.     case 441,464,594,465,501,564: return TYPE_RC;
  32.     default: return TYPE_CAR;
  33.     }
  34.     }
  35.     return false;
  36. }
  37. #if defined FILTERSCRIPT
  38. public OnFilterScriptInit()
  39. {
  40.     print("\n--------------------------------------");
  41.     print(" Police Lights By Savel");
  42.     print("--------------------------------------\n");
  43.     return 1;
  44. }
  45.  
  46. public OnFilterScriptExit()
  47. {
  48.     return 1;
  49. }
  50.  
  51. #else
  52. #endif
  53. public OnPlayerDisconnect(playerid, reason)
  54. {
  55.     {
  56.         DestroyObject(GetPVarInt(playerid, "majak"));DeletePVar(playerid, "Status");
  57.         DestroyObject(GetPVarInt(playerid, "majak1"));DeletePVar(playerid, "Status");
  58.         pouzilmajak[playerid] = 0;
  59.     }
  60.     return 1;
  61. }
  62. public OnVehicleDeath(vehicleid, killerid)
  63. {
  64.     for(new i = 0; i < MAX_PLAYERS; i++) if(IsPlayerConnected(i))
  65.     {
  66.         DestroyObject(GetPVarInt(vehicleid, "majak"));DeletePVar(vehicleid, "Status");
  67.         DestroyObject(GetPVarInt(vehicleid, "majak1"));DeletePVar(vehicleid, "Status");
  68.         pouzilmajak[i] = 0;
  69.     }
  70.     return 1;
  71. }
  72. public OnPlayerExitVehicle(playerid, vehicleid)
  73. {
  74.     {
  75.         DestroyObject(GetPVarInt(playerid, "majak"));DeletePVar(playerid, "Status");
  76.         DestroyObject(GetPVarInt(playerid, "majak1"));DeletePVar(playerid, "Status");
  77.         pouzilmajak[playerid] = 0;
  78.     }
  79.     return 1;
  80. }
  81. CMD:sirena(playerid,params[])
  82. {
  83.     new vehicleid = GetPlayerVehicleID(playerid);
  84.     if(pouzilmajak[playerid] == 1 ) return SendClientMessage(playerid,-1,"This comand use only once");
  85.     if(GetVehicleType(vehicleid) != TYPE_CAR) return SendClientMessage(playerid,-1,"Don't use light on this vehicle");
  86.     if(IsPlayerInAnyVehicle(playerid))
  87.     {
  88.         SetPVarInt(playerid, "Status", 1);
  89.         SetPVarInt(playerid, "majak", CreateObject(18646,0,0,0,0,0,0));
  90.         SetPVarInt(playerid, "majak1", CreateObject(18646,0,0,0,0,0,0));
  91.         AttachObjectToVehicle(GetPVarInt(playerid, "majak"), GetPlayerVehicleID(playerid), 0.0, 0.0, 0.8, 0.0, 0.0, 0.0);
  92.         AttachObjectToVehicle(GetPVarInt(playerid, "majak1"), GetPlayerVehicleID(playerid), 0.0, 0.0, 0.8, 0.0, 0.0, 0.0);
  93.         pouzilmajak[playerid] = 1;
  94.     }else{
  95.    SendClientMessage( playerid, -1, "You are not in vehicle." );
  96.          }
  97.     return 1;
  98. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement