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: [LM]Arpi - 2012. június 01. - 06:57:36

Cím: Event
Írta: [LM]Arpi - 2012. június 01. - 06:57:36
Készítettem 1 meghívót pl party-ra RP-s szerkra lehet hogy jó lesz vagy akár milyenre
Használat:/event <ID> <Helyszín> <Óra> <Perc> <Belépõ=$>
letöltési link
AMX & PWN
 http://www.solidfiles.com/d/fb55190f77/
vagy:
 

//Event By: [LM]Arpi
#include <a_samp>
#define FILTERSCRIPT
#include <zcmd>
#include <sscanf2>
#define COLOR_WHITE  0xFFFFFFAA
#define COLOR_BLUE   0x33CCFFAA
#define COLOR_RED    0xFF0000AA
#define COLOR_GREEN  0x33FF33AA
#define COLOR_YELLOW 0xFF9900AA
#define COLOR_ORANGE 0xFF9900AA
#define DIALOG_MEGHIVAS             25000
CMD:event(playerid, params[])
{
new
    iPlayer,
    szHelyszin[128],
    iHour,
    iSecond,
iBelepo;
   
if(sscanf(params, \"us[128]ddd\", iPlayer, szHelyszin, iHour, iSecond, iBelepo))
return SendClientMessage(playerid, COLOR_RED, \"Használat: /event <ID> <Helyszín> <Óra> <Perc> <Belépõ=$>\");
if(!IsPlayerConnected(iPlayer))
return SendClientMessage(playerid, COLOR_RED, \"Rossz ID!\");
if(iPlayer == playerid)
    return SendClientMessage(playerid, COLOR_RED, \"Inkáb menyél aludni :D \");
if(!(0 <= iHour <= 23))
    return SendClientMessage(playerid, COLOR_RED, \"Rossz óra!\");
if(!(0 <= iSecond <= 59))
    return SendClientMessage(playerid, COLOR_RED, \"Rossz perc!\");
if(!(0 <= iBelepo <= 2000000))
    return SendClientMessage(playerid, COLOR_RED, \"Nincs ennyi Pénzed!\");
new
    szFormat[512];
format(szFormat, sizeof(szFormat), \"{00ff00}%s(%d) {ff9900}mehívott téged a buliba!\\n\\
{ffff00}Helyszín: {00ff00}%s\\n\\
{00fff0}Idõpont: {00ff00}%02d{ff0000}:{00ff00}%02d\\n\\
{ff0000}Belépõ: {00ff00}${ffff00}%d\\n\\
{00ff00}Örömmel {ff0000}várunk {00ffff}a {ff9900}buliba!\", pName(playerid), playerid, szHelyszin, iHour, iSecond, iBelepo);
ShowPlayerDialog(iPlayer, DIALOG_MEGHIVAS, DIALOG_STYLE_MSGBOX, \"{ff9900}Party Meghívó\", szFormat, \"Elfogad\", \"Mégse\");
SetPVarInt(iPlayer, \"CEventPlayer\", playerid);
SetPVarInt(iPlayer, \"EventCash\", iBelepo);
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
switch(dialogid)
{
case DIALOG_MEGHIVAS:
{
   new
       iPlayer = GetPVarInt(playerid, \"CEventPlayer\");
   if(!response)
   {
      SendClientMessage(iPlayer, COLOR_RED, \"A haverod meghívót nem fogadta el!\");
   }
   else
   {
      new
          iEventCash = GetPVarInt(playerid, \"EventCash\");
      if(GetPlayerMoney(playerid) < iEventCash)
         return SendClientMessage(iPlayer, COLOR_ORANGE, \"Nincs rezed. Vegyél fel kölcsönt!\");
      GivePlayerMoney(playerid, -iEventCash);
      GivePlayerMoney(iPlayer, iEventCash);
      SendClientMessage(iPlayer, COLOR_GREEN, \"A haverod meghívót el fogadta!\");
   }
}
}
return 1;
}
stock pName(playerid)
{
static
s_szPlayerName[MAX_PLAYER_NAME];
GetPlayerName(playerid, s_szPlayerName, sizeof(s_szPlayerName));
return s_szPlayerName;
}
 
Cím: Event
Írta: Olie - 2012. június 01. - 08:11:17
Jól néz ki!
Régen én is elkezdtem egy hasonlót írni, viszont ott Eventet csak rCon admin tudott indítani.
Indítás után aki elfogadta azt bedobta egy mappolt club intibe.
Szerintem ez is egész jó, bár infón vagyok, és itt nem nagyon tudok tesztelés céljából szervert nyitni localhoston... Majd otthon letesztelem..:)
Milyen alapon megy? Bárki indíthat eventet?
Cím: Event
Írta: [LM]Arpi - 2012. június 01. - 13:28:42
még majd azt is meg csinállom ha elfogadod akkor majd teleportáljon el oda ahol lesz a party pl /lv akkor mongyok bedob LV-be vagy majd hasonló
meg még felujitom majd
Cím: Event
Írta: Disaster3 - 2012. június 01. - 13:36:05
RP-nél nem lenne valami szép, ha elteleportálna. Amúgy ki akarom próbálni, de nem értek semmilyen téren a scripteléshez, szóval nem tudom tesztelni xd .
Cím: Event
Írta: JBauer - 2012. június 01. - 13:37:16
Szép lett, de ezt a sort azért átírhatnád szebbre:

if(iPlayer == playerid)
return SendClientMessage(playerid, COLOR_RED, \"Magadot akarod meg**szni vagy mi a k*rv* élet?\");

 
De egyébként nagyon tetszik az ötlet!
Cím: Event
Írta: Gabor.. - 2012. június 01. - 13:44:55
F.asza lett Árpi. ;)  Ezen sírok:
Magadot akarod meg**szni vagy mi a k*rv* élet?

 :D
Cím: Event
Írta: Benceee - 2012. június 01. - 14:16:32
Idézetet írta: Gabor.. date=1338551095\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"22245\" data-ipsquote-contentclass=\"forums_Topic
F.asza lett Árpi. ;)  Ezen sírok:
Magadot akarod meg**szni vagy mi a k*rv* élet?

 :D
 
Én nem.
Szép munka lenne, ha kivennéd azt az ocsmány sort, vagy átírnád.
Cím: Event
Írta: zeteni - 2012. június 01. - 14:47:24
Egyet értek elõzõ hozzászólókkal. (gabor nevét feltüntethetnéd mert nagyon gaborelrendezés szaga van :D
Cím: Event
Írta: [LM]Arpi - 2012. június 01. - 20:12:39
Javitva
 kösz :D
vagy ha szeretnétek akkor fejlesszétek tovább :D
Cím: Event
Írta: halaloszto100 - 2012. június 01. - 23:04:30
Jó lett. :)
Cím: Event
Írta: JackBronson - 2012. június 02. - 10:36:11
Az eventrõl röktön a Metin2 jutott eszembe xD
Jó lett.
Cím: Event
Írta: juhassz - 2012. június 02. - 10:57:55
Ezt szerintem inkább RP szerókba lenne jó. :)

Grat jó lett.
Cím: Event
Írta: [LM]Arpi - 2012. június 02. - 22:25:49
kösz mindenkinek  :)
Cím: Event
Írta: faker4e - 2012. június 03. - 02:08:07
nagyon jó lett grat :)
Cím: Event
Írta: Caesar - 2012. június 04. - 19:15:30
Nekem ez a script igazán tetszik :)
Cím: Event
Írta: [LM]Arpi - 2012. június 04. - 20:02:23
Idézetet írta: Caesar date=1338830130\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"22245\" data-ipsquote-contentclass=\"forums_Topic
Nekem ez a script igazán tetszik :)
 
kösz mindenkinek és örülök hogy tetszik