Peršokti į turinį
  • ŽAIDIMAI
  • , ŽAIDIMAI
  • ŽAIDIMAI

Negalima prašyti ar platinti betkokių žaidimą (multiplayer) palengvinančių programų ir scriptų! Kitaip bus taikoma 1.21. taisyklė

Atiduodu skripta jums


raketa

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 3037 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Recommended Posts

Sveiki tad atiduodu šį skripta jums nes jis man nereikalingas.



#include <a_samp>
/*Nustatymai*/
#define MAX_PROCESS 9000//Dažymo procesas, jei yra mažas dažys lėčiau, jei didelis dažys greičiau.
#define Radius 4//čia yra žmogaus atstumas nuo mašinos.
#define PRESSED(%0) (((newkeys & (%0)) == (%0)) && ((oldkeys & (%0)) != (%0)))
#define RELEASED(%0) (((newkeys & (%0)) != (%0)) && ((oldkeys & (%0)) == (%0)))
public OnFilterScriptInit()
{
print("Dažymo sistema yra pakrauta");
return 1;
}
new TimerP;
new Process[MAX_PLAYERS][MAX_VEHICLES];
new ColorBallon[MAX_PLAYERS] = 3;
main(){}
public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp("/dazyti", cmdtext, true, 10) == 0)return ShowPlayerDialog(playerid,9975,2,"Pasirinkite spalvų skardine. \nSkardinės vertė 1000€","Raudona \ Mėlyna \ Žalia \ Geltona \ Juoda \ Rožinė","Ringtis","Atsaukti");
return 0;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == 9975)
{
if(!response)return 1;
if(GetPlayerMoney(playerid) < 1000)return SendClientMessage(playerid,-1,"Nepakanka pinigų!");
switch(listitem)
{
case 0:ColorBallon[playerid] = 3;
case 1:ColorBallon[playerid] = 106;
case 2:ColorBallon[playerid] = 86;
case 3:ColorBallon[playerid] = 6;
case 4:ColorBallon[playerid] = 0;
case 5:ColorBallon[playerid] = 126;
}
for(new v; v < MAX_VEHICLES; v++)Process[playerid][v] = 0;
GivePlayerMoney(playerid,-1000);
GivePlayerWeapon(playerid,41,1000);
SendClientMessage(playerid,-1,"Jūs sėkmingai nusipirkote skardinę už 1000€");
}
return 1;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{

if(IsPlayerConnected(playerid))
{
if(PRESSED(KEY_FIRE) && GetPlayerWeapon(playerid) == 41) { TimerP = SetTimerEx("Raskraska",30,1,"d",playerid); }
if(RELEASED(KEY_FIRE)) { KillTimer(TimerP); }
}
return 1;
}
forward Raskraska(playerid);
public Raskraska(playerid)
{
new Float: P[3];
GetPlayerPos(playerid,P[0],P[1],P[2]);
for(new v; v < MAX_VEHICLES; v++)
{
if((GetVehicleDistanceFromPoint(v,P[0],P[1],P[2])<= Radius) && Process[playerid][v] < MAX_PROCESS)
{
if(IsPlayerAimingVehicle(playerid, v))
{
Process[playerid][v] += 100;
if(Process[playerid][v] >= MAX_PROCESS)ChangeVehicleColor(v,ColorBallon[playerid],ColorBallon[playerid]);
}
}
}
return 1;
}
#define YAHOOO 0.42
stock IsPlayerAimingVehicle(playerid, vehicleid)
{
new Float:X1, Float:Y1, Float:Z1, Float:X2, Float:Y2, Float:Z2;
GetPlayerPos(playerid, X1, Y1, Z1);
GetVehiclePos(vehicleid, X2, Y2, Z2);
new Float:Distance = floatsqroot(floatpower(floatabs(X1-X2), 2) + floatpower(floatabs(Y1-Y2), 2));
if(Distance < 350)
{
new Float:A;
GetPlayerFacingAngle(playerid, A);
X1 += (Distance * floatsin(-A, degrees));
Y1 += (Distance * floatcos(-A, degrees));
Distance = floatsqroot(floatpower(floatabs(X1-X2), 2) + floatpower(floatabs(Y1-Y2), 2));
if(Distance < YAHOOO )return true;
}
return false;
}


Nuoroda į komentarą
Dalintis per kitą puslapį

  • Parašė po 4 savaičių...
  • Parašė po 4 savaičių...

cia kiek is kodo supratau tai gausi i rankas ta dazu balioneli ir gausi pats purkst ar kaip suprast ?

Gausi balionėli, nusitaikysi į mašiną ir pasirinkta spalva uždės. (kaip baigsis taimeris, jis pasileidžia kaip laikai fire mygtuką)

Nuoroda į komentarą
Dalintis per kitą puslapį

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 3037 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Prisijungti prie diskusijos

Palikti atsakymą galite iš karto, o užsiregistruoti vėliau. Jeigu jau turite paskyrą mūsų forume, Prisijunkite.

Svečias
Atsakyti šioje temoje...

×   Įklijuotas tekstas turi teksto formatavimą.   Pašalinti teksto formatavimą

  Galimi tik 75 veidukai.

×   Nuoroda buvo automatiškai įterpta.   Įterpti nuorodą paprastai

×   Jūsų ankstesnis pranešimas buvo atkurtas.   Išvalyti redaktorių

×   Jūs negalite įkelti nuotraukas tiesiogiai.Įkelkite arba įdėkite nuotraukas iš URL.

  • Šiame puslapyje naršo:   0 nariai

    • Nėra registruotų narių peržiūrinčių šį forumą.

Skelbimai


×
×
  • Sukurti naują...