Guest User

Untitled

a guest
Sep 24th, 2012
46
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 4.26 KB | None | 0 0
  1. [code]// Taka mała definicja, która poprawia składnię w Pawno i dodaje obsługę "float":
  2. #define float Float:
  3.  
  4. // Tworzysz nową tablicę z pojazdami:
  5. new gVehicleNames[212][] =
  6. {
  7.     "Landstalker", "Bravura", "Buffalo", "Linerunner", "Pereniel", "Sentinel", "Dumper", "Firetruck", "Trashmaster", "Stretch", "Manana",
  8.     "Infernus", "Voodoo", "Pony", "Mule", "Cheetah", "Ambulance", "Leviathan", "Moonbeam", "Esperanto", "Taxi", "Washington", "Bobcat",
  9.     "Mr Whoopee", "BF Injection", "Hunter", "Premier", "Enforcer", "Securicar", "Banshee", "Predator", "Bus", "Rhino", "Barracks",
  10.     "Hotknife", "Trailer", "Previon", "Coach", "Cabbie", "Stallion", "Rumpo", "RC Bandit", "Romero", "Packer", "Monster", "Admiral",
  11.     "Squalo", "Seasparrow", "Pizzaboy", "Tram", "Trailer", "Turismo", "Speeder", "Reefer", "Tropic", "Flatbed", "Yankee", "Caddy",
  12.     "Solair", "Berkley's RC Van", "Skimmer", "PCJ-600", "Faggio", "Harley", "RC Baron", "RC Raider", "Glendale", "Oceanic",
  13.     "Sanchez", "Sparrow", "Patriot", "Quad", "Coastguard", "Dinghy", "Hermes", "Sabre", "Rustler", "ZR3 50", "Walton", "Regina",
  14.     "Comet", "BMX", "Burrito", "Camper", "Marquis", "Baggage", "Dozer", "Maverick", "News Chopper", "Rancher", "FBI Rancher",
  15.     "Virgo", "Greenwood", "Jetmax", "Hotring", "Sandking", "Blista Compact", "Police Maverick", "Boxville", "Benson", "Mesa",
  16.     "RC Goblin", "Hotring Racer", "Hotring Racer", "Bloodring Banger", "Rancher", "Super GT", "Elegant", "Journey", "Bike",
  17.     "Mountain Bike", "Beagle", "Cropdust", "Stunt", "Tanker", "RoadTrain", "Nebula", "Majestic", "Buccaneer", "Shamal", "Hydra",
  18.     "FCR-900", "NRG-500", "HPV1000", "Cement Truck", "Tow Truck", "Fortune", "Cadrona", "FBI Truck", "Willard", "Forklift", "Traktor",
  19.     "Combine", "Feltzer", "Remington", "Slamvan", "Blade", "Freight", "Streak", "Vortex", "Vincent", "Bullet", "Clover", "Sadler",
  20.     "Firetruck", "Hustler", "Intruder", "Primo", "Cargobob", "Tampa", "Sunrise", "Merit", "Utility", "Nevada", "Yosemite", "Windsor",
  21.     "Monster", "Monster", "Uranus", "Jester", "Sultan", "Stratum", "Elegy", "Raindance", "RC Tiger", "Flash", "Tahoma", "Savanna",
  22.     "Bandito", "Freight", "Trailer", "Kart", "Mower", "Duneride", "Sweeper", "Broadway", "Tornado", "AT-400", "DFT-30", "Huntley",
  23.     "Stafford", "BF-400", "Newsvan", "Tug", "Trailer", "Emperor", "Wayfarer", "Euros", "Hotdog", "Club", "Trailer", "Trailer",
  24.     "Andromeda", "Dodo", "RC Cam", "Launch", "Radiowoz", "Radiowoz", "Radiowoz", "Radiowoz", "Picador", "S.W.A.T. Van",
  25.     "Alpha", "Phoenix", "Glendale", "Sadler", "Luggage Trailer", "Luggage Trailer", "Stair Trailer", "Boxville", "Farm Plow", "Utility Trailer"
  26. };
  27.  
  28. // To wstaw gdzieś w pobliżu innych "stocków":
  29. stock CreatePlayerVehicle(playerid, modelid)
  30. {
  31.     new vehicle, float X, float Y, float Z, float angle;
  32.     if (GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
  33.     {
  34.         vehicle = GetPlayerVehicleID(playerid);
  35.         GetVehiclePos(vehicle, X, Y, Z);
  36.         GetVehicleZAngle(vehicle, angle);
  37.         DestroyVehicle(vehicle);
  38.     }
  39.     else
  40.     {
  41.         GetPlayerPos(playerid, X, Y, Z);
  42.         GetPlayerFacingAngle(playerid, angle);
  43.     }
  44.     vehicle = AddStaticVehicle(modelid, X, Y, Z + 1, angle, -1, -1);
  45.     LinkVehicleToInterior(vehicle, GetPlayerInterior(playerid));
  46.     SetVehicleVirtualWorld(vehicle, GetPlayerVirtualWorld(playerid));
  47.     SetVehicleNumberPlate(vehicle, "{000000}Jakiś tekst");
  48.     PutPlayerInVehicle(playerid, vehicle, 0);
  49.     return 1;
  50. }
  51.  
  52. // To też:
  53. stock str_del_free_space (string[], _char = ' ')
  54. {
  55.     new len = strlen (string);
  56.     if (len)
  57.     {
  58.         new begin = -1, end = len;
  59.         while (string[++begin] == _char) {}
  60.         if (string[begin] == EOS)
  61.         {
  62.              string [0] = 0;
  63.              return 1;
  64.         }
  65.         while (string[--end] == _char) {}
  66.         strmid (string, string, begin, end+1, len+1);
  67.     }
  68.     return 1;
  69. }
  70.  
  71. // Pobiera model pojazdu po jego nazwie:
  72. stock GetVehicleModelIdByName(vehiclename[])
  73. {
  74.     for(new i = 0; i < 211; i++)
  75.         if (strfind(gVehicleNames[i], vehiclename, true) != -1) return i + 400;
  76.     return -1;
  77. }
  78.  
  79. // Musisz mieć #include <zcmd>, aby móc korzystać z ZCMD i tej komendy:
  80. CMD:v(playerid, params[])
  81. {
  82.     str_del_free_space(params); // by PKua
  83.     if (GetVehicleModelIdByName(params) == -1) return SendClientMessage(playerid, -1, "Zła nazwa pojazdu!");
  84.     CreatePlayerVehicle(playerid, GetVehicleModelIdByName(params));
  85.     return 1;
  86. }[/code]
Advertisement
Add Comment
Please, Sign In to add comment