Skriptas || Mašinos Pirkimas iš Žaidėjo/Pardavimas Žaidėjui

[Musterman]

}

if(!strcmp(cmdtext, "/siulyti", true,8))

{

if(GetPlayerScore(playerid)<3000) return SendClientMessage(playerid,0xAA3333AA,"* Maþa jûsø patirtis. Reikalinga > {DB881A}3000XP !");

new tname[MAX_PLAYER_NAME];

strmid(tname,GetArgument(1, cmdtext, 0),0,MAX_PLAYER_NAME);

if(!strcmp(tname,"0",true)) return SendClientMessage(playerid, Melina, "* Parduoti: /siulyti [Vardas_Pavarde] [kaina]");

new sellplayerid = GetPlayeridMid(tname);

if(sellplayerid==INVALID_PLAYER_ID) return SendClientMessage(playerid,0xAA3333AA,"* Tokio þaidëjo nëra.");

if(GetPlayerScore(sellplayerid)<3000) return SendClientMessage(playerid,RED,"* Dëja, bet pirkëjas dar per jaunas vairuoti!");

GetPlayerName(sellplayerid,tname,sizeof(tname));

new tstring[256];

tstring = GetArgument(2, cmdtext, 0);

if(!IsNumeric(tstring)) return SendClientMessage(playerid, Melina, "* Parduoti: /siulyti [Vardas_Pavarde] [kaina (turi bûti skaicius)]");

new price = StringToInt(tstring);

if(price < 500) return SendClientMessage(playerid, Melina, "* Kaina ne maþesnë 500 LT");

new Float:Coo[3];

GetPlayerPos(sellplayerid,Coo[0],Coo[1],Coo[2]);

if(!PlayerToPoint(30, playerid, Coo[0],Coo[1],Coo[2])) return SendClientMessage(playerid, 0xAA3333AA, "* Þaidëjas per toli!");

if (Carlist[playerid][Typ]==-1) return SendClientMessage(playerid, 0xAA3333AA, "Neturi ka parduoti!");

new string[128];

offerCar[sellplayerid][0]=playerid;

offerCar[sellplayerid][1]=price;

new playername[MAX_PLAYER_NAME];

new sellplayername[MAX_PLAYER_NAME];

GetPlayerName(playerid,playername,sizeof(playername));

GetPlayerName(sellplayerid,sellplayername,sizeof(sellplayername));

format(string,128,"Tu siulai %s pirkti uz %i LT!",sellplayername,price);

SendClientMessage(playerid, 0xAA3333AA, string);

format(string,128,"%s siulo %s uz %i LT.",playername,Buylist[Carlist[playerid][Typ]][Name],price);

SendClientMessage(sellplayerid, 0xAA3333AA, string);

SendClientMessage(sellplayerid, COLOR_YELLOW, "Nori pirkti {DB881A}/sutinku");

SendClientMessage(sellplayerid, COLOR_YELLOW, "Nenori pirkti {DB881A}/atsaukti");

return 1;

}

if(!strcmp(cmdtext, "/atsaukti", true,9))

{

for (new i=0; i<MAX_PLAYERS; i++)

{

if (offerCar[0]==playerid)

{

offerCar={-1,0};

SendClientMessage(playerid, 0xAA3333AA, "Nenupirkai.");

if (IsPlayerConnected(i))

{

new string[128];

new playername[MAX_PLAYER_NAME];

GetPlayerName(playerid,playername,sizeof(playername));

format(string,128,"%s neperka.",playername);

SendClientMessage(i, Zalia, string);

}

return 1;

}

}

SendClientMessage(playerid, 0xAA3333AA, "Kà jûs norite daryti?");

return 1;

}

if(!strcmp(cmdtext, "/sutinku", true,8))

{

if(GetPlayerScore(playerid)<3000) return SendClientMessage(playerid,0xAA3333AA,"* Maþa jûsø patirtis. Reikalinga > {DB881A}3000XP !");

if (offerCar[playerid][0]!=-1)

{

if (IsPlayerConnected(offerCar[playerid][0]))

{

if (Carlist[playerid][Typ]==-1)

{

if (Carlist[offerCar[playerid][0]][Typ]!=-1)

{

if (GetPlayerMoneyA(playerid)>=offerCar[playerid][1])

{

new sellerid=offerCar[playerid][0];

new price=offerCar[playerid][1];

offerCar[playerid]={-1,0};

GivePlayerMoneyA(playerid, - price);

GivePlayerMoneyA(sellerid, price);

Carlist[playerid][Typ]=Carlist[sellerid][Typ];

Carlist[playerid][X]=Carlist[sellerid][X];

Carlist[playerid][Y]=Carlist[sellerid][Y];

Carlist[playerid][Z]=Carlist[sellerid][Z];

Carlist[playerid][Rotation]=Carlist[sellerid][Rotation];

Carlist[playerid][Status]=Carlist[sellerid][Status];

Carlist[playerid][Lock]=Carlist[sellerid][Lock];

Carlist[playerid][Carid]=Carlist[sellerid][Carid];

Carlist[playerid][Color1]=Carlist[sellerid][Color1];

Carlist[playerid][Color2]=Carlist[sellerid][Color2];

Carlist[playerid][mod1]=Carlist[sellerid][mod1];

Carlist[playerid][mod2]=Carlist[sellerid][mod2];

Carlist[playerid][mod3]=Carlist[sellerid][mod3];

Carlist[playerid][mod4]=Carlist[sellerid][mod4];

Carlist[playerid][mod5]=Carlist[sellerid][mod5];

Carlist[playerid][mod6]=Carlist[sellerid][mod6];

Carlist[playerid][mod7]=Carlist[sellerid][mod7];

Carlist[playerid][mod8]=Carlist[sellerid][mod8];

Carlist[playerid][mod9]=Carlist[sellerid][mod9];

Carlist[playerid][mod10]=Carlist[sellerid][mod10];

Carlist[playerid][mod11]=Carlist[sellerid][mod11];

Carlist[playerid][mod12]=Carlist[sellerid][mod12];

Carlist[playerid][mod13]=Carlist[sellerid][mod13];

Carlist[playerid][mod14]=Carlist[sellerid][mod14];

Carlist[playerid][mod15]=Carlist[sellerid][mod15];

Carlist[playerid][mod16]=Carlist[sellerid][mod16];

Carlist[playerid][mod17]=Carlist[sellerid][mod17];

Carlist[playerid][mod18]=Carlist[sellerid][mod18];

Carlist[playerid][Paintjob]=Carlist[sellerid][Paintjob];

Carlist[sellerid][Typ]=-1;

Carlist[sellerid][X]=0.0;

Carlist[sellerid][Y]=0.0;

Carlist[sellerid][Z]=0.0;

Carlist[sellerid][Rotation]=0.0;

Carlist[sellerid][Status]=0;

Carlist[sellerid][Lock]=0;

Carlist[sellerid][Carid]=-1;

Carlist[sellerid][Color1]=-1;

Carlist[sellerid][Color2]=-1;

Carlist[sellerid][mod1]=-1;

Carlist[sellerid][mod2]=-1;

Carlist[sellerid][mod3]=-1;

Carlist[sellerid][mod4]=-1;

Carlist[sellerid][mod5]=-1;

Carlist[sellerid][mod6]=-1;

Carlist[sellerid][mod7]=-1;

Carlist[sellerid][mod8]=-1;

Carlist[sellerid][mod9]=-1;

Carlist[sellerid][mod10]=-1;

Carlist[sellerid][mod11]=-1;

Carlist[sellerid][mod12]=-1;

Carlist[sellerid][mod13]=-1;

Carlist[sellerid][mod14]=-1;

Carlist[sellerid][mod15]=-1;

Carlist[sellerid][mod16]=-1;

Carlist[sellerid][mod17]=-1;

Carlist[sellerid][mod18]=-1;

Carlist[sellerid][Paintjob]=-1;

if (Carlist[playerid][Status]==1)

{

SetVehicleParamsForAll(Carlist[playerid][Carid],0,Carlist[playerid][Lock]);

SetVehicleParamsForPlayer(Carlist[playerid][Carid],playerid,0,0);

}

new string[128];

format(string,128,"Sveikiname! Jûs isigijote transporto priemone %s uþ %i LT !",Buylist[Carlist[playerid][Typ]][Name],price);

SendClientMessage(playerid, 0xAA3333AA, string);

SendClientMessage(playerid, COLOR_GREEN, "Pagrindinës komandos: {DB881A}/[Jūsų Serverio Mašinos Valdymo komanda]");

new playername[MAX_PLAYER_NAME];

GetPlayerName(playerid,playername,sizeof(playername));

format(string,128,"Jûs pardavëte %s uþ %i LT !",playername, price);

SendClientMessage(sellerid, 0xAA3333AA, string);

}

else

{

new string[128];

format(string, 128, "Nepakanka pinigø (reikalinga suma: %i LT)!", offerCar[playerid][1]);

SendClientMessage(playerid, 0xAA3333AA, string);

SendClientMessage(offerCar[playerid][0], 0xAA3333AA, "Pirkëjas neturi tiek pinigø !");

}

}

else

{

offerCar[playerid]={-1,0};

SendClientMessage(playerid, 0xAA3333AA, "Pardavëjas nebeturi transporto priemonës !");

}

}

else

{

SendClientMessage(playerid, 0xAA3333AA, "Tu jau turi transporto priemone !");

}

}

else

{

offerCar[playerid]={-1,0};

SendClientMessage(playerid, 0xAA3333AA, "Pardavëjo nëra.");

}

}

else

{

SendClientMessage(playerid, 0xAA3333AA, "Ne.");

}

return 1;

}

Redaguota Kovo 30, 2014, nario M.Steponko

[wuPoR]

Bent nukopijavęs gerai būtum.

[Musterman]

Tu Man Link Numesk iškur kopinta, ok?

Pats Nukopintas matosi

[#Cickė]

Tu Man Link Numesk iškur kopinta, ok?

Pats Nukopintas matosi

Jei neklystu SARG kopija.. Graudus, dar ant parašo užsimetęs 'skripteris', nežudyk savo busimų vaikų šiandien.. Būk geras.

[Musterman]

Dar Vienas 

Jūk sakau jog nekopijuota :*

[Contyz]

Dar Vienas

Jūk sakau jog nekopijuota :*

Netų pakraipų? Taigi matosi, kad iš kažkokio GM kopinta, ne tavo rašyta.

[Tautvis !]

Tarp kiekvieno GRP modifikacijos mašinų sistema susidaro iš Carlist, todėl jin yra kopijuota iš GRP modų.

[KeptaDuona]

Kopijuota matosi. Ir musu zymiai daugiau geriau trink lauk tema.

['Montana]

Labai daug erroru bus, dėl nesuprastų eilučių... Pridėk reikalingus kintamuosius

[Saintas]

Mark'as Steponko tas pats iš SARGO :DDDD? Scripteris baisus atsirado

[Kesa]

Tarp kiekvieno GRP modifikacijos mašinų sistema susidaro iš Carlist, todėl jin yra kopijuota iš GRP modų.

Eik tu sau koks tu protingas..

[Expert*]

Na, nesvarbu čia tu kūrei ar ne, nes ta komanda tiks tik tiem kas naudoja tą moda iš kurio kopijavai. ( na ir jų editams )  Manau būtum žinojas jai šiektiek daugiau apie samp skriptus žinotum o ne vien kopijuotum.

Redaguota Balandžio 15, 2014, nario Expert*