[@main]
<我想结婚/@marry>\
<我想离婚/@unmarry>\ \
<分开/@exit>
[@marry]
求婚者必须是男性且领有求婚戒指，\
你预备好求婚了吗？\ \
<预备好了/@agree>\
<下次再来/@exit>\ \ \
<前往/@main>
[@agree]
#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 > 34
#elsesay
你的对象还没成年，等她长大点再来吧！小伙子不要心急嘛！\ \
<前往/@main>
#elseact
break
#if
checkitemw 求婚戒指 1
#elsesay
你没求婚戒指，弄到求婚戒指再来找我吧！！！\ \
<前往/@main>
#elseact
break
#if
#act
takew 求婚戒指 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>
[@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>
[@asktime]
你考查结婚工夫的申请已收回，\
请稍后。\
<确定/@exit>