vip,admin,superadmin komandu sukurimas +paaiskinimas

[Steal]

Sveiki, pamoka nenuripinta ji bus kurta mano ir scriptas neistrauktas is gm

1.Pasidarome vip,admin,superadmin kategorijas kitaip sakant kad veiktu jie

einame i ***\data\playerDB.txt jai lengviau tai einame kur yra musu gm pwn failas spaudziame ant data aplankalo ir susirandam playerDB.txt ir tame faile susirandam:

bool:bilietas,

po jo parasome kodus arba koda:

bool:superadmin,
bool:admin,	
bool:vip,

jaigu jau yra pas jus tokia tai nereikia rasyt.

2.Dabar einame i savo gm, ***.pwn failiuka

susirandam komanda:

      if(!strcmp(cmdtext, "/blaivyti", true,9))
{
if(playerDB[playerid][specialybe]!=2){SendClientMessage(playerid,0x7DB34DFF,"* Si komanda tik medikams"); return 1;}
if(cmdtext[9]==0){SendClientMessage(playerid,0x7DB34DFF,"* Isblaivyti zmogu: /blaivyti [vardo_dalis]"); return 1;}
new vardas[MAX_PLAYER_NAME];
strmid(vardas,cmdtext[10],0,MAX_PLAYER_NAME);
new id = GetPlayeridMid(vardas);
if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, 0x7DB34DFF, "* Tokio vardo nera"); return 1;}
if (id == playerid){ SendClientMessage(playerid, 0x7DB34DFF, "* Saves blaivyti negali"); return 1;}
new Float:Coo[3];
GetPlayerPos(id,Coo[0],Coo[1],Coo[2]);
if(!PlayerToPoint(3, playerid, Coo[0],Coo[1],Coo[2])){SendClientMessage(playerid, 0x7DB34DFF, "* Zaidejas per toli, prieikite arciau."); return 1;}
if (playerDB[id][liga]!=0){ SendClientMessage(playerid, 0x7DB34DFF, "* Zaidejas serga, negali jo isblaivyti"); return 1;}
if(GetPlayerDrunkLevel(id) > 0)
{
SetPlayerDrunkLevel(id, 0);
SendClientMessage(id,0xD9E916FF,"* Jus buvote isblaivintas");
SendClientMessage(playerid,0xD9E916FF,"* Isblaivinote zaideja");
}
else
{
SendClientMessage(playerid,0x7DB34DFF,"* Zaidejas negirtas");
}
return 1;
}

arba kokia kita komanda ir po ja rasome koda:

//==============================================================================
//                                   VIP KOMANDOS                             //
//==============================================================================
if(!strcmp(cmdtext, "/vskin", true))
if(playerDB[playerid][vip] != true)
{
SetPlayerSkin(playerid, 28);
 SendClientMessage(playerid,0x00ff00,"Jus uzsidejote vip skina");
return 1;
}

ir toliau rasote... galyt dar koda sita iterpti prie vip komandu:

if(!strcmp(cmdtext, "/vheal", true))

if(playerDB[playerid][vip] != true)

{

SetPlayerHealth(playerid,100);

SetPlayerArmour(playerid,100);

return 1;

}

Dabar admin komandos:

po vip komando pabaigos dedam sita scripta:

//==============================================================================
//                                   ADMIN KOMANDOS                             //
//==============================================================================
if(!strcmp(cmdtext, "/askin", true))
if(playerDB[playerid][admin] != true)
{
SetPlayerSkin(playerid, 120);
 SendClientMessage(playerid,0x00ff00,"Jus uzsidejote admin skina");
return 1;
}

Po situ kodu rasot toliau savo arba kitus scriptus

nu ir superio komandos:

//==============================================================================
//                                   SADMIN KOMANDOS                             //
//==============================================================================
if(!strcmp(cmdtext, "/Sskin", true))
if(playerDB[playerid][superadmin] != true)
{
SetPlayerSkin(playerid, 120);
 SendClientMessage(playerid,0x00ff00,"Jus uzsidejote superadmino skina");
return 1;
}

nu dabar paaiskinimas:

 if(!strcmp(cmdtext, "/vskin", true))

Komanda kuria vesi zaidime per [t] tik ta teksta kuris yra tarp kabuciu!

if(playerDB[playerid][vip] != true)

Sitas kodas leidzia tik vip nariui nauduoti komanda

SetPlayerSkin

nustato kita skin

playerid

anksciau minetas "SetPl.." sita komanda veikia tik tam kuris paraso sita komanda

28

skinid ji galite susirasti:http://wiki.sa-mp.com/wiki/Skins:All

jai mes erroru rasikyt pataisisiu