Advertisement
Guest User

Pawn battle (Rey kodas)

a guest
Jun 13th, 2015
380
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 2.62 KB | None | 0 0
  1. #include <a_samp>
  2. #include <zcmd>
  3.  
  4. #define DIALOG_PARKING 0
  5.  
  6. forward CheckVehicle(vehicleid);
  7.  
  8. enum _playerData
  9. {
  10.     bool:kvitukas
  11. }
  12. new
  13.     playerData[MAX_PLAYERS][_playerData],
  14.     playerCar,
  15.     Float:VehicleX,
  16.     Float:VehicleY,
  17.     Float:VehicleZ;
  18.  
  19. main()
  20. {
  21.     print("\n mode: on");
  22. }
  23.  
  24. public OnGameModeInit()
  25. {
  26.     SetGameModeText("2god4raimis");
  27.     playerCar = AddStaticVehicle(411,2114.2361,1368.3654,10.1608,89.9382,0,0);
  28.     AddPlayerClass(0,2110.7600,1367.4999,10.8203,66.5192,0,0,0,0,0,0);
  29.     Create3DTextLabel("Norint nusipirkti parkavimosi kvita\nspauskite N", -1, 2113.3101, 1382.8444, 10.8203, 30, 0, 0);
  30.     return 1;
  31. }
  32.  
  33. public OnPlayerSpawn(playerid)
  34. {
  35.     GivePlayerMoney(playerid, 256);
  36.     playerData[playerid][kvitukas] = false;
  37.     return 1;
  38. }
  39.  
  40. public OnPlayerEnterCheckpoint(playerid)
  41. {
  42.     if(IsPlayerInAnyVehicle(playerid)){
  43.         SetTimerEx("CheckVehicle",500,true,"d",playerCar);
  44.         DisablePlayerCheckpoint(playerid);
  45.         SendClientMessage(playerid, -1, "Aciu, kad naudojates musu parkavimosi paslaugomis!");
  46.     }
  47.     return 1;
  48. }
  49.  
  50. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  51. {
  52.     if(newkeys == KEY_NO && IsPlayerInAnyVehicle(playerid) && IsPlayerInRangeOfPoint(playerid, 5, 2113.3101, 1382.8444, 10.8203)){
  53.         ShowPlayerDialog(playerid, DIALOG_PARKING, DIALOG_STYLE_MSGBOX, "Parkavimo kvituko pirkimas", "Ar norite nusipirkti parkavimo kvituka uz 5$?", "Taip", "Ne");
  54.         return 1;
  55.     }
  56.     return 1;
  57. }
  58.  
  59. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  60. {
  61.     switch(dialogid){
  62.         case DIALOG_PARKING:{
  63.             if(response){
  64.                 if(GetPlayerMoney(playerid) < 5) return SendClientMessage(playerid, -1, "Neturi tiek pinigu!");
  65.                 if(playerData[playerid][kvitukas]) return SendClientMessage(playerid, -1, "Parkavimo kvituka jau turi!");
  66.                 GivePlayerMoney(playerid, -5);
  67.                 playerData[playerid][kvitukas] = true;
  68.                 SetPlayerCheckpoint(playerid, 2116.8352,1398.5936,10.8203, 2);
  69.                 SendClientMessage(playerid, -1, "Tavo parkavimo vieta pazymeta zemelapyje!");
  70.             }
  71.             else return SendClientMessage(playerid, -1, "Geros dienos!");
  72.         }
  73.     }
  74.     return 1;
  75. }
  76.  
  77. public CheckVehicle(vehicleid)
  78. {
  79.     new uzimta;
  80.     for(new i = 0; i < MAX_PLAYERS; i++){
  81.         if(!IsPlayerConnected(i)) continue;
  82.         if(GetPlayerVehicleID(i) == vehicleid && GetPlayerVehicleSeat(i) == 0) uzimta = 1;
  83.     }
  84.     if(uzimta){ GetVehiclePos(vehicleid,VehicleX,VehicleY,VehicleZ); }
  85.     else{
  86.         new
  87.             Float:NewX,
  88.             Float:NewY,
  89.             Float:NewZ;
  90.         GetVehiclePos(vehicleid,NewX,NewY,NewZ);
  91.         if(NewX != VehicleX && NewY != VehicleY && NewZ != VehicleZ) SetVehiclePos(vehicleid,VehicleX,VehicleY,VehicleZ);
  92.     }
  93.     return 1;
  94. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement