Jump to content

Freya Jorgenson

Members
  • Posts

    146
  • Joined

  • Last visited

Posts posted by Freya Jorgenson

  1. On 3/6/2021 at 8:37 PM, Chaos92 said:

    as it said, mob poring doesnt exist.

    its regarding your mob db yml files. go check any files that you touch/edit before regarding that either in pre-re or re.

    Hi, sorry for the late response. I already fixed this at the time of your reply. Thanks much.

  2. Hello All,

    I just got back to working on server files again after being out of the loop for 6 years and I am having this issue with my server.
    image.png.7b5feb04e62420365b60b6d783ba7922.png

    It was working fine and all of a sudden started to give me random errors that caused my map server to crash.

    I have not done anything yet aside from trying to disable some items and cards.

    Please help.

  3. Hi, 

    I would like to ask how to activate /lightmap when a player logs in to the game.

     

    There are some people who choose to disable it ALWAYS, but I would want them to have it enabled to see some effects and if they dont want it they can disable after.

     

     

    Thanks in advance.

  4. Thank you Capuche. It is working great.

     



    I have also seen how you help the other thread starter regarding on adding a timer and countdown and block the moves.

     

    He has a follow up question on how to put the word "GO" . The script you gave is :

     

    bg_updatescore "guild_vs2", .score[1], .score[2];// <- block the move after this line
    for ( .@i = 0; .@i < .minplayer2start; .@i++ ){// block the players
    	pcblockmove .team1aid[.@i],1;
    	pcblockmove .team2aid[.@i],1;
    }
    sleep 5000;// add a delay of 5 secs
    for ( .@i = 0; .@i < .minplayer2start; .@i++ ){// unblock players
    	if ( isloggedin( .team1aid[.@i] ) )
    		pcblockmove .team1aid[.@i],0;
    	if ( isloggedin( .team2aid[.@i] ) )
    		pcblockmove .team2aid[.@i],0;
    }
    sleep 5000;// add a delay of 5 secs
    mapannounce "guild_vs2", "buff ready",0;
    for ( .@i = 5; .@i >= 0; .@i-- ){// mapannounce the count 5 4 3
    	sleep 1000;
    	mapannounce "guild_vs2", "Start in "+ .@i +" seconds..",0;
    }
    

    Which I am planning to incorporate with my script. Would you mind getting me to direction on how to put a debuff command as well on my script once they are warped inside?

  5. Hello, 

    I am using the following script and would like to add a duplicate job checker on my script. I have tried to incorporate several job checker script but being a noob in scripting, I got nothing worked.

     

    Credits to the creator of this script, btw.

     

    prontera,134,169,6	script	7v7 Team Wars::teamwar	469,{
    	if (getgmlevel() >= 99){
    		menu "standard menu",standard,"reset",lend;
    
    
    	}
    
    standard:
    	set $@members,2; // number of party members change this to your party size you want
    	set $@start,0;
    	getpartymember(getcharid(1));
    	set @partymembercount,$@partymembercount;
    	if ( $@start == 1 ) {
    		mes "The Sign Ups are currently unavailable because a match is in progress. Don't hesitate to try again in a few minutes!";
    		close;
    
    	}
    	if ( @partymembercount == $@members ) {
    		if ( $@TeamID1 == getcharid(1) ) {
    			mes "Do you wish to sign out your team?";	
    			next;	
    			if (select("I Give up ~.","Never Say Quit !!")==2) close;	
    			announce "Team 1 : [ " + getpartyname($@TeamID1) + " ] has sign out. We need another Party to sign up now!",bc_yellow|bc_map;	
    			set $@TeamID1, 0;
    			close;	
    		}
    		if ($@TeamID2==getcharid(1)) {	
    			mes "Do you wish to sign out your team?";	
    			next;	
    			if (select("I Give up ~.","Never Say Quit !!")==2) close;
    			announce "Team 2 : [ " + getpartyname($@TeamID2) + " ] has sign out. We need another Party to sign up now!",bc_yellow|bc_map;	
    			set $@TeamID2, 0;	
    			close;	
    		}
    		mes "Hello "+strcharinfo(0)+" what do you want?";
    		if (($@TeamID1!=0) && ($@TeamID2!=0)) {
    			mes "The Sign Ups are currently unavailable because a match is in progress. Don't hesitate to try again in a few minutes!";
    			close;
    		}
    		if ( getpartyleader(getcharid(1),2) != getcharid(0) ) {
    			mes "Only party leader have the right to sign up / out from the game with me..";
    			close;
    		}
    		mes "Choose your team to register.";
    		switch(select("Red Team - [" + GetPartyName($@TeamID1) + "] :Blue Team - [" + GetPartyName($@TeamID2) + "]")) {
    		case 1:	mes "[  Team War  ]";
    			if ($@TeamID1==0 || getpartyname($@TeamID1)=="null") {
    				getpartymember(getcharid(1)),1;
    				getpartymember(getcharid(1)),2;
    				copyarray $@partymembercidt1[0],$@partymembercid[0],$@members;
    				copyarray $@partymemberaidt1[0],$@partymemberaid[0],$@members;
    				for (set .@i,0; .@i<$@members; set .@i,.@i+1) {
    					if(isloggedin($@partymemberaidt1[.@i],$@partymembercidt1[.@i]))  set .@count,.@count+1;
    				}
    				if(.@count < $@members) {
    					mes "You need all your party members to be online to Register";
    					close;
    				}
    				set $@TeamID1, getcharid(1);	
    				initnpctimer;	
    				mes "Your Party is now subscribed, good luck!";	
    				announce "Team 1 : [ " +getpartyname($@TeamID1)+ " ] has sign up For the Team War!",bc_blue|bc_map;	
    				doevent "teamwar::OnSubscriptionTeam";	
    				close;	
    			} else {
    				mes "I'm sorry! Another Team has sign up before you...";	
    				close;	
    			}
    		case 2:	mes "[  Team War  ]";
    			if ($@TeamID2==0 || getpartyname($@TeamID2)=="null") {	
    				getpartymember(getcharid(1)),1;
    				getpartymember(getcharid(1)),2;
    				copyarray $@partymembercidt2[0],$@partymembercid[0],$@members;
    				copyarray $@partymemberaidt2[0],$@partymemberaid[0],$@members;
    				for (set .@i,0; .@i<$@members; set .@i,.@i+1) {
    					if(isloggedin($@partymemberaidt2[.@i],$@partymembercidt2[.@i])) set .@count,.@count+1;
    				}
    				if(.@count < $@members) {
    					mes "You need all your party members to be online to Register";
    					close;
    				}
    				set $@TeamID2, getcharid(1);	
    				initnpctimer;	
    				mes "Your Party is now subscribed, good luck!";	
    				announce "Team 2 : [ " +getpartyname($@TeamID2)+ " ] has sign up For the Team War!",bc_blue|bc_map;
    				doevent "teamwar::OnSubscriptionTeam";	
    				close;	
    			} else {	
    				mes "I'm sorry! Another Team has sign up before you...";	
    				close;
    			}
    		}
    	} else {
    		mes "[Event Handler]";
    		mes "Please contact your party leader.";
    		mes "Your team must have a party consisting of "+$@members+" members.";
    		close;
    	}
    
    
    OnSubscriptionTeam:
    	getpartymember($@TeamID2),1;
    	getpartymember($@TeamID2),2;
    	copyarray $@partymembercidtc2[0],$@partymembercid[0],$@members;
    	copyarray $@partymemberaidc2[0],$@partymemberaid[0],$@members;
    	for (set .@i,0; .@i<$@members; set .@i,.@i+1) {
    		if(isloggedin($@partymemberaidc2[.@i],$@partymembercidtc2[.@i])) set .@countx,.@countx+1;
    	}
    	if(.@countx < $@members) {
    		announce "Team War : "+getpartyname($@TeamID2)+"are not all online the match has been canceled",0;
    		announce "Team War : registration for 2 new teams are now available",0;
    		goto lend;
    	}
    	if ( $@TeamID2 && $@partymembercount != $@members ) {
    		announce getpartyname($@TeamID2) +" has extra party members !", 0;
    		goto lend;
    	}
    	getpartymember($@TeamID1),1;
    	getpartymember($@TeamID1),2;
    	copyarray $@partymembercidtc1[0],$@partymembercid[0],$@members;
    	copyarray $@partymemberaidc1[0],$@partymemberaid[0],$@members;
    	for (set .@i,0; .@i<$@members; set .@i,.@i+1) {
    		if(isloggedin($@partymemberaidc1[.@i],$@partymembercidtc1[.@i])) set .@countz,.@countz+1;
    	}
    	if(.@countz < $@members) {
    		announce "Team War : "+getpartyname($@TeamID1)+"are not all online the match has been canceled",0;
    		announce "Team War : registration for 2 new teams are now available",0;
    		goto lend;
    	}
    	if ( $@TeamID1 &&  $@partymembercount != $@members ) {
    		announce getpartyname($@TeamID1) +" has extra party members !", 0;
    		goto lend;
    	}
    	if($@TeamID1!=0 && $@TeamID2!=0){
    		announce "Team War : We have 2 Teams signed up now : "+getpartyname($@TeamID1)+" and "+getpartyname($@TeamID2)+".",bc_blue|bc_map;
    		set @win1, 0;
    		set @win2, 0;
    		goto Onstart;
    	}
    	end;
    
    OnTimer50000:
    	if (($@TeamID1!=0) && ($@TeamID2!=0)) {
    		stopnpctimer;
    		end;
    	}
    	stopnpctimer;
    	set $@TeamID1, 0;
    	set $@TeamID1, 0;
    	announce "Team War : we lack teams to start registration for two teams are now available",0;
    	end;
    	
    OnStart:
    	warpparty "guild_vs2",89,49,$@TeamID1;
    	warpparty "guild_vs2",11,49,$@TeamID2;
    	set $@start,1;
    	end;
    
    lend:
    	stopnpctimer;
    	set $@TeamID1,0;
    	set $@TeamID2,0;
    	set $@start,0;
    	set @win1,0;
    	set @win2,0;
    	set @partymembercount,$@members;
    	announce "Thanks for joining!",0;
    	end;
    
    OnTimer250000:
    	Announce "Team War : No Party won due to time limit!",0;
    	mapwarp "guild_vs2","prontera",156,191;
    	goto lend;
    	end;
    
    OnPCDieEvent:
    OnPCLogoutEvent:
    	if(strcharinfo(3) != "guild_vs2") end;
    	warp "prontera",156,191;
    	for(set .@i, 0; .@i < $@members; set .@i, .@i + 1) {
    		if ( $@partymembercidt1[.@i] == getcharid(0)) {
    			deletearray $@partymembercidt1[.@i], 1;
    			deletearray $@partymemberaidt1[.@i], 1;
    			if( getarraysize($@partymembercidt1) == 0 ) {
    				set @win2,getarraysize($@partymembercidt2);
    				goto onwin;
    			}
    		}
    		if ( $@partymembercidt2[.@i] == getcharid(0) ) {
    			deletearray $@partymembercidt2[.@i], 1;
    			deletearray $@partymemberaidt2[.@i], 1;
    			if( getarraysize($@partymembercidt2)  == 0 ) {
    				set @win1,getarraysize($@partymembercidt1);
    				goto onwin;
    			}
    		}
    	}
    	end;
    
    
    onwin:
    	if (@win1==0) {
    		warpparty "prontera",156,191,$@TeamID1;
    		warpparty "prontera",156,191,$@TeamID2;
    		Announce "Team War :"+GetPartyName($@TeamID2)+" won and got 3 RoK Star Badges!",0;
    		for ( .@i = 0; .@i < @win2; .@i++ )
    			getitem 7905, rand(3,3), $@partymemberaidt2[.@i];
    		goto lend;
    	}
    	if (@win2==0) {
    		warpparty "prontera",156,191,$@TeamID1;
    		warpparty "prontera",156,191,$@TeamID2;
    		Announce "Team War :"+GetPartyName($@TeamID1)+" won and got 3 RoK Star Badges!",0;
    		for ( .@i = 0; .@i < @win1; .@i++ )
    			getitem 7905, rand(3,3), $@partymemberaidt1[.@i];
    		goto lend;
    	}
    	end;
    }
    
    guild_vs2	mapflag	nosave	SavePoint
    guild_vs2	mapflag	nomemo
    guild_vs2	mapflag	nobranch
    guild_vs2	mapflag	pvp_noguild
    guild_vs2	mapflag	nocommand	60
    guild_vs2	mapflag	noicewall
    guild_vs2	mapflag	pvp
    guild_vs2	mapflag	partylock
    

    Thanks for your help in advance.

  6. Honestly, the first time I have heard of the command. A player asked me if I can do it, I believe it's a custom command where a Guild Leader can broadcast to his guild members via the @order command, and the only people that can read the broadcasted message are the guild members.

     

    Thanks.

  7. oh thank you!



    Hi I have tried this and does not appear to be working. =( I am not sure what the problem is.

     

    Can someone change the SQL query instead of reading the last IP to be the MAC ID instead? 

    I am trying to use this:

     

    -	script	dual_client	-,{
    OnInit:
    	setarray .@map$, "alberta","geffen";	// yours maps no dual
    	.@size = getarraysize( .@map$ );
    	for ( .@i = 0; .@i < .@size; .@i++ )
    		if ( !getmapflag( .@map$[.@i], mf_loadevent ) )
    			setmapflag .@map$[.@i], mf_loadevent;
    	.map_list$ = implode( .@map$, "|" );
    	.@count = query_sql( "select `login`.`last_ip`, `char`.`name`, `char`.`char_id` from `login` left join `char` on `char`.`account_id`=`login`.`account_id` where `char`.`online`=1", .@last_ip$, .@name$, .@char_id );
    	for ( .@i = 0; .@i < .@count; .@i++ ) {
    		getmapxy .@map$, .@x, .@y, 0, .@name$[.@i];
    		if ( !compare( .map_list$, .@map$ ) ) continue;
    		.@size = 0;
    		.@variable$ = ".ip_"+ .@last_ip$[.@i] +"$";
    		if ( getd( .@variable$ ) != "" ) {
    			.@size = getarraysize( getd( .@variable$ ) );
    			for ( .@j = 0; .@j < .@size; .@j++ ) {
    				getmapxy .@map2$, .@x, .@y, 0, getd( .@variable$ +"["+ .@j +"]" );
    				if ( .@map$ == .@map2$ ) {
    					warpchar "prontera",150,150, .@char_id[.@i];
    					message .@name$[.@i], "No dual account on this map.";
    					break;
    				}
    			}
    

    Thank you.

  8. hi I understand that this one is IP based and if people are on the same shop , one of them will be able to stay in the map? but is there anyway that it can only check the connection per PC? 

    I have a Harmony in my client but the setting "Max connections per PC" does not seem to work, that's why I am looking into using this script.

     

    Thanks for your help in advance.

×
×
  • Create New...