Grybavimo skriptas. [GRP]

Lucio · Balandžio 22, 2013

Sveiki,

Šiandien pamokinsiu įsidėti paprastą grybų sistemą be saugojimo. Saugojimą irgi nesunku pasidaryti, bet jį aprašinėti labai tingiu..

Na ką pradedam:

Viršuje parašome new RandomGryb;

Tada sukuriame pickup'us

Data > Pickup ir įrašome šiuos:

grybas1,

grybas2,

grybas3,

grybas4,

grybas5,

grybas6,

grybas7,

grybas8,

grybas9,

grybas10,

Tada einame į Data > Init

Create3DTextLabel("Grybas 1", 0xB4B5B7FF, -761.8593,761.8367,17.9199, 15, 0, 0);

Create3DTextLabel("Grybas 2", 0xB4B5B7FF, -758.9689,764.6987,17.8104, 15, 0, 0);

Create3DTextLabel("Grybas 3", 0xB4B5B7FF, -773.9479,764.9872,17.6694, 15, 0, 0);

Create3DTextLabel("Grybas 4", 0xB4B5B7FF, -778.2716,774.9761,16.9819, 15, 0, 0);

Create3DTextLabel("Grybas 5", 0xB4B5B7FF, -772.2257,785.3275,15.9448, 15, 0, 0);

Create3DTextLabel("Grybas 6", 0xB4B5B7FF, -765.2985,755.5750,18.1130, 15, 0, 0);

Create3DTextLabel("Grybas 7", 0xB4B5B7FF, -772.0570,749.8829,18.3471, 15, 0, 0);

Create3DTextLabel("Grybas 8", 0xB4B5B7FF, -791.5232,770.6954,18.0652, 15, 0, 0);

Create3DTextLabel("Grybas 9", 0xB4B5B7FF, -763.2261,773.5059,17.4922, 15, 0, 0);

Create3DTextLabel("Grybas 10", 0xB4B5B7FF, -763.2234,783.5658,17.0415, 15, 0, 0);

Įkeliame 3D tekstus (kordinates pasikeiskite, pažymėjau kur kordinatės raudonai)

Jų kordinates pasidarome nuėję į žaidimą parašę /save (pvz: grybas1)

Tada einame vėl į Data > Pickups ir vėl pakeičiame visas tas kordinates.

pickups[0][grybas1]=CreatePickupA(1239 ,2,-761.8593,761.8367,17.9199); //grybai

pickups[0][grybas2]=CreatePickupA(1239 ,2,-758.9689,764.6987,17.8104); //grybai

pickups[0][grybas3]=CreatePickupA(1239 ,2,-773.9479,764.9872,17.6694); //grybai

pickups[0][grybas4]=CreatePickupA(1239 ,2,-778.2716,774.9761,16.9819); //grybai

pickups[0][grybas5]=CreatePickupA(1239 ,2,-772.2257,785.3275,15.9448); //grybai

pickups[0][grybas6]=CreatePickupA(1239 ,2,-765.2985,755.5750,18.1130); //grybai

pickups[0][grybas7]=CreatePickupA(1239 ,2,-772.0570,749.8829,18.3471); //grybai

pickups[0][grybas8]=CreatePickupA(1239 ,2,-791.5232,770.6954,18.0652); //grybai

pickups[0][grybas9]=CreatePickupA(1239 ,2,-763.2261,773.5059,17.4922); //grybai

pickups[0][grybas10]=CreatePickupA(1239 ,2,-763.2234,783.5658,17.0415); //grybai

Dabar mums reikia, kad grybai atliktų kažkokią funkciją.

Susirandame atsidarę gamemod'ą

public OnPlayerPickUpPickup(playerid, pickupid) ir įrašome:

//----Grybu pickup---//

if(pickupid == pickups[0][grybas1])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas2])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas3])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas4])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas5])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas6])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas7])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas8])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas9])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

if(pickupid == pickups[0][grybas10])

{

RandomGryb = random(3);

if (RandomGryb == 0)

{

GivePlayerMoneyA(playerid,200);

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~g~Radote ~n~~w~gryba", 2000, 3);

SendClientMessage(playerid, WHITE,"{FFFFFF}[ {FFAF00}GRABAVIMAS {FFFFFF}]: Radote gryba ir gavote 200lt!");

}else if (RandomGryb == 1){

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~r~Cia grybo ~n~~w~nera", 2000, 3);

}else

ApplyAnimation(playerid, "MISC", "pickup_box", 4.000000, 0, 0, 0, 0, -1);

GameTextForPlayer(playerid, "~b~Ieskote ~n~~w~grybo", 2000, 3);

}

Sėkmės naudojant

Redaguota Balandžio 22, 2013, nario Arijus95

Pyazo · Balandžio 23, 2013

Bevertis kodas.

fawez · Balandžio 23, 2013

Manau, kad naujokam struktūra skripto pasižėti tikrai pravers.

Lucio · Balandžio 23, 2013

Bevertis kodas.

Vertingas ar ne, tiesiog dalinuosi.

kaspjugas · Balandžio 23, 2013

Nu naujokam pravers, bet pirmą kartą girdžiu tokį užsiėmimą "GRABAVIMAS" :blink:

Ingane · Balandžio 23, 2013

Nu naujokam pravers, bet pirmą kartą girdžiu tokį užsiėmimą "GRABAVIMAS"

Grybavimas*

BlizHub · Balandžio 23, 2013

Šaunuolis.

dLc · Balandžio 23, 2013

#define MAX_GRYBAI 5

new GryboPickupas[MAX_GRYBAI];

new isvisoGrybu = -1;

stock PridetiGryba(Float:x, Float:y, Float:z)

{

isvisoGrybu ++;

GryboPickupas[isvisoGrybu] = CreatePickup(aasdsadasdasdad);

return 1;

}

OnPlayerPickUpPickup:

for(new g; g<MAX_GRYBAI; g++)

{

if(pickupid == GryboPickupas[g])

{

new randomas = random(10);

if(randomas == 1)

{

grybas 1

}

else if(randomas == 2)

{

grybas 2

}

break;

}

ir viskas, galesi prisidet unlimited grybu ir nereikes rasyt ilgo kodo...

Lucio · Balandžio 24, 2013

Na aš kai mokinausi čia pasidariau paprastutį, nes čia tik pickup'ai ir jų funkcijos. Dar pasidariau saugojimą ir kioską kaip per kaimeliai-rp, kad supirkt grybus

Monster_Full · Balandžio 24, 2013

Na seip pries dedant sita script tai reikia ir sumapint grybavimo vieta

Monster_Full · Balandžio 24, 2013

Sorry uz freepost MLDC +REP

Sn0p · Balandžio 24, 2013

Bevertis kodas.

Pritariu, aš b ūčiau dares ne pickup, bet if playeronrangeofpoint

Monster_Full · Balandžio 24, 2013

Pritariu, aš b ūčiau dares ne pickup, bet if playeronrangeofpoint

Bet seip per lmg irgi pickup tai manau viskas cia gerai

kaspjugas · Balandžio 24, 2013

Bet seip per lmg irgi pickup tai manau viskas cia gerai

Nesuprantu, o kam reikia kopijuoti kitus serverius?

Lucio · Balandžio 24, 2013

Koks dar kopijavimas, čia skripto gabalas, kam reikės tas įsidės, dievaži - nepatinka praleisk akimis.

kaspjugas · Balandžio 24, 2013

Koks dar kopijavimas, čia skripto gabalas, kam reikės tas įsidės, dievaži - nepatinka praleisk akimis.

Aš ne tą turėjau omenį, o kad daro serverius pvz: kaip LMG, SARG ir t.t. Jei per LMG grybavimo sistemoje su pickupais, tai ir čia turi jau būti.

Arme_Help · Balandžio 24, 2013

Sušiktas skripto gabalas išimtas iš kaimeliai.rp ar kokio ten šudiko gm.

HerDz. · Balandžio 24, 2013

Sveikas. Nori, jog padėčiau su SA:MP ar Counter-Strike serveriu kurimu rašyk į skype : lolas55555.

Viskas NEMOKAMAI !

Lucio · Balandžio 24, 2013

Sušiktas skripto gabalas išimtas iš kaimeliai.rp ar kokio ten šudiko gm.

Išiimk iš kaimeliai-RP tokį kodą, tada šnekėk. Čia ne jokių kaimeliai-rp, idiote. Čia dar kai tik pradėjau mokintis pawno komandas ir pickup'ų kūrimus. Paprasti pickup'ai su funkcijom duoti pinigus random būdu. Jei tu nieko nemoki, nereiškia, kad kiti nesugeba.

Prisijungti

Grybavimo skriptas. [GRP]

Recommended Posts

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Šiame puslapyje naršo: 0 nariai

Skelbimai

Naujausios temos

Naujausi būsenos atnaujinimai Nustatymai Teksto formatavimas Nario nuotrauka Member Išsaugoti

Nustatymai

Populiariausi nariai

Naujausi būsenos atnaujinimai

Nustatymai

Teksto formatavimas

Nario nuotrauka

Member