scripting help(CMD: IP)
#9

Код:
CMD:getip(playerid,params[]) 
{ 
       if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,COLOR_RED,"You are not authorized to use this command!"); 
                new Target; 
                if(sscanf(params, "u", Target)) return SendClientMessage(playerid,-1,"Usage: /ip [playerid]"); 
                if(Target == INVALID_PLAYER_ID) return SendClientMessage(playerid,-1,"Invaild ID"); 
                new PIP[30]; 
                GetPlayerIp(Target,PIP,sizeof(PIP)); 
                new pstring[256]; 
                new Country[256];
                GetPlayerCountry(playerid,Country);
                new tname[MAX_PLAYER_NAME]; 
                GetPlayerName(Target,tname,sizeof(tname)); 
                format(pstring,sizeof(pstring),"%sґs IP:{FFFFFF} %s / Country : %s",tname,PIP,Country); 
                SendClientMessage(playerid,-1,pstring); 
    return 1; 
}
here you go.

Getplayercountry
Код:
GetPlayerCountry(playerid,Country[256]){
        new IPAddress[256];
        new a,b,c,d,ipf;
        new File:IPFile;
        new Text[256],start,end;
        GetPlayerIp(playerid,IPAddress,sizeof(IPAddress));
        GetParams(IPAddress);
        a=strval(Params[0]);
        b=strval(Params[1]);
        c=strval(Params[2]);
        d=strval(Params[3]);
        if(a==127 && b==0 && c==0 && d==1){
                format(Country,sizeof(Country),"Localhost");
                return 1;
        }
        ipf = (16777216*a) + (65536*b) + (256*c) + d;
        if(!fexist("CountriesIPs/IPLIST.csv")) return SendClientMessage(playerid,0xFF0000FF,"Country file not found.");
        IPFile=fopen("CountriesIPs/IPLIST.csv",io_read);
        fread(IPFile,Text,sizeof(Text),false);
        while(strlen(Text)>0){
            GetFileData(Text);
            start=strval(FileData[0]);
            end=strval(FileData[1]);
            if(ipf>=start && ipf<=end){
                        format(Country,sizeof(Country),"%s(%s)",FileData[6],FileData[5]);
                        fclose(IPFile);
                        return 1;
            }
            fread(IPFile,Text,sizeof(Text),false);
        }
        fclose(IPFile);
        return 1;
}
Reply


Messages In This Thread
scripting help(CMD: IP) - by Oshery - 22.10.2016, 20:34
Re: scripting help(CMD: IP) - by 1fret - 22.10.2016, 20:39
Re: scripting help(CMD: IP) - by Oshery - 22.10.2016, 22:07
Re: scripting help(CMD: IP) - by 1fret - 22.10.2016, 22:11
Re: scripting help(CMD: IP) - by ISmokezU - 23.10.2016, 00:45
Re: scripting help(CMD: IP) - by Oshery - 23.10.2016, 01:19
Re: scripting help(CMD: IP) - by RedMF - 23.10.2016, 03:06
Re: scripting help(CMD: IP) - by Oshery - 23.10.2016, 10:31
Re: scripting help(CMD: IP) - by ThatFag - 23.10.2016, 10:51
Re: scripting help(CMD: IP) - by Oshery - 23.10.2016, 15:20

Forum Jump:


Users browsing this thread: 2 Guest(s)