party warp

[chromus28]

anyone have party warp? unlike to fly wing only can warp is 1 person.. but is there a script for item db that works for all party can be warp?

[Capuche]

or

12212,Giant_Fly_Wing,Giant Fly Wing,2,2,,10,,,,,0xFFFFFFFF,7,2,,,,,,{ callfunc "F_CashPartyCall"; },{},{}

from trunk/npc/other/CashShop_Functions.txt

 

// Giant Fly Wing
//============================================================ 
// - Warp party leader to random spot on the map.
// - Summon Party members on party leader map to that location.
// - No arguments.
function	script	F_CashPartyCall	{
	warp "Random",0,0;
	if(getpartyleader(getcharid(1),2) == getcharid(0)) {
		getmapxy .@mapl$, .@xl, .@yl, 0;
		warpparty .@mapl$, .@xl, .@yl, getcharid(1), .@mapl$;
	}
	return;
}

[luizinhomt]

Em 22/08/2013 às 04h19, Skorm disse:

Semi-testado... Acho que é isso que você está procurando...

 

 

Chame assim...

 

 

Editar---

Eu não li o pedido claramente e apenas dei uma olhada, então este não é exatamente o NPC que você solicita, mas ainda é um item muito legal e você deve tentar mesmo assim.

I liked this function, I just wanted to change it a little, someone could make this function send a request to members of the VIP party, the request would open a window asking if the member would like to go to the location of the member who called the function. Thank you very much to everyone.

[orange]

u mean like Giant Butterfly Wing?

[chromus28]

yeah something like that

u mean like Giant Butterfly Wing?

yeeah

it's like the item can warp you into one of your party member.. 

[Skorm]

Semi-tested... I think this is what you're looking for...

 

function	script	warp2partymember	{
	if(!getcharid(3)) end;
	getpartymember(getcharid(1),2);
	copyarray .@paid[0], $@partymemberaid[0],128;
	getpartymember(getcharid(1),1);
	copyarray .@pcid[0], $@partymembercid[0],128;
	set .@len, $@partymembercount;
	set .@cid, getcharid(0);
	
	for(set(.@i,0);.@i<.@len;set(.@i,.@i+1)) {
		if(isloggedin(.@paid[.@i],.@pcid[.@i])&&.@pcid[.@i]!=.@cid)
			set(.@menu$,.@menu$+rid2name(.@paid[.@i])+":");
		else {
			deletearray .@paid[.@i],1;
			deletearray .@pcid[.@i],1;
			set(.@i,.@i-1);
			set(.@len,.@len-1);
		}
	}
	
	if(.@menu$=="") end;
	mes "Select who you warp to!";
	if(set(@menu,prompt(.@menu$)-1)>253) end;
	getmapxy(.@map$,.@x,.@y,0,rid2name(.@paid[@menu]));
	if(getmapusers(.@map$)<0) end;
	warp .@map$,.@x,.@y;
	end;
}

 

Call it like...

 

502,Orange_Potion,Orange Potion,0,200,,100,,,,,0xFFFFFFFF,7,2,,,,,,{ itemheal rand(105,145),0; callfunc("warp2partymember"); },{},{}

 

Edit---

I didn't read the request clearly and just skimmed it so this isn't exactly the NPC that you requested, but it's still a really cool utility and you should try it all the same.

[belphegor]

I think he's looking for something like random warp on fly wing with all party members.

 

set .@pid,getcharid(1);
set .@map$,strcharinfo(3);
addrid(2,0,.@pid);
warp .@map$,0,0;