GTA-support.lt - GTA pamokos, straipsniai, pagalba, konfigūracijos, Grand Theft Auto Lietuva. • Temos rodymas - [GUI][Pazengusiems] Kuriame darba su direktoriumi [Ne GRP]
Pagrindinis diskusijų puslapis Grand Theft Auto multiplayer Pamokos SA-MP [GUI][Pazengusiems] Kuriame darba su direktoriumi [Ne GRP]

[GUI][Pazengusiems] Kuriame darba su direktoriumi [Ne GRP]

Pamokos sa-mp modifikacijai. Serverio kūrimo pamokos, skriptai.
markis95 Vartotojo avataras
Skripteris
Skripteris

Pranešimai: 325
Miestas: Vilnius
Padėkojo: 6 kartus
Gavo padėkų: 13 kartus
Skype: djtarakaska
Mano serveris: 78.56.184.62:7777
Atsiliepimai: 9
Sveiki,
Gryzau po kazkiek laiko i svetaine ir ziuriu naujas dizainas ir t.t. bet kazkodel dingo mano tema :( , taigi dabar teks vel is naujo rasyti.

Pries pradedant jus turit buti pasidare sita ir sita

Taigi pradedam. Pirmiausia atsidarom GM ir prie visu kintamuju (virsuje) prirasom siuos kintamiuosius:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
new bool:Policija[MAX_PLAYERS]; //Pacio policijos darbo kintamasis
new bool:Policijad[MAX_PLAYERS]; //Policijos direktoriaus kintamasis
new bool:Pakviestaspolicija[MAX_PLAYERS]; //Sis kintamasis yra duodamas direktoriaus, kad kas nors galetu isidarbinti.
new mentu; // Pickupo kintamasis.
 
Užkrauta per 0.008 sekundes, naudojama GeSHi kodų sistema

Aisku galit ir savo pavadinimus susigalvot.

Tada susirandame public OnGameModeInit() ir po juo parasome:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
mentu = CreatePickup(1275, 2, -1606.4252,673.4704,-5.2422,-1); //pickupas
 
Užkrauta per 0.007 sekundes, naudojama GeSHi kodų sistema


Tada susirandame OnPlayerConnect ir po juo rasome situos kintamuosius kurie reiskia kad nera vienas is ju:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
Policija[playerid] = false;
Policijad[playerid] = false;
Pakviestaspolicija[playerid] = false;
 
Užkrauta per 0.007 sekundes, naudojama GeSHi kodų sistema


Ta pati parasome ir po OnPlayerDisconnect:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
Policija[playerid] = false;
Policijad[playerid] = false;
Pakviestaspolicija[playerid] = false;
 
Užkrauta per 0.008 sekundes, naudojama GeSHi kodų sistema


Tada susirandame OnPlayerPickUpPickup ir rasome pickupa kuris idarbins:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
        if(pickupid == mentu)
        {
        if(Policija[playerid])
                {
                    SendClientMessage(playerid, 0x004E5BFF, "Jus jau Policininkas.");
                }
                else if ( Pakviestaspolicija[ playerid ] )
                {
                        new file[128];
                        new vardas[128];
                        GetPlayerName(playerid, vardas, sizeof(vardas));
            TogglePlayerControllable(playerid,1);
            Policija[playerid] = true;
            SendClientMessage(playerid, 0x004E5BFF, "Jus prisijungete prie Policijos darbo");
            format(file, sizeof(file), "users/%s.ini", vardas);
            dini_IntSet(file,"darbas",1);
                }
        }
 
Užkrauta per 0.011 sekundes, naudojama GeSHi kodų sistema


tada po OnDialogResponse rasome:
direktiraus pakvietima:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
        if(dialogid == 219)
        {
        if ( Policijad[ playerid ] )
        {
        if(response == 1)
        {
        ShowPlayerDialog(selectedID[playerid],223,DIALOG_STYLE_INPUT,"Policija","Jus kvieciamas istoti i policininku buri. Istoti?","Taip","Ne");
        }
        else if(response == 0)
        {
        }
        }
        else
        {
        SendClientMessage(playerid,0xFFFFFFFF,"Jus esate ne Policijos direktorius, todel sios komandos naudoti negalite");
        return 0;
        }
        }
 
Užkrauta per 0.010 sekundes, naudojama GeSHi kodų sistema


langas kuri gauna busimas darbuotojas:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
        if(dialogid == 223)
        {
        if(response)
        {
    Pakviestaspolicija[playerid] = true;
    SendClientMessage(playerid,0xFFFFFFFF,"Keliukite i policijos nuovada ir isidarbinkite.");
        }
        else if(!response)
        {
    SendClientMessage(playerid,0xFFFFFFFF,"Jus atsisakete.");
        }
        return 1;
        }
 
Užkrauta per 0.009 sekundes, naudojama GeSHi kodų sistema


tada susirandame if(dialogid == 9877)

ir ieskokite eilutes:
new file[128], vardas[128], pass[256], adminas[256]

po adminas[256] rasome ", darbas[256]" turetu atrodyti taip:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
new file[128], vardas[128], pass[256], adminas[256], darbas[256];
 
Užkrauta per 0.007 sekundes, naudojama GeSHi kodų sistema


po sitom eilutem:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
        Moderatorius[playerid] = true;
        }
 
Užkrauta per 0.007 sekundes, naudojama GeSHi kodų sistema

rasome:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
darbas = dini_Get(file,"darbas");
 
Užkrauta per 0.007 sekundes, naudojama GeSHi kodų sistema

Sis dalykas sukurs eilute musu faile.
Tada po ja galime rasyti visus darbus:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
        if(strval(darbas) == 1)
        {
        Policija[playerid] = true;
        }
 
Užkrauta per 0.007 sekundes, naudojama GeSHi kodų sistema

taigi musu faile bus parasyta:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
darbas=1
 
Užkrauta per 0.007 sekundes, naudojama GeSHi kodų sistema

skaicius simboliziuoja darba. Ir po tada rasome:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
        if(strval(darbas) == 2)
        {
        Policijad[playerid] = true;
        }
 
Užkrauta per 0.007 sekundes, naudojama GeSHi kodų sistema



Tada reikia ZCMD includo, kuri galima parsisiusti is sitos svetaines. Kaip ir kiekviena include virsuje parasome ir pacioj apacioj GM scipto rasome pakvietimo komanda:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
COMMAND:pakviestip(playerid,params[])
{
ShowPlayerDialog(playerid,219,DIALOG_STYLE_INPUT,"Zaidejo priimimas","Spausktie TAB ir paspauskite ant zaidejo kuri kviesite, bei cia nurodykite priezasti.","Kviesti","Uzdaryti");
return 1;
}
 
Užkrauta per 0.008 sekundes, naudojama GeSHi kodų sistema


"papkviestip" yra sutrumpinta is "pakviesti policija"

Lyg is viskas. Jei kas nesigauna rasykit, gal ka nors praleidau.

[ATNAUJINTA] - 2011 m. Liepos 20 d.


Na ką gi, daug kas prašo pridėti tam tikrų dalykų, tai ir atnaujinu pamoką.

jaras prašymu priskiriam automobilius darbams:

taigi susirandame public OnPlayerStateChange(playerid, newstate, oldstate) (jei nėra susikuriame)
ir žemiau prirašome:

Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
if(newstate == PLAYER_STATE_DRIVER) //jei iseda kaip vairuotojas
        {
                new VehicleID = GetPlayerVehicleID(playerid);
                if(VehicleID == 523 || 597 || 599 || 479 || 430) //tikrina ar vienas is situ transporto priemoniu, cia surasytos policijos transporto priemoniu id. id galima atskirti "||", tai yra tas pats kas "arba"
                {
                        if(Policija[playerid] || Policijad[playerid]) //tikrina ar policijos darbuotas arba direktorius, taip pat galima prideti ir administratorius ar ka nors kita
                        {
                            SendClientMessage(playerid,0x004E5BFF,"Jus isedote i Policijos automobili"); //isedimo zinute, gali but ir ginklu davimas ar kazkas panasaus
                        }
                        else
                        {
                                RemovePlayerFromVehicle(playerid); //jei ne mentas ismeta is masinos
                                SendClientMessage(playerid,0x004E5BFF,"Si Automobili gali vairuoti tik Policija!!");
                        }
                }
        }
Užkrauta per 0.010 sekundes, naudojama GeSHi kodų sistema


Toliau, Los_Santos praše idėti /ismesti /paliktidarba /priimti komandas. Priimti komanda yra tas pats kad /pakviestip (pakviesti policija). /ismesti galima padaryti panašiai kaip ir priimti:

taigi apačioje visu komandų prirašome komanda:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
COMMAND:ismestip(playerid,params[])
{
ShowPlayerDialog(playerid,227,DIALOG_STYLE_INPUT,"Zaidejo ismetimas","Spausktie TAB ir paspauskite ant zaidejo kuri ismesite, bei cia nurodykite priezasti.","Ismesti","Uzdaryti");
return 1;
}
Užkrauta per 0.008 sekundes, naudojama GeSHi kodų sistema

Kaip ir priimti ši komanda prašys pasirinkti žaidėją.

toliau į OnDialogResponse dedame dialogus:

Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
if(dialogid == 227)
        {
        if(Policijad[playerid])
        {
        if(response == 1)
        {
        ShowPlayerDialog(selectedID[playerid],228,DIALOG_STYLE_MSGBOX,"Policija","Jus ismetamas is","Gerai","Isjungti");
        }
        else if(response == 0)
        {
        }
        }
        else
        {
        SendClientMessage(playerid,0xFFFFFFFF,"Jus esate ne Policijos direktorius, todel sios komandos naudoti negalite");
        return 0;
        }
        }
Užkrauta per 0.009 sekundes, naudojama GeSHi kodų sistema

ir
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
if(dialogid == 228)
        {
        new file[128];
        new vardas[128];
        if(response == 1)
        {
        GetPlayerName(playerid, vardas, sizeof(vardas));
    format(file, sizeof(file), "users/%s.ini", vardas);
    dini_IntSet(file,"darbas",0);
        Policija[playerid] = false;
        return 0;
        }else if(response == 0)
        {
        GetPlayerName(playerid, vardas, sizeof(vardas));
    format(file, sizeof(file), "users/%s.ini", vardas);
    dini_IntSet(file,"darbas",0);
        Policija[playerid] = false;
        return 0;
        }
        }
Užkrauta per 0.010 sekundes, naudojama GeSHi kodų sistema


na va, dabar pasirinktam žaidėjui išmes lentutę, kad jis išmestas iš darbo ir nustatys visą kitą.

Na, o palikti darba irgi panašiai kaip išmeti. Apačioje rašome:
Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
COMMAND:iseitip(playerid,params[])
{
ShowPlayerDialog(playerid,229,DIALOG_STYLE_MSGBOX,"Isejimas is darbo","Ar tikrai norite iseiti is darbo?","Taip","Ne");
return 1;
}
Užkrauta per 0.008 sekundes, naudojama GeSHi kodų sistema


ir vel i OnDialogResponse rasome:

Kodas: [ Atsisiūsti ] [ Slėpti ]
Naudojamas pawn kodų atvaizdavimas
if(dialogid == 229)
        {
        if(Policija[playerid])
        {
        if(response == 1)
        {
        ShowPlayerDialog(selectedID[playerid],228,DIALOG_STYLE_MSGBOX,"Policija","Jus atsistatydinote is policijos departamento","Gerai","Isjungti");
        }
        else if(response == 0)
        {
        }
        }
        else
        {
        SendClientMessage(playerid,0xFFFFFFFF,"Jus esate ne Policijos darbuotojas, todel sios komandos naudoti negalite");
        return 0;
        }
        }
Užkrauta per 0.009 sekundes, naudojama GeSHi kodų sistema


Viskas. Man jokių errorų nemetė, bet ir netikrinau šito scripto, jei bus bėdų ar norėsit ko nors, kad dar pridėčiau, parašykit.
Paskutinį kartą redagavo markis95 Liepa 20th, 2011, 2:43 pm. Iš viso redaguota 1 kartą.


Už šią žinutę autorius markis95 gavo padėkojimą:
Jaras (Kovas 18th, 2011, 10:10 pm)
Vertinimas: 11.11%
 

Reklama

Fuxas™ Vartotojo avataras
Skripteris
Skripteris

Pranešimai: 362
Padėkojo: 1 kartą
Gavo padėkų: 17 kartus
Skype: rimvydaskr
Mano serveris: s.t2p.lt:7778
Atsiliepimai: 3

Na gera pamoka. Prawers kam nors ;D
Paveikslėlis
Paveikslėlis
Paveikslėlis
Paveikslėlis
Live4Stunt ir Retro Life RPG developer :)

Live4Stunt serverio IP: s.t2p.lt:7778
Retro Life RPG serverio IP: 82.135.230.17:8008
________________________________________________________________________________
[Pradendantiesiams] Kuriame 3D Text Label
[PAMOKA] Optimizacija

Drifteris(Destroy) galerija
________________________________________________________________________________
Nata` rašė:
nerodau nes žinau kad tu esi pyderas ir tampysi žiūrėdamas į mano foto. Už tai nenoriu kad toki vaikai žiūrėtų į mane tuo labiau į mano foto.
:D
Best fail 4ever:
Paveikslėlis

markis95 Vartotojo avataras
Skripteris
Skripteris

Pranešimai: 325
Miestas: Vilnius
Padėkojo: 6 kartus
Gavo padėkų: 13 kartus
Skype: djtarakaska
Mano serveris: 78.56.184.62:7777
Atsiliepimai: 9

Aidas--s Vartotojo avataras
Naujokas
Naujokas

Pranešimai: 7
Padėkojo: 0 kartą
Gavo padėkų: 0 kartą
Skype: Aidas--s
Atsiliepimai: 0
Gera pamoka isejo viskas (:Išgerkime)

markis95 Vartotojo avataras
Skripteris
Skripteris

Pranešimai: 325
Miestas: Vilnius
Padėkojo: 6 kartus
Gavo padėkų: 13 kartus
Skype: djtarakaska
Mano serveris: 78.56.184.62:7777
Atsiliepimai: 9

Jaras Naujokas
Naujokas

Pranešimai: 33
Padėkojo: 4 kartus
Gavo padėkų: 0 kartą
Atsiliepimai: 0
Viskas susitvarkiau, po pickupo nebuvau padėjęs kabliataškio :)
Bet manau nėra ta tema iki galo padaryta, kadangi neparodei kaip priskirti darbinius automobilius :?
Taip pat nėra komandos, kad išmesti žaidėją ir t.t. Manau pildyt daug šitą darbą reikia.
Taip pat, jeigu esi mentu, o tave kviečia, paspaudi ir nieko.

*InseiN'aS- Vartotojo avataras
Apsipratęs narys
Apsipratęs narys

Pranešimai: 95
Padėkojo: 3 kartus
Gavo padėkų: 6 kartus
Skype: zirual
Mano serveris: Neturiu
Atsiliepimai: 0
Jaras rašė:
Viskas susitvarkiau, po pickupo nebuvau padėjęs kabliataškio :)
Bet manau nėra ta tema iki galo padaryta, kadangi neparodei kaip priskirti darbinius automobilius :?
Taip pat nėra komandos, kad išmesti žaidėją ir t.t. Manau pildyt daug šitą darbą reikia.
Taip pat, jeigu esi mentu, o tave kviečia, paspaudi ir nieko.


Jis padarė tik darbą su direktoriaus pakvietimu. Jei būtų Darbo sistema su direktoriaus pakvietimu tada jau būtu ir su mašinomis.
P.S. Yra pamoka kaip priskirti mašiną darbui.
a.K.a. Zirual

[Z-Mod]Dalinuosi tik pradžia [Atnaujinta]

Nekenčiu žmonių kurie įžūliai prašo pagalbos.

Jaras Naujokas
Naujokas

Pranešimai: 33
Padėkojo: 4 kartus
Gavo padėkų: 0 kartą
Atsiliepimai: 0
Supratau :) Bet vistiek galėtų padaryt, jug tikrai praverstų, tokiem kaip aš, kurie patys dar nemoka kurt.

doncas Vartotojo avataras
Apsipratęs narys
Apsipratęs narys

Pranešimai: 151
Padėkojo: 0 kartą
Gavo padėkų: 1 kartą
Skype: doncas142
Mano serveris: egamers.lt:1111
Atsiliepimai: 0
Geriau imesk Video pamoka kur pats kalbi :)
http://www.LDQ.TT.LT - Komandos Serveris..!


IP:82.135.230.11:8000

Sauktukas Skripteris
Skripteris

Pranešimai: 376
Miestas: San Fierro
Padėkojo: 1 kartą
Gavo padėkų: 14 kartus
Skype: kam tau?
Mano serveris: nera ;(
Atsiliepimai: 3
Nematau čia jokio pažengusiems :D
Neturiu serverio, bet ieškau partnerio jam kurti ;p

Marius<WiP Vartotojo avataras
Didelis žinovas
Didelis žinovas

Pranešimai: 676
Miestas: Marijampolė
Padėkojo: 2 kartus
Gavo padėkų: 17 kartus
Atsiliepimai: 15
Sakyčiau tikrai pamoka pažengusiems, dini, boolean kintamieji ir t.t
Paveikslėlis


M-RPG Server Is Comming 50%

Los_Santos Apsipratęs narys
Apsipratęs narys

Pranešimai: 153
Padėkojo: 3 kartus
Gavo padėkų: 0 kartą
Skype: daumis03
Mano serveris: 79.98.31.25:7760
Atsiliepimai: 0
galetum primesti dar prie viso sito /ismesti /paliktidarba /priimti? nes praverstu labai seip sauni pamoka aciu
mano manymu daugiausei padedantis zmones:
1. Stuneris
2. Theme
3. Svedas
4. cia gali buti tavo vardas
5. cia gali buti tavo vardas

Los_Santos Apsipratęs narys
Apsipratęs narys

Pranešimai: 153
Padėkojo: 3 kartus
Gavo padėkų: 0 kartą
Skype: daumis03
Mano serveris: 79.98.31.25:7760
Atsiliepimai: 0
nu blemba kaip padaryt save dyriku? nieko nesusigaudau kai uzlipi ant pickupo nieko neatsitinka
parasiau savo faile darbas=1 nieko vistiek negaliu dirbti nu padekit kas normele darbu sistema padaryt ka? kaip dyriku skirti ir tt? buciau dekingas
mano manymu daugiausei padedantis zmones:
1. Stuneris
2. Theme
3. Svedas
4. cia gali buti tavo vardas
5. cia gali buti tavo vardas

Los_Santos Apsipratęs narys
Apsipratęs narys

Pranešimai: 153
Padėkojo: 3 kartus
Gavo padėkų: 0 kartą
Skype: daumis03
Mano serveris: 79.98.31.25:7760
Atsiliepimai: 0
alio zmones kame problema?
mano manymu daugiausei padedantis zmones:
1. Stuneris
2. Theme
3. Svedas
4. cia gali buti tavo vardas
5. cia gali buti tavo vardas

markis95 Vartotojo avataras
Skripteris
Skripteris

Pranešimai: 325
Miestas: Vilnius
Padėkojo: 6 kartus
Gavo padėkų: 13 kartus
Skype: djtarakaska
Mano serveris: 78.56.184.62:7777
Atsiliepimai: 9

Pinokis Skripteris
Skripteris

Pranešimai: 274
Padėkojo: 1 kartą
Gavo padėkų: 4 kartus
Skype: augustazzz2
Atsiliepimai: 5
Tiesiog saunu :) Gerai kad vis forume daugeja pamoku :D

markis95 Vartotojo avataras
Skripteris
Skripteris

Pranešimai: 325
Miestas: Vilnius
Padėkojo: 6 kartus
Gavo padėkų: 13 kartus
Skype: djtarakaska
Mano serveris: 78.56.184.62:7777
Atsiliepimai: 9

Pinokis Skripteris
Skripteris

Pranešimai: 274
Padėkojo: 1 kartą
Gavo padėkų: 4 kartus
Skype: augustazzz2
Atsiliepimai: 5
Zmonem kada reikia tai ir patinka :D

markis95 Vartotojo avataras
Skripteris
Skripteris

Pranešimai: 325
Miestas: Vilnius
Padėkojo: 6 kartus
Gavo padėkų: 13 kartus
Skype: djtarakaska
Mano serveris: 78.56.184.62:7777
Atsiliepimai: 9
Su mielu noru ir daugiau sukurciau tik nezinau ko zmonems reikia, o jei belenka sukursiu tai tik veltui galiu laika sugaist nes tai gali zmonems nereiket. Jei kas, sakykit, pasistengsiu ne tik pamoku pakurt bet padet.

Pinokis Skripteris
Skripteris

Pranešimai: 274
Padėkojo: 1 kartą
Gavo padėkų: 4 kartus
Skype: augustazzz2
Atsiliepimai: 5
Tai tada galiu pasiulyma duoti sukur pamoka kaip kurti namu sistema arba sukur namu nuoma :D nors butu geriau namu sistema :P

Kitas


  • Reklama

Grįžti į SA-MP