Peršokti prie turinio

Free IPB Skins

Toggle shoutbox Pokalbiai

@  Karolis_Zip : (04 gruodžio 2013 - 08:42 ) Dw kas padekit :DD
@  Valmantas : (04 gruodžio 2013 - 05:11 ) na vat tuos ženkliukus }{
@  Karolis_Zip : (04 gruodžio 2013 - 01:13 ) Tai kas nors gali padeti del MySQL ?? :DDD
@  Karolis_Zip : (04 gruodžio 2013 - 12:08 ) Beja pawno eisi i eglutes iziebima ??
@  Karolis_Zip : (04 gruodžio 2013 - 12:08 ) Sveiki Vyrai ir merginos jei cia tokiu buna :P
@  Karolis_Zip : (03 gruodžio 2013 - 07:09 ) O man jau
@  Bebras : (03 gruodžio 2013 - 06:52 ) Valmantai, KĄ tokius?
@  Karolis_Zip : (03 gruodžio 2013 - 06:48 ) dw kas pades atsidekuosiu Pinigais
@  Valmantas : (03 gruodžio 2013 - 05:50 ) Gal galit sukurt pamoką kas nors kaip tvarkingai, taisyklingai naudot bracketus ir pan?
@  Karolis_Zip : (03 gruodžio 2013 - 05:40 ) O kaip fainai visa beveik diena laukti pagalbos :OO
@  Karolis_Zip : (03 gruodžio 2013 - 05:01 ) Pize kas nors pades???
@  Valmantas : (03 gruodžio 2013 - 03:51 ) help please :))
@  Karolis_Zip : (03 gruodžio 2013 - 03:44 ) As parasiau dar New mysql_query nes taip tai meta daugiau error
@  Karolis_Zip : (03 gruodžio 2013 - 01:45 ) helpppp
@  Karolis_Zip : (03 gruodžio 2013 - 12:41 ) Bebrai gali padeti ?
@  Bebras : (03 gruodžio 2013 - 12:38 ) Kurva pawned su tokiais foto
@  Karolis_Zip : (03 gruodžio 2013 - 10:30 ) Gal galetu kas per teamWiever parodyti kaip pajungti serveri su Mysql ?
@  Karolis_Zip : (02 gruodžio 2013 - 10:33 ) Pawned uzsiregistravau
@  Karolis_Zip : (02 gruodžio 2013 - 10:26 ) PAWNED can you help my ?
@  -PAWNED- : (02 gruodžio 2013 - 10:24 ) http://www.pawno.lt/aplankalas/

Aukščiausią reputaciją turintis turinys


#461 [Pamoka]Unix Time Stamp

Parašė Bebras 11 balandžio 2013 - 01:45

Unix Time Stamp

 

Kas tai yra?  Tai yra nuostabus dalykas. Jo esmė labai paprasta: jis skaičiuoja kiek sekundžių praėjo nuo 1970 metų sausio 1 dienos.

 

Šis stebuklas naudojamas daugelyje programų, mes, pawn kalboje taipat galime jį daug kur panaudoti.

 

Dar vienas įdomus dalykas, jis nustos skaičiuoti 2038 metų sausio 19 diena. Kas nutiks tada? Milijonai , o gal ir milijardai programų visame pasaulyje nustos veikti!

 

 

 

O kadangi laiko iki to turime dar daug, grižkime į Pawn pasaulį.

 

 

Pirmas klausimas tikriausiai bus, kaip jį išgauti, ar ne? Tam yra labai paprasta funkcija "gettime();", ji gražina sekundžių skaičių nuo minėtos datos.

PVZ:

new string[70];
format(string,sizeof(string),"Nuo 1970 metų sausio 1 dienos praėjo %d sekundžių",gettime());
SendClientMessage(playerid,0xFF0000FF,string);

 

 

Pavizdys viršuje neatrodo labai naudingas, ar ne?

 

Kyla klausimas ką galima naudingesnio padaryti su Unix Time Stamp. O atsakymas paprastas - bausmes. Tokias kaip ban ar jail. Pavizdys:

 

CMD:ban(playerid,params[])
{
new tmp,tmp2;
if(sscanf(params,"dd",tmp,tmp2)) SendClientMessage(playerid,0xFF0000FF,"Naudojimas /ban [zaidejo ID] [Laikas valandomis]");
else if(!IsPlayerConnected(playerid)) SendClientMessage(playerid,0xFF0000FF,"Neteisingas zaidejo ID");
else
{
new banlaikas,Vardas[MAX_PLAYER_NAME],query[80];
banlaikas = gettime() + tmp2 * 3600; // tmp2 dauginame kad paverstume valandas sekundemis
/* o dabar jau priklauso nuo jusu saugojimo sistemos
esme kad kintamajo "banlaikas" verte reikia kurnors irasyti
*/
GetPlayerName(tmp,Vardas,sizeof(Vardas));
format(query,sizeof(query),"INSERT INTO bausmes (Vardas, BausmesPabaiga) VALUES ('%s', %d)", Vardas,banlaikas);
mysql_query(query);
}
return 1;
}

Tai įrašys skaičių sekundžių kiek turi būti praėję sekundžių nuo 1970-jų kad žaidėjo bausmė baigtusi. Jeigu nesupratot,pavizdys:

public OnPlayerConnect(playerid)
{
new query[64];
new Vardas[MAX_PLAYER_NAME], laikas;
GetPlayerName(playerid,Vardas,sizeof(Vardas));
format(query,sizeof(query),"SELECT BausmesPabaiga FROM bausmes WHERE Vardas = '%s'",Vardas);
mysql_query(query);
mysql_store_result();
if(mysql_num_rows() != 0) {
      laikas= mysql_fetch_int();  
      if(laikas<=gettime()) {  // Visa magija sitoje eiluteje. Jeigu siuometu laikas yra mazesnis negu nustateme banindami, ismetame ji lauk
      SendClientMessage(playerid,0xFF0000FF,"Gavai bana, eik miegot");   
      Kick(playerid);
       }
   }
return 1;
}

 

Gal pavizdys tiem kas nemoka MySQL ir nelabai aiškus, bet svarbiausia eilute pakomentavau, o šiaip nematau jokios kliuties kad tai neveiktų su betkokia kita saugojimo sistema.

 

 

Apibendrinimas:

 

Unix Time Stamp galima naudoti banams, kalėjimo laikui, laikiniems VIP ir pnš.

 

 

Naudojimas trumpai:

  • Nustatome bausmės/vip nuėmimo laiką prie gettime() pridėdami norima laiką
  • Tikriname ar dabartinis laikas nėra didesnis ar lygus nustatytam laikui

  • 8


#1 Svarbi naujiena!

Parašė -PAWNED- 09 balandžio 2013 - 06:18

logo.png

Pawno.lt vėl gryžta! Tikėkimes jums patiks naujoji pawno.lt išvaizda. :) :)

Tikriausiai klausimas Kas nutiko pawno.lt ? Atsakysiu į jį taip: Pawno.lt veikė be klaidų, tačiau per klaidą mano slaptažodis pateko blogam žmogui kuris ištryne forumą, vartotojus. Todėl savaitę neveikė pawno.lt, buvau atmetęs šį projektą nes maniau kad jis nebeatsigaus... Sugavau daug skundų,prašymų jog pawno.lt vėl gyvuotų! Susiėmęs pradėjau darbą, atkūriau pawno.lt, įdėsiu tai ko būtinai reikia.

Išrinksiu gerus, pažystamus, patikimus moderatorius kurie prižiūrės forumą kai manęs nebus. ( http://pawno.lt/inde...į-moderatorius/ ).

 

Informacija bus pildoma..


  • 7


#5135 Speed ART . Th3edvinas

Parašė Frixo 29 rugsėjo 2013 - 08:06

Vertinkit.

 

Jai patiko tai nors nepagailekit ant video LIKE paspaust.

O jai laukiat tokiu video mano.. Tai spausk SUBSCRIBE.

Dėkui jums. Gero žiurėjimo.

 


  • 6


#4761 [GM] Zombie

Parašė -PAWNED- 19 rugsėjo 2013 - 06:18

Newspaper_Zombie.png

 

Sveiki, tvarkydamas kompiuterį radau zombie modifikaciją. Aprašymo neturiu, kas norėsite pasižiūrėsite, naudosite. :)

 

Priedas  zombie.rar   2,59MB   14 Parsiųsta kartų


  • 6


#444 Daug Filterscripts

Parašė BanN 11 balandžio 2013 - 01:10

Visu Siu FSU packas +daugiau FS - http://failai.in/sho... ... llukas.rar GERAS
AdminCheats - http://failai.in/sho...AdminCheats.rar
Speedometras- http://failai.in/sho...Speedometer.rar
Textdraw - http://failai.in/sho.../Textdrawas.rar
Fejerverkai - http://failai.in/sho...Fejerverkai.rar
xStreamer - http://failai.in/sho...1/XStreamer.rar
Darbai - http://failai.in/sho...88A3/darbai.rar
Apsauga nuo PING - http://failai.in/sho...3B35AB/PING.rar
Anti Aribrk - http://failai.in/sho... ... llukas.rar
Count komanda - http://failai.in/sho... ... llukas.rar
Akiniu FS - http://failai.in/sho... ... llukas.rar
AutoVM - http://www.failai.lt...Auto-VM.rar.htm
AntiCheat - http://failai.in/sho... ... llukas.rar
AntiGUN - http://failai.in/sho... ... llukas.rar
AntiSpeed - http://failai.in/sho... ... llukas.rar
Autobusu Sistema - http://failai.in/sho... ... llukas.rar
Dirzai - http://failai.in/sho... ... llukas.rar
Laikrodis - http://failai.in/sho... ... llukas.rar
Masinos Sistema - http://failai.in/sho... ... llukas.rar
MoneyDrop - http://failai.in/sho... ... llukas.rar
Orai - http://failai.in/sho... ... llukas.rar
Siukslininko Darbas - http://failai.in/sho... ... llukas.rar
Siukslynas - http://failai.in/sho... ... llukas.rar
Sniegas - http://failai.in/sho... ... llukas.rar
Speedomentras - http://failai.in/sho... ... llukas.rar
Technikine - http://failai.in/sho... ... llukas.rar
XP sistema - http://failai.in/sho... ... kas.rarNEW
Begiu Sistema - http://failai.in/sho... ... llukas.rar NEW
Ginklas uz nugaros - http://failai.in/sho... ... kas.rarNEW
BombPlant - http://failai.in/sho... ... kas.rarNEW
Taser - http://failai.in/sho... ... llukas.rar NEW
Numeriai - http://failai.in/sho...Numeriai.rarNEW
Salmas ant motociklo - http://failai.in/sho...0/helmet.rarNEW



Slaptažodis: 123


Jei jums patiko ar praverte tada jei galite spauskite +r3p


  • 6


#2711 fShop

Parašė Funkis 08 liepos 2013 - 06:47


  • 6


#52 Serveroffer.lt samp hostingai

Parašė serveroffer 10 balandžio 2013 - 02:15

SA-MP hostingai dedikuotame serveryje

Mysql, phpmyadmin palaikymas

Aptarnavimas.

Seriams suteikiamos apsaugos.

Kaina nuo 1 Lt

 

http://serveroffer.lt/?gam=samp


  • 5


#5140 Atiduodu neplatinta modifikacija [GRP be mysql]

Parašė Dwayne 29 rugsėjo 2013 - 10:44

Biški papasakosiu modifikacija nėra paplatinta aš tik vienas ją turiu daugiau čystai nei vienas neturi šioje modifikacijoj reikia susimappint PD yra PD padarytas, bet tik be vartų ir kito šūdo ir pavarų dėžės gali pasidaryti automatinė arba mechanine jeigu mechanine mėtai begius su CTRL ir ALT mechanikai gali įdėti dyzeli,dujas,benzina ir panašiai pasitrauksiu iš scriptinimo atiduodamas šita modifikacija
Linkas: http://www.failai.lt...ikacija.rar.htm


  • 5


#514 [GM] Dovana

Parašė -PAWNED- 11 balandžio 2013 - 04:04

Autorius: Saimis_Enter

 

Sveiki visi!

Einu iš karto prie reikalo, dalinuosi šia modifikacija:

 


Dabar bandysiu šiek tiek ją aprašyti:)

Sistemos ( nuotraukos žemiau ) :
1.Namų sistema ( MySQL)
2.Garažų sistema ( MySQL )
3.Automobilių sistema ( MySQL )
4.Vartotojų sistema ( MySQL )
5.Gaujų sistema
6.Telefonų sistema
7.E-Mailų sistema ( MySQL )
8.Duomenų bazėje saugomi serverio parametrai
9.Rekordų sistema ( MySQL )
10.Mini-VVP sistema ( MySQL )
11.Automatinių pirkimų sistema, t.y. nusipirkus vipą už kreditus jis galios mėnėsi, o po mėnėsio dings.
12.Darbų sistema
13.Medikų sistema, parašęs /kumstis medikas įgaus „super“ galių, jo kūmštis nenuims žmogui givybių, o pridės
14.Taxi sistema
15.Unikali direktorių sistema( Su daug naujų funkcijų, MySQL )
16.Eventų sistema
17. /komandos keisis nuo tavo padeties, nuo admin lygio, nuo darbo ir nuo kitų kriterijų.
18. Jai neparašyta, tai nereiškias ,kad nėra. smile.png))

Prisijungimo langas:
http://www.part.lt/i...2c0d7eb7763.png

Parašius /admin išmes šį langą:
http://www.part.lt/i...b9e4073a551.png

Unikali vartotojų sistema, parašius /vartotojas:
http://www.part.lt/i...ef55f1ba422.png

Mašinos valdymas per /transportas:
http://www.part.lt/i...bff7c8b2639.png

Admin/VIP pirkimas:
http://www.part.lt/i...3027cc2b321.png

Darbuotojų informacija, jai žaidėjas atsijungęs, rodys kada paskutinį kartą buvo prisijungęs:
http://www.part.lt/i...85599c59873.png

Per /dmenu yra funkcija statistika, rodo kiek laiko pradirbes, ir rodo kiek pinigų uždirbęs:
http://www.part.lt/i...9cedf6a0226.png

Degalinė:
http://www.part.lt/i...534edc11488.png

Direktoriaus valdymo meniu /dmenu:
http://www.part.lt/i...13548914443.png

Serverio garažai, sistema dinaminė( galima juos kurti su komanda ):
http://www.part.lt/i...b4fda85d213.png

Namų sistema, kur rašo None, nekreipkite dėmėsio, čia dabar jau rašo nėra:
http://www.part.lt/i...74f53405766.png

Parašius /info išmeta šį langą:
http://www.part.lt/i...ed79e0b5850.png

Parašius /komandos išmes, visas tavo galimas komandas, priklausomai nuo tavo rango, darbo, padeties ir kitų kriterijų
http://www.part.lt/i...a82392fc299.png

Krovikų darbas:
http://www.part.lt/i...4966bb61723.png

Langas įjungiant serverį:
http://www.part.lt/i...2ace224c950.png

Funkcija, jai pamiršai slaptažodį:
http://www.part.lt/i...ac087d0a180.png

Mappas boxo salė:
http://www.part.lt/i...6631956a591.png

Mappas Vairavimo mokykla:
http://www.part.lt/i...304b1181214.png

Mappas Taxį įmonė:
http://www.part.lt/i...a54c3712186.png

Mappas Policija:
http://www.part.lt/i...b8df398c503.png

Mechanikų langas:
http://www.part.lt/i...c5c63b70164.png

Mini-VVP paspaudys Y raidę:
http://www.part.lt/i...6d3e5cd4838.png

Omnitel verslas:
http://www.part.lt/i...48829075658.png

/pagalba langas:
http://www.part.lt/i...7523faf8868.png

/pasas langas:
http://www.part.lt/i...a98487b2252.png

Paskutinio prisijungimo informacija:
http://www.part.lt/i...f5990a54305.png

Įsidarbininmo langas:
http://www.part.lt/i...5c10a89b913.png

Tavo telefono valdymas:
http://www.part.lt/i...d7c15e4b459.png

Transporto valdymas parašius /transportas:
http://www.part.lt/i...5c835a3b758.png

Minėtasis žaidėjo sąskaitos valdymas parašius /vartotojas:
http://www.part.lt/i...0ea9d39d310.png

 

 


Atsisiūntimas
http://www.failai.lt...amemode.rar.htm

Gamemode su MySQL.


  • 5


#4553 Inventoriaus sistema

Parašė Arvydas (bl4nk) 16 rugsėjo 2013 - 06:30

QzDpuRT.jpg

 

Dar keletas funkcijų:

5XC1EXx.png

 

Kaip atrodo inventorius:

AlkN0aN.png

 

ftI8VkR.png


  • 5


#411 LRG.LT Gamemodas [TIKRAS]

Parašė Laurys_Armaniss 11 balandžio 2013 - 09:57

Sveiki lietuvaičiai, kaip žinia lrg pizdakas jau, pinigų nebegaunu iš ten, todėl pasidalinsiu su jumis lrg.lt gm.
Čia nėra GRP editas ar pnš, viską pamatysite viduje, unikalios sistemos.

Viskas su MySQL, namų sistema, biznių, mašinu, banų , admin padėjimų ir pnš..:)
SQL failas bus viduje, čia nebus pati naujausia lrg versija, bet ta versija iki kitų skripterių.

Jai negaila +rep  :))))))) Ir siūlau apsilankyti mano skripterio paslauguose :)
Vienas lodorius pardavinėja, todėl aš jį paplatinsiu, kad nebūtų tokių nesamonių :)

 

Linkas:

http://www19.zippysh...39518/file.html

 

 

 

 


  • 5


#3767 [GM]MySQL tuščias.

Parašė Naikas 10 rugpjūčio 2013 - 09:12

Taigi sveiki visi PAWNO.LT forumiečiai, įkeliu MySQL tuščia GM kas nemoka padaryti registracijos, saugojimo bei krovimo ir panašiai.

 

GM viduje slypi :

1. MySQL Regsitracija,

2. MySQL Prisijungimas,

3. MySQL Krovimas,

4. MySQL Saugojimas,

5. Naudojamas MySQL R5 plugin'as.

6. Yra SQL failas pavadinimu zaidejai.

 

Modifikacija saugoja žaidėjo :

1. Skin ID,

2. Pinigus,

3. Patirti [ XP ],

4. Koordinates[ x, y, z ],

5. Registracijos ID,

6. Žaidėjo nick'ą,

7. Slaptažodį,

8. HP[ Gyvybes ],

9. Armour[ Šarvus ].

 

Kreditai : Yiin

 

Pastebin : http://pastebin.com/5pAdsCV6

Pridėtas failas(-ai)


  • 5


#31 [ GM ] NLRG.lt

Parašė BanN 10 balandžio 2013 - 02:09

Sveiki taigi turiu jums senaja NLRG.LT modifikacija.
Sistemos : 
Administratoriaus sistema, registracijos, prisijungimo sistema, duomenų saugojimas, bei krovimas, mašinų    sistema, bei biznių sistema. Biznių sistema su įėjimo mokeščiais. Ši modifikacija niera surišta su MYSQL tai iškart galesit pasileisti , 0,3x versija smile.png . Gamemodas išties neblogas ;p

Download link : http://failai.in/sho...EBE/NLRG.LT.zip
Download link 2 : http://www1.zippysha...60874/file.html


Smagaus naudojimo bei editinimo
Modifikacija kurta žmogaus : Dende



Jei patiko +R3P


  • 5


#3043 Anti-doss sistema

Parašė Deadmanx94 18 liepos 2013 - 01:27

//virsuj
        #define IP_LIMITAS 2 // = Maksimalus prisijungimas is vieno ip.
        #define IP_Prisijungimas 4 // = Skaičius jungiasi iš to paties IP, prieš uždraudžiant Floodinti
        new Same_IP=0,Join_Stamp,ban_s[25],exceed=0;
        #define Time_Limit 3500 // = Laiko Limitas
                 
        po public OnPlayerConnect(playerid)
        {
                                         new ConnIP[16];
                                         GetPlayerIp(playerid,ConnIP,16);
                                         new compare_IP[16];
                                         new number_IP = 0;
                                         for(new i=0; i<MAX_PLAYERS; i++) {
                                                                         if(IsPlayerConnected(i)) {
                                                                                         GetPlayerIp(i,compare_IP,16);
                                                                                         if(!strcmp(compare_IP,ConnIP)) number_IP++;
                                                                         }
                                         }
                                         if((GetTickCount() - Join_Stamp) < Time_Limit)
                                                         exceed=1;
                                         else
                                                         exceed=0;
                                         if(strcmp(ban_s, ConnIP, false) == 0 && exceed == 1 )
                                         {
                                                         Same_IP++;
                                                         if(Same_IP > IP_Prisijungimas)
                                                         {
                                                                                                         Ban(playerid);
                                                                                                         Same_IP=0;
                                                         }
                                         }
                                         else
                                         {
                                                                         Same_IP=0;
                                         }
                                         if(number_IP > IP_LIMITAS)
                                                         Kick(playerid);
                                         GetStampIP(playerid);
                                         return 1;
                 
        }
        stock GetStampIP(playerid){
                                         new S_IP[16];
                                         Join_Stamp=GetTickCount();
                                         GetPlayerIp(playerid,S_IP,16);
                                         format(ban_s, 16, "%s", S_IP);
        }

  • 5


#1862 [ Unikalus ] - Serverio parametrų keitimas žaidime !

Parašė f0cus 25 gegužės 2013 - 05:47

Sveiki. Pristatau jums savo pačio kurtą filterscript'ą :

serverio nustatymų keitimą !

Jis yra gana paprastas, bet geriau nei rašyti /rcon komandas.

Tai kolkas pradinė versija, ji bus vis tobulinama.

 

 

Šis filterscriptas jums leis žaidime keisti :

  • Serverio pavadinimą
  • Serverio žemėlapio pavadinimą
  • Serverio žaidėjų prisijungimo slaptažodį.

Komandos :      /fkeitimas
Jums GUI lentelę, ir ten pasirinksite ką norėsite keisti.
Pakeitus pavadinimą, visiems rašys kad jį pakeitėte ir jis pasikeis.

Perspėjimas : Atjungus serverį, pavadinimas ir kiti parametrai nusistatys kokie jie buvo server.cfg faile !



2013.05.25 #2 IŠTAISYMAS :

Pakeisti dialogų ID. Dabar galite dėtis su savo serverio modifikacija, nes buvo taip jog maišėsi dialogai filterscripto su modifikacijos.




 

 

Versija :

0.0.1

 

 

Autorius : f0cus

 

 

Primenu, sistema vis bus tobulinama smile.png Pridedamas .AMX failas :

.

FAILAI.LT http://www.failai.lt...sChange.amx.htm

 

 

Radus klaidų rašykite čia smile.png

Nepamirškite +REP


  • 5


#138 Atiduodu Taksi Baze

Parašė BanN 10 balandžio 2013 - 02:46

Sveiki, taigi po mažu man atsibostą Sf miestas tad atiduodu jums taksi bazę

Nuotrauka  



Link'as : Taksitas_by_nickas..txt - 5.9 Kb

Jai negailą +R3P


  • 5


#3709 [PAMOKA] Spidometras su RIDA

Parašė -PAWNED- 06 rugpjūčio 2013 - 08:13

Autorius: Aidas

 

 

4c925e561fdc60df111749b730f7bbd3592.PNG

Sveiki, pradėkim:

1 Punktas

Viršuje GM prie kitų NEW rašome tokias eilutes:

 

new Text:spidometras[MAX_PLAYERS];
new Text:SPEEDOS[MAX_PLAYERS];
new bool: ShiftInfo[MAX_PLAYERS] = true;
new ShiftTimer[MAX_PLAYERS];

Šios eilutės sukuris spidometro kintamuosius.



2 Punktas


Susirandame callback'ą Public OnPlayerConnect Po juo rašome:
 

spidometras[playerid] = TextDrawCreate(285.000000, 390.000000, "spidometras");
TextDrawFont(spidometras[playerid], 3);
   TextDrawLetterSize(spidometras[playerid], 0.390000, 0.899999);
   TextDrawColor(spidometras[playerid], -1);
   TextDrawSetOutline(spidometras[playerid], 1);
   TextDrawSetProportional(spidometras[playerid], 1);
   TextDrawTextSize(spidometras[playerid], 405.000000, 0.000000);
   SPEEDOS[playerid] = TextDrawCreate(254.000000, 389.000000, " ");
   TextDrawBackgroundColor(SPEEDOS[playerid], 0x000000bb);
   TextDrawFont(SPEEDOS[playerid], 2);
   TextDrawLetterSize(SPEEDOS[playerid], 0.2300, 0.8999);
   TextDrawColor(SPEEDOS[playerid], -1);
   TextDrawSetOutline(SPEEDOS[playerid], 1);
   TextDrawSetProportional(SPEEDOS[playerid], 1);
   TextDrawUseBox(SPEEDOS[playerid], 1);
   TextDrawBoxColor(SPEEDOS[playerid], 0x00000055);
   TextDrawTextSize(SPEEDOS[playerid], 405.000000, 0.000000);
   ShiftInfo[playerid] = (ShiftInfo[playerid] == false) ? (true) : (true);
   ShiftTimer[playerid] = SetTimerEx("Speedometer", 200, true, "e", playerid);

Šios eilutės sukuria spidometro TextDraw'us.



3 Punktas

GM viršuje prie kitų forward rašome forward Speedometer(playerid);

Tada pačio modo apčioje dedame:

 

public Speedometer(playerid)
{
   new vehicleid,Float:speed_x,Float:speed_y,Float:speed_z,Float:final_speed,speed_string[256],final_speed_int;
   vehicleid = GetPlayerVehicleID(playerid);
   if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
   {
      new VehicleNames[212][] = {
       "Landstalker","Bravura","Buffalo","Linerunner","Pereniel","Sentinel","Dumper","Firetruck","Trashmaster","Stretch","Manana","Infernus",
      "Voodoo","Pony","Mule","Cheetah","Ambulance","Leviathan","Moonbeam","Esperanto","Taxi","Washington","Bobcat","Mr Whoopee","BF Injection",
       "Hunter","Premier","Enforcer","Securicar","Banshee","Predator","Bus","Rhino","Barracks","Hotknife","Trailer","Previon","Coach","Cabbie",
       "Stallion","Rumpo","RC Bandit","Romero","Packer","Monster","Admiral","Squalo","Seasparrow","Pizzaboy","Tram","Trailer","Turismo","Speeder",
       "Reefer","Tropic","Flatbed","Yankee","Caddy","Solair","Berkley's RC Van","Skimmer","PCJ-600","Faggio","Freeway","RC Baron","RC Raider",
       "Glendale","Oceanic","Sanchez","Sparrow","Patriot","Quad","Coastguard","Dinghy","Hermes","Sabre","Rustler","ZR3 50","Walton","Regina",
       "Comet","BMX","Burrito","Camper","Marquis","Baggage","Dozer","Maverick","News Chopper","Rancher","FBI Rancher","Virgo","Greenwood",
       "Jetmax","Hotring","Sandking","Blista Compact","Police Maverick","Boxville","Benson","Mesa","RC Goblin","Hotring Racer A","Hotring Racer B",
       "Bloodring Banger","Rancher","Super GT","Elegant","Journey","Bike","Mountain Bike","Beagle","Cropdust","Stunt","Tanker","RoadTrain",
       "Nebula","Majestic","Buccaneer","Shamal","Hydra","FCR-900","NRG-500","HPV1000","Cement Truck","Tow Truck","Fortune","Cadrona","FBI Truck",
       "Willard","Forklift","Tractor","Combine","Feltzer","Remington","Slamvan","Blade","Freight","Streak","Vortex","Vincent","Bullet","Clover",
       "Sadler","Firetruck","Hustler","Intruder","Primo","Cargobob","Tampa","Sunrise","Merit","Utility","Nevada","Yosemite","Windsor","Monster A",
       "Monster B","Uranus","Jester","Sultan","Stratum","Elegy","Raindance","RC Tiger","Flash","Tahoma","Savanna","Bandito","Freight","Trailer",
       "Kart","Mower","Duneride","Sweeper","Broadway","Tornado","AT-400","DFT-30","Huntley","Stafford","BF-400","Newsvan","Tug","Trailer A","Emperor",
       "Wayfarer","Euros","Hotdog","Club","Trailer B","Trailer C","Andromada","Dodo","RC Cam","Launch","Police Car (LSPD)","Police Car (SFPD)",
       "Police Car (LVPD)","Police Ranger","Picador","S.W.A.T. Van","Alpha","Phoenix","Glendale","Sadler","Luggage Trailer A","Luggage Trailer B",
       "Stair Trailer","Boxville","Farm Plow","Utility Trailer" };
       new masinosbukle[10];
      new Float:health;
       GetVehicleHealth(vehicleid, health);
       if(health >900)
      {
         format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
      }
      else if(health >800)
      {
             format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
      }
      else if(health >700)
      {
            format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
      }
      else if(health >600)
      {
             format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
      }
      else if(health >500)
      {
            format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
      }
      else if(health >400)
      {
            format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
      }
      else if(health >300)
      {
            format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
      }
      else if(health >200)
      {
             format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
      }
      else if(health >100)
      {
             format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
      }
      else if(health <100)
      {
         format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
      }
       new model = GetVehicleModel(vehicleid);
      GetVehicleVelocity(vehicleid,speed_x,speed_y,speed_z);
      final_speed = floatsqroot(((speed_x*speed_x)+(speed_y*speed_y))+(speed_z*speed_z))*216.666667; // 136.666667 = kmph  // 85.4166672= mph
      final_speed_int = floatround(final_speed,floatround_round);
      vehicleDB[vehicleid][prav] += final_speed;
      if(ShiftInfo[playerid] == true)
      {
         format(speed_string,156,"~n~~n~  ~y~Transportas: ~w~%s~n~  ~g~Greitis: ~w~%i KM/h~n~  ~r~Bukle: ~w~%s~n~  ~b~Degalai: ~w~%dL~n~  ~p~Pravaziuota: ~w~%.2fKm", VehicleNames[model-400], final_speed_int, masinosbukle, vehicleDB[vehicleid][gas], vehicleDB[vehicleid][prav]/100000);
             TextDrawSetString(SPEEDOS[playerid], speed_string);
         TextDrawShowForPlayer(playerid, spidometras[playerid]);
          TextDrawShowForPlayer(playerid, SPEEDOS[playerid]);
      }else{
          TextDrawHideForPlayer(playerid, spidometras[playerid]);
          TextDrawHideForPlayer(playerid, SPEEDOS[playerid]);
      }
   }else{
      TextDrawHideForPlayer(playerid, spidometras[playerid]);
       TextDrawHideForPlayer(playerid, SPEEDOS[playerid]);
   }
    return 1;
}

Kaikurie paaiškinimai

new  vehicleid,Float:speed_x,Float:speed_y,Float:speed_z,Float:final_speed,speed_string[256],final_speed_int;
   vehicleid = GetPlayerVehicleID(playerid);
   if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)



Šis kodas sukuria "Stringus"


new VehicleNames[212][] = {
       "Landstalker","Bravura","Buffalo","Linerunner","Pereniel","Sentinel","Dumper","Firetruck","Trashmaster","Stretch","Manana","Infernus",
      "Voodoo","Pony","Mule","Cheetah","Ambulance","Leviathan","Moonbeam","Esperanto","Taxi","Washington","Bobcat","Mr Whoopee","BF Injection",
       "Hunter","Premier","Enforcer","Securicar","Banshee","Predator","Bus","Rhino","Barracks","Hotknife","Trailer","Previon","Coach","Cabbie",
       "Stallion","Rumpo","RC Bandit","Romero","Packer","Monster","Admiral","Squalo","Seasparrow","Pizzaboy","Tram","Trailer","Turismo","Speeder",
       "Reefer","Tropic","Flatbed","Yankee","Caddy","Solair","Berkley's RC Van","Skimmer","PCJ-600","Faggio","Freeway","RC Baron","RC Raider",
       "Glendale","Oceanic","Sanchez","Sparrow","Patriot","Quad","Coastguard","Dinghy","Hermes","Sabre","Rustler","ZR3 50","Walton","Regina",
       "Comet","BMX","Burrito","Camper","Marquis","Baggage","Dozer","Maverick","News Chopper","Rancher","FBI Rancher","Virgo","Greenwood",
       "Jetmax","Hotring","Sandking","Blista Compact","Police Maverick","Boxville","Benson","Mesa","RC Goblin","Hotring Racer A","Hotring Racer B",
       "Bloodring Banger","Rancher","Super GT","Elegant","Journey","Bike","Mountain Bike","Beagle","Cropdust","Stunt","Tanker","RoadTrain",
       "Nebula","Majestic","Buccaneer","Shamal","Hydra","FCR-900","NRG-500","HPV1000","Cement Truck","Tow Truck","Fortune","Cadrona","FBI Truck",
       "Willard","Forklift","Tractor","Combine","Feltzer","Remington","Slamvan","Blade","Freight","Streak","Vortex","Vincent","Bullet","Clover",
       "Sadler","Firetruck","Hustler","Intruder","Primo","Cargobob","Tampa","Sunrise","Merit","Utility","Nevada","Yosemite","Windsor","Monster A",
       "Monster B","Uranus","Jester","Sultan","Stratum","Elegy","Raindance","RC Tiger","Flash","Tahoma","Savanna","Bandito","Freight","Trailer",
       "Kart","Mower","Duneride","Sweeper","Broadway","Tornado","AT-400","DFT-30","Huntley","Stafford","BF-400","Newsvan","Tug","Trailer A","Emperor",
       "Wayfarer","Euros","Hotdog","Club","Trailer B","Trailer C","Andromada","Dodo","RC Cam","Launch","Police Car (LSPD)","Police Car (SFPD)",
       "Police Car (LVPD)","Police Ranger","Picador","S.W.A.T. Van","Alpha","Phoenix","Glendale","Sadler","Luggage Trailer A","Luggage Trailer B",
       "Stair Trailer","Boxville","Farm Plow","Utility Trailer" };



Šis kodas gauna mašinos varda kurioje jus sėdite.


new masinosbukle[10];
      new Float:health;
       GetVehicleHealth(vehicleid, health);
       if(health >900)
      {
         format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
      }
      else if(health >800)
      {
             format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
      }
      else if(health >700)
      {
            format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
      }
      else if(health >600)
      {
             format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
      }
      else if(health >500)
      {
            format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
      }
      else if(health >400)
      {
            format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
      }
      else if(health >300)
      {
            format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
      }
      else if(health >200)
      {
             format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
      }
      else if(health >100)
      {
             format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
      }
      else if(health <100)
      {
         format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
      }
Šis kodas gauna mašinos būklę.


new model = GetVehicleModel(vehicleid);
      GetVehicleVelocity(vehicleid,speed_x,speed_y,speed_z);
      final_speed = floatsqroot(((speed_x*speed_x)+(speed_y*speed_y))+(speed_z*speed_z))*216.666667; // 136.666667 = kmph  // 85.4166672= mph
      final_speed_int = floatround(final_speed,floatround_round);
      vehicleDB[vehicleid][prav] += final_speed;


Šis kodas išgauna mašinos greiti kurioje jūs sėdite.


if(ShiftInfo[playerid] == true)
      {
         format(speed_string,156,"~n~~n~  ~y~Transportas: ~w~%s~n~  ~g~Greitis: ~w~%i KM/h~n~  ~r~Bukle: ~w~%s~n~  ~b~Degalai: ~w~%dL~n~  ~p~Pravaziuota: ~w~%.2fKm", VehicleNames[model-400], final_speed_int, masinosbukle, vehicleDB[vehicleid][gas], vehicleDB[vehicleid][prav]/100000);
             TextDrawSetString(SPEEDOS[playerid], speed_string);
         TextDrawShowForPlayer(playerid, spidometras[playerid]);
          TextDrawShowForPlayer(playerid, SPEEDOS[playerid]);
      }else{
          TextDrawHideForPlayer(playerid, spidometras[playerid]);
          TextDrawHideForPlayer(playerid, SPEEDOS[playerid]);
      }
   }else{
      TextDrawHideForPlayer(playerid, spidometras[playerid]);
       TextDrawHideForPlayer(playerid, SPEEDOS[playerid]);
   }


Šis kodas sukuria TextDraw'ą įsėdus į mašina bei rodo mašinos buklę, ridą, greitį, bei panaikina spidometrą jums išlipus iš mašinos.
 


  • 4


#3049 Skripter i Moderatorius

Parašė -PAWNED- 18 liepos 2013 - 02:49

1 Pranešimai - Jau rašosi į moderatorius, dabar logiškai pagalvok, kokie šansai?


  • 4


#2724 fShop

Parašė Funkis 09 liepos 2013 - 11:28


  • 4


#2355 fShop

Parašė Funkis 26 birželio 2013 - 05:35

Pastebėjau , jog daug kam čia reikia parašų , avatarų ar dar ko , tai šiek tiek pagelbėsiu. Iškarto sakau , aš dar nesu prof. tad darbai nebus - WOW , OMG t.t. , bet pasistengsiu.

 

Anketa -

  • Vardas [ NICK ] :
  • Darbas [ avataras , parašas , baneris ] :
  • Jūsų sugalvotas dydis [ 98x98 , 100x100 , 120x120 , 150x150 ir t.t. nebūtina ] :
  • Tema arba stock paveikslėlis :
  • Tekstas :
  • Sub - Tekstas
  • Kiek + rep žadate atsiskaityti :

Taisyklės -

 

  • Darbo laukti , o ne off-topinti - kada , kur mano darbas.
  • Darbas atliekamas tada kai turiu laiko ir noro.
  • Šioje temoja nerašyti - ačiū t.t. , o atsiskaityti už darbą +rep paspaudimu.
  • Jei kažkas nepatiko kreipkites į AŽ.
  • .PSD failų nepasilieku , taip pat ir jums jo neduodu.

Kol kas tiek, sėkmės.


  • 4