request: gm account blocker

[cadz]

hi i would like to request a blocker script like example you have 3 gm accounts only registered and when someone make a gm account it will auto block and only the 3 gm accounts registered can only log in to the game. thanks in advance.

[Capuche]

-    script    papery    -1,{
OnInit:
   setarray .@tmp$, 2000000, 2000001, 2000003;// account id GM team
   .account_gm$ = implode( .@tmp$, "|" );
   end;
OnPCLoginEvent:
   if( getgmlevel() && !compare( .account_gm$, getcharid(3) +"" ) )
       atcommand "@block "+ strcharinfo(0);
   end;
}

[Cisqua]

@ Capuche can i used this like this?

-	script	papery	-1,{
OnInit:
setarray .@tmp$, 2000000, 2000001, 2000003;// account id GM team
.account_gm$ = implode( .@tmp$, "|" );
end;
OnPCLoginEvent:
if( getgmlevel() && !compare( .account_gm$, getcharid(3) +"" ) )
	atcommand "@block "+ strcharinfo(0);
end;
}

- script papery -1,{
OnInit:
setarray .@tmp$,GM Test1, GM Test2, Gm Test3;// Name of GM team
.account_gm$ = implode( .@tmp$, "|" );
end;
OnPCLoginEvent:
if( getgmlevel() && !compare( .account_gm$, getcharid(3) +"" ) )
 atcommand "@block "+ strcharinfo(0);
end;
}

i want to script work like if gm making new character npc will block the new char og gm ... i want to implement all gm account 1 char only..

[Capuche]

If you use name

-    script    papery    -1,{
OnInit:
   setarray .account_gm$, "red", "blue", "green lantern";// GM names
   .size = getarraysize( .account_gm$ );
   end;
OnPCLoginEvent:
   if( getgmlevel() ) {
       for( .@i = 0; .@i < .size; .@i++ )
      	 if( .account_gm$[ .@i ] == strcharinfo(0) ) end;
       atcommand "@block "+ strcharinfo(0);
   }
   end;
}

Ugly but safe

[cadz]

btw this script when automatic log in auto block?

and sir how can i add block ip also @block then block ip. is this possible?

error

aaaaaa.bmp

Edited February 10, 2013 by cadz

[Cisqua]

@ cadz

sorry if i used your request to post mine here.

@ Capuche

this script will work if i have new gm and edit the script and use @unloadnpc then @loadnpc bla/bla/bla?

If you use name

-	script	papery	-1,{
OnInit:
setarray .account_gm$, "red", "blue", "green lantern";// GM names
.size = getarraysize( .account_gm$ );
end;
OnPCLoginEvent:
if( getgmlevel() ) {
	for( .@i = 0; .@i < .size; .@i++ )
   	 if( .account_gm$[ .@i ] == strcharinfo(0) ) end;
	atcommand "@block "+ strcharinfo(0);
}
end;
}

Ugly but safe

[cadz]

im ussing your script but give me error.

[Cisqua]

what kind of error? post the map server said so capuche can fix it

Edited February 10, 2013 by Cisqua

[cadz]

here

still there sir? anyone can help me T_T

aaaaaa.bmp

Edited February 10, 2013 by cadz

[nanakiwurtz]

Are you using rAthena?

Edited February 10, 2013 by nanakiwurtz

[Capuche]

still there sir? anyone can help me T_T

It's 'coz you use eathena ! bad boy

With ban ip (work on ea)

-	script	papery	-1,{
OnInit:
setarray .@tmp$, 2000000, 2000001, 2000003;// account id GM team
set .account_gm$, implode( .@tmp$, "|" );
end;
OnPCLoginEvent:
if( getgmlevel() && !compare( .account_gm$, getcharid(3) +"" ) ) {
	query_sql( "SELECT `last_ip`, `lastlogin` FROM `login` WHERE `account_id`= '"+ getcharid(3) +"' LIMIT 1", .@last_ip$, .@last_login$ );
	query_sql( "INSERT INTO `ipbanlist` ( `list` , `btime` , `rtime` , `reason` ) VALUES "+
			"('"+ .@last_ip$ +"', '"+ .@last_login$ +"', '2021-02-10 00:00:00', 'Block "+ escape_sql( strcharinfo(0) ) +"' )");
	atcommand "@block "+ strcharinfo(0);
}
end;
}

@Cisqua

this script will work if i have new gm and edit the script and use @unloadnpc then @loadnpc bla/bla/bla?

No but this one yes

-    script    papery    -1,{
OnPCLoginEvent:
   if( getgmlevel() ) {
       setarray .@account_gm$, "red", "blue", "green lantern";// GM names
       .@size = getarraysize( .@account_gm$ );
       for( .@i = 0; .@i < .@size; .@i++ )
           if( .@account_gm$[ .@i ] == strcharinfo(0) ) end;
       atcommand "@block "+ strcharinfo(0);
   }
   end;
}

Edit: LOL post at same time nanakiwurtz

Edited February 10, 2013 by Capuche

[Cisqua]

thank you Capuche. my probs solve.

[cadz]

eathena im using

Are you using rAthena?

eathena =)

still there sir? anyone can help me T_T

It's 'coz you use eathena ! bad boy

With ban ip (work on ea)

-	script	papery	-1,{
OnInit:
setarray .@tmp$, 2000000, 2000001, 2000003;// account id GM team
set .account_gm$, implode( .@tmp$, "|" );
end;
OnPCLoginEvent:
if( getgmlevel() && !compare( .account_gm$, getcharid(3) +"" ) ) {
	query_sql( "SELECT `last_ip`, `lastlogin` FROM `login` WHERE `account_id`= '"+ getcharid(3) +"' LIMIT 1", .@last_ip$, .@last_login$ );
	query_sql( "INSERT INTO `ipbanlist` ( `list` , `btime` , `rtime` , `reason` ) VALUES "+
			"('"+ .@last_ip$ +"', '"+ .@last_login$ +"', '2021-02-10 00:00:00', 'Block "+ escape_sql( strcharinfo(0) ) +"' )");
	atcommand "@block "+ strcharinfo(0);
}
end;
}

@Cisqua

this script will work if i have new gm and edit the script and use @unloadnpc then @loadnpc bla/bla/bla?

No but this one yes

-	script	papery	-1,{
OnPCLoginEvent:
if( getgmlevel() ) {
	setarray .@account_gm$, "red", "blue", "green lantern";// GM names
	.@size = getarraysize( .@account_gm$ );
	for( .@i = 0; .@i < .@size; .@i++ )
		if( .@account_gm$[ .@i ] == strcharinfo(0) ) end;
	atcommand "@block "+ strcharinfo(0);
}
end;
}

Edit: LOL post at same time nanakiwurtz

im using eathena i forgot to tell sorry my bad =) checking it now if its working

same error

[Emistry]

http://pastebin.com/raw.php?i=hmfT4TZ0

[cadz]

master emistry can this script can block ip adress too?

b

http://pastebin.com/raw.php?i=hmfT4TZ0

script is working but master they blocking all gm accounts even in the set arrays. i just want not to block all in the set arrays when accounts is not in the set array will automatically block.

[Emistry]

missing some variable...

try this..

http://pastebin.com/raw.php?i=8yFzaFMj

[Capuche]

With ban ip (work on ea)

-	script	papery	-1,{
OnInit:
setarray .@tmp$, 2000000, 2000001, 2000003;// account id GM team
set .account_gm$, implode( .@tmp$, "|" );
end;
OnPCLoginEvent:
if( getgmlevel() && !compare( .account_gm$, getcharid(3) +"" ) ) {
	query_sql( "SELECT `last_ip`, `lastlogin` FROM `login` WHERE `account_id`= '"+ getcharid(3) +"' LIMIT 1", .@last_ip$, .@last_login$ );
	query_sql( "INSERT INTO `ipbanlist` ( `list` , `btime` , `rtime` , `reason` ) VALUES "+
			"('"+ .@last_ip$ +"', '"+ .@last_login$ +"', '2021-02-10 00:00:00', 'Block "+ escape_sql( strcharinfo(0) ) +"' )");
	atcommand "@block "+ strcharinfo(0);
}
end;
}

missing some variable...

try this..

http://pastebin.com/raw.php?i=8yFzaFMj

I forgot this method.. nice

[cadz]

thanks a lot already fix and 100% good thanks to you master and capuche more power! and God bless =)