Padėkit Dėl Kreditu.

[SCmindė]

Sveiki,Norėčiau sulaukti pagalbos. Man Dėl Kreditų Sistemos.Gal Kas Žino Kaip padaryti,kad Tik SuperAdministratoriams leistu juos duoti? Nes Leidžia,kad ir paprastiems žmonems ir +Jie Nekyla kas minute. Kad pades butinai +REP

[Same]

Va, kad tik superadmui:

 if(playerDB[playerid][superadmin] != true){SendClientMessage(playerid, RED, "* Tik superadminui!"); return 1;}
if(!strcmp(cmdtext, "/kredi", true,6))
 {
    // if(GetPlayerScore(playerid) < 3070){ SendClientMessage(playerid, COLOR, "* Jus dar negalite duoti kreditu, jus nepakankamai patyres 3070Xp"); return 1;}
 new tname[MAX_PLAYER_NAME];
 strmid(tname,GetArgument(1, cmdtext, 0),0,MAX_PLAYER_NAME);
 if(!strcmp(tname,"0",true)){SendClientMessage(playerid, COLOR, "* Duoti kreditu: /kredi [dalis nicko] [kiek]"); return 1;}
 new tid = GetPlayeridMid(tname);
 GetPlayerName(tid,tname,sizeof(tname));
 new tstring[256];
 tstring = GetArgument(2, cmdtext, 0);
 if(!IsNumeric(tstring)){SendClientMessage(playerid, COLOR, "* Duoti kreditu: /kredi [dalis nicko] [kiek (turi but skaicius)]"); return 1;}
 new moneys = StringToInt(tstring);
 if(moneys == 0){SendClientMessage(playerid, COLOR, "* Duoti kreditu: /kredi [dalis nicko] [kiek]"); return 1;}
       playerDB[tid][kreditai]+=moneys;
 new mess[256],name[MAX_PLAYER_NAME];
 GetPlayerName(playerid,name,sizeof(name));
 format(mess,sizeof(mess),"***[%s >> %i KRD] Gavote %i KRD is %s",name,moneys,moneys,name);
 SendClientMessage(tid,COLOR,mess);
 format(mess,sizeof(mess),"***[%i KRD >> %s] Davete %i KRD %s",moneys,tname,moneys,tname);
SavePlayerData(tid,false);
 SendClientMessage(playerid,COLOR,mess);
 return 1;
}

Susirask vieta kur xp i min gauni .

Kažkas panašaus į SetPlayerScore(playerid,GetPlayerScore(playerid)+random

Ir žemiau įrašyk:

    playerDB[playerid][kreditai]+=2;

Kur 2 gali pagal save keistis