[PAMOKA Nr.1] GUI Administracijos panelė [RPG] PiKaSoO

[PiKaSoO]

Sveiki, taigi pristatau savo pirmają pamoką(tiksliau skripto gabalą.) : Administracijos Panelė [GUI]

Kas tai :

Administracijos panelė tai sistemą per kurią galima valdyti administracijos galimybęs.

Pradėkim.

1. Komandos sukūrimas

Na nežinau ar pas jus yra zcmd tad darau ir su zcmd ir su ssancf

COMMAND:adminkomandos(playerid,params[])
{
if(!PlayerInfo[playerid][Admin])return 1;
   ShowPlayerDialog( playerid, 3220 , DIALOG_STYLE_LIST, "[PiKaSoO]Administracijos valdymas" ,"1. Skelbti Administracijos žinutę\n2. Rašyti į admin čatą\n3. Pasiimti administracijos ginklus\n4. Pasigydyti\n5. Pagydyti mašiną\n6. Baninti žaidėją\n7. Kickinti žaidėją\n8. Pagydyti žaidėją\n9. Atkelti žaidėją\n10. Nukeliauti pas žaidėją","Pasirinkti","");
return 1;
}

2. Dialogo sukurimas

  if(dialogid == 3220)
  {
  if(response)
  {
  if(listitem == 0)
  {
  ShowPlayerDialog(playerid,3221,DIALOG_STYLE_INPUT,"Skelbti žinutę","{ffffff}Įrašykite tekstą","Skelbti","Atšaukti");
  }
  if(listitem == 1)
  {
  ShowPlayerDialog(playerid,3222,DIALOG_STYLE_INPUT,"Skelbti žinutę į admin čatą","{ffffff}Irašykite norima tekstą","Rašyti","Atšaukti");
  }
  if(listitem == 2)
  {
  GivePlayerWeapon(playerid, 24, 1000);
  GivePlayerWeapon(playerid, 27, 1000);
  GivePlayerWeapon(playerid, 31, 1000);
  GivePlayerWeapon(playerid, 32, 1000);

  }
  if(listitem == 3)
  {
  SetPlayerHealth(playerid,100);
  SetPlayerArmour(playerid,100);
  }
  if(listitem == 4)
  {
  if(IsPlayerInAnyVehicle(playerid)) SetVehicleHealth(GetPlayerVehicleID(playerid),1000);
  }
  if(listitem == 5)
  {
  ShowPlayerDialog(playerid,3223,DIALOG_STYLE_INPUT,"Baninti žaidėją.","{ffffff}Irašykite žaidėjo vardą","Ban","Atšaukti");
  }
  if(listitem == 6)
  {
  ShowPlayerDialog(playerid,3224,DIALOG_STYLE_INPUT,"Išmesti žaidėją.","{ffffff}Irašykite žaidėjo vardą","Kick","Atšaukti");
  }
  if(listitem == 7)
  {
  ShowPlayerDialog(playerid,3225,DIALOG_STYLE_INPUT,"Pagydyti žaidėją.","{ffffff}Irašykite žaidėjo vardą","Keliauti","Atšaukti");
  }
  if(listitem == 8)
  {
  ShowPlayerDialog(playerid,3226,DIALOG_STYLE_INPUT,"Atgetinti žaidėja.","{ffffff}Irašykite žaidėjo vardą","GET","Atšaukti");
  }
  if(listitem == 9)
  {
  ShowPlayerDialog(playerid,3227,DIALOG_STYLE_INPUT,"Keliauti pas žaidėją","{ffffff}Irašykite žaidėjo vardą","Keliauti","Atšaukti");
  }
  }
  return 1;
  }

  if(dialogid == 3221)
  {
  new zin[256],vardas[MAX_PLAYER_NAME];
  GetPlayerName(playerid,vardas,MAX_PLAYER_NAME);
  format(zin,sizeof(zin),"Administratorius %s :{FFFFFF} %s",vardas,inputtext);
  SendClientMessageToAll(-1,zin);
  return 1;
  }
  if(dialogid == 3222)
  {
  new zin[256],vardas[MAX_PLAYER_NAME];
  GetPlayerName(playerid,vardas,MAX_PLAYER_NAME);
  format(zin,sizeof(zin),"[ADMIN CHAT] %s : %s",vardas,inputtext);
  for(new i=0;i   if(IsPlayerConnected(i)){
  if(PlayerInfo[i][Admin]){
  SendClientMessage(i,-1,zin);
  }
  }
  }
  return 1;
  }
  if(dialogid == 3223)
  {
new vardas[MAX_PLAYER_NAME];
strmid(vardas,GetArgument(1, inputtext,0),0,MAX_PLAYER_NAME);
new id = GetPlayeridMid(vardas);
if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, -1, "ŽAIDĖJO NĖRA."); return 1;}
new msg[128],adminname[MAX_PLAYER_NAME];
GetPlayerName(id,vardas,sizeof(vardas));
GetPlayerName(playerid,adminname,sizeof(adminname));
format(msg,sizeof(msg),"[bAN] %s užblokavo jus",adminname);
SendClientMessage(id,-1,msg);
Ban(id);
format(msg,sizeof(msg),"[bAN] %s užblokavo %s serveryje.",adminname,vardas);
SendClientMessageToAll(-1,msg);
  return 1;
  }
  if(dialogid == 3224)
  {
  new vardas[MAX_PLAYER_NAME];
  strmid(vardas,GetArgument(1, inputtext,0),0,MAX_PLAYER_NAME);
  new id = GetPlayeridMid(vardas);
  if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, -1,"ŽAIDĖJO NĖRA."); return 1;}
  new msg[128],adminname[MAX_PLAYER_NAME];
  GetPlayerName(id,vardas,sizeof(vardas));
  GetPlayerName(playerid,adminname,sizeof(adminname));
  Kick(id);
  format(msg,sizeof(msg),"[KICK] %s išmete %s iš serverio.",adminname,vardas);
  SendClientMessageToAll(-1,msg);
  return 1;
  }
  if(dialogid == 3225)
  {
      		new vardas[MAX_PLAYER_NAME];
			strmid(vardas,inputtext[6],0,MAX_PLAYER_NAME);
			new id = GetPlayeridMid(vardas);
			if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, -1, "ŽAIDĖJO NĖRA."); return 1;}
		new mess[256],name[MAX_PLAYER_NAME],rec[MAX_PLAYER_NAME];
		GetPlayerName(playerid,name,sizeof(name));
		GetPlayerName(id,rec,sizeof(rec));
		format(mess,sizeof(mess),"%s tave pagydė.",name);
		SendClientMessage(id,-1,mess);
		format(mess,sizeof(mess),"Pagydei %s",rec);
		SendClientMessage(playerid,-1,mess);
		SetPlayerHealth(id,100);
		SetPlayerArmour(id,100);
  return 1;
  }
        if(dialogid == 3226)
  {
  new vardas[MAX_PLAYER_NAME];
  strmid(vardas,inputtext,0,MAX_PLAYER_NAME);
  new id = GetPlayeridMid(vardas);
  if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, -1,"ŽAIDĖJO NĖRA."); return 1;}
  SetPlayerInterior(playerid,GetPlayerInterior(id));
  new Float:tempcoo[3];
  GetPlayerPos(id,tempcoo[0],tempcoo[1],tempcoo[2]);
  SetPlayerPos(playerid,tempcoo[0],tempcoo[1],tempcoo[2]);
  SetCameraBehindPlayer(playerid);
  return 1;
  }
     if(dialogid == 3227)
  {
  new vardas[MAX_PLAYER_NAME];
  strmid(vardas,inputtext,0,MAX_PLAYER_NAME);
  new id = GetPlayeridMid(vardas);
  if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, -1,"ŽAIDĖJO NĖRA."); return 1;}
  SetPlayerInterior(id,GetPlayerInterior(playerid));
  new Float:tempcoo[3];
  GetPlayerPos(playerid,tempcoo[0],tempcoo[1],tempcoo[2]);
  SetPlayerPos(id,tempcoo[0],tempcoo[1],tempcoo[2]);
  SetCameraBehindPlayer(id);
  return 1;
  }

Tai va viskas tokia ir pamoka šeip čia skripto gabalas ir primenu čia mano pirmoji pamoka

2012 @ PiKaSoO

[Tautvis !]

Lengvas dalykas, ir jau buvo tokia pamoka sukurta.

[PiKaSoO]

Ne tokią , buvo grp ir visai kitokia, gal panašumu yra