Szerző Téma: Power Tûz/Fire!  (Megtekintve 2874 alkalommal)

Nem elérhető $uRí

  • 226
    • Profil megtekintése
Power Tûz/Fire!
« Dátum: 2012. Április 14. - 23:05:56 »
+2 Show voters
Üdv elhoztam nektek a www.sa-mp.com fórumrol egy szépen kidolgozott szkriptet! Lényege ahányszor beírod /fire anyi tûz bombád lesz! Magyarositani nem kell mert nincsen benne szöveg :D
Erdeti Téma: http://forum.sa-mp.com/showthread.php?t=320398
Erdeti Készitõ: BRICS
Szkript:
 

#include <a_samp>
/*POWER FIRE by BRICS*/
#define POWER_FIRE_ENABLED_TEXT \"The power of fire enabled. Using the power-fire - punch\"
#define ERROR_1 \"You already have the power-fire\"
#define MESS_1 \"You do not own a power-fire\"
#define FIRE_TIMER_INTERVAL 80
#define FIRE_POWER_SOUND 1039
#define FIRE_START_DIST 13.0
#define FIRE_FINAL_DIST 90.0
#define FIRE_NEXT_DIST 3.0
#define Explosion_Rad 5
#define Explosion_Type 1
#define FIRE_CMD \"/fire\"
#define PLAYER_DAMAGE_DIST 1.5
#define VEH_DAMAGE_DIST 4.0
/*Code*/
new S[MAX_PLAYERS] = -1;
new Fires[MAX_PLAYERS];
new Float: dist[MAX_PLAYERS]/* = 100.0*/;
new Timer[MAX_PLAYERS];
new Float: PEX[3][MAX_PLAYERS];
new Float: P[4][MAX_PLAYERS];
forward Fireman(playerid);
public OnFilterScriptInit()
{
print(\"   Fire-Power by BRICS loaded.\");
for(new i; i < GetMaxPlayers(); i++)S = -1;
return 1;
}
public OnFilterScriptExit()
{
    for(new i; i < GetMaxPlayers(); i++)KillTimer(Timer);
    print(\"   Fire-Power by BRICS unloaded.\");
return 1;
}
public OnPlayerConnect(playerid)
{
    S[playerid] = -1;
    Fires[playerid] = 0;
return 1;
}
public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp(FIRE_CMD, cmdtext, true, 10) == 0)
{
if(S[playerid] > -1)return SendClientMessage(playerid,-1,ERROR_1);
S[playerid] = 1;
Fires[playerid] = 5;
SendClientMessage(playerid,-1,POWER_FIRE_ENABLED_TEXT);
return 1;
}
return 0;
}
public Fireman(playerid)
{
if(dist[playerid] >= FIRE_FINAL_DIST)
{
KillTimer(Timer[playerid]);
//dist[playerid] = 100.0;
if(Fires[playerid] == 0)
{
               S[playerid] = -1;
               SendClientMessage(playerid,-1,MESS_1);
               return 1;
}
S[playerid] = 1;
return 1;
}
    GetXYInFrontOfPoint(P[0][playerid],P[1][playerid], PEX[0][playerid], PEX[1][playerid], P[3][playerid], dist[playerid]);
    CreateExplosion(PEX[0][playerid],PEX[1][playerid],P[2][playerid],Explosion_Type,Explosion_Rad);
    for(new i; i < GetMaxPlayers(); i ++)
    {
if(!IsPlayerConnected(i))continue;
if(GetPlayerDistanceFromPoint(i,PEX[0][playerid],PEX[1][playerid],P[2][playerid]) < PLAYER_DAMAGE_DIST)
{
             new Float:hp;
    GetPlayerHealth(i,hp);
    if(hp <= 0)continue;
    SetPlayerHealth(i,-1);
       }
    }
for(new v; v < MAX_VEHICLES; v ++)
{
   if(GetVehicleDistanceFromPoint(v,PEX[0][playerid],PEX[1][playerid],P[2][playerid]) <= VEH_DAMAGE_DIST)SetVehicleHealth(v,0);
   
}
    dist[playerid] += FIRE_NEXT_DIST;
return 1;
}
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
if(newkeys & KEY_FIRE)
{
            if(GetPlayerWeapon(playerid) != 0)return 1;
           if(S[playerid] == -1 ||S[playerid] == 0)return 1;
          if(IsPlayerInAnyVehicle(playerid))return 1;
                  dist[playerid] = FIRE_START_DIST;
                  GetPlayerPos(playerid,P[0][playerid],P[1][playerid],P[2][playerid]);
                GetPlayerFacingAngle(playerid,P[3][playerid]);
                  Timer[playerid] = SetTimerEx(\"Fireman\",FIRE_TIMER_INTERVAL,1,\"d\",playerid);
                  S[playerid] = 0;
                  Fires[playerid] --;
                  PlayerPlaySound(playerid,FIRE_POWER_SOUND,0,0,0);
}
return 1;
}
stock GetXYInFrontOfPoint(Float:x, Float:y, &Float:x2, &Float:y2, Float:A, Float:distance)
{
    x2 = x + (distance * floatsin(-A, degrees));
    y2 = y + (distance * floatcos(-A, degrees));
}

 
-Ideális, TDM vagy ZOMBI szerverekre ! Sok síkert :)
Videó:
 
« Utoljára szerkesztve: 2012. Április 15. - 18:52:02 írta $uRí »

Nem elérhető Mokus

  • 608
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #1 Dátum: 2012. Április 14. - 23:09:56 »
0 Show voters
Ez jol jön de mivel készitetted a videot ha ezt megtudhatnám?

Nem elérhető $uRí

  • 226
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #2 Dátum: 2012. Április 14. - 23:10:34 »
0 Show voters
Idézetet írta: Mokus date=1334437796\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"20183\" data-ipsquote-contentclass=\"forums_Topic
Ez jol jön de mivel készitetted a videot ha ezt megtudhatnám?
 
Semivel, nem én készitettem hanem az erdeti készitõ :D
E: De van külön program a videó készitésére!
« Utoljára szerkesztve: 2012. Április 14. - 23:21:56 írta $uRí »

Nem elérhető Dead

  • 2045
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #3 Dátum: 2012. Április 15. - 06:53:46 »
0 Show voters
Ez jó cucc XD
Funolni lehet vele :)

Nem elérhető instant

  • 2778
  • ZzzzzZ
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #4 Dátum: 2012. Április 15. - 08:18:55 »
0 Show voters
ez mekkora :D
Like  :thumbsup: :thumbsup:

Nem elérhető Benceee

  • 4785
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #5 Dátum: 2012. Április 15. - 09:42:43 »
0 Show voters
Hiányzik az #include < a_samp >.

Nem elérhető $uRí

  • 226
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #6 Dátum: 2012. Április 15. - 09:55:13 »
0 Show voters
Nem hiányzik mert benne van az ô saját inc be!

Nem elérhető Pedró

  • 3341
  • 2014 © Az év Szkriptere
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #7 Dátum: 2012. Április 15. - 18:22:47 »
0 Show voters
elhoztam nektek a www.sa-mp.com fórumrol[/quote]
istenem, meddig tart ez a korszak? : \' <
 
Hiányzik az #include < a_samp >.
Nem hiányzik mert benne van az ô saját inc be![/quote]

asd ez fájt : <
amúgy semmi értelme ilyenekkel telirakni a fórumot.
mindenki csak hsz hunterkedik hogy húdejó stb. de senki sem használja kb..
tiszteletem!
Stuntzor
[/quote]
[/quote]

Nem elérhető Prototype

  • 406
  • ÖÖÖÖ! Nincs
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #8 Dátum: 2012. Április 15. - 18:43:13 »
0 Show voters
nekem nem mûködik :(
G:\\Teszt szerver\\filterscripts\\fire.pwn(45) : error 017: undefined symbol \"ERROR_1\"
G:\\Teszt szerver\\filterscripts\\fire.pwn(48) : error 017: undefined symbol \"POWER_FIRE_ENABLED_TEXT\"
G:\\Teszt szerver\\filterscripts\\fire.pwn(57) : error 017: undefined symbol \"FIRE_FINAL_DIST\"
G:\\Teszt szerver\\filterscripts\\fire.pwn(64) : error 017: undefined symbol \"MESS_1\"
G:\\Teszt szerver\\filterscripts\\fire.pwn(71) : error 017: undefined symbol \"Explosion_Rad\"
G:\\Teszt szerver\\filterscripts\\fire.pwn(89) : error 017: undefined symbol \"FIRE_NEXT_DIST\"
G:\\Teszt szerver\\filterscripts\\fire.pwn(99) : error 017: undefined symbol \"FIRE_START_DIST\"
G:\\Teszt szerver\\filterscripts\\fire.pwn(102) : error 017: undefined symbol \"FIRE_TIMER_INTERVAL\"
G:\\Teszt szerver\\filterscripts\\fire.pwn(105) : error 017: undefined symbol \"FIRE_POWER_SOUND\"
Pawn compiler 3.2.3664           Copyright © 1997-2006, ITB CompuPhase
9 Errors.
Ezek a hibák :( Pedig úgy beraknám a szerómba

Nem elérhető $uRí

  • 226
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #9 Dátum: 2012. Április 15. - 18:52:38 »
0 Show voters
Rosszul másoltam be  :D, javitottam fent van a code ba a javitott verzió!  :laugh:

Nem elérhető Prototype

  • 406
  • ÖÖÖÖ! Nincs
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #10 Dátum: 2012. Április 15. - 18:59:17 »
0 Show voters
Köszi :D
« Utoljára szerkesztve: 2012. Április 15. - 19:14:16 írta [DmN]Razor911 »

Power Tûz/Fire!
« Válasz #11 Dátum: 2012. Április 15. - 19:14:49 »
0 Show voters
Azért Server Unkwnow Command mivel ez nem gamemode

Ez egy script nem mode..

Nem elérhető Rexii

  • 471
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #12 Dátum: 2012. Április 16. - 20:57:09 »
0 Show voters
Hasznosnak tûnik!

SmokeR

  • Vendég
Power Tûz/Fire!
« Válasz #13 Dátum: 2012. Április 17. - 18:14:42 »
0 Show voters
hülyéskedni lehet vele :D

Nem elérhető #Nexus#

  • 1374
    • Profil megtekintése
Power Tûz/Fire!
« Válasz #14 Dátum: 2012. Április 17. - 18:18:59 »
0 Show voters
Max annyira jó hogy ezt a lángcsóvát fel lehet használni máshol

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal