结婚脚本
[@main]
你想做什么？\
<求婚/@求婚>\
<取消求婚/@wantcancel>\
<离婚/@unmarry>\
<打听消息/@ask>\
<回城/@backcity>\
<离开/@exit>\
<COLOR=GREEN 龙凤阁结婚更为气派！>\
[@求婚]
结婚是一生中的大事，这样的大事在龙凤阁这样的地方举\
办，才算相得益彰啊。来，让我月老为你们的天作之合做\
个见证。你知道吗？传说，如果谁能够找到一种叫“龙凤\
婚嫁饰品”的好东西，那么他不但会有一场天下无双的梦\
幻婚礼，而且他们的婚姻会得到上天的眷顾，美满幸福。\
<我们就在这结婚/@我们就在这结婚>\
<返回/@main>
[@我们就在这结婚]
求婚者必须是男性且装备求婚戒指，如果你的求婚失\
败，你的求婚戒指会保留下来求婚成功后，你的求婚\
戒指就会将被收走。\
每次求婚收取1000金币手续费，你准备好求婚了吗？\
<准备好了/@准备好了>\
<没有，我下次再来/@exit>\
<返回/@main>\
[@准备好了]
#IF
Checkmarry
#act
break
#say
你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
#IF
checkposemarry
#say
对方已经结过婚了，是不是想犯重婚罪呀！！！\ \
<返回/@main>
#act
break
#IF
Gender man
#elsesay
只有男的向女的求婚，还没见过大姑娘向小伙子求婚的。\ \
<返回/@main>
#elseact
break
#if
checkposegender 男
#say
你变态呀！！！想搞同性恋！！！ \ \
<返回/@main>
#act
break
#if
checkposedir 2
#elsesay
你们二个面对面站好呀，不要乱动。\ \
<返回/@main>
#elseact
break
#IF
checklevel 40
#Elsesay
结婚要求你的等级必须40级或以上，小伙子努力练好级再来找我。\ \
<返回/@main>
#elseact
break
#IF
checkposelevel > 40
#Elsesay
结婚要求双方都已经满40级\ \
<返回/@main>
#Elseact
break
#IF
Checkitem 求婚戒指 1
#Elsesay
你没求婚戒指，弄到求婚戒指再来找我吧！！！\ \
<返回/@main>
#Elseact
Break
#IF
#Act
take 求婚戒指 1
marry
[@StartMarry]
#IF
Checkmarry
#Say
你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
#act
break
#IF
Gender man
#Act
break
#say
婚礼现在正式开始。\ \
你愿意娶对方为妻，并照顾她一生一世吗？\ \
<我愿意/@RequestMarry>
#IF
Gender
#Act
break
#say
婚礼现在正式开始。\\
请耐心等待你心爱的人向你求婚\\
[@RequestMarry]
#IF
checkmarry
#ACT
Break
#say
你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
#IF
#ACT
marry requestmarry
[@WateMarry]
你已向对方求婚，请耐心等待对方的答复。
[@RevMarry]
#IF
checkmarry
#act
break
#say
你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
#IF
#Say
对方向你求婚，你是否答应嫁给他？ \ \
<我愿意/@ResposeMarry> \
<我不愿意/@ResposeMarryFail>
#elsesay
你声望不足5点以上。\
<离开/@exit>
[@ResposeMarry]
#IF
checkmarry
#ACT
Break
#say
你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
#IF
#Act
marry responsemarry ok
[@ResposeMarryFail]
#If
checkmarry
#Act
break
#say
你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
#IF
#ACT
marry responsemarry fail
[@EndMarry]
你们二个已经成为了一对合法夫妻了。\ \
<关闭/@exit>
[@EndMarryFail]
结婚失败！\ \
<关闭/@exit>
[@MarryDirErr]
对方没站好位置
[@MarryCheckDir]
请站好位置\\
[@HumanTypeErr]
你变态呀，竟然选择一个非人类作为结婚对象。
[@MarrySexErr]
你变态呀，竟然同性恋。
[@unmarry]
#IF
Checkmarry
#ACT
Unmarry
#elsesay
你都没结婚离什么婚？？\ \
<返回/@main>
[@UnMarryCheckDir]
要离婚是吧？离婚是二个人的事，必须二个人对面对站好位置，\
如果人来不了你只能选择强行离婚姻了。\\
<我要强行离婚/@fUnMarry>\
<返回/@main>
[@UnMarryTypeErr]
你对面站了个什么东西，怎么不太象人来的。\\
<返回/@main>
[@StartUnMarry]
#IF
Gender man
#ACT
BREAK
#SAY
是否确定真的要与你共事多年的妻子离婚吗？\ \
<确定/@RequestUnMarry>
#IF
Gender
#Say
你的老公现在向我请求离婚，是不是愿意协议离婚？ \ \
<确定/@RequestUnMarry>
#ACT
Break
[@RequestUnMarry]
#IF
Checkmarry
#ACT
Unmarry requestunmarry
[@ResposeUnMarry]
#IF
Checkmarry
#ACT
Unmarry responseunmarry
[@WateUnMarry]
你已向对方发出离婚请求，请耐心等待对方的答复。
[@RevUnMarry]
对方向你离婚请求，你是否答应离婚？ \ \
<我愿意/@RequestUnMarry>
<返回/@main>
[@ExeMarryFail]
你都没结过婚，跑来做什么？ \ \
<返回/@main>
[@fUnMarry]
#IF
Checkitem 金条 1
Checkmarry
#ACT
Take 金条 1
unmarry requestunmarry force
#elsesay
要收一根金条的手续费，你没有金条，\
我不能让你离婚。\
<确定/@exit>
[@UnMarryEnd]
呵呵，你已经脱离苦海了！！！ \ \
<退出/@exit>
[@backcity]
#IF
#ACT
MApmove 0 476 226
Break
[@ask]
前几天我不小心丢了一枚戒指\
你能帮我找回来吗？\\
<确定/@exit>
--------------------------------------------------------------------------------
