Szerző Téma: VIP/név/mellet (Megtekintve 1193 alkalommal)

ZSOLTI99 · « **Dátum:** 2013. március 05. - 17:08:40 »

Sziasztok szeretnék tõletek kérni egy olyan VIP ami olyan hogy ír valamit a player és a neve mellet írja V.I.P pl így haver lesz a név
HAVER V.I.P és a V.I.P az sárga legyen ha bár nem muszáj majd meg csinálom hogy sárga legyen a parancsokról annyit kb 15 parancs legyen tudjon getelni portolni fontos csak VIP Taghoz tudjon portolni máshoz!! És még legyen VIP help és online VIP .....
3 szintû VIP legyen ha lehetne
Köszönöm a segítséget.....

instant · « **Válasz #1 Dátum:** 2013. március 06. - 17:13:48 »

#include a_samp
#include sscanf2
#include zcmd
#include dini
#include dudb
#include dutils
#include colors
#pragma unused ret_memcpy
enum pInfo
{
VIP
};
new PlayerInfo[MAX_PLAYERS][pInfo];
new file[128],str[128];
new player1;
CMD:vips(playerid,params[])
{
new string[250];
SendClientMessage(playerid,COLOR_GREEN,\"____]Online V.I.P Tagok [_____\");
for(new v;v<GetMaxPlayers();v++)
{
if(GetPVarInt(v,\"VIP\") > 0)
{
format(string,250,\"%s V.I.P Szint:%d\",pName(v),GetPVarInt(v,\"VIP\"));
SendClientMessage(playerid,COLOR_GREEN,string);
}
}
return 1;
}
CMD:setvip(playerid, params[])
{
if(IsPlayerAdmin(playerid))
{
new
string[350],
vlevel;
if(sscanf(params,\"ui\",playerid, vlevel)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /setvip id level (1-3)!\");
if(vlevel <0  || vlevel > 3) return SendClientMessage(playerid,COLOR_RED,\"Csak 1 - 3 VIP SZINT Közt van!\");
if( playerid == INVALID_PLAYER_ID ) return SendClientMessage( playerid, COLOR_RED, \"HIBA: Nem létezõ azonosító!\" );
SetPVarInt(playerid,\"VIP\",vlevel);
format(string,350,\"***%s(%d) {00f7ff}nevû admin kinevezett téged {ff0000}%d V.I.P-nak!\",pName(playerid),playerid,GetPVarInt(playerid,\"VIP\"));
SendClientMessage( playerid,COLOR_GREEN,string);
if(vlevel > GetPVarInt(playerid,\"VIP\")) return SendClientMessage( playerid,COLOR_GREEN,\"VIP Szinted növekedett!\");
if(vlevel < GetPVarInt(playerid,\"VIP\")) return SendClientMessage( playerid,COLOR_GREEN,\"VIP Szintedet elvonták!\");
PlayerPlaySound(playerid, 1056, 0, 0, 0);
SetPlayerColor(player1,COLOR_YELLOW);
format(file,sizeof(file),\"%s.ini\",pName(playerid));
dini_IntSet(file,\"VIP\",vlevel);
}
else SendClientMessage( playerid, COLOR_RED, \"Nem vagy RCON Admin!\" );
return 1;
}
CMD:vkick(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 3)
{
new target,reason[50];
if(sscanf(params,\"us[50]\",target,reason)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /kick <Játékos> < Indok>\");
if(target == INVALID_PLAYER_ID)return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(target == playerid) return SendClientMessage(playerid,COLOR_RED,\"Magadat nem rughatod ki balfácán!\");
    format(str,sizeof(str),\"V.I.P :%s kickelte %s játékost! Indoka : %s\",pName(playerid),pName(target),reason);
    SendClientMessageToAll(COLOR_LIGHTBLUE,str);
    Kick(target);
    return 1;
    } else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3 as szintü VIP-nak szükséges!\");
}
CMD:vjail(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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 szintû 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), \"*** VIP: %s börtönbe zárta %s nevû 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 szintû VIP-nak kéne lenned!\");
}
CMD:vunjail(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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), \"***VIP: %s kiengedett téged a börtönbõl.\", pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
        SpawnPlayer(player1);
format(str,sizeof(str), \"*** Admin: %s kiengedte a börtönbõl %s nevû 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 szintû VIP-nak kéne lenned!\");
}
CMD:vfreeze(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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), \"*** VIP: %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 szintû VIP-nak kéne lenned!\");
}
CMD:vunfreeze(playerid,params[])
{
    if(GetPVarInt(playerid, \"VIP\") >= 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), \"*** VIP: %s levette a fagyasztást rólad.\",pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
TogglePlayerControllable(player1,1);
format(str,sizeof(str),\"*** VIP: %s levette a fagyasztást %s nevû 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 szintû VIP-nak kéne lenned!\");
}
CMD:vgod( playerid )
{
if(GetPVarInt(playerid,\"VIP\") >= 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 szintû VIP-nak kéne lenned!\");
}
CMD:vskin(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >= 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 szintû VIP-nak kéne lenned!\");
}
CMD:vcarrespawn(playerid,params[])
{
new string[250];
if(GetPVarInt(playerid,\"VIP\") >= 3)
{
for(new cars; cars <MAX_VEHICLES; cars++)
{
SetVehicleToRespawn(cars);
}
format(string,250,\"-VIP-%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 szintû VIP-nak kéne lenned!\");
}
CMD:vcar(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >= 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ármûid][szin1][szin2]\");
if(id < 400 || id > 611) return SendClientMessage(playerid,COLOR_RED,\"Csak 400tól 611ig vannak a jármûid!\");
CreateVehicle(id,X+2,Y+2,Z+2,Rot,color1,color2,0);
SendClientMessage(playerid,COLOR_GREEN,\"Sikeresen lekérted a jármûvet!\");
DestroyVehicle(id);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vgoto(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 2) return SendClientMessage(playerid, 0xE60000FF, \"Ezt a parancsot max 2.es szintû V.I.P 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 Vip tag hozzád teleportált!\");
}
return 1;
}
CMD:veject(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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 szintû VIP-nak kéne lenned!\");
}
CMD:vsay(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >=3)
{
new uzenet[1000],string[200];
if(sscanf(params,\"s[1000]\",uzenet)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /vsay [Üzenet]\");
format(string,sizeof(string),\"-VIP-{ff0000}%s : {ffffff}%s\",pName(playerid),uzenet);
SendClientMessageToAll(COLOR_GREEN,string);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vjetpack(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >=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 szintû VIP-nak kéne lenned!\");
}
CMD:vhelp(playerid)
{
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
SendClientMessage(playerid,COLOR_RED,\"____]VIP HELP[____\");
SendClientMessage(playerid,COLOR_GREEN,\"Level1:/vcar /vskin /vjetpack /vfreeze /vunfreeze\");
SendClientMessage(playerid,COLOR_GREEN,\"Level2:/vgoto /vgod /vgodoff /vjail /vunjail\");
SendClientMessage(playerid,COLOR_GREEN,\"Level3:/vsay /veject /vcarrespawn /vkick\");
SendClientMessage(playerid,COLOR_RED,\"____]VIP HELP[____\");
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz minimum 1 es szintû vipnak kéne lenned!\");
}
public OnPlayerText(playerid,text[])
{
new asd[128];
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
format(asd,sizeof(asd),\"%s [VIP]:%s\",pName(playerid),text);
SendClientMessageToAll(-1,asd);
return 0;
}
public OnPlayerConnect(playerid)
{
PlayerInfo[playerid][VIP] = 0;
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(!fexist(file))
{
dini_Create(file);
dini_IntSet(file,\"VIP\",GetPVarInt(playerid,\"VIP\"));
}
if(fexist(file))
{
SetPVarInt(playerid,\"VIP\",dini_Int(file,\"VIP\"));
}
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(fexist(file))
{
SetPVarInt(playerid,\"VIP\",GetPVarInt(playerid,\"VIP\"));
}
return 1;
}
stock pName( playerid )
{
new
   s_szPlayerName[ MAX_PLAYER_NAME ];
GetPlayerName( playerid, s_szPlayerName, MAX_PLAYER_NAME );
return s_szPlayerName;
}

nem teszteltem hátha .
A VIP Rendszer teljes része tesztelve van , csak az onplayertext új benne

ZSOLTI99 · « **Válasz #2 Dátum:** 2013. március 06. - 17:30:01 »

Köszi

Scripter,mapper [Aldo] · « **Válasz #3 Dátum:** 2013. március 06. - 17:36:30 »

Thank you KaH bácsi
Szerk:
Ezt,hogy javítjam?

C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(26) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(44) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(50) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(64) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(64) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(69) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(86) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(100) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(100) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(101) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(102) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(103) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(103) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(105) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(119) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(131) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(134) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(134) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(135) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(137) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(138) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(150) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(155) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(156) : warning 217: loose indentation
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(183) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(236) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(268) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(270) : error 079: inconsistent return types (array & non-array)
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(272) : error 029: invalid expression, assumed zero
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(272) : error 004: function \"OnPlayerConnect\" is not implemented
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(276) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(287) : error 079: inconsistent return types (array & non-array)
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(289) : warning 225: unreachable code
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(289) : error 029: invalid expression, assumed zero
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(289) : error 004: function \"OnPlayerDisconnect\" is not implemented
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(292) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(297) : error 079: inconsistent return types (array & non-array)
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(299) : warning 225: unreachable code
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(299) : error 029: invalid expression, assumed zero
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(299) : error 017: undefined symbol \"pName\"
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(305) : error 090: public functions may not return arrays (symbol \"OnPlayerText\")
C:\\Users\\ALDO\\Desktop\\Funcool 2\\filterscripts\\vip100.pwn(308) : error 030: compound statement not closed at the end of file (started at line 265)
Compilation aborted.Pawn compiler 3.2.3664           Copyright (c) 1997-2006, ITB CompuPhase
 
26 Errors.

ZSOLTI99 · « **Válasz #4 Dátum:** 2013. március 06. - 18:49:40 »

Meg nézem hogy nekem van-e benne error

Dupla hozzászólás automatikusan összefûzve. ( 2013. március 06. - 18:58:36 )

Ugyan ez van nekem is error

Benceee · « **Válasz #5 Dátum:** 2013. március 06. - 19:02:43 »

[mod]Megkérek mindenkit, hogy a felesleges hozzászólásokat kerülje!
Pl.: \'Jó sok errorod van.\'[/mod]

instant · « **Válasz #6 Dátum:** 2013. március 07. - 15:41:51 »

amire jelzi azt a pName hibát azt cseréljétek ki erre : pName(playerid)-re ..
és a warning 217 : loose indentation az csak sor eltolódás
E:

#include a_samp
#include sscanf2
#include zcmd
#include dini
#include dudb
#include dutils
#pragma unused ret_memcpy
#define COLOR_GREY 0x375FFFFF
#define COLOR_GREEN 0x33FF33AA
#define COLOR_RED 0xFF0000AA
#define COLOR_YELLOW 0xFF9900AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_BLUE 0x33CCFFAA //0x6495EDFF
#define COLOR_DARKBLUE 0x375FFFFF
#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_ORANGE 0xFF9900AA
#define COLOR_BASIC 0x0066FFAA
#define COLOR_SYSTEM 0xEFEFF7AA
#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_GREENYELLOW 0xADFF2FFF
#define COLOR_FLBLUE 0x6495EDAA
#define COLOR_BLACK 0x000000AA
#define COLOR_PINK 0xFF66FFAA
#define COLOR_LIME 0x99FF00AA
#define COLOR_DARKGREEN 0x33AA33AA
#define COLOR_BROWN  0x66330089
#define COLOR_STEELBLUE 0xB0C4DEFF
#define COLOR_LIGHTGREEN 0x00FF7FFF// stock
enum pInfo
{
VIP
};
new PlayerInfo[MAX_PLAYERS][pInfo];
new file[128],str[128];
new player1;
CMD:vips(playerid,params[])
{
new string[250];
SendClientMessage(playerid,COLOR_GREEN,\"____]Online V.I.P Tagok [_____\");
for(new v;v<GetMaxPlayers();v++)
{
if(GetPVarInt(v,\"VIP\") > 0)
{
format(string,250,\"%s V.I.P Szint:%d\",pName(v),GetPVarInt(v,\"VIP\"));
SendClientMessage(playerid,COLOR_GREEN,string);
}
}
return 1;
}
CMD:setvip(playerid, params[])
{
if(IsPlayerAdmin(playerid))
{
new
string[350],
vlevel;
if(sscanf(params,\"ui\",playerid, vlevel)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /setvip id level (1-3)!\");
if(vlevel <0  || vlevel > 3) return SendClientMessage(playerid,COLOR_RED,\"Csak 1 - 3 VIP SZINT Közt van!\");
if( playerid == INVALID_PLAYER_ID ) return SendClientMessage( playerid, COLOR_RED, \"HIBA: Nem létezõ azonosító!\" );
SetPVarInt(playerid,\"VIP\",vlevel);
format(string,350,\"***%s(%d) {00f7ff}nevû admin kinevezett téged {ff0000}%d V.I.P-nak!\",pName(playerid),playerid,GetPVarInt(playerid,\"VIP\"));
SendClientMessage( playerid,COLOR_GREEN,string);
if(vlevel > GetPVarInt(playerid,\"VIP\")) return SendClientMessage( playerid,COLOR_GREEN,\"VIP Szinted növekedett!\");
if(vlevel < GetPVarInt(playerid,\"VIP\")) return SendClientMessage( playerid,COLOR_GREEN,\"VIP Szintedet elvonták!\");
PlayerPlaySound(playerid, 1056, 0, 0, 0);
SetPlayerColor(player1,COLOR_YELLOW);
format(file,sizeof(file),\"%s.ini\",pName(playerid));
dini_IntSet(file,\"VIP\",vlevel);
}
else SendClientMessage( playerid, COLOR_RED, \"Nem vagy RCON Admin!\" );
return 1;
}
CMD:vkick(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 3)
{
new target,reason[50];
if(sscanf(params,\"us[50]\",target,reason)) return SendClientMessage(playerid,COLOR_RED,\"Használat : /kick <Játékos> < Indok>\");
if(target == INVALID_PLAYER_ID)return SendClientMessage(playerid, COLOR_RED, \"HIBA: Játékos nincs csatlakozva!\");
if(target == playerid) return SendClientMessage(playerid,COLOR_RED,\"Magadat nem rughatod ki balfácán!\");
format(str,sizeof(str),\"V.I.P :%s kickelte %s játékost! Indoka : %s\",pName(playerid),pName(target),reason);
SendClientMessageToAll(COLOR_LIGHTBLUE,str);
Kick(target);
return 1;
} else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3 as szintü VIP-nak szükséges!\");
}
CMD:vjail(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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 szintû 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), \"*** VIP: %s börtönbe zárta %s nevû 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 szintû VIP-nak kéne lenned!\");
}
CMD:vunjail(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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), \"***VIP: %s kiengedett téged a börtönbõl.\", pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
SpawnPlayer(player1);
format(str,sizeof(str), \"*** Admin: %s kiengedte a börtönbõl %s nevû 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 szintû VIP-nak kéne lenned!\");
}
CMD:vfreeze(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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), \"*** VIP: %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 szintû VIP-nak kéne lenned!\");
}
CMD:vunfreeze(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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), \"*** VIP: %s levette a fagyasztást rólad.\",pName(playerid));
SendClientMessage(player1, COLOR_BLUE,str);
TogglePlayerControllable(player1,1);
format(str,sizeof(str),\"*** VIP: %s levette a fagyasztást %s nevû 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 szintû VIP-nak kéne lenned!\");
}
CMD:vgod( playerid )
{
if(GetPVarInt(playerid,\"VIP\") >= 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 szintû VIP-nak kéne lenned!\");
}
CMD:vskin(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >= 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 szintû VIP-nak kéne lenned!\");
}
CMD:vcarrespawn(playerid,params[])
{
new string[250];
if(GetPVarInt(playerid,\"VIP\") >= 3)
{
for(new cars; cars <MAX_VEHICLES; cars++)
{
SetVehicleToRespawn(cars);
}
format(string,250,\"-VIP-%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 szintû VIP-nak kéne lenned!\");
}
CMD:vcar(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >= 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ármûid][szin1][szin2]\");
if(id < 400 || id > 611) return SendClientMessage(playerid,COLOR_RED,\"Csak 400tól 611ig vannak a jármûid!\");
CreateVehicle(id,X+2,Y+2,Z+2,Rot,color1,color2,0);
SendClientMessage(playerid,COLOR_GREEN,\"Sikeresen lekérted a jármûvet!\");
DestroyVehicle(id);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 1-es szintû VIP-nak kéne lenned!\");
}
CMD:vgoto(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 2) return SendClientMessage(playerid, 0xE60000FF, \"Ezt a parancsot max 2.es szintû V.I.P 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 Vip tag hozzád teleportált!\");
}
return 1;
}
CMD:veject(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >= 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 szintû VIP-nak kéne lenned!\");
}
CMD:vsay(playerid,params[])
{
if(GetPVarInt(playerid, \"VIP\") >=3)
{
new uzenet[1000],string[200];
if(sscanf(params,\"s[1000]\",uzenet)) return SendClientMessage(playerid,COLOR_YELLOW,\"Használat /vsay [Üzenet]\");
format(string,sizeof(string),\"-VIP-{ff0000}%s : {ffffff}%s\",pName(playerid),uzenet);
SendClientMessageToAll(COLOR_GREEN,string);
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz 3-as szintû VIP-nak kéne lenned!\");
}
CMD:vjetpack(playerid,params[])
{
if(GetPVarInt(playerid,\"VIP\") >=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 szintû VIP-nak kéne lenned!\");
}
CMD:vhelp(playerid)
{
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
SendClientMessage(playerid,COLOR_RED,\"____]VIP HELP[____\");
SendClientMessage(playerid,COLOR_GREEN,\"Level1:/vcar /vskin /vjetpack /vfreeze /vunfreeze\");
SendClientMessage(playerid,COLOR_GREEN,\"Level2:/vgoto /vgod /vgodoff /vjail /vunjail\");
SendClientMessage(playerid,COLOR_GREEN,\"Level3:/vsay /veject /vcarrespawn /vkick\");
SendClientMessage(playerid,COLOR_RED,\"____]VIP HELP[____\");
return 1;
}else return SendClientMessage(playerid,COLOR_RED,\"HIBA: Ehez a parancshoz minimum 1 es szintû vipnak kéne lenned!\");
}
public OnPlayerText(playerid,text[])
{
new asd[128];
if(GetPVarInt(playerid,\"VIP\") >= 1)
{
format(asd,sizeof(asd),\"%s [VIP]:%s\",pName(playerid),text);
SendClientMessageToAll(-1,asd);
}
return 0;
}
public OnPlayerConnect(playerid)
{
PlayerInfo[playerid][VIP] = 0;
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(!fexist(file))
{
dini_Create(file);
dini_IntSet(file,\"VIP\",GetPVarInt(playerid,\"VIP\"));
}
if(fexist(file))
{
SetPVarInt(playerid,\"VIP\",dini_Int(file,\"VIP\"));
}
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
format(file,sizeof(file),\"%s.ini\",pName(playerid));
if(fexist(file))
{
SetPVarInt(playerid,\"VIP\",GetPVarInt(playerid,\"VIP\"));
}
return 1;
}
stock pName(playerid)
{
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid,name,sizeof(name));
return name;
}

kijavítva az összes hiba xd

Scripter,mapper [Aldo] · « **Válasz #7 Dátum:** 2013. március 11. - 18:23:28 »

Köszi,nagyon sokat segítettél