📄 payg_cas05.txt

📁 JA++的最新...很多ROSF都用这个 ] 是个不错的东西-3-
💻 TXT
📖 第 1 页 / 共 4 页
字号:
	end;
}

//npc "payg_cas05" "旗帜" GUILD_FLAG 57 271 0 5 5
payg_cas05.gat,57,271,0	script	佛影#f5-8	722,{
	set @GIDf5,GetCastleData("payg_cas05.gat",1);
	if (@GIDf5 > 0) goto L_Guild;
	mes "       [ 普隆德拉王国  公告令 ]";
	mes " ";
	mes "1. 根据这里的，普隆德拉王国令";
	mes "   把这里公布为，没有正式所有权的";
	mes "   旗帜";
	mes " ";
	mes "2. 战胜守在这里的，可怕的考验之后";
	mes "   给破坏华丽金属的人";
	mes "   国王会赐予";
	mes "   经国王认证的";
	mes "   秘密基地所有权";
	close;
	end;
L_Guild:
	mes "       [ 普隆德拉王国  公告令 ]";
	mes " ";
	mes "1. 根据这里的，普隆德拉王国令";
	mes "    这里被认定为 ^ff0000" + GetGuildName(@GIDf5) + "^000000工会的";
	mes "    私有物";
	mes " ";
	mes "2. ^ff0000" + GetGuildName(@GIDf5) + "^000000 工会的主人是";
	mes "    ^ff0000" + GetGuildMaster(@GIDf5) + "^000000 ， 无论是谁";
	mes "    对这件事情有意见者";
	mes "    请你举起您的剑，提高自己的名誉吧";
	close;
	end;

OnRecvCastleF05:
	FlagEmblem GetCastleData("payg_cas05.gat",1);
	end;
}

//npc "payg_cas05" "旗帜" GUILD_FLAG 55 252 2 5 5
payg_cas05.gat,55,252,2	script	佛影#f5-9	722,{
	set @GIDf5,GetCastleData("payg_cas05.gat",1);
	if (@GIDf5 > 0) goto L_Guild;
	mes "       [ 普隆德拉王国  公告令 ]";
	mes " ";
	mes "1. 根据这里的，普隆德拉王国令";
	mes "   把这里公布为，没有正式所有权的";
	mes "   旗帜";
	mes " ";
	mes "2. 战胜守在这里的，可怕的考验之后";
	mes "   给破坏华丽金属的人";
	mes "   国王会赐予";
	mes "   经国王认证的";
	mes "   秘密基地所有权";
	close;
	end;
L_Guild:
	mes "       [ 普隆德拉王国  公告令 ]";
	mes " ";
	mes "1. 根据这里的，普隆德拉王国令";
	mes "    这里被认定为 ^ff0000" + GetGuildName(@GIDf5) + "^000000工会的";
	mes "    私有物";
	mes " ";
	mes "2. ^ff0000" + GetGuildName(@GIDf5) + "^000000 工会的主人是";
	mes "    ^ff0000" + GetGuildMaster(@GIDf5) + "^000000 ， 无论是谁";
	mes "    对这件事情有意见者";
	mes "    请你举起您的剑，提高自己的名誉吧";
	close;
	end;

OnRecvCastleF05:
	FlagEmblem GetCastleData("payg_cas05.gat",1);
	end;
}

//npc "payg_cas05" "旗帜" GUILD_FLAG 55 260 2 5 5
payg_cas05.gat,55,260,2	script	佛影#f5-10	722,{
	set @GIDf5,GetCastleData("payg_cas05.gat",1);
	if (@GIDf5 > 0) goto L_Guild;
	mes "       [ 普隆德拉王国  公告令 ]";
	mes " ";
	mes "1. 根据这里的，普隆德拉王国令";
	mes "   把这里公布为，没有正式所有权的";
	mes "   旗帜";
	mes " ";
	mes "2. 战胜守在这里的，可怕的考验之后";
	mes "   给破坏华丽金属的人";
	mes "   国王会赐予";
	mes "   经国王认证的";
	mes "   秘密基地所有权";
	close;
	end;
L_Guild:
	mes "       [ 普隆德拉王国  公告令 ]";
	mes " ";
	mes "1. 根据这里的，普隆德拉王国令";
	mes "    这里被认定为 ^ff0000" + GetGuildName(@GIDf5) + "^000000工会的";
	mes "    私有物";
	mes " ";
	mes "2. ^ff0000" + GetGuildName(@GIDf5) + "^000000 工会的主人是";
	mes "    ^ff0000" + GetGuildMaster(@GIDf5) + "^000000 ， 无论是谁";
	mes "    对这件事情有意见者";
	mes "    请你举起您的剑，提高自己的名誉吧";
	close;
	end;

OnRecvCastleF05:
	FlagEmblem GetCastleData("payg_cas05.gat",1);
	end;
}











//npc "payg_cas05" " " HIDDEN_NPC 153 129 0 5 5
//payg_cas05.gat,153,129,0	script	　	111,{
payg_cas05.gat,161,137,0	script	　	111,{
	mes " ";
	mes "有小的拉杆 ，你要往下拉吗? ";
	next;
	menu "我要拉 ",L_Yes,"我不要拉 ",L_No;
L_Yes:
	warp "payg_cas05.gat",277,250;
	end;
L_No:
	close;
	end;
}

//npc "payg_cas05" " " HIDDEN_NPC 238 11 0 5 5
payg_cas05.gat,238,11,0	script	　	111,{
	set @GIDf5,GetCastleData("payg_cas05.gat",1);
	if (@GIDf5 > 0) goto L_Guild;
	mes " [ 响亮的声音 ] ";
	mes " ' 通过考验成为勇气的主人 ... 再去寻找其它考验的路' ";
	close;
	end;
L_Guild:
	mes "[ 响亮的声音 ]";
	mes " ' 只有勇气的主人，才能接受考验啊'";
	next;
	mes " ";
	mes "有小的拉杆 ，你要往下拉吗? ";
	next;
	menu "我要拉 ",L_Yes,"我不要拉 ",L_No;
L_Yes:
	if (GetCharID(2) != @GIDf5) goto L_NotMember;
	warp "gld_dun01.gat",223,202;
	end;
L_NotMember:
	mes " ";
	mes " 没有发生任何事情 ";
	close;
	end;
L_No:
	close;
	end;
}



//npc "payg_cas05" "卡普拉 职员" 4_F_KAFRA1 276 227 1 5 5
payg_cas05.gat,276,227,1	script	卡普拉 职员#pay5	117,{
//OnClick:
	cutin "kafra_01.bmp",2;
	set @GIDf5,GetCastleData("payg_cas05.gat",1);
	if (@GIDf5 == GetCharID(2)) goto L_Member;
	mes "[卡普拉 职员]";
	mes "我已签订契约专为^ff0000" + GetGuildName(@GIDf5) + "^000000 会员服务 ，请使用我们其它地方的卡普拉职员 ，如有不便之处敬请见谅";
	cutin "kafra_01.bmp",255;
	close;
	end;
L_Member:
	mes " [卡普拉 职员]";
	mes "欢迎光临 ^ff0000" + GetGuildName(@GIDf5) + "^000000 会员们 ";
	mes "卡普拉服务(有限公司) ，永远在各位身边为您服务";
	next;
	menu "使用仓库服务",L_M1,"使用空间移动服务",L_M2,"使用手推车服务 ",L_M3,"结束",L_M4;
	L_M1:
		if (getskilllv(1) < 6) goto L_M1_A;
		mes "[卡普拉 职员]";
		mes "要打开仓库了";
		mes "谢谢您的使用。";
		cutin "kafra_01.bmp",255;
		openstorage;
		close;
		end;
		L_M1_A://Basic Skill < 6
			mes "[卡普拉 职员]";
			mes "想要使用仓库的话 ，初学者技能等级要6以上才行";
			cutin "kafra_01.bmp",255;
			close;
			end;
	L_M2:
		mes "[卡普拉 职员]";
		mes "请说出目的地吧";
		next;
		menu "斐扬  -> 200 z",L_M2_M1," 取消 ",L_M2_M2;
		L_M2_M1:
			if (Zeny < 200) goto L_M2_M1_A;
			set Zeny,Zeny-200;
//			set kf_10_pit,kf_10_pit+2;
			warp "payon.gat",95,52;
			end;
			L_M2_M1_A:
				mes "[卡普拉 职员]";
				mes "会员先生/小姐 ，你所支付的金额不足 ，请重新确认";
				cutin "kafra_01.bmp",255;
				close;
				end;
		L_M2_M2:
			cutin "kafra_01.bmp",255;
			close;
			end;
	L_M3:
		if ((Class != 5) && (Class != 10)) goto L_M3_A;
		if (checkcart != 0) goto L_M3_B;
		mes "[卡普拉 职员]";
		mes "手推车使用费是 800 金币 ，请问你要使用吗?";
		next;
		menu "使用 ",L_M3_M1,"取消 ",L_M3_M2;
		L_M3_M1:
			if (Zeny < 800) goto L_M3_M1_A;
//			set kf_10_pit,kf_10_pit+8;
			set Zeny,Zeny-800;
			setcart;
			cutin "kafra_01.bmp",255;
			close;
			end;
			L_M3_M1_A:
				mes "[卡普拉 职员]";
				mes "顾客 ，你所支付的金额不足 ，手推车使用费是800 金币";
				cutin "kafra_01.bmp",255;
				close;
				end;
		L_M3_M2:
			cutin "kafra_01.bmp",255;
			close;
			end;
		L_M3_A:
			mes "[卡普拉 职员]";
			mes "对不起 ，手推车是商人和铁匠，专用的服务";
			cutin "kafra_01.bmp",255;
			close;
			end;
		L_M3_B:
			mes "[卡普拉 职员]";
			mes "顾客你现在已经，装备手推车了";
			cutin "kafra_01.bmp",255;
			close;
			end;
	L_M4:
		mes "[卡普拉 职员]";
		mes "我们卡普拉服务(有限公司)会提供更完美的服务 ，和严格的业务管理 ，让各位顾客安心便利的使用，为最大的目标";
		mes "感谢你使用 ，卡普拉服务(有限公司) ";
		cutin "kafra_01.bmp",255;
		close;	
		end;
OnInit:
	disablenpc "卡普拉 职员#pay5";
	End;
}


//npc "payg_cas05" "纳加布" 1_M_JOBTESTER 277 249 3 5 5
payg_cas05.gat,277,249,3	script	纳加布#pay5	55,{
//OnClick:
	set @GIDf5,GetCastleData("payg_cas05.gat",1);
	if (@GIDf5 == 0) goto L_Waiting;
	if (strcharinfo(0) != GetGuildMaster(@GIDf5)) goto L_Member;
	goto L_Castle;
	end;
// -------工会主人 都不在的时候------------------------------------------
L_Waiting:
	mes "[管理人纳加布]";
	mes "  我将依据我的命运 ，在等待我的主人";
	mes "勇士啊...试验一下你的命运吧 ...";
	close;
	end;
// -----------------------------------------------------------------------------
// --------是我的 工会主人吗? -----------------------------------------------
L_Member:
	mes "[管理人纳加布]";
	mes "不管你们怎么威胁我 ，我只愿意追随我的主人 ^ff0000" + GetGuildMaster(@GIDf5) + "^000000 ! 监护人你们在那里呀! 赶快把这些无理的家伙们赶走吧!";
	close;
	end;
//-----------------------------------------------------------------------------
L_Castle:
	mes "[管理人纳加布]";
	mes "欢迎光临 ， 我的主人^ff0000" + GetGuildMaster(@GIDf5) + "^000000先生/小姐...";
	mes "请尽管吩咐 ，我将忠诚地为你完成任务";
	next;
//	choose menu "查看秘密基地状况" "投资商业发展度" "投资防御度" "设置监护人 " "雇用 / 解雇 仓库职员" "进入主人房间" "让出秘密基地"
	menu "查看秘密基地状况",L_M1,"投资商业发展度",L_M2,"投资防御度",L_M3,"设置监护人 ",L_M4,"雇用 / 解雇 仓库职员",L_M5,"进入主人房间",L_M6;
// ---------查看秘密基地状况---------------------------------------------------
💿 文件大小 7557 K
👤 上传用户 johni
📂 所属分类文章/文档
🏷️ 相关标签

#ROSF #JA
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -