Unikalus skriptas patirčiai serveryje

[Guest Tobias_Kingston]

Sveiki bičiuliai pristatau savo kurtą skriptą gal kažkam ir pravers serveryje ar kuriant serverį:

/* Skripto Autorius Tobias_Kingston (Vytioxa) skype: pc.pagalba */
/* Pakeites kreditus kūrėju netapsi */
//Prisidėkite spalvų eilučių Define'us jei neturite pas save .pwn lape
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_RED 0xAA3333AA
#define COLOR_LIGHTBLUE 0x33CCFFAA
//Viršuje jūsų gamemodo skripto prie kitų new eilučių dasirašome
new xpKaina[MAX_PLAYERS];
new xpKiekis[MAX_PLAYERS];
new xpSanderis[MAX_PLAYERS];
//Po publiku OnPlayerConnect dedame šį skriptą
public OnPlayerConnect(playerid)
{
xpSanderis[playerid] = 999; xpKaina[playerid] = 0; xpKiekis[playerid] = 0;
return 1;
}
//Pereiname prie serverio Komandų meniu Dedame šias komandas kaip parodyta.
public OnPlayerCommandText(playerid,cmdtext[])
{
//Komanda /parduotixp suteiks jums galimybė parduoti patirties kitam žaidėjui už norodytą sumą sandėrio metu
if(strcmp(cmd, "/parduotixp", true) == 0)
{
if(IsPlayerConnected(playerid))
{
if(PlayerInfo[playerid][pxp]==0)
{
SendClientMessage(playerid,COLOR_GREY,"* Deja jūs neturite tiek XP!");
return 1;
}
tmp = strtok(cmdtext, idx);
if(!strlen(tmp))
{
SendClientMessage(playerid, COLOR_RED, "* Naudojimas: /parduotixp [iD] [KIEKIS] [KAINA]");
return 1;
}
new zaidejas;
new pinigai;
new kiekis;
zaidejas = ReturnUser(tmp);
tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) { return 1; }
kiekis = strval(tmp);
tmp = strtok(cmdtext, idx);
if(!strlen(tmp)) { return 1; }
pinigai = strval(tmp);
if(kiekis > PlayerInfo[playerid][pxp]) { SendClientMessage(playerid, COLOR_GREY, "* Deja jūs neturite tiek XP!"); return 1; }
if(kiekis <= 0) { SendClientMessage(playerid, COLOR_GREY, "* sandėris negalimas!"); return 1; }
if(IsPlayerConnected(playa))
{
if(zaidejas != INVALID_PLAYER_ID)
{
if (ProetectorS(8.0, playerid, playa))
{
if(zaidejas == playerid)
{
SendClientMessage(playerid, COLOR_GREY, "* Apgailestaujame, bet sau pačiam XP parsiduoti negalite!");
return 1;
}
GetPlayerName(zaidejas, giveplayer, sizeof(giveplayer));
GetPlayerName(playerid, sendername, sizeof(sendername));
format(string, sizeof(string), "* Jums siūloma %s pirkti %d XP partirties už $%d.", giveplayer, kiekis, pinigai);
SendClientMessage(playerid, COLOR_LIGHTBLUE, string);
format(string, sizeof(string), "* %s Norėdami pirkti siūlomą XP kiekį %d už $%d, Naudokite /pirktixp", sendername, kiekis, pinigai);
SendClientMessage(playa, COLOR_LIGHTBLUE, string);
xpSanderis[zaidejas] = playerid;
xpKaina[zaidejas] = pinigai;
xpKiekis[zaidejas] = kiekis;
}
else
{
SendClientMessage(playerid, COLOR_RED, "** Žaidėjas ne prie jūsų!");
}
}
}
else
{
SendClientMessage(playerid, COLOR_RED, "** Žaidėjas nerastas!");
}
}
return 1;
}
//Toliau panaudojame komandai /pirktixp šią komandą galima pritaikyti pagal save.
else if(strcmp(cmd,"/pirktixp",true) == 0)
{
if(xpSanderis[playerid] < 999)
{
if(GetPlayerMoney(playerid) > xpKaina[playerid])
{
if(IsPlayerConnected(xpSanderis[playerid]))
{
GetPlayerName(xpSanderis[playerid], giveplayer, sizeof(giveplayer));
GetPlayerName(playerid, sendername, sizeof(sendername));
format(string, sizeof(string), "Jūs nusipirkote %d XP patirties už %d Lt iš žaidėjo %s.",xpKiekis[playerid],xpKaina[playerid],giveplayer);
SendMe(playerid, COLOR_LIGHTBLUE, string);
format(string, sizeof(string), "%s Nusipirko iš jūsų %d XP patirties už %d Lt",sendername,xpKiekis[playerid],xpKaina[playerid]);
SendMe(xpSanderis[playerid], COLOR_LIGHTBLUE, string);
GivePlayerMoney(playerid, -xpKaina[playerid]);
GivePlayerMoney(xpSanderis[playerid],xpKaina[playerid]);
PlayerInfo[playerid][pxp] += xpKiekis[playerid];
PlayerInfo[xpSanderis[playerid]][pxp] -= xpKiekis[playerid];
xpSanderis[playerid] = 999;
xpKaina[playerid] = 0;
xpKiekis[playerid] = 0;
return 1;
}
return 1;
}
else
{
SendMe(playerid, COLOR_GREY, "Apgailestaujame, bet jūs neturite tiek pinigų!");
return 1;
}
}
else
{
SendMe(playerid, COLOR_GREY, "Deja, bet niekas neparduoda jums XP patirties!");
return 1;
}
}
//Norite daugiau pamokų ar pagalbos skriptinant kreipkites skype pc.pagalba
//P.S. už neteisingą komandų panaudojimą neatsakau, komandos surašytos mano paties ir veikia pilnai
//Jei iškilo klaidų peržiūrėkite tai kas parašyta gal rasite tai kur padaryta klaida, bent man viskas puikiai veikia
//Pagarbiai Tobias_Kingston (Vytioxa) naujas skype: pc.pagalba

P.S. už padarytas skripto klaidas neatsakau, tikiuosi skriptą naudosite sąžiningai. Turite klausimų susisiekite skypas pateiktas skripte.

P.S. skripte gali būti klaidų bes rašytas nuo tuščio lapo

Redaguota Gegužės 12, 2013, nario Tobias_Kingston

[musicx]

Šaunuolis gražus darbas

[Guest Tobias_Kingston]

Lauksiu jūsų komentarų.

Redaguota Gegužės 12, 2013, nario Tobias_Kingston

[♣ магte]

Puikus scriptas

[-C-54]

Puikus scriptas, bet manau ant rimtesnių projektų netiktų.

[Guest Tobias_Kingston]

deja bičiuli klysti kas norės panaudos pagal save čia nėra apibrėžta kuriame serveryje naudoti norės panaudos, nenores nenaudos čia jau jū pačių reikalas

[Divito]

Rimtesniuose projektuose tikrai tokio skripto niekas nedės, tavo skriptas netvarkingas ( jeigu tavo ).

Galėjai naudoti ZCMD, bet man rodos čia yra kopijuotas skriptas, nes tu pats turbūt nepastebėjai kad nėra sukurto kintamojo:

 new string[ masyvo skaičius ]     ;

Ir dar nebūs atpažinta: kolvo ir money.

Tai mes tau error'ų, turbūt kopijuodamas neviska nukopijavai. Tavo skripto beveik nežėjau, užmečiau tik ant keliu eilučių akį ir iškarto radau klaidą..

format(string, sizeof(string), "* Jums siūloma %s pirkti %d XP partirties už $%d.", giveplayer, kolvo, money);
SendClientMessage(playerid, COLOR_LIGHTBLUE, string);
format(string, sizeof(string), "* %s Norėdami pirkti siūlomą XP kiekį %d už $%d, Naudokite /pirktixp", sendername, kolvo, money);
SendClientMessage(playa, COLOR_LIGHTBLUE, string);

[renaldasj]

Pagal format pranešima, kam formatuot 2 kartus tapati?

Redaguota Gegužės 12, 2013, nario Renas.

[Guest Tobias_Kingston]

tavo tiesa ZCMD surašysiu netrukus, bet kam to reikia ir patys susirašys skriptą tikrai pats rašiau o zodis kolvo, money pas mane paty naudojamas

[Guest Tobias_Kingston]

pirma cia būtinas formatavimas nes neapibrėžiamas string antra taip unikaliau ir nemeta erorr

[Divito]

Pas tave yra sukurti kintamieji, dėl to ir nemeta, jei įsidėsi toki skriptą į serverį tai tada mes errorų, neatpažins kitu skripto elementų,

[renaldasj]

pirma cia būtinas formatavimas nes neapibrėžiamas string antra taip unikaliau ir nemeta erorr

TAIP UNIKALIAU?:DDDDDDDDDDDDD

[Guest Tobias_Kingston]

na gerai sakai neunikalu surandi lygiai toki pati skripta internete yrodysi jog neunikalu netikiu jog kazka rasi nes rasyta cia nuo 0

[sancio]

Kodas niekoks.

[Guest Tobias_Kingston]

na man mano kuriamame serveryje veikia puikiai kas skriptina supras kaip panaudoti duota kodą pagal pamoką

[Johnsons]

It's Something NEW!

Redaguota Gegužės 13, 2013, nario eFFect'as!

[Divito]

Kodas niekoks.

Lietuvių kalba nekokia.

[*DeMo*]

Viskas ok veike bet nahui serverui komandos /parduotixp ir pirktixp ??? jei kaip visi vaikai ysikels sita script ir pajunks srw ir nebutu vaikai jei nedalintu visiems vip,admin,lt ir t.t tai prisipirks xp arba isparduos savo visus xp del lt

[Divito]

Viskas ok veike bet nahui serverui komandos /parduotixp ir pirktixp ??? jei kaip visi vaikai ysikels sita script ir pajunks srw ir nebutu vaikai jei nedalintu visiems vip,admin,lt ir t.t tai prisipirks xp arba isparduos savo visus xp del lt

Kam tu dabar čia savo emocijas lieji?... Iš tavo šios žinutės, susidariau nuomonę kad tu esi pats vaikas, bet kitais vadini ( nenuostabu šiais laikais ), Lietuva yra GRP'inė, turbūt Lenkai labiau pažengė tarp SA:MP'o, nei Lietuva, bet ne.. Lenkai, liks Lenkais,, tai kad visiems kažko prireikia, visa laiką sukūrus menkniekį, tu ji gali kažkur tinkamai panaudoti, jeigu turi galvą gera, o jei ne tai tiesiog įdėsi ta skriptą į serverį ir viskas. Kitiems žmonem pravers, kitiem ne. Tai kad gali net nekomentuoti. + Gali daryti tikrinimą, kad šį komanda būtu nevisiem.

[hustrine]

Nu ką žinau... Lygiavimo nėra, dirbi su STRCMP defaultiniu SA-MP komandų procesoriumi, lėtai skriptas veikia...