[Pamoka] Gun Lic

[ℛøℓαᾔⅾ@﹩]

Labas rytas,parodys kaip sukurti ginklų licencijos pirkimą,labai paprastą.

Pirma sukurk kintamuosius. Viršuje (prie kitų new).

new GunLicP;
new GunLic[MAX_PLAYERS];

Dabar sukurk pickup po OnGamemodeInit.

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

Dabar nurodysime kas atsitiks,kai žaidėjas užeis ant pickup. Po OnPlayerPickUpPickup.

if(pickupid == GunLicP)
{
if(GunLic[playerid] == 1) return SendClientMessage(playerid,-1,"Jūs jau ginklų licencija"); // Jeigu žaidėjas turi Licencija išsiunčiame žinutę jam.
ShowPlayerDialog(playerid,1,DIALOG_STYLE_MSGBOX,"Ginklų licencija","Ginklų licencijos kaina: 5000LT ar norite ją pirkti","Taip","Ne");
}

Dabar eisime po OnDialogResponse.

if(dialogid == 1) // Patikriname dialogo id
{
if(response)// Jeigu paspaudė taip.
{
if(GetPlayerMoney(playerid) < 5000) return SendClientMessage(playerid,-1,"Jūs neturite tiek pinigų");
GunLic[playerid] = 1; // Duodame licenciją.
GivePlayerMoney(playerid, -5000);
}
if(!response) return 1; // Jeigu paspaudė ne.
}

Tikrinimas ar žaidėjas turi licenciją:

if(GunLic[playerid] == 1)
{
Veiksmas kuris įvyks jeigu žaidėjas turi licenciją.
}

Kodą rašiau aš!

Radote klaidų? - Praneškite.

Kodo netikrinau,kodėl? - Nes mano kode retai būna klaidų.

Kiek laiko sugaišau? - ~10min.

Norite rimtesnių,geresnių pamokų? +R3P

Nepamirškite pasikeisti dialogid !

Gero naudojimo.

Draudžiu kopijuoti be mano sutikimo!

Redaguota Spalio 17, 2014, nario R.Lightning

[*DeMo*]

Daug kas norėdavo šios sistemos nors ji yra ganėtinai paprasta +rep už tai

[ℛøℓαᾔⅾ@﹩]

Daug kas norėdavo šios sistemos nors ji yra ganėtinai paprasta +rep už tai

Taip,ji labai paprasta.

[Tuksas]

Šaunuolis gera pamoka. +r3p

[ℛøℓαᾔⅾ@﹩]

Šaunuolis gera pamoka. +r3p

O R3P tai neuždėjai

[NeRlz]

Žiauriai aiški ir gera pamoka, ačiū tau. +Rep.

[ℛøℓαᾔⅾ@﹩]

Žiauriai aiški ir gera pamoka, ačiū tau. +Rep.

Nėra už ką. Gero naudojimo.

[Mantas_Asus]

Nebloga pamoka manau daug kam pravers. +r3p

[ℛøℓαᾔⅾ@﹩]

Nebloga pamoka manau daug kam pravers. +r3p

Nieko gero iš tos pamokos,labai jau lengva tokia ;D

[Mantas_Asus]

Nieko gero iš tos pamokos,labai jau lengva tokia ;D

Lengva bet naujokams pasimokinti labai gerai.

[ℛøℓαᾔⅾ@﹩]

Lengva bet naujokams pasimokinti labai gerai.

Nemanau,kad yra kas mokos scriptint,tuo labiau gal ~1-3% žiūrėjusių temą viską perskaitė.

O tie kas naudoja (jeigu kas naudoja) tai susirado kur kelt ir viskas...

[Bicas_Biciuks]

Žiauriai išsami pamoka 

[ℛøℓαᾔⅾ@﹩]

Žiauriai išsami pamoka 

O tu man pasakyk,koks tikslas aprašinėti viską ~30 min. Jeigu tie kuriems reikės net neskaitę copy & paste? Tikrai nesiruošiu rašyti eilėraščių kuriuos perskaitys 1 iš 50.

[ℛøℓαᾔⅾ@﹩]

paprasta

O kas sakė,kad sunku?

[dvalincius]

Puiki pamokėlė ! ;D +REP

Redaguota Spalio 26, 2014, nario Domce_Mobce

[ℛøℓαᾔⅾ@﹩]

Puiki pamokėlė ! ;D +REP

Ačiū,prikeliu temą,tema nėra sena aš jos neužmiršau.

Gal dar kam reikės.

[Bite]

Puiki pamoka, išsamiai, bei aiškiai išdėstei - šaunuolis.

[ℛøℓαᾔⅾ@﹩]

Puiki pamoka, išsamiai, bei aiškiai išdėstei - šaunuolis.

Ačiū,gal yra dar kokios reikėtu? Kai turėsiu daugiau laiko padarysiu.

[JimmyEXE]

Pamoka tikrai gera pravers naujokams, aš bučiau sugaišes 2-3 min, bet aš ne tu, žmonės skirtingi, na naujokams pamoka ypač pravers už pastangas +R3P. Galėjai dar saugojima/krovima sukurt bet p*, svarbu tiek. Vistiek visi beveik moka saugojima/krovima padaryt moka.

Redaguota Gruodžio 16, 2014, nario JimmyEXE

[ℛøℓαᾔⅾ@﹩]

Pamoka tikrai gera pravers naujokams, aš bučiau sugaišes 2-3 min, bet aš ne tu, žmonės skirtingi, na naujokams pamoka ypač pravers už pastangas +R3P. Galėjai dar saugojima/krovima sukurt bet p*, svarbu tiek. Vistiek visi beveik moka saugojima/krovima padaryt moka.

Dėl tų min tai: Pats būtum ilgiau užtrukęs,nebent kodą copy & paste,be to viską paaiškinti reikėjo.

O dėl saugojimo/krovimo tai tikrai nedarysiu,MySQL galiu parašyti o Dini nelabai (nelabai prisimenu kaip jis veikia,jeigu labai reikėtu padaryčiau,bet kaip žinai vis mažiau naudoja dini).

Redaguota Gruodžio 16, 2014, nario R.Lightning