Üzenetek megjelenítése

Ez a szekció lehetővé teszi a felhasználó által írt összes hozzászólás megtekintését. Vedd figyelembe, hogy csak azokba a fórumokba írt hozzászólásokat látod, amelyekhez hozzáférésed van.


Témák - Lockett

Oldalak: 1 [2]
16
Kérdések, Segítség / Segítség Kép/Videó.
« Dátum: 2013. Június 04. - 19:22:17 »
Helló!
Nem tudom jó helyre nyitottam de egy olyan program kéne nekem amivel képeket/videókat tudok csinálni a szerveren úgy hogy a karakterem/jármûvem ne látszódjon.

17
Fórum Archívum (Témák/Fórumok) / Két Szavas Rapelés.
« Dátum: 2013. Június 04. - 09:02:52 »
Sziasztok.
Játék menet a következõ. Valaki leír két szót és a következönek
hozzá kell írni még két szót úgy hogy rímeljen.  :D
Akkor kezdem is.
Elõveszem beleteszem

18
Gratulálok nyittok egy olyan szervert ami halott. Fogjatok mar fel LT volt nincs, semmi értelme az egésznek sosem lesz a régi.
Gondolom Core RPG-nek vége és ezzel a s[h]arpnak is mivel össze altatatok.

19
Archívum / Future Town ~ "One Town, One Life" [ Már Videóval ]
« Dátum: 2013. Május 26. - 21:52:08 »

\"width=500
http://kepfeltoltes.hu/130526/ftrpg_www.kepfeltoltes.hu_.png[/img]by Doriftar
 
 
Future Town  ~  One Town, One Life
 


Állapot:
\"067.png\" Szerver: Future Town | Verzió: v0.0
\"115.png\" IP: Nem Publikus
\"lock.png\" Zárva
\"2924rbo.png\": http://www.futureroleplay.tk
\"2vhvo2c.png\" :


Történet :

A történet nem nagy durranás. Egyik nap nézelõdtem a fórumon szokásom szerint, betértem a \"Segítségkérés -> Scriptert, Mappert Keresek\" topikba, ott vettem észre Sajtii témáját elgondolkoztam és írtam neki egy üzenetet, még az nap felvett Skypera és megbeszéltük a részleteket. A munkálatok két napra rá  elkezdtõtek mikor is shadee csatlakozott, azóta is folynak a munkálatok.


Csapat :

Tulaj/Scripter/Webmester: Sajtii

Társtualj/Mapper/Ötletgazda:
Lockett

Társtualj/Scripter:
shadee

Mapper:
.:MaRtiN:.

Szponzor:
Whipeer

Adminisztrátor:
Constantin


Szerver :

A szerver egy teljesen 0-ról írt RolePlay mód lesz ami Fort Carsonban fog játszódni. Megtalálhatóak lesznek benne olyan dolgok amik eddig még sehol sem felfedezhetõek.


A szerveren megtalálható munkák :

Úttisztító munka - Az egész Fort Carsonon keresztül kell menned. checkpontok vannak lerakva, checkpontonként 25 Forintot add a fizetésedhez.

A fizetésedet bármikor felveheted a postán.


Kukás munka - Az egész Fort Carsonon keresztül kell menned. checkpontok vannak lerakva, checkpontonként 50 Forintot add a fizetésedhez.


A fizetésedet bármikor felveheted a postán.


Vízóra Leolvasó - Még nincs készen.


Gázóra Leolvasó - Még nincs készen.


Villanyóra Leolvasó - Még nincs készen.




Leaderes Munkák :

Fort Carson Police Department.

Fort Carson Mechanic.


Fort Carson Ambulance.



UCP :

A szerveren megtalálható lesz az UCP rendszer is.

Itt az alábbi dolgokat teheted meg:


                                                        -Karaktered kezelése.


                                                        -Jelszavad cseréje.


                                                        -Szerver adatok megtekintése.


                                                        -Elérhetõ adminok listáját megtekintheted.


                                                        -Top 10 player (Játszott óra)


                                                        -Top 10 player (Pénz szerínt)



Videók :
 

http://www.youtube.com/watch?v=ed5IdWW9mHo&feature=youtu.be
 
Szereplõk :



AmF

.:MaRtiN:.


Constantin


koltai00


Wanted13


Köszönjük szépen a segítséget. *FutureTown Team

 


Képek :
20
SA-MP: Szerverfejlesztés / GameModok [ Freeroam, RC, Valami. ]
« Dátum: 2013. Április 02. - 00:38:01 »
Sziasztok.
Van három mod a gépemen ami nekem egyáltalán nem kell. Már nem nagyon csinálgatok ilyeneket..
Ezért itt publikálom.
Tartalom:


-RC: Ez egy kezdetleges RC mod. Elég szórakoztató!  :D


-Car: Ebben van egy sebességváltó script elég érdekes meg egy Zinthos féle autólekérõ csak hogy ki lehessen  próbálni a sebességváltót.


-FreeRoam: Ebben már elég sok minden van. Teleportok, Parancsok, Drog. De ha megy nyitod a .pwn fájlt a mod elejébe le van írva mi van kész. :angel:
 
Nyugodtan használjátok fel õket.
Sõt örülnék is neki  :thumbsup:
Letöltés: http://www.solidfiles.com/d/f7bdaf11b5/   

21
Szkript kérések / Jármû mentés
« Dátum: 2013. Március 07. - 19:07:48 »
Sziasztok!
Van egy olyan scriptem amivel lehet autókat venni de nem tudom hogy kell elmenteni azokat.
Szóval egy olyan scriptre lenne szükségem ami DINI-vel elmenti a kocsikat.
Pontosabban ha valaki vesz egy autót akkor annak a nevére lementi a kocsit amikor kijelentkezik akkor meg elementi..
Elõre is köszönöm!  :thumbsup:  :facepalm:

22
Segítségkérés / warning 225: unreachable code
« Dátum: 2013. Március 06. - 16:37:00 »
Sziasztok.
Ezt a Hibát kapom: warning 225: unreachable code
Segítsetek  :angel: ;D
 
   if(dialogid == skincsere)
{
if(!response)
{
   SendClientMessage(playerid, HIBA, \"[HIBA]Nem Történt Skin Változtatás!\");
   return 1;
   }
   if(strval(inputtext) >=0)
   {
   if(strval(inputtext) <=299)
   {
         SetPlayerSkin(playerid, strval(inputtext));
   } else
   {
         SendClientMessage(playerid, HIBA, \"[HIBA]Ez a Skin ID Nem Található Válassz Másikat!\");
   }
   } else
   {
         SendClientMessage(playerid, HIBA, \"[HIBA]Ez a Skin ID Nem Található Válassz Másikat!\");
         }
}
return 0;
}

23
RP/RPG kérések / RP-s Kocsilehívó probléma.
« Dátum: 2013. Március 04. - 19:20:35 »
Sziasztok..  ;D
Van egy RP-s kocsi vásárlós Scriptem amit innen a forumról szedtem le.. De van egy kis baj vele... Még pedig ha bele megyek a Pickup-ba kijön a dialog kiválasztom az autót amit akarok és utána semmit nem csinál.. Se az autót nem adja le sem a pénzt nem vonja le..
Segítsetek PLS  ??? :thumbsup:
 
    #include <a_samp>
#define FILTERSCRIPT
#pragma tabsize 0
    #define         P_X             424.2530
    #define         P_Y             2456.8738
    #define         P_Z             16.6250
    #define         KI_X            402.8359
    #define         KI_Y             2466.7412
    #define         KI_Z           16.5159
    #define         KI_ROT         90.3151
    #define DIALOGUE              (1232)
    new JarmuAdat[][] =             { // A második szám az ár. az elsõ a model.
    { 400, 1500000 },               // Landstalker
    { 401, 1500000 },               // Bravura
    { 404, 8888 },                  // Perennial
    { 410, 1500000 },               // Manana
    { 419, 1500000 },               // Esperanto
    { 421, 1500000 },               // Washington
    { 422, 1500000 },               // Bobcat
    { 426, 1500000 },               // Premier
    { 439, 1500000 },               // Stallion
    { 445, 15000000 },              // Admiral
    { 462, 120 },                   // Faggio
    { 468, 100 },                   // Sanchez
    { 475, 1500000 },               // Sabre
    { 478, 1500000 },               // Walton
    { 489, 1500000 },               // Rancher
    { 491, 1500000 },               // Virgo
    { 492, 1500000 },               // Greenwood
    { 518, 700000 },                // Buccaneer
    { 540, 1500000 }                // Vincent
                                            };
    enum pdata { vehicle, vehileid }
    enum vdata { Float:xpos, Float:ypos, Float:zpos, Float:rot, model, color1, color2, plate[32 + 1] }
    new bool: Civilian[MAX_VEHICLES];
    new IdeigID[MAX_PLAYERS];
    new playerInfo[MAX_PLAYERS][pdata];
    new vehicleInfo[MAX_VEHICLES][vdata];
    new Pickup;
    new SavedListitem[MAX_VEHICLES][64 + 1];
 
 
 
    public OnFilterScriptInit( ) {
            printf( \"[Fl0rian] Jármû vásárlás - BETÖLTVE\" );
            LoadVehiclesFromFile( );
            Pickup = CreatePickup( 1239, 1, P_X, P_Y, P_Z );
            return 1;
    }
    public OnFilterScriptExit( ) {
            printf( \"[Fl0rian] Jármû vásárlás - LEÁLLÍTVA\" );
            DestroyPickup( Pickup );
            return 1;
    }
    public OnPlayerPickUpPickup( playerid, pickupid ) {
            if( pickupid == Pickup ) {
                if( playerInfo[playerid][vehicle] == 1 ) return SendClientMessage( playerid, 0xff0000AA, \"HIBA: {ffffff}Neked már van autód.\" );
                SetPlayerPos( playerid, P_X, P_Y+1, P_Z );
                new dialText[512 + 1];
                    new tmp[64 + 1];
                for( new i; i < sizeof JarmuAdat; i++ ) {
                            format( tmp, sizeof tmp, \"%s.  Ár: %d$\\n\", GetVehicleModelName(JarmuAdat[0]), JarmuAdat[1] );
                            strins( dialText, tmp, strlen(dialText) );
                            format( SavedListitem, 64, \"%s\", GetVehicleModelName(JarmuAdat[0]) );
                    }
                if( !strlen(dialText) ) return 1;
                ShowPlayerDialog( playerid, DIALOGUE, DIALOG_STYLE_LIST, \"Autóvásárlás\", dialText, \"Tovább\", \"Kilép\" );
            }
            return 1;
    }
    public OnPlayerStateChange( playerid, newstate, oldstate ) {
            if( newstate == PLAYER_STATE_DRIVER ) {
                if( GetPlayerVehicleID(playerid) != playerInfo[playerid][vehileid] ) {
                    RemovePlayerFromVehicle( playerid );
                    return SendClientMessage( playerid, 0xff0000AA, \"HIBA: {ffffff}Ez a jármû nem a tiéd.\" );
                    }
            }
            return 1;
    }
    public OnPlayerExitVehicle( playerid, vehicleid ) {
            new Float:x, Float:y, Float:z, Float:r;
            GetVehiclePos( vehicleid, x, y, z );
            GetVehicleZAngle( vehicleid, r );
            if( GetPlayerState(playerid) == PLAYER_STATE_DRIVER && vehicleid == playerInfo[playerid][vehileid] ) {
                DestroyVehicle( vehicleid );
                playerInfo[playerid][vehileid] = CreateVehicle( vehicleInfo[playerInfo[playerid][vehileid]][model], x, y, z, r, vehicleInfo[playerInfo[playerid][vehileid]][color1], vehicleInfo[playerInfo[playerid][vehileid]][color2], 0 );
                vehicleInfo[playerInfo[playerid][vehileid]][xpos] = x;
                vehicleInfo[playerInfo[playerid][vehileid]][ypos] = y;
                vehicleInfo[playerInfo[playerid][vehileid]][zpos] = z;
                vehicleInfo[playerInfo[playerid][vehileid]][rot] = r;
                new vname[64 + 1];
                format( vname, 64, \"%03d.dat\", vehicleid );
                new File: vfile = fopen(vname);
                #define LustaVagyok(%0) vehicleInfo[playerInfo[playerid][vehileid]][%0]
                if( vfile ) {
                        new vstring[128 + 1];
                        format( vstring, 128, \"%f,%f,%f,%f,%d,%d,%d,%s\", LustaVagyok(xpos), LustaVagyok(ypos), LustaVagyok(zpos), LustaVagyok(rot), LustaVagyok(color1), LustaVagyok(color2), LustaVagyok(model), LustaVagyok(plate) );
                        fwrite( vfile, vstring );
                        fclose( vfile );
                    }
            }
            return 1;
    }
    public OnDialogResponse( playerid, dialogid, response, listitem, inputtext[] ) {
            switch( dialogid ) {
                case DIALOGUE: {
                    if( GetPlayerMoney(playerid) < JarmuAdat[listitem][1] ) return SendClientMessage( playerid, 0xff0000AA, \"HIBA: {ffffff}Nincs pénzed erre a jármûre.\" );
                            IdeigID[playerid] = GetVehicleIDFromName( SavedListitem[listitem] );
                            new rand1 = random(255);
                            new rand2 = random(255);
                            new veh = CreateVehicle( IdeigID[playerid], KI_X, KI_Y, KI_Z, KI_ROT, rand1, rand2, 0 );
                        playerInfo[playerid][vehicle] = 1;
                        playerInfo[playerid][vehileid] = veh;
                        vehicleInfo[veh][xpos] = KI_X;
                        vehicleInfo[veh][ypos] = KI_Y;
                        vehicleInfo[veh][zpos] = KI_Z;
                        vehicleInfo[veh][rot] = KI_ROT;
                        vehicleInfo[veh][color1] = rand1;
                        vehicleInfo[veh][color2] = rand2;
                        vehicleInfo[veh][model] = IdeigID[playerid];
                            Civilian[veh] = true;
                            IdeigID[playerid] = -1;
                            new vname[64 + 1];
                    format( vname, 64, \"%03d.dat\", veh );
                            new File: vfile = fopen(vname);
                            #undef LustaVagyok
                       #define LustaVagyok(%0) vehicleInfo[veh][%0]
                        if( vfile ) {
                                new vstring[128 + 1];
                                format( vstring, 128, \"%f,%f,%f,%f,%d,%d,%d,%s\", LustaVagyok(xpos), LustaVagyok(ypos), LustaVagyok(zpos), LustaVagyok(rot), LustaVagyok(color1), LustaVagyok(color2), LustaVagyok(model), LustaVagyok(plate) );
                                fwrite( vfile, vstring );
                                fclose( vfile );
                            }
                            SendClientMessage( playerid, 0x4a7affAA, \"INFO: {ffffff}Sikeresen megvetted a jármûvet.\" );
                    }
            }
            return 0;
    }
    public OnPlayerCommandText( playerid, cmdtext[] ) {
            if( strcmp(cmdtext, \"/stats\") == 0 ) {
                    new str[128 + 1];
                    format( str, sizeof(str), \"Kocsi ID-d: %d\", playerInfo[playerid][vehileid] );
                    return SendClientMessage( playerid, -1, str );
            }
            return 1;
    }
 
 
 
    // =================================================================
    stock LoadVehiclesFromFile( ) {
            new string[256 + 1];
            new dest[8][64 + 1];
            for( new veh = 0; veh < MAX_VEHICLES; veh++ ) {
                    new vname[64 + 1];
                    format( vname, 64, \"%03d.dat\", veh );
                    if( fexist(vname) ) {
                            new File: vfile = fopen(vname, io_read);
                            if( vfile ) {
                                fread( vfile, string );
                                split( string, dest, \',\' );
                            }
                            new vehi = CreateVehicle( strval(dest[6]), floatstr(dest[0]), floatstr(dest[1]), floatstr(dest[2]), floatstr(dest[3]), strval(dest[4]), strval(dest[5]), 0 );
                            SetVehicleNumberPlate( vehi, dest[7] );
                            vehicleInfo[vehi][xpos] = floatstr(dest[0]);
                            vehicleInfo[vehi][ypos] = floatstr(dest[1]);
                            vehicleInfo[vehi][zpos] = floatstr(dest[2]);
                            vehicleInfo[vehi][rot] = floatstr(dest[3]);
                            vehicleInfo[vehi][color1] = strval(dest[4]);
                            vehicleInfo[vehi][color2] = strval(dest[5]);
                            vehicleInfo[vehi][model] = strval(dest[6]);
                            format( vehicleInfo[vehi][plate], 32, \"%s\", dest[7] );
                            printf( \"%d ID jármû betöltve.\", vehi );
                    }
            }
            return 1;
    }
    stock split( const strsrc[], strdest[][], delimiter ) {
            new i, li;
            new aNum;
            new len;
            while(i <= strlen(strsrc)){
                if(strsrc==delimiter || i==strlen(strsrc)){
                    len = strmid(strdest[aNum], strsrc, li, i, 128);
                    strdest[aNum][len] = 0;
                    li = i+1;
                    aNum++;
                    }
                    i++;
            }
            return 1;
    }
    new VehicleNames[212][] = {
            {\"Landstalker\"},{\"Bravura\"},{\"Buffalo\"},{\"Linerunner\"},{\"Perennial\"},{\"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 1\"},{\"Previon\"}, {\"Coach\"},{\"Cabbie\"},{\"Stallion\"},{\"Rumpo\"},{\"RC Bandit\"},{\"Romero\"},{\"Packer\"},{\"Monster\"}, {\"Admiral\"},{\"Squalo\"},{\"Seasparrow\"},{\"Pizzaboy\"},{\"Tram\"},{\"Trailer 2\"},{\"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\"},{\"ZR-350\"},{\"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 LA\"},{\"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 Flat\"},{\"Streak Carriage\"},{\"Kart\"},{\"Mower\"},{\"Duneride\"},{\"Sweeper\"}, {\"Broadway\"},{\"Tornado\"},{\"AT-400\"},{\"DFT-30\"},{\"Huntley\"},{\"Stafford\"},{\"BF-400\"},{\"Newsvan\"}, {\"Tug\"},{\"Trailer 3\"},{\"Emperor\"},{\"Wayfarer\"},{\"Euros\"},{\"Hotdog\"},{\"Club\"},{\"Freight Carriage\"},
            {\"Trailer 3\"},{\"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\"}
    };
    stock GetVehicleIDFromName( vehiclename[], type = 0 ) {
            new integer = INVALID_VEHICLE_ID;
            new talalat;
            if( type == 0 ) {
                    for( new i = 0; i < 212; i++ ) {
                        if( strfind(VehicleNames[0], vehiclename, true ) != -1 ) {
                                    integer = i + 400;
                                    talalat++;
                            }
                    }
            }
            else {
                for( new i = 0; i < 212; i++ ) {
                        if( strcmp(VehicleNames[0], vehiclename, true ) == 0 ) {
                                    integer = i + 400;
                                    talalat++;
                            }
                    }
            }
            if( talalat > 1 ) {
                printf( \" HIBA: Több találat a következõre: \'%s\'\", vehiclename );
                return INVALID_VEHICLE_ID;
            }
            if( talalat == 0 ) {
                    printf( \" HIBA: Nincs találat a következõre: \'%s\'\", vehiclename );
            }
            return integer;
    }
 
    stock GetVehicleModelName( modell ) {
        new STRING[64 + 1];
            format( STRING, 64, \"%s\", VehicleNames[modell - 400][0] );
        return STRING;
    }

 
AddPlayerClass(0,424.2530,2456.8738,16.6250,356.0009,0,0,0,0,0,0); // Kocsi vásálás ( Pickup)
AddPlayerClass(0,402.8359,2466.7412,16.5159,90.3151,0,0,0,0,0,0); // Itt adja ki a megvett kocsit..

24
Szkript kérések / RolePlay Kocsi Rendszer
« Dátum: 2013. Március 03. - 19:26:36 »
Sziasztok!
Szükségem lenne egy olyan Kocsi rendszerre ami Rp szerókon van...
Olyan kellene hogy meg adok egy kordinátát  GM-bena oda állok és akkor kijön egy dialog ott kiválasztom a kocsit amit meg szeretnék venni megveszem aztán meg adok egy másik kordinátát a GM-ben és oda lerakja a kocsit.
És egy playernek 1 maximum 2 kocsija lehetne amihez csak neki van kulcsa és el tudná adni mondjuk fél áron a szalonban de másik playernek is eltudná. Valamit az is jó lenne ha lenne benne kölcsönkulcs meg olyan ahol kiszálnak a kocsibol ott a szeró auto leparkolja és respawnál ott lessz.  :thumbsup: :angel: :confused:

25
Szkript kérések / Jármû
« Dátum: 2013. Március 02. - 21:44:47 »
Sziasztok!
Szükségem lenne egy olyan Scriptre hogy van egy hely és ha oda állok akkor ki jön egy dialog... bármilyen hely csak meg adok egy kordinátát a scriptben és ott lehet venni kocsikat. Egy playernek egy kocsija lehetne és csak õ tudná vezetni. És ha valaki vesz egy kocsit akkor azt el is menti a szeró..
Elõre is köszönöm.  :)

26
Hivatalos fórumról áthozott szkriptek / Weapon System [0.3x]
« Dátum: 2013. Március 01. - 20:41:52 »
Sziasztok!
Hiv.Fórumon találtam ezt a FS-t gondoltam valakinek szüksége lehet rá hogyha már van hasonló jármûlekérõ...
Hátt itt van.  :thumbsup:
Eredti készitõ: KittyGaming
Egy parancs van: /gunlist
Hiv.Forum.:  http://forum.sa-mp.com/showthread.php?t=412066
Letöltés.: http://www.solidfiles.com/d/ae46b846c9/
\"sa-mp-011.jpg\"

27
SA-MP: Szerverfejlesztés / Alap FreeRoam?!
« Dátum: 2013. Március 01. - 20:21:06 »
Sziasztok.
Ez a legelsõ modom gondoltam publikálom nyugodtan használjátok fel nekem már csak porosodik a gépemen.
Parancsokat meg találjátok a Modban vagy ha elinditjátok a servert akkor /help ...
Valamiért nem rakja fel a Codeba rendesen néhol ki marad egy TAB.
De innen le tölthetitek rendesen. http://www.solidfiles.com/d/d19e1e4eb3/
Az egész szerver mappát fel töltöttem.  :)
 

////////////////////////////////////////////////////////////////////////////////
//                                                                            //
//                              FreeRoam Mode by: Lockett                     //
//                                                                            //
////////////////////////////////////////////////////////////////////////////////
#include            <    a_samp      >
#include            <   fixchars   >
#include             <   sscanf2      >
#include             <    zcmd      >
#include            <   streamer   >
#include             <    foreach   >
#include             <   YSI\\y_ini   >
 
#include \"../include/gl_common.inc\"
#define radiodialog 1
#define skincseredialog 2
///////////////////////////Drog azonosítók//////////////////////////////////////
#define DROG_NINCS  3
#define DROG_VAN    4
#define DROGY       5
#define DROGN       6
#define DIALOG_FIGHT 7
//////////////////////////////////Checkpoint////////////////////////////////////
new DROGCP, DROGFEL;
////////////////////////////////////***/////////////////////////////////////////
new playing[MAX_PLAYERS]; //Rádió
forward CarRespawn(); // Kocsi Respawn
///////////////////////////////////Színek///////////////////////////////////////
 
#define COLOR_PINK             0xFF66FFAA
#define COLOR_RED             0xFF0000AA
#define COLOR_LIGHTBLUE       0x33CCFFAA
#define COLOR_LIME             0x99FF00AA
#define COLOR_YELLOW          0xFFFF00AA
#define COLOR_WHITE          0xFFFFFFAA
#define COLOR_ORANGE          0xF97804FF
#define COLOR_BLUE             0x33AAFFFF
#define COLOR_GREEN            0x33AA33AA
 
////////////////////////////////////***/////////////////////////////////////////
main()
{
print(\"***********************************\");
print(\"*       Mode v0.1 by Lockett      *\");
print(\"***********************************\");
}
 
public OnGameModeInit()
{
UsePlayerPedAnims();
SetGameModeText(\"v0.1\");
AddPlayerClass(29,-343.6651,1542.7242,75.5625,177.6608,0,0,0,0,0,0);
    SetTimer(\"CarRespawn\", 900000, 1); // 60000 ( 1 min )
////////////////////////////////////Drog/////////////////////////////////////////
    DROGCP = CreateDynamicCP(-1104.8046,-1617.5413,76.3672, 2, -1, -1, -1, 200);
    DROGFEL = CreateDynamicCP(-1074.3137,-1625.3157,76.3672, 2, -1, -1, -1, 200);
///////////////////////////////Kocsik,Mappolás//////////////////////////////////
 
AddStaticVehicle(562,-317.9400,1514.8885,75.0201,0.1458,92,1);       // Elegy Kezdõ
      AddStaticVehicle(475,-330.3975,1514.9534,75.0181,0.2305,36,1);       // Sabre Kezdõ
AddStaticVehicle(411,-324.1790,1515.1188,75.0865,1.2593,92,92);    // Infernus Kezdõ
AddStaticVehicle(522,-348.4968,1519.7211,75.1317,177.3217,0,0);    // NRG Kezdõ
AddStaticVehicle(522,-348.7860,1515.2699,75.1158,356.0487,0,0);    // NRG Kezdõ
AddStaticVehicle(444,-351.0979,1543.7803,75.9338,176.3907,1,1);    // Monster Kezdõ
AddStaticVehicle(541,-314.3450,1541.5317,75.1874,178.6656,0,6);    // Bulett Kezdõ
AddStaticVehicle(562,-333.7443,1535.8164,75.2212,91.0050,86,86);    // Elegy Kezdõ
 
/////////////////////////////////Drog Map///////////////////////////////////////
CreateObject(669, -1075.00, -1618.91, 62.40,   0.00, 0.00, 90.00);
CreateObject(3409, -1068.46, -1626.39, 75.34,   356.86, 0.00, 3.14);
CreateObject(3409, -1068.57, -1631.15, 75.34,   356.86, 0.00, 3.14);
CreateObject(3409, -1068.58, -1621.78, 75.34,   356.86, 0.00, 3.14);
CreateObject(3261, -1052.38, -1622.98, 75.36,   356.86, 0.00, 3.14);
CreateObject(3261, -1074.75, -1625.73, 75.36,   0.00, 0.00, 0.00);
CreateObject(3374, -1099.49, -1621.09, 76.84,   0.00, 0.00, 0.00);
CreateObject(3374, -1099.43, -1625.28, 76.84,   0.00, 0.00, 0.00);
CreateObject(14782, -1117.38, -1615.31, 76.38,   0.00, 0.00, 0.00);
CreateObject(2314, -1099.39, -1614.80, 75.39,   0.00, 0.00, 0.00);
CreateObject(2314, -1102.53, -1614.80, 75.39,   0.00, 0.00, 0.00);
CreateObject(1575, -1101.17, -1614.65, 75.88,   0.00, 0.00, 0.00);
CreateObject(1318, -1096.79, -1615.36, 76.25,   0.00, 0.00, 0.00);
CreateObject(1318, -1077.11, -1624.52, 76.25,   0.00, 0.00, 0.00);
CreateObject(3261, -1074.75, -1628.73, 75.36,   0.00, 0.00, 0.00);
CreateObject(3261, -1074.75, -1631.75, 75.36,   0.00, 0.00, 0.00);
CreateObject(3261, -1074.75, -1634.75, 75.36,   0.00, 0.00, 0.00);
CreateObject(3261, -1074.73, -1622.68, 75.36,   0.00, 0.00, 0.00);
CreateObject(2314, -1105.67, -1614.80, 75.39,   0.00, 0.00, 0.00);
CreateObject(669, -1073.89, -1622.10, 62.40,   0.00, 0.00, 90.00);
CreateObject(669, -1074.11, -1623.08, 62.40,   0.00, 0.00, 90.00);
CreateObject(669, -1074.27, -1624.41, 62.40,   0.00, 0.00, 171.00);
CreateObject(7073, -327.24, 1547.26, 92.73,   0.00, 0.00, -88.00);
CreateObject(1262, -302.21, 1507.33, 76.34,   0.00, 0.00, 0.00);
CreateObject(1214, -302.27, 1507.18, 74.38,   0.00, 0.00, 0.00);
CreateObject(3249, -356.44, 1517.57, 74.58,   0.00, 0.00, 89.44);
CreateObject(7392, -348.03, 1514.25, 85.92,   0.00, 0.00, 0.00);
////////////////////////////////////***/////////////////////////////////////////
return 1;
}
public OnGameModeExit()
{
return 1;
}
////////////////////////////////Kocsi Respawn///////////////////////////////////
public CarRespawn()
{
    for ( new vid = 0; vid < MAX_VEHICLES; vid ++ )
    {
        if ( !IsVehicleOccupied ( vid ) )
        {
            SetVehicleToRespawn ( vid );
        }
    }
    SendClientMessageToAll(COLOR_GREEN,\"[sERVER] Minden használaton kívüli jármû helyre lett állítva\");
    return 1;
}
stock IsVehicleOccupied(vehicleid)
{
   for ( new i = 0; i < MAX_PLAYERS; i++ )
   {
      if ( IsPlayerInVehicle ( i, vehicleid ) ) return 1;
   }
   return 0;
}
////////////////////////////////////***/////////////////////////////////////////
public OnPlayerRequestClass(playerid, classid)
{
SetPlayerPos(playerid,0.4886,-239.3074,5.4297);
SetPlayerCameraPos(playerid,0.3394,-243.8046,5.4297);
SetPlayerCameraLookAt(playerid,0.4886,-239.3074,5.4297);
return 1;
}
public OnPlayerConnect(playerid)
{
SendClientMessage(playerid, COLOR_LIGHTBLUE, \"Üdvözlöm a Szerveren!\");
    SendClientMessage(playerid, COLOR_LIGHTBLUE, \"Segitségért Használd a /help Parancsot!\");
    SendClientMessage(playerid, COLOR_LIGHTBLUE, \"Jó Szórakozást!\");
    SendClientMessage(playerid, COLOR_ORANGE, \"Jármû Lekéréshez: /v [Jármû Név/ID] [szín 1] [szín 2]\");
    SendClientMessage(playerid, COLOR_ORANGE, \"Skin Cseréléshez Használd Ezt a Parancsot: /skincsere\");
SetPVarInt(playerid, \"Drog\", DROG_NINCS);
SetPVarInt(playerid, \"Felszed\", DROGN);
/////////////////////////////////////Remove/////////////////////////////////////
RemoveBuildingForPlayer(playerid, 16615, -389.7656, 1515.1641, 74.5547, 0.25);
RemoveBuildingForPlayer(playerid, 16137, -389.7656, 1515.1641, 74.5547, 0.25);
////////////////////////////////////***/////////////////////////////////////////
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
SetPVarInt(playerid, \"Drog\", DROG_NINCS);
SetPVarInt(playerid, \"Felszed\", DROGN);
return 1;
}
public OnPlayerSpawn(playerid)
{
return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
return 1;
}
/////////////////////////////////Kocsi Javitó///////////////////////////////////
 
public OnVehicleDamageStatusUpdate(vehicleid, playerid)
{
RepairVehicle(GetPlayerVehicleID(playerid));
return 1;
}
////////////////////////////////////***/////////////////////////////////////////
public OnVehicleSpawn(vehicleid)
{
return 1;
}
public OnPlayerClickTextDraw(playerid, Text:clickedid)
{
return 0;
}
////////////////////////////////////***/////////////////////////////////////////
public OnPlayerClickPlayerTextDraw(playerid, PlayerText:playertextid)
{
return 0;
}
public OnVehicleDeath(vehicleid, killerid)
{
return 1;
}
public OnPlayerText(playerid, text[])
{
return 1;
}
public OnPlayerCommandPerformed(playerid, cmdtext[], success)
{
if(!success)
        {
          new strin[128];
            format(strin, sizeof(strin), \"[HIBA]Nincs Ilyen Parancs\", cmdtext);
           SendClientMessage(playerid,COLOR_RED, strin);
       }
        return 1;
    }
public OnPlayerCommandText(playerid, cmdtext[])
{
return 0;
}
public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
SendClientMessage(playerid, COLOR_BLUE, \"Tuning: /tune\");
SendClientMessage(playerid, COLOR_BLUE, \"Rádió: /radio\");
return 1;
}
public OnPlayerExitVehicle(playerid, vehicleid)
{
RemoveVehicleComponent(vehicleid, 1010);
return 1;
}
public OnPlayerStateChange(playerid, newstate, oldstate)
{
return 1;
}
public OnPlayerEnterCheckpoint(playerid)
{
return 1;
}
public OnPlayerLeaveCheckpoint(playerid)
{
return 1;
}
public OnPlayerEnterRaceCheckpoint(playerid)
{
return 1;
}
public OnPlayerLeaveRaceCheckpoint(playerid)
{
return 1;
}
public OnRconCommand(cmd[])
{
return 1;
}
public OnPlayerRequestSpawn(playerid)
{
return 1;
}
public OnObjectMoved(objectid)
{
return 1;
}
public OnPlayerObjectMoved(playerid, objectid)
{
return 1;
}
public OnPlayerPickUpPickup(playerid, pickupid)
{
return 1;
}
public OnVehicleMod(playerid, vehicleid, componentid)
{
return 1;
}
public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
return 1;
}
public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
return 1;
}
////////////////////////////////Jármû Lekérõ////////////////////////////////////
new Float: fPos[ 4 ];
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\"
};
 
stock GetVehicleModelIDFromName( vname[] )
{
for( new i = 0; i < sizeof( VehicleNames ); i++ )
{
if ( strfind( VehicleNames[ i ], vname, true) != -1 )
{
    return i + 400;
}
}
return -1;
}
stock IsNumeric( string22[] )
{
for( new i = 0, j = strlen( string22 ); i < j; i++)
{
    if( string22[ i ] > \'9\' || string22[ i ] < \'0\')
    return 0;
}
return 1;
}
CMD:v( playerid, params[] )
{
new
szCarName[ 64 + 1 ],
szCarSpawn[ 70 + 1 ],
iCarID,
iCarColor[ 2 ],
iNowVeh;
 
if( sscanf( params, \"s[64]D(127)D(127)\", szCarName, iCarColor[ 0 ], iCarColor[ 1 ] ) )
return SendClientMessage( playerid, COLOR_BLUE, \"Használat: /v [Jármû Név/ID] [szín 1] [szín 2] )\" );
if( !IsNumeric( szCarName ) )
{
iCarID = GetVehicleModelIDFromName( szCarName );
}
else
{
iCarID = strval( szCarName );
}
if( iCarID < 400 || iCarID > 611 ) return SendClientMessage( playerid, COLOR_RED, \"[HIBA] Hibás jármû ID, vagy név.\" );
if( iCarColor[ 0 ] < 0 || iCarColor[ 0 ] > 256 ) return SendClientMessage( playerid, COLOR_RED, \"[HIBA] Érvénytelen jármû szín ID. ( 1 - 255 )\" );
    if( iCarColor[ 1 ] < 0 || iCarColor[ 1 ] > 256 ) return SendClientMessage( playerid, COLOR_RED, \"[HIBA] Érvénytelen jármû szín ID. ( 1 - 255 )\" );
    if( iCarColor[ 0 ] == 127 ) iCarColor[ 0 ] = random( 126 );
if( iCarColor[ 1 ] == 127 ) iCarColor[ 1 ] = random( 126 );
if( GetPVarInt( playerid, \"SpawnedVehicle\" ) != INVALID_VEHICLE_ID )
{
       DestroyVehicle( GetPVarInt( playerid, \"SpawnedVehicle\" ) );
    }
GetPlayerPos( playerid, fPos[ 0 ], fPos[ 1 ], fPos[ 2 ] );
GetPlayerFacingAngle( playerid, fPos[ 3 ] );
iNowVeh = CreateVehicle( iCarID, fPos[ 0 ], fPos[ 1 ], fPos[ 2 ], fPos[ 3 ], iCarColor[ 0 ], iCarColor[ 1 ], -1 );
SetPVarInt( playerid, \"SpawnedVehicle\", iNowVeh );
LinkVehicleToInterior( iNowVeh, GetPlayerInterior( playerid ) );
SetVehicleVirtualWorld( iNowVeh, GetPlayerVirtualWorld( playerid ) );
    PutPlayerInVehicle( playerid, iNowVeh, 0 );
format( szCarSpawn, sizeof( szCarSpawn ), \"~w~Jármû lerakva! Név: ~r~~h~%s~w~, Model ID: ~r~~h~%d~w~.\", VehicleNames[ iCarID - 400 ], iCarID );
    return 1;
}
///////////////////////////////////***///////////////////////////////////////////
public OnPlayerSelectedMenuRow(playerid, row)
{
return 1;
}
public OnPlayerExitedMenu(playerid)
{
return 1;
}
public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
return 1;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
    if(GetPlayerState(playerid) != PLAYER_STATE_DRIVER || !CheckNitro(GetPlayerVehicleID(playerid))) return false; else   if ((((newkeys & (4)) == (4)) && ((oldkeys & (4)) != (4)))) AddVehicleComponent(GetPlayerVehicleID(playerid), 1010); else if ((((newkeys & (4)) != (4)) && ((oldkeys & (4)) == (4)))) RemoveVehicleComponent(GetPlayerVehicleID(playerid), 1010);
return 1;
}
CheckNitro(vid)
{
    new NoNitro[] = { 522,481,441,468,448,446,513,521,510,430,520,476,463 }; // unknown
for(new e = 0; e < sizeof(NoNitro); e++) if(GetVehicleModel(vid) == NoNitro[e]) return false;
return true;
}
public OnRconLoginAttempt(ip[], password[], success)
{
return 1;
}
public OnPlayerUpdate(playerid)
{
return 1;
}
public OnPlayerStreamIn(playerid, forplayerid)
{
return 1;
}
public OnPlayerStreamOut(playerid, forplayerid)
{
return 1;
}
public OnVehicleStreamIn(vehicleid, forplayerid)
{
return 1;
}
public OnVehicleStreamOut(vehicleid, forplayerid)
{
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
////////////////////////////////////Harc Style//////////////////////////////////
    if(dialogid == DIALOG_FIGHT)
    {
        if(response)
        {
                      if(listitem == 0)
                        {
                             SetPlayerFightingStyle(playerid, FIGHT_STYLE_NORMAL);
                                SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Harc Styles Beállítva erre: Normal\");
                        }
                        if(listitem == 1)
                        {
                                SetPlayerFightingStyle(playerid, FIGHT_STYLE_BOXING);
                                SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Harc Styles Beállítva erre: Boxing\");
                        }
                        if(listitem == 2)
                        {
                                SetPlayerFightingStyle(playerid, FIGHT_STYLE_KNEEHEAD);
                                SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Harc Styles Beállítva erre: KneeHead\");
                        }
                        if(listitem == 4)
                        {
                                SetPlayerFightingStyle(playerid, FIGHT_STYLE_GRABKICK);
                                SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Harc Styles Beállítva erre: GrabKick\");
                        }
                        if(listitem == 5)
                        {
                                SetPlayerFightingStyle(playerid,  FIGHT_STYLE_ELBOW);
                                SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Harc Styles Beállítva erre: Normal Elbow\");
                        }
        }
        return 1;
    }
////////////////////////////////////Rádió///////////////////////////////////////
if(dialogid == radiodialog)
{
if(listitem == 0)
   {
            if(playing[playerid] == 1)
            {
         playing[playerid] = 0;
             SendClientMessage(playerid, COLOR_RED, \"[server] Rádió Leállitva\");
         StopAudioStreamForPlayer(playerid);
            }
            else
         {
            }
   }
if(listitem == 1)
   {
            playing[playerid] = 1;
         SendClientMessage(playerid, COLOR_ORANGE, \"[server] Rádió Elinditva\");
                PlayAudioStreamForPlayer(playerid, \"http://blackbeats.fm/listen.m3u\");
   }
if(listitem == 2)
   {
            playing[playerid] = 1;
                  SendClientMessage(playerid, COLOR_ORANGE, \"[server] Rádió Elinditva\");
           PlayAudioStreamForPlayer(playerid, \"http://lazaradio.hu:8100/mulatos.mp3.m3u\");
   }
if(listitem == 3)
   {
            playing[playerid] = 1;
         SendClientMessage(playerid, COLOR_ORANGE, \"[server] Rádió Elinditva\");
           PlayAudioStreamForPlayer(playerid, \"http://stereofm.hu/inc/balaton_playlist.m3u\");
}
return 1;
}
///////////////////////////////Fegyver Lekérõ///////////////////////////////////
if(dialogid == 1987)
{
if(listitem == 0)
{
if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
GivePlayerWeapon(playerid,22,500);
GivePlayerMoney(playerid,0);
SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Colt tipusú fegyvert\");
}
    if(listitem == 1)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,23,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Silencedet \");
    }
    if(listitem == 2)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,25,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Shotgunt \");
    }
    if(listitem == 3)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,28,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Uzi-t\");
    }
    if(listitem == 4)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,29,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy MP5-öt \");
    }
    if(listitem == 5)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,30,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Ak47-et \");
    }
    if(listitem == 6)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,31,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy M4-et \");
    }
    if(listitem == 7)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,32,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy TEC 9-et\");
    }
    if(listitem == 8)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! ]\");
    GivePlayerWeapon(playerid,33,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Riflet\");
    }
    if(listitem == 9)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,34,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Snipert\");
    }
    if(listitem == 10)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,41,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Spray-t \");
    }
    if(listitem == 11)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed!\");
    GivePlayerWeapon(playerid,42,500);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy poroltót \");
    }
    if(listitem == 12)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! []\");
    GivePlayerWeapon(playerid,46,1);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy ejtõernyõt \");
    }
    if(listitem == 13)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,17,25);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Füst gáz-t\");
    }
    if(listitem == 14)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed! \");
    GivePlayerWeapon(playerid,8,1);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Katanát \");
    }
    if(listitem == 15)
    {
    if(GetPlayerMoney(playerid) < 0) return SendClientMessage(playerid, -1, \"Nincs elég pénzed!\");
    GivePlayerWeapon(playerid,18,75);
    GivePlayerMoney(playerid,0);
    SendClientMessage(playerid,COLOR_GREEN,\"[sERVER]Vettél egy Molotov koktélt \");
    }
return 1;
}
////////////////////////////////Skincsere///////////////////////////////////////
#pragma tabsize 0
if(dialogid == skincseredialog)
{
if(!response)
{
   SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nem történt skin változtatás!\");
   return 1;
   }
   if(strval(inputtext) >=0)
   {
    if(strval(inputtext) <=299)
    {
        SetPlayerSkin(playerid, strval(inputtext));
    } else
    {
       SendClientMessage(playerid, COLOR_RED, \"[HIBA]Ez a skin ID nem található válassz másikat!\");
    }
   } else
   {
      SendClientMessage(playerid, COLOR_RED, \"[HIBA]Ez a skin ID nem található válassz másikat!\");
   }
}
return 1;
}
/////////////////////////////////////////***////////////////////////////////////
public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
return 1;
}
////////////////////////////////Teleportok//////////////////////////////////////
CMD:lv(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),2326.9124,1395.6553,42.8203);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Las Venturas-ba\");
    SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,2326.9124,1395.6553,42.8203);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Las Venturas-ba\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,2326.9124,1395.6553,42.8203);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Las Venturas-ba\");
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:ls(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),2304.1643,-1642.7743,14.5374);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Los Santos-ba\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,2304.1643,-1642.7743,14.5374);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Los Santos-ba\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,2304.1643,-1642.7743,14.5374);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Los Santos-ba\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:sf(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),-1988.2336,178.8083,27.5391);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál San Fiero-ba\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,-1988.2336,178.8083,27.5391);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál San Fiero-ba\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,-1988.2336,178.8083,27.5391);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál San Fiero-ba\");
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:lvair(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),1315.9454,1303.0953,10.8203);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Las Venturas-i reptérre\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,1315.9454,1303.0953,10.8203);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Las Venturas-i reptérre\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,1315.9454,1303.0953,10.8203);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Las Venturas-i reptérre\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:lsair(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),1914.9293,-2251.8259,13.5469);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Los Santos-i reptérre\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,1914.9293,-2251.8259,13.5469);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Los Santos-i reptérre\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,1914.9293,-2251.8259,13.5469);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Los Santos-i reptérre\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:sfair(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),-1553.7771,-240.2939,14.1484);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a San Fiero-i reptérre\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,-1553.7771,-240.2939,14.1484);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a San Fiero-i reptérre\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,-1553.7771,-240.2939,14.1484);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a San Fiero-i reptérre\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:pa(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),2408.2493,90.8666,26.4740);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Palomino-ba\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,2408.2493,90.8666,26.4740);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Palomino-ba\");
SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,2408.2493,90.8666,26.4740);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Palomino-ba\");
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:fc(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),-197.1303,1212.2777,19.7422);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Fort Carson-ba\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,-197.1303,1212.2777,19.7422);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Fort Carson-ba\");
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,-197.1303,1212.2777,19.7422);
    SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Fort Carson-ba\");
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:bb(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),214.1872,-146.6117,1.5859);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Blueberry-be\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Blueberry-be\");
SetPlayerPos(playerid,214.1872,-146.6117,1.5859);
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,214.1872,-146.6117,1.5859);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál Blueberry-be\");
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
    }
CMD:kezdohely(playerid, params[]) {
    if(IsPlayerInAnyVehicle(playerid) == 1) {
    SetPlayerInterior(playerid, 0);
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER) {
    SetVehiclePos(GetPlayerVehicleID(playerid),-342.9536,1514.7717,75.3594);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Kezdõhely-re\");
SetVehicleZAngle(GetPlayerVehicleID(playerid), 50.8647);
    LinkVehicleToInterior(GetPlayerVehicleID(playerid), 0);
    } else {
    RemovePlayerFromVehicle(playerid);
    SetPlayerPos(playerid,-342.9536,1514.7717,75.3594);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Kezdõhely-re\");
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    }
    } else {
    SetPlayerPos(playerid,-342.9536,1514.7717,75.3594);
SendClientMessage(playerid, COLOR_GREEN, \"[sERVER] Elteleportáltál a Kezdõhely-re\");
    SetPlayerFacingAngle(playerid, 50.8647);
    SetCameraBehindPlayer(playerid);
    SetPlayerInterior(playerid, 0);
    }
    return 1;
}
 
///////////////////////////////Dialog [HELP..]//////////////////////////////////
 
CMD:help(playerid, params[])
{
    ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, \"Segitseg\", \"\\n /teleport - Teleportok\\n /parancs [2] - Parancsok\\n\", \"Rendben\", \"\");
    return 1;
}
CMD:teleport(playerid, params[])
{
    ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, \"Teleportok\", \"/lv /ls /sf /sfair\\n /lsair /pa /bb\\n /lvair /fc /kezdohely \", \"Rendben\", \"\");
    return 1;
}
CMD:parancs(playerid, params[])
{
    ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, \"Parancsok\", \"/radio /skincsere /fegyver\\n/fight /tune /drogtelep\\n/v [Jármû Név/ID] [szín 1] [szín 2]\", \"Rendben\", \"\");
    return 1;
}
CMD:parancs2(playerid, params[])
{
    ShowPlayerDialog(playerid, 1, DIALOG_STYLE_MSGBOX, \"Parancsok\", \"Még Nincs Kész!\", \"Rendben\", \"\");
    return 1;
}
 
//////////////////////////////CMD Parancsok/////////////////////////////////////
CMD:skincsere(playerid, params[])
{
   ShowPlayerDialog(playerid, skincseredialog, DIALOG_STYLE_INPUT, \"Skin Valto\", \"Ird be a skin ID-t\", \"Valaszt\", \"Kilep\");
    return 1;
}
CMD:fegyver(playerid, params[])
{
   ShowPlayerDialog(playerid,1987,DIALOG_STYLE_LIST,\"Fegyverek\",\"Colt\\nSilenced\\nShotgun\\nUzi\\nMP5\\nAK47\\nM4\\nTec 9\\nRifle\\nMesterlövész\\nSray\\nPorolto\\nEjtõernyõ\\nFüst gáz\\nKatana\\nMolotov koktél\",\"Megvesz\",\"Kilépés\");
    return 1;
}
CMD:radio(playerid, params[])
{
   ShowPlayerDialog(playerid, radiodialog, DIALOG_STYLE_LIST, \"Rádió\", \"Kikapcsolás\\nLockett FM\\nCigány Rádió\\nRise FM\", \"Valaszt\", \"Kilep\");
   return 1;
}
CMD:fight(playerid, params[])
{
   ShowPlayerDialog(playerid, DIALOG_FIGHT, DIALOG_STYLE_LIST, \"Harc Styles\", \"Normal\\nBoxing\\nKneeHead\\nGrabKick\\nElbow\", \"Kiválaszt\", \"Mégse\");
   return 1;
}
/////////////////////////////////////Drog Parancsok/////////////////////////////
CMD:drogtelep(playerid, params[])
    {
        if(IsPlayerInAnyVehicle(playerid))
        {
          new tmpcar = GetPlayerVehicleID(playerid);
          SetVehiclePos(tmpcar, -1085.9890,-1630.2303,76.3672);
          LinkVehicleToInterior(tmpcar, 0);
          SetPlayerVirtualWorld(playerid, 0);
        }
        else
        {
          SetPlayerPos(playerid, -1085.9890,-1630.2303,76.3672);
        }
        return 1;
    }
CMD:felszed(playerid, params[])
    {
   if(GetPVarInt(playerid, \"Drog\") == DROG_NINCS)
       {
           if(IsPlayerInDynamicCP(playerid, DROGFEL))
           {
      SetPVarInt(playerid, \"Felszed\", DROGY);
      SendClientMessage(playerid, COLOR_GREEN, \"[sERVER]Felszedted a Canabist! Menj a Következõ Checkpointhoz!\");
           }
           else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nem Vagy a Felszedõ Checkpointban!\");
       }
       else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Van már Canabisod!\");
       return 1;
    }
 
CMD:drogcsinal(playerid, params[])
    {
  if(GetPVarInt(playerid, \"Drog\") == DROG_NINCS)
          {
              if(GetPVarInt(playerid, \"Felszed\") == DROGY)
              {
                if(!IsPlayerInDynamicCP(playerid, DROGCP)) return SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nem Vagy a Checkpointba!\");
      SetPVarInt(playerid, \"Drog\", DROG_VAN);
                TogglePlayerControllable(playerid, 0);
                SetTimerEx(\"drogcsin\",4000,0,\"i\",playerid);
                SetTimerEx(\"drogido\",300000,0,\"i\",playerid);
      SendClientMessage(playerid, COLOR_PINK, \"[sERVER]Drogot Készítesz.....\");
              }
              else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nem Szedtél Fel Canabist!\");
          }
          else SendClientMessage(playerid, COLOR_PINK, \"[sERVER]Ne Legyél Drogfüggõ, Pár Perc Múlva Újra Csinálhatsz!\");
          return 1;
    }
CMD:besziv(playerid, params[])
    {
   if(GetPVarInt(playerid, \"Drog\") ==  DROG_VAN)
            {
      SetPlayerDrunkLevel(playerid, 50000);
      SetPlayerWeather(playerid, 203);
      SetPVarInt(playerid, \"Drog\", DROG_NINCS);
               SetTimerEx(\"bead\",60000,0,\"i\",playerid);
      SendClientMessage(playerid, COLOR_PINK, \"[sERVER]Most Aztán Szépen Reccsen Vagy! *.*\");
            }
            else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nincs Drogod!\");
            return 1;
    }
CMD:drogelad(playerid, params[])
    {
        if(GetPVarInt(playerid, \"Drog\") ==  DROG_VAN)
        {
 
              new
                       string[128],
                       name[MAX_PLAYER_NAME],
                       name2[MAX_PLAYER_NAME],
                       PID;
              if(sscanf(params, \"u\", PID)) return SendClientMessage(playerid, COLOR_BLUE, \"Használat: /drogelad <ID/Játékos név>\");
              if(PID == INVALID_PLAYER_ID) return SendClientMessage(playerid, COLOR_RED, \"[HIBA]Rossz ID/Név!\");
  GetPlayerName(playerid, name, MAX_PLAYER_NAME);
  GetPlayerName(PID, name2, MAX_PLAYER_NAME);
          format(string, sizeof(string), \"%s[sERVER] Elakar adni neked drogot $50000-ért, ha megakarod venni, akkor /megvesz <ID>\", name);
          SendClientMessage(PID, COLOR_GREEN, string);
          format(string, sizeof(string), \"[sERVER] Elakarsz adni %s-nak/nek drogot!\", name2);
          SendClientMessage(playerid, COLOR_GREEN, string);
        }
        else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nincsen drogod!\");
        return 1;
    }
CMD:drogmegvesz(playerid, params[])
    {
        if(GetPVarInt(playerid, \"Drog\") ==  DROG_NINCS)
        {
              new
                       string[128],
                       name[MAX_PLAYER_NAME],
                       name2[MAX_PLAYER_NAME],
                       PID;
              if(sscanf(params, \"u\", PID)) return SendClientMessage(playerid, COLOR_BLUE, \"Használat: /drogmegvesz <ID/Játékos név>\");
              if(PID == INVALID_PLAYER_ID) return SendClientMessage(playerid, COLOR_RED, \"[HIBA]Rossz ID/Név!\");
              if(GetPVarInt(PID, \"Drog\") == DROG_NINCS) return SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nincs drog az illetõnél!\");
              SetPVarInt(playerid, \"Drog\", DROG_VAN);
              SetPVarInt(PID, \"Drog\", DROG_NINCS);
              GivePlayerMoney(playerid, -50000);
              GivePlayerMoney(PID, 50000);
 
              GetPlayerName(playerid,name, MAX_PLAYER_NAME);
              format(string, sizeof(string), \"[sERVER]%s Megvette tõled a drogot!\", name);
              SendClientMessage(PID, COLOR_GREEN, string);
              GetPlayerName(PID, name2, MAX_PLAYER_NAME);
              format(string, sizeof(string), \"[sERVER]%s-tõl/tól Megvetted a drogot!\", name2);
              SendClientMessage(playerid, COLOR_GREEN, string);
        }
        else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Van már drogot!\");
        return 1;
    }
 
public OnPlayerEnterDynamicCP(playerid, checkpointid)
    {
        if(checkpointid == DROGCP) return SendClientMessage(playerid, COLOR_BLUE, \"[sERVER]Ha Drogot Szeretnél Csinálni, Akkor /drogcsinal!\");
        if(checkpointid == DROGFEL) return SendClientMessage(playerid, COLOR_BLUE, \"[sERVER]Ha Felszeretnéd Szedni a Canabist, akkor /felszed \");
        return 1;
    }
 
////////////////// Drog timerekhez kapcsolódó eljárások/////////////////////////
    forward bead(playerid);
    public bead(playerid)
    {
            SetPlayerDrunkLevel(playerid, 0);
          SetPlayerWeather(playerid, 2);
            SendClientMessage(playerid, COLOR_GREEN, \"[sERVER]Már nem vagy beszívva, aztán óvatosan a füvezéssel!\");
        return 1;
    }
    forward drogido(playerid);
    public drogido(playerid)
    {
            SetPVarInt(playerid, \"Drog\", DROG_NINCS);
            SendClientMessage(playerid, COLOR_GREEN, \"[sERVER]Ember, mostmár újra csinálhatsz drogot.\");
        return 1;
    }
    forward drogcsin(playerid);
    public drogcsin(playerid)
    {
        SetPVarInt(playerid, \"Drog\", DROG_VAN);
        TogglePlayerControllable(playerid, 1);
        SendClientMessage(playerid, COLOR_GREEN, \"[sERVER]Csináltál Drogot! Ha eladni akarod, akkor /drogelad, ha elszívni, akkor /besziv!\");
        return 1;
    }
///////////////////////////////////////***//////////////////////////////////////
 

28
Szeretnék csinálni egy zombi szerót..Van egy alap TDM szeróm amiben két csapat van... Na és abban szeretném kérni a segítségeteket hogy hogy tudnám megcsinálni hogy ha egy zombi megöl egy embert akkor az ember átkerüljön a zombi csapatba és amikor már mindenki átkerült a zombi csapatba ujra indulna a menet..
 
#include <a_samp>
#include <zcmd>
#include <streamer>
#define COLOR_RED 0xAA3333AA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_ORANGE 0xFF9900AA
#define COLOR_BLUE 0x0000FFAA
forward afk(playerid);
new afkTimer[MAX_PLAYERS];
new afkk[MAX_PLAYERS];
new Float:X[MAX_PLAYERS], Float:Y[MAX_PLAYERS], Float:Z[MAX_PLAYERS];
new gTeam[MAX_PLAYERS];
#define TEAM_MAFFIA    0   // Maffia
#define TEAM_ARMY   1     // Katona
public OnFilterScriptInit()
{
print(\"-------------------------------------\");
print(\"|    Special Team DeathMatch v1.0   |\");
print(\"|           By: Lockett             |\");
print(\"|      Betöltés Folyamatban..       |\");
print(\"-------------------------------------\");
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
 
main()
{
print(\"-------------------------------------\");
print(\"|    Special Team DeathMatch v1.0   |\");
print(\"|           By: Lockett             |\");
print(\"|      Betöltés Folyamatban..       |\");
print(\"-------------------------------------\");
}
 
public OnGameModeInit()
{
SetWorldTime(20);
UsePlayerPedAnims();
SetTeamCount(2);
ShowNameTags(0);
ShowPlayerMarkers(0);
SetGameModeText(\"TeamDeathMatch\");
AddPlayerClass(125,1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0); // Maffia
    AddPlayerClass(287,1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0); // Katona
//Map
CreateObject(16287, 43.67, 2486.58, 15.48,   0.00, 0.00, -90.00);
CreateObject(16138, 59.90, 2505.17, 15.48,   0.00, 0.00, 0.00);
CreateObject(12943, 75.44, 2504.63, 15.48,   0.00, 0.00, 90.00);
CreateObject(11458, 45.44, 2494.78, 15.66,   0.00, 0.00, -90.00);
CreateObject(11446, 49.68, 2518.56, 15.67,   0.00, 0.00, 0.00);
CreateObject(11445, 73.56, 2521.90, 15.66,   0.00, 0.00, -90.00);
CreateObject(11443, 93.98, 2487.81, 15.66,   0.00, 0.00, -180.00);
CreateObject(8397, 102.93, 2504.15, 25.99,   0.00, 0.00, -90.00);
CreateObject(5706, 25.50, 2513.42, 21.20,   0.00, 0.00, 0.00);
CreateObject(3887, 130.56, 2518.93, 23.61,   0.00, 0.00, -270.00);
CreateObject(3866, -1.20, 2490.73, 22.75,   0.00, 0.00, -90.00);
CreateObject(17045, 115.41, 2481.39, 17.26,   0.00, 0.00, -90.00);
CreateObject(11502, 120.09, 2490.26, 15.49,   0.00, 0.00, -90.00);
CreateObject(11433, 133.04, 2498.11, 17.55,   0.00, 0.00, -90.00);
CreateObject(17038, 144.26, 2493.27, 15.52,   0.00, 0.00, 0.00);
CreateObject(13060, 206.90, 2510.56, 18.56,   0.00, 0.00, 0.00);
CreateObject(18266, -14.03, 2515.65, 20.08,   0.00, 0.00, -90.00);
CreateObject(18261, -54.00, 2496.70, 16.20,   0.00, 0.00, 0.00);
CreateObject(16396, 251.89, 2483.62, 15.48,   0.00, 0.00, 90.00);
CreateObject(16011, 262.74, 2519.46, 16.16,   0.00, 0.00, 0.00);
CreateObject(13131, 288.47, 2499.76, 15.38,   0.00, 0.00, -90.00);
CreateObject(13008, 343.28, 2496.85, 20.16,   0.00, 0.00, -180.00);
CreateObject(3279, -41.10, 2513.69, 15.56,   0.00, 0.00, -90.00);
CreateObject(3279, 98.91, 2515.54, 15.56,   0.00, 0.00, 0.00);
CreateObject(12912, 309.70, 2504.21, 26.98,   0.00, 0.00, 0.00);
CreateObject(16641, 353.83, 2484.86, 17.24,   0.00, 0.00, 0.00);
CreateObject(1459, 98.99, 2506.23, 16.10,   0.00, 0.00, -78.75);
CreateObject(1459, 98.74, 2502.41, 16.10,   0.00, 0.00, -101.25);
CreateObject(1459, 100.81, 2504.35, 16.10,   0.00, 0.00, -90.00);
CreateObject(6968, 363.13, 2530.88, 16.97,   0.00, 0.00, -180.00);
CreateObject(4724, 340.41, 2516.35, 17.65,   0.00, 0.00, -180.00);
CreateObject(8147, 320.72, 2477.32, 18.59,   0.00, 0.00, -270.00);
CreateObject(8147, 179.36, 2477.30, 18.61,   0.00, 0.00, 90.00);
CreateObject(8147, 38.01, 2477.31, 18.58,   0.00, 0.00, 90.00);
CreateObject(8147, 8.09, 2477.31, 18.58,   0.00, 0.00, 90.00);
CreateObject(8147, -63.17, 2494.71, 18.58,   0.00, 0.00, 0.00);
CreateObject(8147, 8.23, 2527.83, 18.59,   0.00, 0.00, -90.00);
CreateObject(8147, 149.62, 2528.28, 18.90,   0.00, 0.00, -90.00);
CreateObject(8147, 291.02, 2528.29, 18.87,   0.00, 0.00, -90.00);
CreateObject(8147, 342.09, 2528.14, 18.74,   0.00, 0.00, -90.00);
CreateObject(8147, 412.13, 2490.34, 18.58,   0.00, 0.00, -180.00);
CreateObject(8147, 344.69, 2477.31, 18.58,   0.00, 0.00, 90.00);
CreateObject(3594, 362.90, 2491.43, 16.12,   0.00, 0.00, -33.75);
CreateObject(12957, 294.84, 2519.79, 16.64,   0.00, 0.00, -45.00);
CreateObject(1441, 270.10, 2498.23, 16.14,   0.00, 0.00, -101.25);
CreateObject(1358, 262.83, 2492.94, 16.69,   0.00, 0.00, -90.00);
CreateObject(1349, 223.88, 2509.51, 16.06,   0.00, 0.00, -101.25);
CreateObject(1299, 207.28, 2484.29, 15.94,   0.00, 0.00, 0.00);
CreateObject(939, 196.94, 2488.67, 17.93,   0.00, 0.00, -112.50);
CreateObject(939, 206.22, 2490.59, 17.93,   0.00, 0.00, -45.00);
CreateObject(942, 188.42, 2484.52, 17.93,   0.00, 0.00, 0.00);
CreateObject(923, 184.33, 2526.74, 16.67,   0.00, 0.00, -78.75);
CreateObject(922, 157.14, 2514.35, 16.48,   0.00, 0.00, -101.25);
CreateObject(851, 101.92, 2501.75, 15.80,   0.00, 0.00, -146.25);
CreateObject(925, 92.63, 2517.14, 16.55,   0.00, 0.00, -180.00);
CreateObject(944, 87.80, 2518.13, 16.37,   0.00, 0.00, -22.50);
CreateObject(1685, 31.86, 2499.57, 16.23,   0.00, 0.00, 0.00);
CreateObject(1685, 32.08, 2497.43, 16.23,   0.00, 0.00, -33.75);
CreateObject(1685, 30.95, 2492.92, 16.23,   0.00, 0.00, 22.50);
CreateObject(1271, 30.84, 2492.98, 17.33,   0.00, 0.00, 0.00);
CreateObject(2567, 15.09, 2500.32, 17.44,   0.00, 0.00, -101.25);
CreateObject(2567, 23.02, 2483.44, 17.41,   0.00, 0.00, -56.25);
CreateObject(2669, 6.35, 2479.43, 16.83,   0.00, 0.00, -90.00);
CreateObject(3565, -0.16, 2488.57, 16.83,   0.00, 0.00, -112.50);
CreateObject(2567, -25.41, 2505.03, 17.41,   0.00, 0.00, -90.00);
CreateObject(3575, -54.94, 2517.07, 18.18,   0.00, 0.00, -180.00);
CreateObject(3575, 362.84, 2518.07, 18.31,   0.00, 0.00, 90.00);
CreateObject(3571, 385.31, 2522.53, 16.85,   0.00, 0.00, -101.25);
CreateObject(5262, 377.55, 2497.43, 18.44,   0.00, 0.00, -45.00);
CreateObject(3761, 390.55, 2502.83, 17.48,   0.00, 0.00, 22.50);
CreateObject(12913, 398.58, 2522.90, 18.11,   0.00, 0.00, 0.00);
CreateObject(12913, 407.39, 2522.75, 18.11,   0.00, 0.00, 0.00);
CreateObject(13489, 397.97, 2513.13, 18.10,   0.00, 0.00, 0.00);
CreateObject(13489, 407.48, 2512.66, 18.10,   0.00, 0.00, 0.00);
CreateObject(18257, 392.41, 2493.29, 15.48,   0.00, 0.00, 67.50);
CreateObject(18260, 376.24, 2484.57, 17.06,   0.00, 0.00, 0.00);
CreateObject(925, 386.63, 2501.66, 16.55,   0.00, 0.00, -101.25);
CreateObject(931, 397.46, 2502.84, 16.55,   0.00, 0.00, -33.75);
CreateObject(2567, 409.07, 2502.36, 17.41,   0.00, 0.00, 11.25);
CreateObject(2567, 402.70, 2493.00, 17.41,   0.00, 0.00, -22.50);
CreateObject(1365, 399.20, 2483.00, 16.63,   0.00, 0.00, -180.00);
CreateObject(1358, 405.35, 2480.63, 16.69,   0.00, 0.00, 0.00);
CreateObject(2567, 272.30, 2498.65, 17.41,   0.00, 0.00, -101.25);
CreateObject(2669, 262.64, 2481.77, 16.83,   0.00, 0.00, -180.00);
CreateObject(11428, 170.62, 2492.03, 18.13,   0.00, 0.00, 0.00);
CreateObject(9244, 225.54, 2486.51, 20.74,   0.00, 0.00, 180.00);
CreateObject(2567, 80.91, 2494.59, 18.04,   0.00, 0.00, 90.00);
CreateObject(16374, 151.01, 2492.54, 16.65,   0.00, 0.00, 0.00);
CreateObject(16374, 257.61, 2546.03, 18.85,   0.00, 0.00, 0.00);
return 1;
}
public OnGameModeExit()
{
return 1;
}
public OnPlayerRequestClass(playerid, classid)
{
switch(classid)
{
case 0:
{
gTeam[playerid] = TEAM_MAFFIA;                          // Maffia //////////
GameTextForPlayer(playerid,\"~r~~h~Maffia\",2500,6);
SetPlayerPos(playerid,0.4886,-239.3074,5.4297);
SetPlayerCameraPos(playerid,0.3394,-243.8046,5.4297);
SetPlayerCameraLookAt(playerid,0.4886,-239.3074,5.4297);
SetPlayerInterior(playerid,0);
SetPlayerFacingAngle(playerid,166.6908);
}
case 1:
{
SetPlayerInterior(playerid,6);
gTeam[playerid] = TEAM_ARMY;                            // Katona //////////
GameTextForPlayer(playerid,\"~b~~h~Katona\",2500,6);
SetPlayerPos(playerid,246.5480,84.6529,1003.6406);
SetPlayerCameraPos(playerid,246.5294,82.2114,1003.6406);
SetPlayerCameraLookAt(playerid,246.5480,84.6529,1003.6406);
SetPlayerFacingAngle(playerid,180.9055);
}
}
return 1;
}
public OnPlayerConnect(playerid)
{
SendClientMessage(playerid, 0xFF9900AA, \"AFK-hoz írd be: /afk\");
SendClientMessage(playerid, 0xFF9900AA, \"Team Chat Használatához Használd Ezt a Parancsot: ! [szöveg]\");
afkk[playerid] = 0;
SendDeathMessage(INVALID_PLAYER_ID, playerid, 200);
new string[64], pName[MAX_PLAYER_NAME];
    GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
    format(string,sizeof string,\"%s Csatlakozott a Szerverhez.\",pName);
SendClientMessageToAll(0x33AA33AA,string);
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
new
string[64],
name[MAX_PLAYER_NAME];
GetPlayerName(playerid,name,MAX_PLAYER_NAME);
    switch(reason)
    {
        case 0: format(string,sizeof string,\"%s Elhagyta a Szervert. (Idõtúllépés)\",name);
        case 1: format(string,sizeof string,\"%s Elhagyta a Szervert. (Lelépett)\",name);
        case 2: format(string,sizeof string,\"%s Elhagyta a Szervert. (Kicked/Banned)\",name);
    }
    SendClientMessageToAll(0x33AA33AA,string);
    SendDeathMessage(INVALID_PLAYER_ID, playerid, 201);
afkk[playerid] = 0;
return 1;
}
public OnPlayerSpawn(playerid)
{
GetPlayerPos(playerid, X[playerid], Y[playerid], Z[playerid]); // AFK //////
afkTimer[playerid] = SetTimerEx(\"afk\", 1000*5*60, 1, \"i\", playerid);
if(gTeam[playerid] == TEAM_MAFFIA)
    {
        SetPlayerColor(playerid,COLOR_RED);
        GivePlayerWeapon(playerid,24,1000); // Fegyver /////////////////////////
        GivePlayerWeapon(playerid,30,1000);
        GivePlayerWeapon(playerid,34,1000);
        GivePlayerWeapon(playerid,16,2);
SetPlayerArmour(playerid,100);
SetPlayerPos(playerid, 392.8958,2485.8606,16.4844); // Spawnolás ///////
    }
    else if(gTeam[playerid] == TEAM_ARMY)
    {
        SetPlayerColor(playerid,COLOR_BLUE);
        GivePlayerWeapon(playerid,24,1000); // Fegyver /////////////////////////
        GivePlayerWeapon(playerid,31,1000);
        GivePlayerWeapon(playerid,34,1000);
        GivePlayerWeapon(playerid,16,2);
SetPlayerArmour(playerid,100);
SetPlayerPos(playerid, -39.7534,2523.7778,16.4844); // Spawnolás ///////
}
return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
return 1;
}
public OnVehicleSpawn(vehicleid)
{
return 1;
}
public OnVehicleDeath(vehicleid, killerid)
{
return 1;
}
public OnPlayerText(playerid, text[])
{
if(text[0] == \'!\')
        {
        new str[200];
        new pName[MAX_PLAYER_NAME];
        GetPlayerName(playerid,pName,sizeof(pName));
   format(str, sizeof(str),\"[TeamChat] %s: %s\", pName, text[1]);
         for(new i = 0; i < MAX_PLAYERS; i++)
        {
              if(IsPlayerConnected(i))
               {
                 if(gTeam[playerid]==gTeam)  SendClientMessage(i, 0xFFFFFFAA, str);
                    }
      }
return 0;
}
return 1;
}
public OnPlayerGiveDamage(playerid, damagedid, Float: amount, weaponid)
{
   new Float: elet, Float: pancel;
   GetPlayerArmour(damagedid, pancel);
   GetPlayerHealth(damagedid, elet);
   if(pancel == 0) return SetPlayerHealth(damagedid, elet-amount);
   return 1;
}
public afk(playerid)
{
new Float:Xx, Float:Yy, Float:Zz;
GetPlayerPos(playerid, Xx, Yy, Zz);
if(X[playerid] == Xx && Y[playerid] == Yy && Z[playerid] == Zz)
{
    if(afkk[playerid] == 0)
    {
   new name[MAX_PLAYER_NAME];
   GetPlayerName(playerid, name, sizeof(name));
   new string[128];
   format(string, sizeof(string), \"%s Ki Lett Rúgva a Rendszer Által, Indok: /AFK nélküli AFK!\", name);
   SendClientMessageToAll(COLOR_RED, string);
}
}
return 1;
}
///////////////////////////// Parancsok ////////////////////////////////////////
CMD:afk(playerid, params[])
{
if(afkk[playerid] == 0)
{
    SendClientMessage(playerid, COLOR_GREEN, \"AFK módba léptél!\");
    SetPlayerVirtualWorld(playerid, 10);
TogglePlayerControllable(playerid, 0);
afkk[playerid] = 1;
}
else
{
    SendClientMessage(playerid, COLOR_GREEN, \"Kiléptél az AFK-ból!\");
    SetPlayerVirtualWorld(playerid, 0);
    TogglePlayerControllable(playerid, 1);
    afkk[playerid] = 0;
}
return 1;
}

 
Ez lenne a GM

29
Fórum Archívum (Témák/Fórumok) / Drog Rendszer
« Dátum: 2013. Február 25. - 20:09:40 »
Ezt az FS-t nem én írtam hanem Gabor..
Én csak módositottam. Gondoltam meg osztom veletek.
Parancsok:
 /drogtelep
 /felszed
 /besziv
 /drogelad
 /drogmegvesz
 

#include          <      a_samp      >
#include          <      zcmd      >
#include          <      sscanf2      >
#include          <      streamer   >
///////////////////////////Drog azonosítók//////////////////////////////////////
#define DROG_NINCS  0 // Ha már foglalt akkor lehet más szám is..
#define DROG_VAN    1
#define DROGY       2
#define DROGN       3
////////////////////////////////////***/////////////////////////////////////////
#define COLOR_PINK             0xFF66FFAA
#define COLOR_RED             0xFF0000AA
#define COLOR_BLUE             0x33AAFFFF
#define COLOR_GREEN            0x33AA33AA
//////////////////////////////////Checkpoint////////////////////////////////////
new DROGCP, DROGFEL;
////////////////////////////////////Drog/////////////////////////////////////////
public OnGameModeInit()// FilterScript esetén \' public OnFilterScriptInit()\'
    {
    print(\"****************************************\");
    print(\"*                                      *\");
print(\"*  Drog System betöltve By.: Gabor...  *\");
    print(\"*        Át alakitotta Lockett         *\");
    print(\"*                                      *\");
    print(\"****************************************\");
    DROGCP = CreateDynamicCP(-1104.8046,-1617.5413,76.3672, 2, -1, -1, -1, 200);
    DROGFEL = CreateDynamicCP(-1074.3137,-1625.3157,76.3672, 2, -1, -1, -1, 200);
/////////////////////////////////Drog Map///////////////////////////////////////
CreateObject(669, -1075.00195, -1618.90930, 62.40000,   0.00000, 0.00000, 90.00000);
CreateObject(3409, -1068.45557, -1626.38831, 75.33594,   356.85840, 0.00000, 3.14159);
CreateObject(3409, -1068.56604, -1631.14551, 75.33594,   356.85840, 0.00000, 3.14159);
CreateObject(3409, -1068.58411, -1621.77856, 75.33594,   356.85840, 0.00000, 3.14159);
CreateObject(3261, -1052.38281, -1622.97656, 75.35938,   356.85840, 0.00000, 3.14159);
CreateObject(3261, -1074.74756, -1625.72632, 75.35940,   0.00000, 0.00000, 0.00000);
CreateObject(3374, -1099.48889, -1621.09167, 76.83590,   0.00000, 0.00000, 0.00000);
CreateObject(3374, -1099.43372, -1625.27527, 76.83590,   0.00000, 0.00000, 0.00000);
CreateObject(14782, -1117.37634, -1615.31494, 76.37590,   0.00000, 0.00000, 0.00000);
CreateObject(2314, -1099.39075, -1614.79773, 75.38920,   0.00000, 0.00000, 0.00000);
CreateObject(2314, -1102.53235, -1614.79578, 75.38920,   0.00000, 0.00000, 0.00000);
CreateObject(1575, -1101.16760, -1614.65271, 75.88080,   0.00000, 0.00000, 0.00000);
CreateObject(1318, -1096.78503, -1615.35950, 76.24860,   0.00000, 0.00000, 0.00000);
CreateObject(1318, -1077.11206, -1624.51501, 76.24860,   0.00000, 0.00000, 0.00000);
CreateObject(3261, -1074.74756, -1628.72632, 75.35940,   0.00000, 0.00000, 0.00000);
CreateObject(3261, -1074.74756, -1631.74634, 75.35940,   0.00000, 0.00000, 0.00000);
CreateObject(3261, -1074.74756, -1634.74634, 75.35940,   0.00000, 0.00000, 0.00000);
CreateObject(3261, -1074.72986, -1622.68457, 75.35940,   0.00000, 0.00000, 0.00000);
CreateObject(2314, -1105.67224, -1614.79578, 75.38920,   0.00000, 0.00000, 0.00000);
CreateObject(669, -1073.88513, -1622.09583, 62.40000,   0.00000, 0.00000, 90.00000);
CreateObject(669, -1074.11243, -1623.08105, 62.40000,   0.00000, 0.00000, 90.00000);
CreateObject(669, -1074.27271, -1624.40735, 62.40000,   0.00000, 0.00000, 171.00000);
    return 1;
    }
public OnGameModeExit() // FilterScript esetén \' public OnFilterScriptExit()\'
    {
    print(\"****************************************\");
    print(\"*                                      *\");
print(\"*Drog System kikapcsolva By.: Gabor... *\");
    print(\"*        Át alakitotta Lockett         *\");
    print(\"*                                      *\");
    print(\"****************************************\");
    return 1;
    }
 
public OnPlayerConnect(playerid)
    {
         SetPVarInt(playerid, \"Drog\", DROG_NINCS);
         SetPVarInt(playerid, \"Felszed\", DROGN);
         return 1;
    }
public OnPlayerDisconnect(playerid, reason)
    {
         SetPVarInt(playerid, \"Drog\", DROG_NINCS);
         SetPVarInt(playerid, \"Felszed\", DROGN);
         return 1;
    }
#pragma tabsize 0
CMD:drogtelep(playerid, params[])
    {
        if(IsPlayerInAnyVehicle(playerid))
        {
          new tmpcar = GetPlayerVehicleID(playerid);
          SetVehiclePos(tmpcar, -1085.9890,-1630.2303,76.3672);
          LinkVehicleToInterior(tmpcar, 0);
          SetPlayerVirtualWorld(playerid, 0);
        }
        else
        {
          SetPlayerPos(playerid, -1085.9890,-1630.2303,76.3672);
        }
        return 1;
    }
CMD:felszed(playerid, params[])
    {
   if(GetPVarInt(playerid, \"Drog\") == DROG_NINCS)
       {
           if(IsPlayerInDynamicCP(playerid, DROGFEL))
           {
      SetPVarInt(playerid, \"Felszed\", DROGY);
      SendClientMessage(playerid, COLOR_GREEN, \"[sERVER]Felszedted a Canabist! Menj a Következõ Checkpointhoz!\");
           }
           else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nem Vagy a Felszedõ Checkpointban!\");
       }
       else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Van már Canabisod!\");
       return 1;
    }
 
CMD:drogcsinal(playerid, params[])
    {
  if(GetPVarInt(playerid, \"Drog\") == DROG_NINCS)
          {
              if(GetPVarInt(playerid, \"Felszed\") == DROGY)
              {
                if(!IsPlayerInDynamicCP(playerid, DROGCP)) return SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nem Vagy a Checkpointba!\");
      SetPVarInt(playerid, \"Drog\", DROG_VAN);
                TogglePlayerControllable(playerid, 0);
                SetTimerEx(\"drogcsin\",4000,0,\"i\",playerid);
                SetTimerEx(\"drogido\",300000,0,\"i\",playerid);
      SendClientMessage(playerid, COLOR_PINK, \"[sERVER]Drogot Készítesz.....\");
              }
              else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nem Szedtél Fel Canabist!\");
          }
          else SendClientMessage(playerid, COLOR_PINK, \"[sERVER]Ne Legyél Drogfüggõ, Pár Perc Múlva Újra Csinálhatsz!\");
          return 1;
    }
CMD:besziv(playerid, params[])
    {
   if(GetPVarInt(playerid, \"Drog\") ==  DROG_VAN)
            {
      SetPlayerDrunkLevel(playerid, 50000);
      SetPlayerWeather(playerid, 203);
      SetPVarInt(playerid, \"Drog\", DROG_NINCS);
               SetTimerEx(\"bead\",60000,0,\"i\",playerid);
      SendClientMessage(playerid, COLOR_PINK, \"[sERVER]Most Aztán Szépen Reccsen Vagy! *.*\");
            }
            else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nincs Drogod!\");
            return 1;
    }
CMD:drogelad(playerid, params[])
    {
        if(GetPVarInt(playerid, \"Drog\") ==  DROG_VAN)
        {
 
              new
                       string[128],
                       name[MAX_PLAYER_NAME],
                       name2[MAX_PLAYER_NAME],
                       PID;
              if(sscanf(params, \"u\", PID)) return SendClientMessage(playerid, COLOR_BLUE, \"Használat: /drogelad <ID/Játékos név>\");
              if(PID == INVALID_PLAYER_ID) return SendClientMessage(playerid, COLOR_RED, \"[HIBA]Rossz ID/Név!\");
  GetPlayerName(playerid, name, MAX_PLAYER_NAME);
  GetPlayerName(PID, name2, MAX_PLAYER_NAME);
          format(string, sizeof(string), \"%s[sERVER] Elakar adni neked drogot $50000-ért, ha megakarod venni, akkor /megvesz <ID>\", name);
          SendClientMessage(PID, COLOR_GREEN, string);
          format(string, sizeof(string), \"[sERVER] Elakarsz adni %s-nak/nek drogot!\", name2);
          SendClientMessage(playerid, COLOR_GREEN, string);
        }
        else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nincsen drogod!\");
        return 1;
    }
CMD:drogmegvesz(playerid, params[])
    {
        if(GetPVarInt(playerid, \"Drog\") ==  DROG_NINCS)
        {
              new
                       string[128],
                       name[MAX_PLAYER_NAME],
                       name2[MAX_PLAYER_NAME],
                       PID;
              if(sscanf(params, \"u\", PID)) return SendClientMessage(playerid, COLOR_BLUE, \"Használat: /drogmegvesz <ID/Játékos név>\");
              if(PID == INVALID_PLAYER_ID) return SendClientMessage(playerid, COLOR_RED, \"[HIBA]Rossz ID/Név!\");
              if(GetPVarInt(PID, \"Drog\") == DROG_NINCS) return SendClientMessage(playerid, COLOR_RED, \"[HIBA]Nincs drog az illetõnél!\");
              SetPVarInt(playerid, \"Drog\", DROG_VAN);
              SetPVarInt(PID, \"Drog\", DROG_NINCS);
              GivePlayerMoney(playerid, -50000);
              GivePlayerMoney(PID, 50000);
 
              GetPlayerName(playerid,name, MAX_PLAYER_NAME);
              format(string, sizeof(string), \"[sERVER]%s Megvette tõled a drogot!\", name);
              SendClientMessage(PID, COLOR_GREEN, string);
              GetPlayerName(PID, name2, MAX_PLAYER_NAME);
              format(string, sizeof(string), \"[sERVER]%s-tõl/tól Megvetted a drogot!\", name2);
              SendClientMessage(playerid, COLOR_GREEN, string);
        }
        else SendClientMessage(playerid, COLOR_RED, \"[HIBA]Van már drogot!\");
        return 1;
    }
 
public OnPlayerEnterDynamicCP(playerid, checkpointid)
    {
        if(checkpointid == DROGCP) return SendClientMessage(playerid, COLOR_BLUE, \"[sERVER]Ha Drogot Szeretnél Csinálni, Akkor /drogcsinal!\");
        if(checkpointid == DROGFEL) return SendClientMessage(playerid, COLOR_BLUE, \"[sERVER]Ha Felszeretnéd Szedni a Canabist, akkor /felszed \");
        return 1;
    }
 
////////////////// Drog timerekhez kapcsolódó eljárások/////////////////////////
    forward bead(playerid);
    public bead(playerid)
    {
            SetPlayerDrunkLevel(playerid, 0);
          SetPlayerWeather(playerid, 2);
            SendClientMessage(playerid, COLOR_GREEN, \"[sERVER]Már nem vagy beszívva, aztán óvatosan a füvezéssel!\");
        return 1;
    }
    forward drogido(playerid);
    public drogido(playerid)
    {
            SetPVarInt(playerid, \"Drog\", DROG_NINCS);
            SendClientMessage(playerid, COLOR_GREEN, \"[sERVER]Ember, mostmár újra csinálhatsz drogot.\");
        return 1;
    }
    forward drogcsin(playerid);
    public drogcsin(playerid)
    {
        SetPVarInt(playerid, \"Drog\", DROG_VAN);
        TogglePlayerControllable(playerid, 1);
        SendClientMessage(playerid, COLOR_GREEN, \"[sERVER]Csináltál Drogot! Ha eladni akarod, akkor /drogelad, ha elszívni, akkor /besziv!\");
        return 1;
    }
///////////////////////////////////////***//////////////////////////////////////

 
http://pastebin.com/Y5ZcXgux

Oldalak: 1 [2]
SimplePortal 2.3.7 © 2008-2024, SimplePortal