npc_deliver.txt

JA++的最新...很多ROSF都用这个 ] 是个不错的东西-3-

//==============================================
// Total 13 NPC's in this file,Write By MivaBe on June 16th 2003
// 代码重写 by FPE (2006.6.27)
// Jathena++ 论坛：http://www.foxofice.net/bbs
//----------------------------------------------

//callfunc "MFJA_deliver",	"<文字1>","<map1>",<x1>,<y1>,<金钱1>,<warp类型1>,	(0-5)
//							"<文字2>","<map2>",<x2>,<y2>,<金钱2>,<warp类型2>,	(6-11)
//							"<文字3>","<map3>",<x3>,<y3>,<金钱3>,<warp类型3>,	(12-17)
//							"<文字4>","<map4>",<x4>,<y4>,<金钱4>,<warp类型3>,	(18-23)
//							"<文字5>","<map5>",<x5>,<y5>,<金钱5>,<warp类型3>,	(24-29)
//							"<文字6>","<map6>",<x6>,<y6>,<金钱6>,<warp类型3>,	(30-35)
//							"<文字7>","<map7>",<x7>,<y7>,<金钱7>,<warp类型3>,	(36-41)
//							"<文字8>","<map8>",<x8>,<y8>,<金钱8>,<warp类型3>,	(42-47)
//							"<文字9>","<map9>",<x9>,<y9>,<金钱9>,<warp类型3>,	(48-53)
//							"<文字10>","<map10>",<x10>,<y10>,<金钱10>,<warp类型3>,	(54-59)
//							"<文字11>","<map11>",<x11>,<y11>,<金钱11>,<warp类型3>,	(60-65)
//							"<文字12>","<map12>",<x12>,<y12>,<金钱12>,<warp类型3>,	(66-71)
//							"<文字13>","<map13>",<x13>,<y13>,<金钱13>,<warp类型3>;	(72-77)
function	script	MFJA_deliver	{
	set @ValNum,rand(1000,9999);
	mes "[传送人员]";
	mes "请输入以下列出的验证码！";
	mes "^FF0000" + @ValNum + "^000000";
	next;
	input @InputNum;
	if(@InputNum!=@ValNum)
	{
		mes "[传送人员]";
		mes "输入错误！";
		mes "请下次再来使用！";
		close;
		end;
	}

	mes "[传送人员]";
	mes "我是地点传送人员";
	mes "我们无处不在的为你服务";
	mes "让你在各大城市间穿梭";
	mes "当然，初心者是完全免费的。";
	next;
	mes "请选择你要到达的地方:";
	next;
	menu	getarg(0),A01,
		getarg(6),A02,
		getarg(12),A03,
		getarg(18),A04,
		getarg(24),A05,
		getarg(30),A06,
		getarg(36),A07,
		getarg(42),A08,
		getarg(48),A09,
		getarg(54),A10,
		getarg(60),A11,
		getarg(66),A12,
		getarg(72),A13;

A01:
	callfunc "MFJA_deliver_warp_function",getarg(1),getarg(2),getarg(3),getarg(4),getarg(5);
A02:
	callfunc "MFJA_deliver_warp_function",getarg(7),getarg(8),getarg(9),getarg(10),getarg(11);
A03:
	callfunc "MFJA_deliver_warp_function",getarg(13),getarg(14),getarg(15),getarg(16),getarg(17);
A04:
	callfunc "MFJA_deliver_warp_function",getarg(19),getarg(20),getarg(21),getarg(22),getarg(23);
A05:
	callfunc "MFJA_deliver_warp_function",getarg(25),getarg(26),getarg(27),getarg(28),getarg(29);
A06:
	callfunc "MFJA_deliver_warp_function",getarg(31),getarg(32),getarg(33),getarg(34),getarg(35);
A07:
	callfunc "MFJA_deliver_warp_function",getarg(37),getarg(38),getarg(39),getarg(40),getarg(41);
A08:
	callfunc "MFJA_deliver_warp_function",getarg(43),getarg(44),getarg(45),getarg(46),getarg(47);
A09:
	callfunc "MFJA_deliver_warp_function",getarg(49),getarg(50),getarg(51),getarg(52),getarg(53);
A10:
	callfunc "MFJA_deliver_warp_function",getarg(55),getarg(56),getarg(57),getarg(58),getarg(59);
A11:
	callfunc "MFJA_deliver_warp_function",getarg(61),getarg(62),getarg(63),getarg(64),getarg(65);
A12:
	callfunc "MFJA_deliver_warp_function",getarg(67),getarg(68),getarg(69),getarg(70),getarg(71);
A13:
	callfunc "MFJA_deliver_warp_function",getarg(73),getarg(74),getarg(75),getarg(76),getarg(77);
}

//callfunc "MFJA_deliver_warp_function","<地图名>",<x坐标>,<y坐标>,<金钱>,<参数>,;
function	script	MFJA_deliver_warp_function	{
	if(getarg(4)==1)
	{
		if(class==0)
		{
			warp getarg(0),getarg(1),getarg(2);
			end;
		}
		if(zeny<getarg(3))
		{
			mes "[传送人员]";
			mes "对不起，你没有足够金钱！";
			close;
			end;
		}
		set zeny,zeny-getarg(3);
		warp getarg(0),getarg(1),getarg(2);
		end;
	}
	if(getarg(4)==2)
	{
		if(class==0 || BaseLevel<30 || zeny<getarg(3))
		{
			mes "[传送人员]";
			mes "对不起，你的等级必须有30级才可以到这个地方，当然 " + getarg(3) + " Zeny 也是少不了的。";
			close;
			end;
		}
		set zeny,zeny-getarg(3);
		warp getarg(0),getarg(1),getarg(2);
		end;
	}
	close;
	end;
}

//Warper NPC
prontera.gat,162,192,4	script	传送人员	48,{
	callfunc "MFJA_deliver",	"依斯鲁德岛 -> 2000 Zeny","izlude.gat",91,105,2000,1,
								"魔幻之城-吉芬 -> 2000 Zeny","geffen.gat",119,68,2000,1,
								"边陲之城-梦罗克 -> 2000 Zeny","morocc.gat",156,94,2000,1,
								"山岳之城-斐扬 -> 2000 Zeny","payon.gat",131,55,2000,1,
								"港口之都-爱尔贝塔 -> 2000 Zeny","alberta.gat",117,56,2000,1,
								"运河之都-艾尔帕兰 -> 2000 Zeny","aldebaran.gat",143,110,2000,1,
								"梦幻之岛-克魔岛 -> 2000 Zeny","comodo.gat",188,164,2000,1,
								"克雷斯特汉姆古城 -> 2000 Zeny","glast_01.gat",200,200,2000,1,
								"尤诺 -> 2000 Zeny","yuno.gat",157,41,2000,2,
								"天津城 -> 2000 Zeny","amatsu.gat",197,78,2000,2,
								"昆仑仙境 -> 2000 Zeny","gonryun.gat",161,18,2000,2,
								"猿人部落 -> 2000 Zeny","umbala.gat",126,132,2000,2,
								"幻想之城-姜饼城 -> 2000 Zeny","xmas.gat",138,106,2000,2;
}

izlude.gat,128,116,4	script	传送人员	48,{
	callfunc "MFJA_deliver",	"中央之都-普隆德拉 -> 2000 Zeny","prontera.gat",156,183,2000,1,
								"魔幻之城-吉芬 -> 2000 Zeny","geffen.gat",119,68,2000,1,
								"边陲之城-梦罗克 -> 2000 Zeny","morocc.gat",156,94,2000,1,
								"山岳之城-斐扬 -> 2000 Zeny","payon.gat",131,55,2000,1,
								"港口之都-爱尔贝塔 -> 2000 Zeny","alberta.gat",117,56,2000,1,
								"运河之都-艾尔帕兰 -> 2000 Zeny","aldebaran.gat",143,110,2000,1,
								"梦幻之岛-克魔岛 -> 2000 Zeny","comodo.gat",188,164,2000,1,
								"克雷斯特汉姆古城 -> 2000 Zeny","glast_01.gat",200,200,2000,1,
								"尤诺 -> 2000 Zeny","yuno.gat",157,41,2000,2,
								"天津城 -> 2000 Zeny","amatsu.gat",197,78,2000,2,
								"昆仑仙境 -> 2000 Zeny","gonryun.gat",161,18,2000,2,
								"猿人部落 -> 2000 Zeny","umbala.gat",126,132,2000,2,
								"幻想之城-姜饼城 -> 2000 Zeny","xmas.gat",138,106,2000,2;
}

geffen.gat,122,62,1	script	传送人员	48,{
	callfunc "MFJA_deliver",	"依斯鲁德岛 -> 2000 Zeny","izlude.gat",91,105,2000,1,
								"中央之都-普隆德拉 -> 2000 Zeny","prontera.gat",156,183,2000,1,
								"边陲之城-梦罗克 -> 2000 Zeny","morocc.gat",156,94,2000,1,
								"山岳之城-斐扬 -> 2000 Zeny","payon.gat",131,55,2000,1,
								"港口之都-爱尔贝塔 -> 2000 Zeny","alberta.gat",117,56,2000,1,
								"运河之都-艾尔帕兰 -> 2000 Zeny","aldebaran.gat",143,110,2000,1,
								"梦幻之岛-克魔岛 -> 2000 Zeny","comodo.gat",188,164,2000,1,
								"克雷斯特汉姆古城 -> 2000 Zeny","glast_01.gat",200,200,2000,1,
								"尤诺 -> 2000 Zeny","yuno.gat",157,41,2000,2,
								"天津城 -> 2000 Zeny","amatsu.gat",197,78,2000,2,
								"昆仑仙境 -> 2000 Zeny","gonryun.gat",161,18,2000,2,
								"猿人部落 -> 2000 Zeny","umbala.gat",126,132,2000,2,
								"幻想之城-姜饼城 -> 2000 Zeny","xmas.gat",138,106,2000,2;
}

morocc.gat,160,97,4	script	传送人员	48,{
	callfunc "MFJA_deliver",	"依斯鲁德岛 -> 2000Zeny","izlude.gat",91,105,2000,1,