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

[Skriptas]Ginklų gaminimas


LaurynasJ

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 3226 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

Skriptas gan paprastas, darytas mano paties prieš daugiau nei metus laiko :D Gal ir nėra įspūdinga, bet veikia lyg ir gerai, tik mapai tragiški, bet koordinates susikeisit ;) (Ši sistema taip pat yra mano platintam pGRP gamemode).

Sistemos video : 

 

Player enume : 

bool:ginkludalys,

 

Prie pickupų :

ginkludaliupirkimas,
ginklugaminimas,
 
Kur visi forwards :
forward paimamginkludalis(playerid);
public paimamginkludalis(playerid)
{
 TogglePlayerControllable(playerid,1);
 InfoBoxForPlayer(playerid,"~y~Ginklø dalys paimtos, teliko juos pasigaminti");
 playerDB[playerid][ginkludalys]=true;
 SetPlayerCheckpoint(playerid, -58.0519,-230.3569,5.4297, 3.0);
 return 1;
 }
 
forward gamintiginklus(playerid);
public gamintiginklus(playerid)
{
 TogglePlayerControllable(playerid,1);
 PlayerTextDrawHide(playerid,gglaikas[playerid]);
 PlayerTextDrawHide(playerid,ggaminimas[playerid]);
PlayerTextDrawHide(playerid,ggdezute[playerid]);
PlayerTextDrawHide(playerid,ggpgrp[playerid]);
PlayerTextDrawHide(playerid,gggrp[playerid]);
  InfoBoxForPlayer(playerid,"~y~Ginklai pagaminti. Pardavinek juos su komanda ~r~/dyleris");
    playerDB[playerid][ginkludalys]=false;
    if(playerDB[playerid][darbas]==4){
    GivePlayerWeapon(playerid,30,10000);
    GivePlayerWeapon(playerid,34,10000);
    GivePlayerWeapon(playerid,27,10000);
    GivePlayerWeapon(playerid,24,10000);
    GivePlayerWeapon(playerid,29,10000);
    }
    return 1;
    }

 

OnPlayerPickUpPickup callbacke : 

if(pickupid == pickups[0][ginklugaminimas])
{
if(playerDB[playerid][darbas]!=4) return InfoBoxForPlayer(playerid,"~r~Ginklai skirti dyleriams");
    if(GetPlayerMoneyA(playerid) < 5000) return InfoBoxForPlayer(playerid,"~y~Ginklai gaminimas ~r~5000lt");
    if(playerDB[playerid][ginkludalys] == false) return InfoBoxForPlayer(playerid,"~Y~Neturite daliø ginklø gaminimui");
    GivePlayerMoneyA(playerid,-5000);
     TogglePlayerControllable(playerid,0);
     InfoBoxForPlayer(playerid,"~y~Palaukite 1 minutæ");
    SetTimer( "gamintiginklus", 60000, false );
return 1;
}
if(pickupid == pickups[0][ginkludaliupirkimas])
{
if(playerDB[playerid][darbas]!=4) return InfoBoxForPlayer(playerid,"~r~Ginklai skirti dyleriams");
    if(GetPlayerMoneyA(playerid) < 5000) return InfoBoxForPlayer(playerid,"~y~Ginklø dalys ~r~5000lt");
  TogglePlayerControllable(playerid,0);
InfoBoxForPlayer(playerid,"~y~Palaukite 30 sekundþiø");
SetTimer( "paimamginkludalis", 30000, false );
return 1;
}

 

 

Prie visų stock : 

stock InfoBoxForPlayer(playerid, text[])

{
    TextDrawHideForPlayer(playerid, InfoBox[playerid]);
    new string[512];
    RodymoDezute[playerid] = 1;
    format(string, sizeof(string), "%s~y~___________", text);
    TextDrawSetString(InfoBox[playerid], string);
    TextDrawShowForPlayer(playerid, InfoBox[playerid]);
    PlayerPlaySound( playerid, 1085, 0.0, 0.0, 0.0 );
SetTimerEx("IstrintiInformacija", 6900, 0, "d", playerid);
return 1;
}
 
Prie forwardų : 
forward IstrintiInformacija(playerid);
public IstrintiInformacija(playerid)
{
printf("IstrintiInformacija(%d);", playerid);
TextDrawHideForPlayer(playerid, InfoBox[playerid]);
}
 
 
Jeigu ką pamiršau priminkite, pridėsiu :D
Nuoroda į komentarą
Dalintis per kitą puslapį

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 3226 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ą...