📄 npc_wedding.txt
字号:
next;
mes "[结婚 快乐]";
mes "虽然每天忙碌于国家大事，";
mes "为了即将重新出发的小两口，";
mes "特地来到了普隆德拉教堂，";
mes "期期糐所有人都能过着幸福的生活，";
mes "这是国王陛下给的恩德";
next;
mes "[结婚 快乐]";
mes "求婚要慎重，";
mes "郑重的提出，";
mes "只要有结过一次婚的人，";
mes "再也不能恢复原状，结婚的两个人，";
mes "除非离开这人世间为止，";
mes "否则就永远在一起";
next;
mes "[结婚 快乐]";
mes "此外男性和女性，";
mes "女性只能与男性结婚，";
mes "另外也有可能，";
mes "有些人会提出，和同性者或和魔物结婚，";
mes "这样的主张…是不会被成立的";
next;
mes "[结婚 快乐]";
mes "假如有约定好未来的对象的话，";
mes "不妨试着求婚看看吧，";
mes "愿期待未来幸福的所有恋人，";
mes "祝幸福美满！！";
close;
end;
// 过程说明
A02:
mes "[结婚 快乐]";
mes "首先确认新郎新娘们，";
mes "有都向我申请吗？";
mes "当然两位都是，没有结过婚的人才对啊？";
mes "假如有申请的话，只请两位组队之后，";
mes "请到国王陛下那里吧！";
next;
mes "[结婚 快乐]";
mes "到国王陛下那里后，";
mes "男方先说话，";
mes "然后再说要结婚女性的名字，";
mes "名字不能讲错，要讲正确，";
mes "结婚典礼才能执行";
next;
mes "[结婚 快乐]";
mes "当讲完话时，";
mes "紧接着女方跟国王陛下讲话，";
mes "国王陛下会问妳，";
mes "妳要结婚对象的名字，";
mes "相对的也一样的回答男性的名字";
next;
mes "[结婚 快乐]";
mes "假如结婚对象的名字正确的话，";
mes "会交换结婚戒指，";
mes "从那瞬间开始，";
mes "两个人会永远的在一起，不错吧？";
mes "说不定被委婉的拒绝也不一定，";
mes "也不要太难过啊";
next;
mes "[结婚 快乐]";
mes "当想要结婚的人，";
mes "太多聚集在一起时，";
mes "请大家尊守秩序，接顺序来跟国王说话，";
mes "国王陛下不可能同时的，";
mes "主持好几对婚礼";
next;
mes "[结婚 快乐]";
mes "最后一点，讲完名字后，回答要快";
mes "当^ff0000新郎讲完话，在3分钟之内，把所有的过程都做完吧^000000";
mes "要不然，结婚典礼会停止，再也不能结婚了";
next;
mes "[结婚 快乐]";
mes "写结婚对象的名字，最简单的方法是，";
mes "先寄给对方一张纸条，";
mes "在对话窗口里放名字的部份，";
mes "点选箭头标示，左边即可";
next;
mes "[结婚 快乐]";
mes "那就会显示走纸条给对方的名字，";
mes "按住 Ctrl键的同时，";
mes "再按 C键，那名字会被记录，";
mes "以后要放入名字时，";
mes "按住 Shift键的同时，";
mes "再按 Insert键，那么名字就很快，";
mes "很方便的写在上面了";
next;
mes "[结婚 快乐]";
mes "那么就试验一次吧，";
mes "把想要结婚对象的名字，";
mes "依告诉你的方式写一遍，";
mes "按住 Ctrl键的同时，";
mes "再按 C键是记录…回答是，";
mes "按住 Shift键的同时，";
mes "再按 Insert键";
next;
input @name$; //need to try
mes "[结婚 快乐]";
mes "很好，写的不错，";
mes "若在你的心里面己决定好了的话，";
mes "一定要来这里申请";
close;
end;
// 结婚申请
A03:
mes "[结婚 快乐]";
mes "想要结婚的话要申请噢，";
mes "男性要交出^0000881,300,000金币和";
mes "燕尾服1件^000000，女性要交^0000881,200,000";
mes "金币和结婚礼服1件^000000";
mes "然后填写申请书即可，";
mes "假如男女双方都有申请的话，";
mes "就可以结婚了";
next;
mes "[结婚 快乐]";
mes "别忘了还要准备结婚戒指，";
mes "男女双方都需要^000088钻石戒指1个^000000";
mes "当申请的时候，一起给我就好了";
next;
mes "[结婚 快乐]";
mes "两位都申请好之后，";
mes "就可以马上执行结婚典礼了，";
mes "请问你现在要申请结婚吗？";
next;
if(select("是","不是")==2)
{
mes "[结婚 快乐]";
mes "祝你有一个幸福的一天…！";
close;
end;
}
// 检查是否登记或者已经结婚
if(EVENT_MARRIAGE_APPLY>=1)
{
mes "[结婚 快乐]";
mes "让我先来检查一下";
if(EVENT_MARRIAGE_APPLY==1) mes "已经申请过就不能再申请啰";
if(EVENT_MARRIAGE_APPLY>1) mes "你已经结过婚啦";
close;
end;
}
// 将流程完全分开，方便以后修改
if(sex) goto L_MALE_APPLY;
// ====================女方登记====================
// 没有组队则提示并退出！
if(getcharid(1)==0)
{
mes "[结婚 快乐]";
mes "不行哦！";
mes "必须先和你的爱人^FF0000组队^000000！";
close;
end;
}
// 检查是否为申请人同一组队！
if(getcharid(1)!=$@tmp_party_id)
{
mes "[结婚 快乐]";
mes "嗯，好像已经有人申请了";
mes "看样子，你不得不等一会";
mes "不好意思啊！";
close;
end;
}
// 检查钻石戒指
if(countitem(2613)<1)
{
mes "[结婚 快乐]";
mes "你好像忘记带，";
mes "做结婚戒指时要用的钻石戒指了，";
mes "是不是放在别的地方了呢？";
mes "仔细的找找之后，再来找我吧";
close;
end;
}
// 检查登记费用
if(zeny<1200000 )
{
next;
mes "[结婚 快乐]";
mes "你身上的现金好像不足喔";
close;
end;
}
// 检查礼服
if(countitem(2338)<1)
{
next;
mes "[结婚 快乐]";
mes "您好像忘了带礼服来喔";
close;
end;
}
// 全部带齐则扣除报名费
delitem 2613,1;
set zeny,zeny-1200000;
// 暂存申请人AID，NAME
set $@marry_female,getcharid(0);
set $@marry_female_name$,strcharinfo(0);
// 将申请人状态改为申请完毕！
set EVENT_MARRIAGE_APPLY,1;
mes "[结婚 快乐]";
mes "嗯！接下来请到『国王陛下』那里去吧";
mes "国王陛下会为你们主持婚礼";
mes "请在^FF00005分钟^000000内完成婚典哦！";
close;
end;
// ====================男方登记====================
L_MALE_APPLY:
// 没有组队则提示并退出！
if(getcharid(1)==0)
{
mes "[结婚 快乐]";
mes "不行哦！";
mes "必须先和你的爱人^FF0000组队^000000！";
close;
end;
}
// 如果有人已经申请或开始结婚，则提示等候
if($@tmp_party_id!=0)
{
mes "[结婚 快乐]";
mes "嗯，好像已经有人申请了";
mes "看样子，你不得不等一会";
mes "不好意思啊！";
close;
end;
}
// 检查钻石戒指
if(countitem(2613)<1)
{
mes "[结婚 快乐]";
mes "你好像忘记带，";
mes "做结婚戒指时要用的钻石戒指了，";
mes "是不是放在别的地方了呢？";
mes "仔细的找找之后，再来找我吧";
close;
end;
}
// 检查登记费用
if(zeny<1300000)
{
next;
mes "[结婚 快乐]";
mes "你身上的现金好像不足喔";
close;
end;
}
// 检查燕尾服
if(countitem(7170)<1)
{
next;
mes "[结婚 快乐]";
mes "您好像忘了带礼服来喔";
close;
end;
}
// 全部带齐则扣除报名费
delitem 2613,1;
set zeny,zeny-1300000;
// 暂存申请人AID，NAME
set $@marry_male,getcharid(0);
set $@marry_male_name$,strcharinfo(0);
// 暂存申请人PARTY ID
set $@tmp_party_id,getcharid(1);
// 将申请人状态改为申请完毕！
set EVENT_MARRIAGE_APPLY,1;
mes "[结婚 快乐]";
mes "嗯！接下来请到『国王陛下』那里去吧";
mes "国王陛下会为你们主持婚礼";
mes "请在^FF00005分钟^000000内完成婚典哦！";
// 男方申请完毕，开始计时！
initnpctimer "TimerMarriage";
close;
end;
// ===================单身军团出现=========================
A04:
enablenpc "wed01";
enablenpc "wed02";
enablenpc "wed03";
enablenpc "wed04";
enablenpc "wed05";
enablenpc "wed06";
emotion 23;
mes "[单身 军团]";
mes "精炼要自己做，才会做出好东西！";
mes "在洞穴里面组队是奢侈的行为！";
mes "我可以施下出心型的 NPC！";
mes "从出生到转职，都是自己练的！";
mes "过圣诞节的时候，到外面拔草求生！";
mes "…我们是无敌的单身军团！";
next;
emotion 4;
disablenpc "wed01";
disablenpc "wed02";
disablenpc "wed03";
disablenpc "wed04";
disablenpc "wed05";
disablenpc "wed06";
close;
end;
A05:
//如果正式完成了婚礼.则不能重新开始
//if ( EVENT_MARRIAGE_APPLY == 3 ) goto L_MARRIAGED;
if(PartnerId!=0)
{
mes "[结婚 快乐]";
mes "不行哦";
mes "你已经有合法的伴侣了";
mes "怎么能随便放弃呢？";
close;
end;
}
mes "[结婚 快乐]";
mes "或许重新开始也不错";
mes "希望你能找到真正合适的伴侣";
set EVENT_MARRIAGE_APPLY,0;
close;
end;
}
// 用于整个婚典的计时！从开始到结束规定时间：5分钟
prt_church.gat,97,99,0 script TimerMarriage -1,{
end;
// 5分钟到后，强制结束婚礼，并且临时数据归零！
OnTimer300000:
announce $@marry_male_name$ + "和" + $@marry_female_name$ + "的婚礼中止了！",15;
set $@tmp_party_id,0;
set $@marry_male,0;
set $@marry_male_name$,0;
set $@marry_female,0;
set $@marry_female_name$,0;
stopnpctimer;
end;
}
// 单身军团！拉风六人组！
prt_church.gat,97,102,0 script 单身 军团::wed01 105,{
close;
OnInit:
disablenpc "wed01";
end;
}
prt_church.gat,98,102,0 script 单身 军团::wed02 705,{
close;
OnInit:
disablenpc "wed02";
end;
}
prt_church.gat,99,102,0 script 单身 军团::wed03 707,{
close;
OnInit:
disablenpc "wed03";
end;
}
prt_church.gat,100,102,0 script 单身 军团::wed04 708,{
close;
OnInit:
disablenpc "wed04";
end;
}
prt_church.gat,101,102,0 script 单身 军团::wed05 767,{
close;
OnInit:
disablenpc "wed05";
end;
}
prt_church.gat,102,102,0 script 单身 军团::wed06 780,{
close;
OnInit:
disablenpc "wed06";
end;
}⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -