Köszönöm!
Banda:
#include a_samp
#include sscanf2
#include zcmd
#include dini
#include dudb
#include dutils
#include colors
#pragma unused ret_memcpy
#include <dini>
#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_LIGHTGREEN 0xAA993333
new gate3;
enum pInfo
{
gr
};
new PlayerInfo[MAX_PLAYERS][pInfo];
new file[128],str[128];
new player1;
public OnGameModeInit()
{
gate3 = CreateObject(980, 2354.3999023438, -1659.0999755859, 15.199999809265, 0, 0, 89.999938964844);
return 1;
}
CMD:gonyit(playerid)
{
if(GetPVarInt(playerid, \"gr\") >= 1)
{
MoveObject(gate3, 2354.3999023438, -1659.0999755859, 15.199999809265,1);
return 1;
}
return 0;
}
CMD:gozar(playerid)
{
if(GetPVarInt(playerid, \"gr\") >= 1)
{
MoveObject(gate3, 2354.3999023438, -1659.0999755859, 15.199999809265,1);
return 1;
}
return 0;
}
CMD:gtag(playerid,params[])
{
new string[250];
SendClientMessage(playerid,COLOR_GREEN,\"(*,.,*)_[!]Online Groove Tagok (*,.,*)_[!]\");
for(new v;v<GetMaxPlayers();v++)
{
if(GetPVarInt(v,\"gr\") > 0)
{
format(string,250,\"%s groove Szint:%d\",pName(v),GetPVarInt(v,\"gr\"));
SendClientMessage(playerid,COLOR_GREEN,string);
}
}
return 1;
}
CMD:setgr(playerid, params[])
{
if(GetPVarInt(playerid, \"gr\") >= 5 || IsPlayerAdmin(playerid))
{
new
string[350],
vlevel;
if(sscanf(params,\"ui\",playerid, vlevel)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /setgr id level (1-5)!\");
if(vlevel <0 || vlevel > 5) return SendClientMessage(playerid,COLOR_RED,\"Csak 1 - 5 groove SZINT Közt van!\");
if( playerid == INVALID_PLAYER_ID ) return SendClientMessage( playerid, COLOR_RED, \"HIBA: Nem létezo azonosító!\" );
SetPVarInt(playerid,\"gr\",vlevel);
format(string,350,\"***%s(%d) {00f7ff}nevu admin kinevezett téged {ff0000}%d groove-nak!\",pName(playerid),playerid,GetPVarInt(playerid,\"gr\"));
SendClientMessage( playerid,COLOR_GREEN,string);
if(vlevel > GetPVarInt(playerid,\"gr\")) return SendClientMessage( playerid,COLOR_GREEN,\"groove Szinted növekedett!\");
if(vlevel < GetPVarInt(playerid,\"gr\")) return SendClientMessage( playerid,COLOR_GREEN,\"groove Szintedet elvonták!\");
PlayerPlaySound(playerid, 1056, 0, 0, 0);
SetPlayerColor(player1,COLOR_YELLOW);
format(file,sizeof(file),\"%s.ini\",pName(playerid));
dini_IntSet(file,\"gr\",vlevel);
}
else SendClientMessage( playerid, COLOR_RED, \"Nem vagy RCON Admin!\" );
return 1;
}
CMD:ghq(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >= 1)
{
SetPlayerPos(playerid,2529.5403,-1667.0477,15.1684);
return 1;
} else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1 es szintü gr-nak szükséges!\");
}
CMD:ghq2(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >= 1)
{
SetPlayerPos(playerid,3020.6936,-2556.3298,15.7025);
return 1;
} else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1 es szintü gr-nak szükséges!\");
}
CMD:vjail(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >= 2 || IsPlayerAdmin(playerid))
{
new reason[50];
if(sscanf(params, \"us[50]\", player1, reason)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /jail [Játékos ID/Név] [indok]\");
if(IsPlayerNPC(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Botokat nem zárhatsz börtönbe!\");
if(!IsPlayerConnected(player1) && (GetPVarInt(player1, \"Level\") > GetPVarInt(playerid, \"Level\")) ) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva, vagy magasabb szintu admin, mint te!\");
if(GetPVarInt(player1, \"JailTime\") > 1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos már börtönbe van!\");
if(playerid == player1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Magadat nem zárhatod börönbe!\");
TogglePlayerControllable(player1, 1);
SetPlayerPos(player1, 197.6661, 173.8179, 1003.0234);
SetPlayerInterior(player1,3);
format(str,sizeof(str), \"*** gr: %s börtönbe zárta %s nevu játékost [indok: %s]\", pName(playerid), pName(player1),reason);
SendClientMessageToAll(COLOR_LIGHTGREEN,str);
return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 2-es szintu groove tagnak kéne lenned!\");
}
CMD:vunjail(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >= 2 || IsPlayerAdmin(playerid))
{
if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /unjail [Játékos ID/Név]\");
if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(!GetPVarInt(player1, \"JailTime\")) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos nincs börtönben!\");
format(str,sizeof(str), \"***gr: %s kiengedett téged a börtönbol.\", pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
SpawnPlayer(player1);
format(str,sizeof(str), \"*** Admin: %s kiengedte a börtönbol %s nevu játékost.\", pName(playerid), pName(player1));
SendClientMessageToAll(COLOR_BLUE,str);
return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 2-es szintu groove tagnak kéne lenned!\");
}
CMD:vfreeze(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >= 1 || IsPlayerAdmin(playerid))
{
if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /freeze [Játékos ID/Név] \");
if(IsPlayerNPC(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Botokat nem fagyaszthatsz le!\");
if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(playerid == player1) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Magadat nem fagyaszthatod le!\");
TogglePlayerControllable(player1, 0);
format(str,sizeof(str), \"*** gr: %s lefagyasztott téged!.\",pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
return 1;
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 1-es szintu gr-nak kéne lenned!\");
}
CMD:vunfreeze(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >= 1 || IsPlayerAdmin(playerid))
{
if(sscanf(params, \"u\", player1)) return SendClientMessage(playerid, COLOR_RED, \"HASZNÁLAT: /unfreeze [Játékos ID/Név]\");
if(!IsPlayerConnected(player1)) return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(!GetPVarInt(player1, \"FreezeTime\")) return SendClientMessage(playerid, COLOR_RED, \"HIBA: A játékos nincs lefagyasztva!\");
SetPVarInt(player1, \"FreezeTime\", 0);
format(str,sizeof(str), \"*** gr: %s levette a fagyasztást rólad.\",pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
TogglePlayerControllable(player1,1);
format(str,sizeof(str),\"*** gr: %s levette a fagyasztást %s nevu játékosról.\", pName(playerid), pName(player1));
return SendClientMessageToAll(COLOR_BLUE, str);
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz legalább 1-es szintu gr-nak kéne lenned!\");
}
CMD:vgod( playerid )
{
if(GetPVarInt(playerid,\"gr\") >= 2)
{
if(!GetPVarInt(playerid, \"God\"))
{
SetPVarInt(playerid, \"God\", 1);
SetPlayerHealth(playerid,100000);
return SendClientMessage(playerid, COLOR_GREEN, \"Örökélet be!\");
}
else
{
SetPVarInt(playerid, \"God\", 0);
SetPlayerHealth(playerid, 100);
return SendClientMessage(playerid, COLOR_RED, \"Örökélet ki!\");
}
} else return SendClientMessage(playerid, COLOR_RED, \"HIBA: Ehez a parancshoz 2-es szintu gr-nak kéne lenned!\");
}
CMD:vskin(playerid,params[])
{
if(GetPVarInt(playerid,\"gr\") >= 1)
{
new skin;
new string2[175];
if(sscanf(params,\"d\",skin)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat : /vskin [skinid] \");
if(skin < 0 || skin > 299) return SendClientMessage(playerid,COLOR_RED,\"Csak 0tól és 299ig vannak skinek!\");
SetPlayerSkin(playerid,skin);
format(string2,175,\"Sikeresen átváltoztattad a skinedet!Új Skined ID-je :%d !\",skin);
SendClientMessage(playerid,COLOR_GREEN,string2);
return 1;
} else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-es szintu gr-nak kéne lenned!\");
}
CMD:vcarrespawn(playerid,params[])
{
new string[250];
if(GetPVarInt(playerid,\"gr\") >= 3)
{
for(new cars; cars <MAX_VEHICLES; cars++)
{
SetVehicleToRespawn(cars);
}
format(string,250,\"-gr-%s respawnolta a jármüveket!\",pName(playerid));
SendClientMessageToAll(COLOR_GREEN,string);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintu gr-nak kéne lenned!\");
}
CMD:vcar(playerid,params[])
{
if(GetPVarInt(playerid,\"gr\") >= 1)
{
new id, color1, color2;
new Float:Rot,Float:X,Float:Y,Float:Z;
GetPlayerPos(playerid, X, Y, Z);
GetPlayerFacingAngle(playerid, Rot);
if(sscanf(params,\"ddd\",id,color1,color2)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /vcar [Jármuid][szin1][szin2]\");
if(id < 400 || id > 611) return SendClientMessage(playerid,COLOR_RED,\"Csak 400tól 611ig vannak a jármuid!\");
CreateVehicle(id,X+2,Y+2,Z+2,Rot,color1,color2,0);
SendClientMessage(playerid,COLOR_GREEN,\"Sikeresen lekérted a jármuvet!\");
DestroyVehicle(id);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-es szintu gr-nak kéne lenned!\");
}
CMD:vgoto(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >= 2) return SendClientMessage(playerid, 0xE60000FF, \"Ezt a parancsot max 2.es szintu groove tagok használhatják!\");
{
new id;
new Float:x,Float:y,Float:z;
if(id == INVALID_PLAYER_ID) return SendClientMessage(playerid,COLOR_GREEN,\"Helytelen PlayerID!\");
if(sscanf(params,\"u\",id))return SendClientMessage(playerid,COLOR_YELLOW,\"Használat: /goto [Játékosnév/id]\");
GetPlayerPos(id,x,y,z);
SetPlayerPos(playerid,x,y,z);
SendClientMessage(id,COLOR_GREEN,\"Egy gr tag hozzád teleportált!\");
}
return 1;
}
CMD:veject(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >= 3)
{
new Float:x,Float:y,Float:z;
new target;
if(sscanf(params,\"d\",target)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /veject [iD]\");
SetPlayerPos(target,x,y,z+3);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintu gr-nak kéne lenned!\");
}
CMD:gchat(playerid,params[])
{
if(GetPVarInt(playerid, \"gr\") >=1)
{
new uzenet[1000],string[200];
if(sscanf(params,\"s[1000]\",uzenet)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /gchat [Üzenet]\");
format(string,sizeof(string),\"-gr-{ff0000}%s : {ffffff}%s\",pName(playerid),uzenet);
SendClientMessageToAll(COLOR_GREEN,string);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-as szintu gr-nak kéne lenned!\");
}
CMD:vjetpack(playerid,params[])
{
if(GetPVarInt(playerid,\"gr\") >=1)
{
SendClientMessage(playerid,COLOR_RED,\"Nincs jogosultságod-e parancs használatához!\");
SetPlayerSpecialAction(playerid,SPECIAL_ACTION_USEJETPACK);
SendClientMessage(playerid, COLOR_YELLOW, \"Sikeresen adtál magadnak JetPacket!\");
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintu gr-nak kéne lenned!\");
}
CMD:vhelp(playerid)
{
if(GetPVarInt(playerid,\"gr\") >= 1)
{
SendClientMessage(playerid,COLOR_RED,\"____]gr HELP[____\");
SendClientMessage(playerid,COLOR_GREEN,\"Level1:/vcar /vskin /vjetpack /vfreeze /vunfreeze\");
SendClientMessage(playerid,COLOR_GREEN,\"Level2:/vgoto\");
SendClientMessage(playerid,COLOR_GREEN,\"Level3:/vsay /veject /vcarrespawn\");
SendClientMessage(playerid,COLOR_RED,\"____]gr HELP[____\");
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz minimum 1 es szintu grnak kéne lenned!\");
}
public OnPlayerConnect(playerid)
{
PlayerInfo[playerid][gr] = 0;
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(!fexist(file))
{
dini_Create(file);
dini_IntSet(file,\"gr\",GetPVarInt(playerid,\"gr\"));
}
if(fexist(file))
{
SetPVarInt(playerid,\"gr\",dini_Int(file,\"gr\"));
}
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(fexist(file))
{
SetPVarInt(playerid,\"gr\",GetPVarInt(playerid,\"gr\"));
}
return 1;
}
stock pName( playerid )
{
new
s_szPlayerName[ MAX_PLAYER_NAME ];
GetPlayerName( playerid, s_szPlayerName, MAX_PLAYER_NAME );
return s_szPlayerName;
}
Rablás script:
#include <a_samp>
#include <streamer>
#include <zcmd>
#define COLOR_GREEN 0x33FF33AA
#define COLOR_RED 0xFF0000AA
#define COLOR_BLUE 0x33CCFFAA
#define COLOR_ORANGE 0xFF9900AA
public OnGameModeInit() // FS-ben OnFilterScriptInit()
{
return 1;
}
CMD:grabol(playerid, params[])
{
if(GetPVarInt(playerid,\"rabol\") == 0)
{
if(IsPlayerInRangeOfPoint(playerid,1.0,2496.3887,-1704.6527,1018.3438) || IsPlayerInRangeOfPoint(playerid,1.0, 2144.1553,1636.2457,993.5761) || IsPlayerInRangeOfPoint(playerid,1.0, 2183.2349,2161.5310,10.8203) || IsPlayerInRangeOfPoint(playerid,1.0,2086.3616,2047.7804,11.0579)) // Értelemszeruen bovítheted! De akkor az OnGameModeInit()-hez is rakj objecteket
{
SendClientMessage(playerid,COLOR_RED,\"Gyorsan szedd fel a lóvét!!\");
TogglePlayerControllable(playerid,0);
SetPlayerWantedLevel(playerid,6);
SetPVarInt(playerid,\"rabol\",1);
SendClientMessageToAll(COLOR_BLUE,\"[RIASZTÁS]: Kirabolták a groove hq-t!\");
SetTimerEx(\"rabolas\",60000,0,\"i\",playerid);
}
else SendClientMessage(playerid,COLOR_GREEN,\"Nemvagy rablási pont közelébe! Mennyé közelebb! :\'S\");
}
else SendClientMessage(playerid,COLOR_RED,\"Most raboltál! 5 perc múlva újra rabolhatsz\");
return 1;
}
CMD:rabol(playerid, params[])
{
if(GetPVarInt(playerid,\"rabol\") == 0)
{
if(IsPlayerInRangeOfPoint(playerid,1.0,2032.0376,1319.3666,10.8203) || IsPlayerInRangeOfPoint(playerid,1.0, 2144.1553,1636.2457,993.5761) || IsPlayerInRangeOfPoint(playerid,1.0, 2183.2349,2161.5310,10.8203) || IsPlayerInRangeOfPoint(playerid,1.0,2086.3616,2047.7804,11.0579)) // Értelemszeruen bovítheted! De akkor az OnGameModeInit()-hez is rakj objecteket
{
SendClientMessage(playerid,COLOR_RED,\"Gyorsan szedd fel a lóvét!!\");
SetPlayerWantedLevel(playerid,6);
SetPVarInt(playerid,\"rabol\",1);
SendClientMessageToAll(COLOR_BLUE,\"[RIASZTÁS]: Kirabolták a Caligula Casinót!\");
SetTimerEx(\"rabolas\",15000,0,\"i\",playerid);
}
else SendClientMessage(playerid,COLOR_GREEN,\"Nemvagy rablási pont közelébe! Mennyé közelebb! :\'S\");
}
else SendClientMessage(playerid,COLOR_RED,\"Most raboltál! 5 perc múlva újra rabolhatsz\");
return 1;
}
CMD:yrabol(playerid, params[])
{
if(GetPVarInt(playerid,\"yrabol\") == 0)
{
if(IsPlayerInRangeOfPoint(playerid,1.0,379.7312,-112.7935,1001.4922) || IsPlayerInRangeOfPoint(playerid,1.0, 379.7312,-112.7935,1001.4922) || IsPlayerInRangeOfPoint(playerid,1.0, 379.7312,-112.7935,1001.4922) || IsPlayerInRangeOfPoint(playerid,1.0,379.7312,-112.7935,1001.4922)) // Értelemszeruen bovítheted! De akkor az OnGameModeInit()-hez is rakj objecteket
{
SendClientMessage(playerid,COLOR_RED,\"Gyorsan szedd fel a lóvét!!\");
TogglePlayerControllable(playerid,0);
SetPlayerWantedLevel(playerid,6);
SetPVarInt(playerid,\"yrabol\",1);
SendClientMessageToAll(COLOR_BLUE,\"[RIASZTÁS]: Kirabolták a YAKUZA HQ-T!\");
SetTimerEx(\"rabolas\",60000,0,\"i\",playerid);
}
else SendClientMessage(playerid,COLOR_GREEN,\"Nemvagy rablási pont közelébe! Mennyé közelebb! :\'S\");
}
else SendClientMessage(playerid,COLOR_RED,\"Most raboltál! 5 perc múlva újra rabolhatsz\");
return 1;
}
CMD:brabol(playerid, params[])
{
if(GetPVarInt(playerid,\"brabol\") == 0)
{
if(IsPlayerInRangeOfPoint(playerid,1.0,2225.8616,-1176.7993,1029.7969) || IsPlayerInRangeOfPoint(playerid,1.0, 2225.8616,-1176.7993,1029.7969) || IsPlayerInRangeOfPoint(playerid,1.0, 2225.8616,-1176.7993,1029.7969) || IsPlayerInRangeOfPoint(playerid,1.0,2225.8616,-1176.7993,1029.7969)) // Értelemszeruen bovítheted! De akkor az OnGameModeInit()-hez is rakj objecteket
{
SendClientMessage(playerid,COLOR_RED,\"Gyorsan szedd fel a lóvét!!\");
TogglePlayerControllable(playerid,0);
SetPlayerWantedLevel(playerid,6);
SetPVarInt(playerid,\"brabol\",1);
SendClientMessageToAll(COLOR_BLUE,\"[RIASZTÁS]: Kirabolták a BALLAS HQ-T!\");
SetTimerEx(\"rabolas\",60000,0,\"i\",playerid);
}
else SendClientMessage(playerid,COLOR_GREEN,\"Nemvagy rablási pont közelébe! Mennyé közelebb! :\'S\");
}
else SendClientMessage(playerid,COLOR_RED,\"Most raboltál! 5 perc múlva újra rabolhatsz\");
return 1;
}
forward rabolas1(playerid);
forward rabolas(playerid);
public rabolas1(playerid)
{
new rcash1 =(random(500000-100000)+100000);
TogglePlayerControllable(playerid,1);
GivePlayerMoney(playerid, rcash1);
SendClientMessage(playerid,COLOR_ORANGE,\"Kész vagy! Gyorsan fuss el, miellott ideérnek a zsaruk!\");
SetTimerEx(\"rabolasido\",300000,0,\"i\",playerid);
}
public rabolas(playerid)
{
new rcash =(random(500000-100000)+100000);
TogglePlayerControllable(playerid,1);
GivePlayerMoney(playerid, rcash);
SendClientMessage(playerid,COLOR_ORANGE,\"Kész vagy! Gyorsan fuss el, miellott ideérnek a zsaruk!\");
SetTimerEx(\"rabolasido\",300000,0,\"i\",playerid);
}
forward rabolasido(playerid);
forward rabolasido1(playerid);
public rabolasido(playerid)
{
SendClientMessage(playerid,COLOR_GREEN,\"Na, vaze letelt az ido, mostmár rabolhatsz újra\");
SetPVarInt(playerid,\"rabol\",0);
SetPlayerWantedLevel(playerid,3);
return 1;
}
public rabolasido1(playerid)
{
SendClientMessage(playerid,COLOR_GREEN,\"Na, vaze letelt az ido, mostmár rabolhatsz újra\");
SetPVarInt(playerid,\"rabol\",0);
SetPlayerWantedLevel(playerid,0);
return 1;
}
Dupla hozzászólás automatikusan összefûzve. ( 2013. május 25. - 19:47:36 )
Nos,segítene valaki?
Dupla hozzászólás automatikusan összefûzve. ( 2013. május 25. - 19:48:54 )
Nos,segítene valaki?