Salut. Am luat si eu acest FS cu masini personale si nu stiu: 1.Sa fac sa poti cumpara doar masinile din FS nu toate care sunt pe server? 2.Cand intru in masina care poate fi cumparata sa te blochezi sa nu poti merge cu ea. Asta este FS: /*==========================Ulric Vehicle System================================
//==========================Change log==========================================
In v1.6 :
- Fixed /vbuy bug
- New CMD : /vfind, /vunfind, /vadmpark
- Type /vfind - for find you car
- Type /vunfind - for destroy checkpoint of /vfind
- Type /vadmpark (RCON CMD) - for park car
====================Dont Remove The Credits, Please.....======================*/
#include <a_samp>
#include <dini>
#include <sscanf>
#define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
#define Blue 0x0259EAAA
#define Red1 0xAA3333AA
#define Red 0xFF0000AA
#define Grey 0xAFAFAFAA
#define Green 0x16EB43FF
new file[256];
new VehNames[212][] =
{
"Landstalker","Bravura","Buffalo","Linerunner","Pereniel","Sentinel","Dumper","Firetruck","Trashmaster",
"Stretch","Manana","Infernus","Voodoo","Pony","Mule","Cheetah","Ambulance","Leviathan","Moonbeam","Esperanto",
"Taxi","Washington","Bobcat","Mr Whoopee","BF Injection","Hunter","Premier","Enforcer","Securicar","Banshee",
"Predator","Bus","Rhino","Barracks","Hotknife","Trailer","Previon","Coach","Cabbie","Stallion","Rumpo",
"RC Bandit","Romero","Packer","Monster","Admiral","Squalo","Seasparrow","Pizzaboy","Tram","Trailer",
"Turismo","Speeder","Reefer","Tropic","Flatbed","Yankee","Caddy","Solair","Berkley's RC Van","Skimmer",
"Pcj - 600","Faggio","Freeway","RC Baron","RC Raider","Glendale","Oceanic","Sanchez","Sparrow","Patriot",
"Quad","Coastguard","Dinghy","Hermes","Sabre","Rustler","Zr3 50","Walton","Regina","Comet","Bmx",
"Burrito","Camper","Marquis","Baggage","Dozer","Maverick","News Chopper","Rancher","FBI Rancher","Virgo",
"Greenwood","Jetmax","Hotring","Sandking","Blista Compact","Police Maverick","Boxville","Benson","Mesa",
"RC Goblin","Hotring Racer A","Hotring Racer B","Bloodring Banger","Rancher","Super GT","Elegant",
"Journey","Bike","Mountain Bike","Beagle","Cropdust","Stunt","Tanker","RoadTrain","Nebula","Majestic",
"Buccaneer","Shamal","Hydra","FCR - 900","NRG - 500","Hpv - 1000","Cement Truck","Tow Truck","Fortune","Cadrona",
"FBI Truck","Willard","Forklift","Tractor","Combine","Feltzer","Remington","Slamvan","Blade","Freight",
"Streak","Vortex","Vincent","Bullet","Clover","Sadler","Firetruck","Hustler","Intruder","Primo","Cargobob",
"Tampa","Sunrise","Merit","Utility","Nevada","Yosemite","Windsor","Monster A","Monster B","Uranus",
"Jester","Sultan","Stratum","Elegy","Raindance","RC Tiger","Flash","Tahoma","Savanna","Bandito","Freight",
"Trailer","Kart","Mower","Duneride","Sweeper","Broadway","Tornado","AT-400","DFT-30","Huntley","Stafford",
"BF-400","Newsvan","Tug","Trailer A","Emperor","Wayfarer","Euros","Hotdog","Club","Trailer B","Trailer C",
"Andromada","Dodo","RC Cam","Launch","Police Car (LSPD)","Police Car (SFPD)","Police Car (LVPD)","Police Ranger",
"Picador","S.W.A.T. Van","Alpha","Phoenix","Glendale","Sadler","Luggage Trailer A","Luggage Trailer B",
"Stair Trailer","Boxville","Farm Plow","Utility Trailer"
};
public OnFilterScriptInit()
{
new playerid;
print("\n--------------------------------------");
print(" Ulric Vehicle System");
print("--------------------------------------\n");
AddStaticVehicle(451,-2280.4263,-120.0015,35.3203,94.6930,1,1);
SetTimer("Rent",1000,false);
SetVehicleNumberPlate(GetPlayerVehicleID(playerid), dini_Get(VFile(GetPlayerVehicleID(playerid)), "Plate"));
return 1;
}
public OnVehicleSpawn(vehicleid)
{
new playerid;
if(dini_Exists(VFile(GetPlayerVehicleID(playerid))))
{
SetVehiclePos(vehicleid, dini_Float(VFile(GetPlayerVehicleID(playerid)), "X"), dini_Float(VFile(GetPlayerVehicleID(playerid)), "Y"), dini_Float(VFile(GetPlayerVehicleID(playerid)), "Z"));
}
return 1;
}
public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
new string[100];
if(dini_Int(VFile(vehicleid),"UnBuyable") == 0 && dini_Int(VFile(vehicleid),"Owned") == 1)
{
format(string, sizeof(string), "~r~This %s has belogs to %s. And this car is not available for purchase", VehNames[GetVehicleModel(vehicleid)-400],dini_Get(VFile(vehicleid),"Owner"));
GameTextForPlayer(playerid, string, 3000, 3);
}
else if(dini_Int(VFile(vehicleid),"UnBuyable") == 1)
{
format(string, sizeof(string), "~b~This %s in Unbuyable by Administration server", VehNames[GetVehicleModel(vehicleid)-400]);
GameTextForPlayer(playerid, string, 3000, 4);
}
else if(dini_Int(VFile(vehicleid),"UnBuyable") == 0 && dini_Int(VFile(vehicleid),"Owned") == 0)
{
format(string, sizeof(string), "~g~This %s in Buyable. \nThe cost is $80000", VehNames[GetVehicleModel(vehicleid)-400]);
GameTextForPlayer(playerid, string, 3000, 4);
}
else if(dini_Int(VFile(vehicleid),"Lock") == 1 && GetPlayerVehicleID(playerid)!=Pc(playerid))
{
RemovePlayerFromVehicle(playerid);
format(string, sizeof(string), "~g~This %s locked by %s", VehNames[GetVehicleModel(vehicleid)-400],dini_Get(VFile(vehicleid),"Owner"));
GameTextForPlayer(playerid, string, 3000, 3);
}
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
dcmd(vbuy,4,cmdtext);
dcmd(vsell,5,cmdtext);
dcmd(vcall,5,cmdtext);
dcmd(vunbuyable,10,cmdtext);
dcmd(vbuyable,8,cmdtext);
dcmd(vlock,5,cmdtext);
dcmd(vunlock,7,cmdtext);
dcmd(vpark,5,cmdtext);
dcmd(vhelp,5,cmdtext);
//New in v1.6
dcmd(vfind,5,cmdtext);
dcmd(vunfind,7,cmdtext);
dcmd(vadmpark,8,cmdtext);
return 0;
}
dcmd_vbuy(playerid, params[])
{
#pragma unused params
new vehicleid = GetPlayerVehicleID(playerid), string[50];
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,Red,"[ERROR]You must in Vehicle to use this command");
if(dini_Int(VFile(vehicleid),"Owned")== 1) return SendClientMessage(playerid,Red,"[ERROR]This car is already owned");
if(dini_Int(VFile(vehicleid),"UnBuyable")== 1) return SendClientMessage(playerid,Red,"[ERROR]This car in unbuyable");
if(dini_Int(PFile(playerid),"HaveCar")== 1) return SendClientMessage(playerid,Red,"[ERROR]You already have a Car");
if(GetPlayerMoney(playerid)<20000) return SendClientMessage(playerid,Red,"[ERROR]You dont have a $ 200000");
if(!dini_Exists(PFile(playerid)))
{
dini_Create(PFile(playerid));
dini_IntSet(PFile(playerid),"HaveCar",1);
dini_IntSet(PFile(playerid),"CarID",vehicleid);
}
else if(dini_Exists(PFile(playerid)))
{
dini_IntSet(PFile(playerid),"HaveCar",1);
dini_IntSet(PFile(playerid),"CarID",vehicleid);
}
if(!dini_Exists(VFile(vehicleid)))
{
dini_Create(VFile(vehicleid));
dini_IntSet(VFile(vehicleid),"Owned",1);
dini_Set(VFile(vehicleid),"Owner", Gn(playerid));
}
else if(dini_Exists(VFile(vehicleid)))
{
dini_IntSet(VFile(vehicleid),"Owned",1);
dini_Set(VFile(vehicleid),"Owner",Gn(playerid));
}
format(string, sizeof(string), "You has buy a %s", VehNames[GetVehicleModel(vehicleid)-400]);
SendClientMessage(playerid, Grey, string);
SendClientMessage(playerid, Grey, "Type /vhelp To Help Commands");
GivePlayerMoney(playerid, -200000);
return 1;
}
dcmd_vsell(playerid, params[])
{
#pragma unused params
new vehicleid = GetPlayerVehicleID(playerid);
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,Red,"[ERROR]You must in Vehicle to use this command");
if(dini_Int(PFile(playerid),"HaveCar") == 0) return SendClientMessage(playerid, Red, "[ERROR]You dont have a car");
if(vehicleid!=Pc(playerid)) return SendClientMessage(playerid,Red,"[ERROR]This vehicle is not your car");
dini_IntSet(VFile(vehicleid),"Owner",0);
dini_IntSet(VFile(vehicleid),"Owned",0);
dini_IntSet(VFile(vehicleid),"UnBuyable",0);
dini_IntSet(PFile(playerid),"HaveCar",0);
dini_Set(PFile(playerid),"CarID","None");
dini_Remove(VFile(vehicleid));
SendClientMessage(playerid, Grey,"You has sell your car. Now you can buy a car again");
GivePlayerMoney(playerid, 100000);
SetVehicleToRespawn(vehicleid);
return 1;
}
dcmd_vcall(playerid, params[])
{
#pragma unused params
if(dini_Int(PFile(playerid),"HaveCar") == 0)return SendClientMessage(playerid,Red,"[ERROR]You dont have a car");
if(IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid, Red, "[ERROR]You must not used vehicle to call you car");
new Float:p[4];
GetPlayerPos(playerid,p[0],p[1],p[2]);
GetPlayerFacingAngle(playerid,p[3]);
SetVehiclePos(Pc(playerid),p[0],p[1],p[2]);
SetVehicleZAngle(Pc(playerid),p[3]);
PutPlayerInVehicle(playerid,Pc(playerid),0);
SendClientMessage(playerid, Grey, "You has call you vehicle. Enjoy with you car");
return 1;
}
dcmd_vunbuyable(playerid, params[])
{
#pragma unused params
new vehicleid = GetPlayerVehicleID(playerid), string[50];
if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,Red,"[ERROR]Only RCON Admin can use this command");
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,Red,"[ERROR]You must in vehicle to use this command");
if(dini_Int(VFile(vehicleid),"UnBuyable")== 1) return SendClientMessage(playerid, Red, "[ERROR]This vehicle already in unbuyable");
if(!dini_Exists(VFile(vehicleid)))
{
dini_Create(VFile(vehicleid));
dini_IntSet(VFile(vehicleid),"UnBuyable",1);
dini_IntSet(VFile(vehicleid),"Owned",0);
dini_IntSet(VFile(vehicleid),"Owner",0);
}
else
{
dini_IntSet(VFile(vehicleid),"UnBuyable",1);
dini_IntSet(VFile(vehicleid),"Owned",0);
dini_IntSet(VFile(vehicleid),"Owner",0);
}
format(string, sizeof(string), "Now this %s is in unbuyable", VehNames[GetVehicleModel(vehicleid)-400]);
SendClientMessage(playerid, Green, string);
return 1;
}
dcmd_vbuyable(playerid, params[])
{
#pragma unused params
new vehicleid = GetPlayerVehicleID(playerid), string[50];
if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,Red,"[ERROR]Only RCON Admin can use this command");
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,Red,"[ERROR]You must in vehicle to use this command");
if(dini_Int(VFile(vehicleid),"UnBuyable")== 0) return SendClientMessage(playerid, Red, "[ERROR]This vehicle already in buyable");
if(!dini_Exists(VFile(vehicleid)))
{
dini_Create(VFile(vehicleid));
dini_IntSet(VFile(vehicleid),"UnBuyable",0);
dini_IntSet(VFile(vehicleid),"Owned",0);
dini_IntSet(VFile(vehicleid),"Owner",0);
}
else
{
dini_IntSet(VFile(vehicleid),"UnBuyable",0);
dini_IntSet(VFile(vehicleid),"Owned",0);
dini_IntSet(VFile(vehicleid),"Owner",0);
}
format(string, sizeof(string), "Now this %s is in buyable", VehNames[GetVehicleModel(vehicleid)-400]);
SendClientMessage(playerid, Grey, string);
return 1;
}
dcmd_vlock(playerid, params[])
{
#pragma unused params
new vehicleid = GetPlayerVehicleID(playerid), string[50];
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,Red,"[ERROR]You must in vehicle to use this command");
if(dini_Int(PFile(playerid),"HaveCar") == 0) return SendClientMessage(playerid, Red, "[ERROR]You dont have a car");
if(vehicleid!=Pc(playerid)) return SendClientMessage(playerid,Red,"[ERROR]This vehicle is not your car");
dini_IntSet(VFile(vehicleid),"Lock",1);
format(string, sizeof(string), "Now this %s has been locked", VehNames[GetVehicleModel(vehicleid)-400]);
SendClientMessage(playerid, Red1, string);
return 1;
}
dcmd_vunlock(playerid, params[])
{
#pragma unused params
new vehicleid = GetPlayerVehicleID(playerid), string[100];
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,Red,"[ERROR]You must in vehicle to use this command");
if(dini_Int(PFile(playerid),"HaveCar") == 0) return SendClientMessage(playerid, Red, "[ERROR]You dont have a car");
if(vehicleid!=Pc(playerid)) return SendClientMessage(playerid,Red,"[ERROR]This vehicle is not your car");
dini_IntSet(VFile(vehicleid),"Lock",0);
format(string, sizeof(string), "Now this %s has been unlocked", VehNames[GetVehicleModel(vehicleid)-400]);
SendClientMessage(playerid, Red1, string);
return 1;
}
dcmd_vpark(playerid, params[])
{
#pragma unused params
new vehicleid = GetPlayerVehicleID(playerid), string[100];
new Float:A, Float:B, Float:C;
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,Red,"[ERROR]You must in vehicle to use this command");
if(dini_Int(PFile(playerid),"HaveCar") == 0) return SendClientMessage(playerid, Red, "[ERROR]You dont have a car");
if(vehicleid!=Pc(playerid)) return SendClientMessage(playerid,Red,"[ERROR]This vehicle is not your car");
dini_IntSet(VFile(vehicleid),"Parked",1);
GetVehiclePos(Pc(playerid),A,B,C);
dini_FloatSet(VFile(vehicleid),"X",A);
dini_FloatSet(VFile(vehicleid),"Y",;
dini_FloatSet(VFile(vehicleid),"Z",C);
format(string, sizeof(string), "You has park you car in %f, %f, %f", A, B, C);
SendClientMessage(playerid, Grey, string);
return 1;
}
dcmd_vfind(playerid, params[])
{
#pragma unused params
if(dini_Int(PFile(playerid),"HaveCar") == 0) return SendClientMessage(playerid, Red, "[ERROR]You dont have a car");
new Float:A, Float:B, Float:C;
GetVehiclePos(Pc(playerid),A,B,C);
SetPlayerRaceCheckpoint(playerid, 1, A, B, C, 0.0, 0.0, 0.0, 2);
SendClientMessage(playerid, Red1, "Follow checkpoint to find you car");
return 1;
}
dcmd_vunfind(playerid, params[])
{
#pragma unused params
DisablePlayerRaceCheckpoint(playerid);
SendClientMessage(playerid, Red1, "Checkpoint has been destroyed");
return 1;
}
dcmd_vhelp(playerid, params[])
{
#pragma unused params
SendClientMessage(playerid, Blue, "**** Personal Car Commands ****");
SendClientMessage(playerid, Grey, "Type /vbuy to buy a vehicle");
SendClientMessage(playerid, Grey, "Type /vsell to sell you car");
SendClientMessage(playerid, Grey, "Type /vcall to call your vehicle");
SendClientMessage(playerid, Grey, "Type /vlock to lock your car");
SendClientMessage(playerid, Grey, "Type /vunlock to unlock your car");
SendClientMessage(playerid, Grey, "Type /vpark to park your vehicle");
SendClientMessage(playerid, Grey, "Type /vfind to find you car");
SendClientMessage(playerid, Grey, "Type /vunfind to destroy a checkpoint from /vfind");
if(IsPlayerAdmin(playerid))
{
SendClientMessage(playerid, Blue, "Rcon Commands");
SendClientMessage(playerid, Grey, "Type /vbuyable to set a car to buyable");
SendClientMessage(playerid, Grey, "Type /vunbuyable to set a car to unbuyable");
SendClientMessage(playerid, Grey, "Type /vadmpark to park a vehicle");
}
return 1;
}
dcmd_vadmpark(playerid, params[])
{
#pragma unused params
new vehicleid = GetPlayerVehicleID(playerid), string[100];
new Float:A, Float:B, Float:C;
if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,Red,"[ERROR]Only RCON admin can use this command");
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,Red,"[ERROR]You must in vehicle to use this command");
dini_IntSet(VFile(vehicleid),"Parked",1);
GetVehiclePos(Pc(playerid),A,B,C);
dini_FloatSet(VFile(vehicleid),"X",A);
dini_FloatSet(VFile(vehicleid),"Y",;
dini_FloatSet(VFile(vehicleid),"Z",C);
format(string, sizeof(string), "You has park this %s in %f, %f, %f", VehNames[GetVehicleModel(vehicleid)-400], A, B, C);
SendClientMessage(playerid, Red1, string);
return 1;
}
public OnPlayerEnterRaceCheckpoint(playerid)
{
DisablePlayerRaceCheckpoint(playerid);
SendClientMessage(playerid, Grey, "Your car has been found");
return 1;
}
stock Gn(playerid)
{
new pname[24];
GetPlayerName(playerid,pname,MAX_PLAYER_NAME);
return pname;
}
stock PFile(playerid)
{
format(file,64,"Cars/Users/%s.ini",Gn(playerid));
return file;
}
stock VFile(vehicleid)
{
new Car[64];
format(Car,64,"Cars/%d.ini",vehicleid);
return Car;
}
stock Pc(playerid) return dini_Int(PFile(playerid),"CarId");
stock Rv(playerid) return dini_Int(PFile(playerid),"RCarID");
