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: Nasika - 2013. Augusztus 21. - 03:44:41

Cím: Légi Támogatás script
Írta: Nasika - 2013. Augusztus 21. - 03:44:41
Sziasztok!
Csináltam egy légi támogatás scriptet.
 

Hiba:
Ha egy épületen állsz és az alattad lévõ területre irányítod a checkpointot, a checkpoint a földre kerül, de a rakéta a levegõben robban... 
Parancsok/kezelés:
/ltbe <-- légi támogatás bekapcsolás
/ltki <-- légi támogatás kikapcsolás
W A S D CP írányítás, Y rakéta kilövés.
 
#include <a_samp>
#include <zcmd>
public OnFilterScriptInit()
{
printf(\"==================================\");
printf(\"                                  \");
printf(\"          Légi Támogatás          \");
printf(\"             Script               \");
printf(\"              By:                 \");
printf(\"             Nasika               \");
printf(\"                                  \");
printf(\"==================================\");
return 1;
}
public OnFilterScriptExit()
{
return 1;
}
#define PRESSED(%0) (((newkeys & (%0)) == (%0)) && ((oldkeys & (%0)) != (%0)))
#define msg   SendClientMessage
new Float:x3,Float:y3,Float:z3;
forward robban();
new bool:robbant = true;
new raket;
new timer333;
new bool:leta[MAX_PLAYERS] = false;
new Float:idelovix,Float:ideloviy,Float:ideloviz;
new Float:lex,Float:ley,Float:lez;
CMD:ltbe(playerid,params[])
{
leta[playerid] = true;
msg(playerid,-1,\"Légi támogatás bekapcsolva!\");
GetPlayerPos(playerid,lex,ley,lez);
SetPlayerCheckpoint(playerid, lex,ley,lez, 0.8);
TogglePlayerControllable(playerid,0);
return 1;
}
CMD:ltki(playerid,params[])
{
    leta[playerid] = false;
msg(playerid,-1,\"Légi támogatás kikapcsolva!\");
TogglePlayerControllable(playerid,1);
DisablePlayerCheckpoint(playerid);
return 1;
}
public OnPlayerUpdate(playerid)
{
if(robbant == true)
{
if(leta[playerid] == true)
{
    new Keys,ud,lr;
    GetPlayerKeys(playerid,Keys,ud,lr);
   if(ud == KEY_UP)
   {
       lex += 1.0;
      SetPlayerCheckpoint(playerid, lex,ley,lez, 0.8);
      idelovix = lex;
      ideloviy = ley;
      ideloviz = lez;
   }
   if(ud == KEY_DOWN)
   {
      lex -= 1.0;
      SetPlayerCheckpoint(playerid, lex,ley,lez, 0.8);
      idelovix = lex;
      ideloviy = ley;
      ideloviz = lez;
   }
   if(lr == KEY_LEFT)
   {
      ley += 1.0;
      SetPlayerCheckpoint(playerid, lex,ley,lez, 0.8);
      idelovix = lex;
      ideloviy = ley;
      ideloviz = lez;
   }
   if(lr == KEY_RIGHT)
   {
      ley -= 1.0;
      SetPlayerCheckpoint(playerid, lex,ley,lez, 0.8);
      idelovix = lex;
      ideloviy = ley;
      ideloviz = lez;
   }
}
}
    return 1;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
if(leta[playerid] == true)
{
    if(robbant == false) return 0;
if (PRESSED(KEY_YES))
{
    robbant = false;
            raket = CreateObject(345, idelovix, ideloviy, ideloviz+20, 270, 0, 0);
   MoveObject(raket,idelovix, ideloviy, ideloviz,15.0);
    timer333 = SetTimer(\"robban\",100,true);
}
}
return 1;
}
public robban()
{
GetObjectPos(raket, x3, y3, z3);
if(x3 == idelovix && y3 == ideloviy && z3 == ideloviz)
{
        CreateExplosion(x3, y3, z3, 3, 4.0);
DestroyObject(raket);
KillTimer(timer333);
robbant = true;
}
return 1;
}

 
Letöltés: (pwn & amx)
http://www.solidfiles.com/d/943212e1b1/
Cím: Légi Támogatás script
Írta: gbr333 - 2013. Augusztus 21. - 07:12:04
Szép lett!
Cím: Légi Támogatás script
Írta: Nasika - 2013. Augusztus 21. - 07:31:26
Idézetet írta: RoLuX date=1377061924\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41636\" data-ipsquote-contentclass=\"forums_Topic
Szép lett!
 
Köszi! :)
Cím: Légi Támogatás script
Írta: dipsnark - 2013. Augusztus 21. - 09:37:00
Ez jópofa cucc lett, gratula!  :thumbsup:
Cím: Légi Támogatás script
Írta: Nasika - 2013. Augusztus 21. - 09:43:22
Idézetet írta: dipsnark date=1377070620\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41636\" data-ipsquote-contentclass=\"forums_Topic
Ez jópofa cucc lett, gratula!  :thumbsup:
 
Köszi szépen!  ;D
Cím: Légi Támogatás script
Írta: martinokok02 - 2013. Augusztus 21. - 10:07:28
Nagyon F@SZA lett :D
Cím: Légi Támogatás script
Írta: Nasika - 2013. Augusztus 21. - 10:21:43
Idézetet írta: martinokok02 date=1377072448\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41636\" data-ipsquote-contentclass=\"forums_Topic
Nagyon F@SZA lett :D
 
Örülök neki, hogy így elnyerte a tetszéseteket! :D Köszi neked is! :)
Cím: Légi Támogatás script
Írta: ZSOLTI99 - 2013. Augusztus 21. - 14:16:07
Tetszetõs grat hozzá
Cím: Légi Támogatás script
Írta: Nasika - 2013. Augusztus 21. - 16:04:24
Idézetet írta: ZSOLTI99 date=1377087367\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41636\" data-ipsquote-contentclass=\"forums_Topic
Tetszetõs grat hozzá
 
Köszi!
Cím: Légi Támogatás script
Írta: Monson - 2013. Augusztus 21. - 16:10:28
Szép lett! :)
Cím: Légi Támogatás script
Írta: EnterR - 2013. Augusztus 21. - 16:56:17
Hát ezt kipróbálom :D
Ment a +
Cím: Légi Támogatás script
Írta: Nasika - 2013. Augusztus 21. - 17:16:55
Köszi srácok, próbáld, mûködni fog! :D
Cím: Légi Támogatás script
Írta: Ryan_Adam - 2013. Augusztus 21. - 18:01:30
Na még ilyet nem láttam, szépen összeraktad, grat hozzá! :D, ment a \'+\'!
Cím: Légi Támogatás script
Írta: Csabesz - 2013. Augusztus 21. - 19:50:51
Kreativitás: 10/10
Cím: Légi Támogatás script
Írta: Nasika - 2013. Augusztus 21. - 19:54:31
Köszi srácok, gondolkoztam, hogy csinálok egy AC130-at (cod2bõl jött az ötlet), de a megvalósításánál problémák akadtak, de dolgozom rajta, hátha összejön. :D
Cím: Légi Támogatás script
Írta: Csabesz - 2013. Augusztus 21. - 20:04:51
Idézetet írta: Nasika date=1377107671\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41636\" data-ipsquote-contentclass=\"forums_Topic
Köszi srácok, gondolkoztam, hogy csinálok egy AC130-at (cod2bõl jött az ötlet), de a megvalósításánál problémák akadtak, de dolgozom rajta, hátha összejön. :D
 
Rögtön ez jutott eszembe, hogy valamelyik CoDból jött az ötlet. :)
Cím: Légi Támogatás script
Írta: Nasika - 2013. Augusztus 21. - 21:41:11
Idézetet írta: Csabesz date=1377108291\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"41636\" data-ipsquote-contentclass=\"forums_Topic


Köszi srácok, gondolkoztam, hogy csinálok egy AC130-at (cod2bõl jött az ötlet), de a megvalósításánál problémák akadtak, de dolgozom rajta, hátha összejön. :D
 
Rögtön ez jutott eszembe, hogy valamelyik CoDból jött az ötlet. :)
 
[/quote]
Régen sokat codoztam (2-4) és gondoltam megírom, legyen egy kicsi cod samp-ban is... :D
Cím: Légi Támogatás script
Írta: Dzsugasvili - 2013. Augusztus 23. - 15:30:29
szép munka  ;D
én is dolgoztam hasonlón (repülõvel, hanggal, meg minden), csak a mapandreas valamiért sosem akart mûködni és nem jó helyre dobta a bombát  :angry: