[SKRIPT] Kuro rūšys

[zygimantas112]

Sveiki, Žiūrėjau forume lyg šitos temos nebuvo, o jos daug kas prašė tai va idėjau.

Sėkmės naudojant jei viską gerai padarysite veiks.

Tai kuro rušys: Dyzelinas, Benzinas, Dujos.

Pradedam

Taigi pradzioje scripto parasome:

enum Kuras

{

benzas[MAX_VEHICLES],

dizelis[MAX_VEHICLES],

dujos[MAX_VEHICLES],

bool:usedizelis[MAX_VEHICLES],

bool:usebenzas[MAX_VEHICLES],

bool:usedujos[MAX_VEHICLES],

bool:yradujos[MAX_VEHICLES],

bool:pilam

};

new vKuras[MAX_VEHICLES][Kuras];

new dujumontavimas;

new degaline;

i OnGameModeInit sukuriame duju montavimo pickupa ir deglines pickupa:

dujumontavimas = CreatePickup( model, type, Float:X, Float:Y, Float:Z, Virtualworld );

degaline = CreatePickup( model, type, Float:X, Float:Y, Float:Z, Virtualworld );

bei timeri:

SetTimer("mazeja",15000,1);

tada susirandam OnPlayerPickUpPickup ir irasom kas bus kai uzeis ant degalines is montavimo pickupu:

if(dujumontavimas)

{

if(IsPlayerInAnyVehicle(playerid))

{

new VehicleID = GetPlayerVehicleID(playerid);

{

vKuras[VehicleID][yradujos] = true;

}

}

}

if(degaline)

{

if(IsPlayerInAnyVehicle(playerid))

{

new VehicleID = GetPlayerVehicleID(playerid);

new iSeat = GetPlayerVehicleSeat(playerid);

if(iSeat == 0)

{

vPilam(VehicleID);

vKuras[VehicleID][pilam] = true;

}

}

}

Padarom kad kuras mazetu:

forward mazeja(vehicleid);

public mazeja(vehicleid)

{

for(new i=0;i

{

if(IsPlayerConnected(i))

{

if(IsPlayerInAnyVehicle(i))

{

if(vKuras[vehicleid][benzas] <1 || vKuras[vehicleid][dizelis] <1 || vKuras[vehicleid][dujos] <1)

{

TogglePlayerControllable(vehicleid,0);

return 1;

}

if(vKuras[vehicleid][usedizelis])

{

vKuras[vehicleid][dizelis][GetPlayerVehicleID(i)] -=5;

}else if(vKuras[vehicleid][usebenzas]){

vKuras[vehicleid][benzas][GetPlayerVehicleID(i)] -=5;

} else if(vKuras[vehicleid][usedujos]){

vKuras[vehicleid][dujos][GetPlayerVehicleID(i)] -=5;

}

rodom(vehicleid);

}

}

}

return 1;

}

padarom kad rodytu:

forward rodom(vehicleid);

public rodom(vehicleid)

{

for(new i=0;i

{

if(IsPlayerConnected(i) && GetPlayerState(i) == 2)

{

new info[128];

if(vKuras[vehicleid][usedizelis])

{

format(info,sizeof(info),"Dizelis: %d",vKuras[vehicleid][dizelis][GetPlayerVehicleID(i)]);

}else if(vKuras[vehicleid][usebenzas])

{

format(info,sizeof(info),"Benzinas: %d",vKuras[vehicleid][benzas][GetPlayerVehicleID(i)]);

}else if(vKuras[vehicleid][usedujos])

{

format(info,sizeof(info),"Dujos: %d",vKuras[vehicleid][dujos][GetPlayerVehicleID(i)]);

}

SendClientMessage(i,0xFFFFFFF,info);

}

}

}

ir dabar du degalines callbackai:

forward vPilam(vehicleid);

public vPilam(vehicleid)

{

if(vKuras[vehicleid][pilam] == true)

{

SetTimer("pilti",1000,false);

}

}

forward pilti(playerid, vehicleid);

public pilti(playerid, vehicleid)

{

new vid = GetPlayerVehicleID(playerid);

if(IsPlayerConnected(playerid))

{

if(IsPlayerInAnyVehicle(playerid))

{

if(vKuras[vehicleid][benzas] < 100 || vKuras[vehicleid][dizelis] < 100 || vKuras[vehicleid][dujos] < 100 )

{

if(vKuras[vehicleid][usedizelis])

{

vKuras[vehicleid][dizelis][vid] +=1;

SendClientMessage(playerid,0xFFFFFFF,"Ipiltas 1 litras.");

}else if(vKuras[vehicleid][usebenzas]){

vKuras[vehicleid][benzas][vid] +=1;

SendClientMessage(playerid,0xFFFFFFF,"Ipiltas 1 litras.");

} else if(vKuras[vehicleid][usedujos]){

vKuras[vehicleid][dujos][vid] +=1;

SendClientMessage(playerid,0xFFFFFFF,"Ipiltas 1 litras.");

}

}else{

vKuras[vehicleid][pilam] = false;

}

vPilam(vehicleid);

}

}

}

Ir padarom komanda kad nelauktu kol pripils pilna baka:

CMD:nebepilti(playerid,params[])

{

new vehicleid = GetPlayerVehicleID(playerid);

vKuras[vehicleid][pilam] = false;

GameTextForPlayer(playerid,"~W~Degalu pilimas nutrauktas",5000,5);

}

Jei reiks pagalbos rašykite čia, arba man į skype: lukasvaicikauskas

Šaltinis: http://gta-support.lt/kelios-kuro-rusys-degaline-t4363.html

Tad galite neverkti kad ripinta. aš dedu kad žmonė surastų.

Beje jis naudoja include zcmd

Ir labiau skirtas RPG stiliaus serveriams

bet ji gelima persidaryti ant GRP.

Ateityje žadu padayrti ir čiki piki ant Grp.

[Lex]

Dėkuiiiiii.

[Manfredas]

Galit sukurti amx fila Kuro rusiu duosu +R3p

[-Nierka-]

Sitas skriptas neveikikia grp modams tai preis dėdami i savo gm paziurėkit koks jis tikrai turi buti parasyta

[zygimantas112]

Tkra tiesa, tik GRP.

O dėl amx failo, čia ne FS, jis yra SKRIPTAS.

Todėl jis keliasi i gmą.

[arman.]

Nesąmonė :DD

enum Kuras
{
benzas[MAX_VEHICLES],
dizelis[MAX_VEHICLES],
dujos[MAX_VEHICLES],
bool:usedizelis[MAX_VEHICLES],
bool:usebenzas[MAX_VEHICLES],
bool:usedujos[MAX_VEHICLES],
bool:yradujos[MAX_VEHICLES],
bool:pilam
};
new vKuras[MAX_VEHICLES][Kuras];
new dujumontavimas;
new degaline;

va taip turi būti:

enum Kuras
{
benzas,
dizelis,
dujos,
bool:usedizelis,
bool:usebenzas,
bool:usedujos,
bool:yradujos,
bool:pilam
};
new vKuras[MAX_VEHICLES][Kuras];
new dujumontavimas;
new degaline;

[ZOLY]

Dėkoju, panaudosiu tikrai.

[Firasq]

Padarykit, kad tiktų grp servams ir paaiškinta būtų norl\malei kur ką dėti po ko

[estylO]

Šaunuolis, kad įdėjai. Mano serveryje tai jau seniai yra, bet manau kitiems pravers, o tie kurie rašė, jog įdėtų " GRP ", lyskit iš tų " GRP "...

[zygimantas112]

Šaunuolis, kad įdėjai. Mano serveryje tai jau seniai yra, bet manau kitiems pravers, o tie kurie rašė, jog įdėtų " GRP ", lyskit iš tų " GRP "...

Dq, gryba tiesa GRP tai tikras š., jau esu sukūręs tą pamoką žadėjau jau dėti, bet nusprendžiau nedėti nes pagalvojau kad kiekvienas serveris turės tą sistema, bus neidomu

Tegul kuria patys.

[Bulderis]

Čia kai pamoka ar scripta sukurej nu bet gerai vistiek jei netingėsiu išmėginsiu kaip veikia

[dLc]

Tokį skriptą būtų sunku įskaityt kai net lygiavimo nėra ;o ir yra būdas padaryt lengviau.

[zygimantas112]

yra? koks jis?

[Kazinkas]

O tai gal galit padaryt visą FS, nes aš nelabai moku taip daryti bučiau dėkingas ir +rep

[!LukniS!]

Siaip jau buvo tokia tema... Kure Scripteris...

[duzesLT]

cia viska darome pawn faile??

[Svečias]

Man tai čia nepatiko:

enum Kuras
{
benzas,
dizelis,
dujos,
bool:usedizelis,
bool:usebenzas,
bool:usedujos,
bool:yradujos,
bool:pilam
};
new vKuras[MAX_VEHICLES][Kuras];
new dujumontavimas;
new degaline;

Ko čia kurti,tuos usedizelis ir t.t? galima susikurti vieną kintamajį tarkim "KuroTipas" ir "1" butu benzinas "2" butu dujos ir t.t,nes čia tik serverio apkrovimą padidis ir tiek.

[Lukas-FKS-]

Radau klaidų , ištaisiau

forward mazeja(vehicleid);
public mazeja(vehicleid)
{

for(new i=0;i{
if(IsPlayerConnected(i))
{
if(IsPlayerInAnyVehicle(i))
{
if(vKuras[vehicleid][benzas] <1 || vKuras[vehicleid][dizelis] <1 || vKuras[vehicleid][dujos] <1)
{
TogglePlayerControllable(vehicleid,0);
return 1;
}
if(vKuras[vehicleid][usedizelis])
{
vKuras[vehicleid][dizelis] -=5;
}else if(vKuras[vehicleid][usebenzas]){
vKuras[vehicleid][benzas] -=5;
} else if(vKuras[vehicleid][usedujos]){
vKuras[vehicleid][dujos] -=5;
}
rodom(vehicleid);
}
}
}
return 1;
}

forward rodom(vehicleid);
public rodom(vehicleid)
{
for(new i=0;i{
if(IsPlayerConnected(i) && GetPlayerState(i) == 2)
{
new kstr[128];
if(vKuras[vehicleid][usedizelis])
{
format(kstr,sizeof(kstr),"Dizelis: %d",vKuras[vehicleid][dizelis]);
}else if(vKuras[vehicleid][usebenzas])
{
format(kstr,sizeof(kstr),"Benzinas: %d",vKuras[vehicleid][benzas]);
}else if(vKuras[vehicleid][usedujos])
{
format(kstr,sizeof(kstr),"Dujos: %d",vKuras[vehicleid][dujos]);
}
SendClientMessage(i,0xFFFFFFF,kstr);
}
}
}

forward vPilam(vehicleid);
public vPilam(vehicleid)
{
if(vKuras[vehicleid][pilam] == true)
{
SetTimer("pilti",1000,false);
}
}

forward pilti(playerid, vehicleid);
public pilti(playerid, vehicleid)
{
//new vid = GetPlayerVehicleID(playerid);
if(IsPlayerConnected(playerid))
{
if(IsPlayerInAnyVehicle(playerid))
{
if(vKuras[vehicleid][benzas] < 100 || vKuras[vehicleid][dizelis] < 100 || vKuras[vehicleid][dujos] < 100 )
{
if(vKuras[vehicleid][usedizelis])
{
vKuras[vehicleid][dizelis] +=1;
SendClientMessage(playerid,0xFFFFFFF,"Ipiltas 1 litras.");
}else if(vKuras[vehicleid][usebenzas]){
vKuras[vehicleid][benzas] +=1;
SendClientMessage(playerid,0xFFFFFFF,"Ipiltas 1 litras.");
} else if(vKuras[vehicleid][usedujos]){
vKuras[vehicleid][dujos] +=1;
SendClientMessage(playerid,0xFFFFFFF,"Ipiltas 1 litras.");
}
}else{
vKuras[vehicleid][pilam] = false;
}
vPilam(vehicleid);
}
}
}

[Irmiss]

Dėkui tiks mano RP serveriui +REP