GTA Közösség - A magyar GTA fórum

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => A témát indította: BoOy - 2013. június 18. - 23:30:45

Cím: Jelszavas Kapu (Kezdõknek)
Írta: BoOy - 2013. június 18. - 23:30:45
Hali. Kezdõknek csináltam egy jelszavas kaput az Area51 környékén ami magától zárul be.


//---- . Jelszavas Ajtó Area51 környékén (kezdõknek). Készítette: BoOy
#include <a_samp>
#include <zcmd>
#define DIALOG_PASS 3423
#define JELSZO \"Példa1345\" //Írd be a tetszõleges jelszavadat...
new Kapu;
new checkpick1;
new checkpick2;
new Nyitva;
public OnFilterScriptInit()
{
    Kapu = CreateObject(971, 213.86644, 1875.39343, 12.16784,   0.00000, 0.00000, 0.00000);
CreateObject(2886, 209.83719, 1876.43262, 13.58393,   0.00000, 0.00000, 90.00000);
    CreateObject(2886, 209.46373, 1874.66895, 13.58390,   0.00000, 0.00000, 0.00000);
checkpick1 = CreatePickup(1239, 2,209.50102, 1873.96338, 12.99174);
checkpick2 = CreatePickup(1239, 2,210.32538, 1876.55420, 12.99174);
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
public OnPlayerPickUpPickup(playerid, pickupid)
{
    if(pickupid == checkpick1 || pickupid == checkpick2)
{
    ShowPlayerDialog(playerid,DIALOG_PASS,DIALOG_STYLE_PASSWORD,\"Jelszavas Ajtó\",\"Az ajtó zárva! Kérlek írd be a jelszót!\",\"Megad\",\"Mégse\");
}
}
public OnPlayerUpdate(playerid)
{
if(Nyitva == 1)
{
   if(!IsPlayerInRangeOfPoint(playerid, 3.0, 210.6729,1876.1299,13.1406))
   {
      MoveObject(Kapu,213.86644, 1875.39343,12.16784,2);
      Nyitva = 0;
      return 1;
   }
}
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == DIALOG_PASS)
{
    if(response)
    {
        if(Check(playerid,inputtext))
        {
            SendClientMessage(playerid,-1,\"Jelszó megadva! Sikeres belépés..\");
      MoveObject(Kapu,213.86644, 1875.39343,6.3958,1.5);
      Nyitva = 1;
   }
   else
   {
       ShowPlayerDialog(playerid,DIALOG_PASS,DIALOG_STYLE_PASSWORD,\"Jelszavas Ajtó\",\"HIBA: Rossz jelszót adtál meg!\",\"Megad\",\"Mégse\");
   }
}
    return 1;
}
return 1;
}
forward Check(playerid, const password[]);
public Check(playerid, const password[])
{
if(!strcmp(password, JELSZO, false)) return 1;
return 0;
}
Cím: Jelszavas Kapu (Kezdõknek)
Írta: instant - 2013. június 19. - 09:54:50
Szép lett grat
Cím: Jelszavas Kapu (Kezdõknek)
Írta: KR3W - 2013. június 19. - 10:22:47
tesztelve!
nagyon jól jön a kezdõknek!  ;)
Cím: Jelszavas Kapu (Kezdõknek)
Írta: Tommy_Anderson - 2013. június 19. - 11:49:46
Megy a plusz
Cím: Jelszavas Kapu (Kezdõknek)
Írta: Gaborka123 - 2013. június 19. - 12:37:11
Ment a (+)  :)
Cím: Jelszavas Kapu (Kezdõknek)
Írta: BoOy - 2013. június 19. - 12:41:19
Köszönöm mindenkinek :)
Cím: Jelszavas Kapu (Kezdõknek)
Írta: Mower - 2013. június 19. - 13:17:24
Megy a +
Cím: Jelszavas Kapu (Kezdõknek)
Írta: BoOy - 2013. június 19. - 13:36:18
Köszi :)
Cím: Jelszavas Kapu (Kezdõknek)
Írta: Gyuri_Boyka - 2013. június 19. - 17:51:08
Megy a + :D
Cím: Jelszavas Kapu (Kezdõknek)
Írta: xD1999 - 2013. június 19. - 19:32:58
Nagyon teccik ment a +
Cím: Jelszavas Kapu (Kezdõknek)
Írta: BoOy - 2013. június 19. - 19:36:22
Idézetet írta: Gyuri_Boyka date=1371657068\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"38621\" data-ipsquote-contentclass=\"forums_Topic
Megy a + :D
 

Nagyon teccik ment a +
 
[/quote]
Köszi :)
Cím: Jelszavas Kapu (Kezdõknek)
Írta: Szasza - 2013. június 19. - 23:27:05
és mindig módba kell átírni ha akarom változtatni? így elég gagyi
Cím: Jelszavas Kapu (Kezdõknek)
Írta: Loren - 2013. június 20. - 07:27:14
Idézetet írta: ZzzzzZ date=1371628490\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"38621\" data-ipsquote-contentclass=\"forums_Topic
Szép lett grat
 
Egyébként megy a plusz!
Cím: Jelszavas Kapu (Kezdõknek)
Írta: BoOy - 2013. június 20. - 09:53:43
Köszi :)