Auto vartai! (Ne mano!)

[Karolis.exe]

Sveiki, noreciau jums pristatyti pamoka su kuria automatiskai vartai atsidaro!!

Si pamoka is gta-supportIkeliau kad jums nereiktu landzioti po interneta

1.Susikuriam kintamuosius ir forward'us:

new Vartai; //Musu kuriamu vartu pavadinimas.

new bool:AutoVartai; //Šitas tikrins ar vartai atidaryti ar neatidaryti.

forward AutomVartai(); //Šitas reikalingas, kad galetume sukurti nauja callback'a.

2.Tada po OnGameModeInit() sukuriam savo vartus ir timer'i:

SetTimer("AutomVartai",1000,1); //Kas sekunde tikrins ar žaidejas yra nustatytame taške.

Vartai = CreateObject(ID, X, Y, Z, rX, rY, rZ); //Čia nieko neaiškinsiu.

3.Po to kur nors mode idedame funkcija kuri pades timer'iui tikrinti ar žaidejas yra nustatytame taške:

stock PlayerToPoint(Float:radi, playerid, Float:x, Float:y, Float:z)

{

if(IsPlayerConnected(playerid))

{

new Float:oldposx, Float:oldposy, Float:oldposz;

new Float:tempposx, Float:tempposy, Float:tempposz;

GetPlayerPos(playerid, oldposx, oldposy, oldposz);

tempposx = (oldposx -x);

tempposy = (oldposy -y);

tempposz = (oldposz -z);

if (((tempposx < radi) && (tempposx > -radi)) && ((tempposy < radi) && (tempposy > -radi)) && ((tempposz < radi) && (tempposz > -radi)))

{

return 1;

}

}

return 0;

}

4.Na ir galu gale sukuriame callback'a:

public AutomVartai()

{

if(PlayerToPoint(5,playerid,X,Y,Z)) //Vietoj X,Y,Z irašome savo vartų kordinates.

{

if(!AutoVartai)

{

MoveObject(Vartai,X,Y,Z,3); //Vietoj X,Y,Z irašome savo atidarytų vartų kordinates.

AutoVartai = true; // Nustatom, kad vartai yra atidaryti.

return 1;

}

}

else

{

if(AutoVartai)

{

MoveObject(Vartai,X,Y,Z,3); //Vietoj X,Y,Z irašome savo uždarytų vartų kordinates.

AutoVartai = false; // Nustatome, kad vartai yra uždaryti.

return 1;

}

}

return 1;

}

Jeigu padejau +Rep nepagailekite! (Nezinau ar jau buvo sita tema tai ikeliau del viso piko!)

[DeazQl.]

Aš kitaip darau, bet gerai kad padariai pamoka.

[Karolis.exe]

Pamoka ne mano As ikeliau kad jums butu lengviau susirasti, nes zinau kad cia labiau zmones lankos negu kitur

Patiko? Padejau? +rep Aciu!

[Skruckis]

reiks pabandyt

[Svečias]

Pabadziau veikia mldc pamoka..Sekmes

[Karolis.exe]

Aciu Jeigu viskas veikia ir pns. Nepagailekit +rep ))