Duel login restriction for some maps

[caspe 16]

Hello i need help with this Duel Login check script

Currently whenever i enter turbo_room with dual accounts logged in, it kicks me out.

------------------------------------------------------------------------------------------------------------------------------------

What i want

Even if user has dual account logged in, it should allow at list one character to stay on turbo_room.

Spoiler

-    script    dualcheckkk    -1,{

OnPCLoadMapEvent:
getmapxy @map$,@x,@y,0;
if (@map$ == "turbo_room")
{
    query_sql( "SELECT `last_ip` FROM `login` WHERE account_id="+getcharid(3)+"",.@IP );
    query_sql( "SELECT `account_id` FROM `login` WHERE last_ip="+.@IP+"",.@Accountlist );
    for( set .@i,0; .@i < getarraysize( .@Accountlist );
    set .@i,.@i + 1 )    if( isloggedin( .@Accountlist[.@i] ) )
        set .@DetectedOnline,.@DetectedOnline + 1;
        if(.@DetectedOnline > 1){
        mes "We detected there is "+.@DetectedOnline+" Users with same IP Logged in.";
        mes "Please log off these unused account.";
        close2;
        warp "prontera",155,181;
    }
}
end;
}

turbo_room    mapflag    loadevent

 

I'm also getting this message in Map-server, hope some one will help.

[caspe 16]

Ok i found a solution

here is the script which i used, work perfect.

https://rathena.org/board/topic/57397-forbidden-same-ip-on-few-maps/?do=findComment&comment=70840

 

this script kicking me out even if there is no dual login, still finding for solution.

Edited January 27, 2018 by caspe

[Murilo BiO' 26]

Hey, I think this may help:

Spoiler

-	script	::dual_check	FAKE_NPC,{
OnInit:
	//-- Configuration
	.VerifiedMap$ = "turbo_room";  ///< The map where we will verify for same ip
	.Message$     = _("You can access this map with only account per IP."); ///< Message that will be displayed
	.WarpMap$     = "prontera";    ///< The map where we will warp the player if it is a dual account
	.WarpX        = 155;           ///< X coordinate to warp the character
	.WarpY        = 181;           ///< Y coordinate to warp the character
	

	//-- Initialization
	deletearray(.IP_List$[0], getarraysize(.IP_List$));
	end();
OnPCLoadMapEvent:
	if (strcharinfo(PC_MAP) != .VerifiedMap$)
		end();

	.@ip$ = getcharip();
	for (.@i = 0; .@i < getarraysize(.IP_List$); .@i++) {
		if (.@ip$ != .IP_List$[.@i])
			continue;

		warp(.WarpMap$, .WarpX, .WarpY, false); // 4th argument will prevent ending the script
		dispbottom(.Message$, 0xFF0000);
		end();
	}

	// If it got this far it's a new IP
	.IP_List$[getarraysize(.IP_List$)] = .@ip$;
	end();

OnPCLogoutEvent:
	if (strcharinfo(PC_MAP) != .VerifiedMap$)
		end();
	
	.@ip$ = getcharip();
	for (.@i = 0; .@i < getarraysize(.IP_List$); .@i++) {
		if (.@ip$ != .IP_List$[.@i])
			continue;

		// Assuming that will be only 1 match on the whole array.
		deletearray(.IP_List$[.@i], 1);
		end();
	}
}

 

but notice that it will only work if the only way to get out of this map is through disconnecting (logout).

Is there any other way to get out of this map on your server?

 

@edit:

I almost forgot the warnings you got. You need to increase the value of MAX_EVENTQUEUE inside map.h

O

Edited January 27, 2018 by Murilo BiO'

[caspe 16]

Thank your for reply, 

Well server has .@go command

i will test this and post results. 

[Murilo BiO' 26]

so you should apply a mapflag to prevent use of @go and I don't know, maybe add a portal that will call the last part of the script to remove the IP from the list.

Otherwise it will block this ip forever haha