结婚脚本

天卫

1. 结婚脚本
   
2. 
   
3. [@main]
   
4. <我想结婚/@marry>\
   
5. <我想离婚/@unmarry>\ \
   
6. <离开/@exit>
   
7. 
   
8. [@marry]
   
9. 求婚者必须是男性且拥有求婚戒指，\
   
10. 你准备好求婚了吗？\ \
    
11. <准备好了/@agree>\
    
12. <下次再来/@exit>\ \ \
    
13. <返回/@main>
    
14. 
    
15. [@agree]
    
16. #if
    
17.    checkmarry
    
18. #act
    
19.    break
    
20. #say
    
21. 你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
    
22. <返回/@main>
    
23. #if
    
24.   checkposemarry
    
25. #say
    
26. 对方已经结过婚了，是不是想犯重婚罪呀！！！\ \
    
27. <返回/@main>
    
28. #act
    
29.   break
    
30. 
    
31. #if
    
32.    gender man
    
33. #elsesay
    
34. 只有男的向女的求婚，还没见过大姑娘向小伙子求婚的。\ \
    
35. <返回/@main>
    
36. #elseact
    
37.    break
    
38. 
    
39. 
    
40. #if
    
41.   checkposegender 男
    
42. #say
    
43. 你变态呀！！！想搞同性恋！！！ \ \
    
44. <返回/@main>
    
45. #act
    
46.   break
    
47. 
    
48. #if
    
49.    checkposedir 2
    
50. #elsesay
    
51. 你们二个面对面站好呀，不要乱动。\ \
    
52. <返回/@main>
    
53. #elseact
    
54.   break
    
55. 
    
56. #if
    
57.   checklevel 40
    
58. #elsesay
    
59. 结婚要求你的等级必须40级或以上，小伙子努力练好级再来找我。\ \
    
60. <返回/@main>
    
61. #elseact
    
62.   break
    
63. #if
    
64.   checkposelevel > 34
    
65. #elsesay
    
66. 你的对象还没成年，等她长大点再来吧！小伙子不要心急嘛！\ \
    
67. <返回/@main>
    
68. #elseact
    
69.   break
    
70. #if
    
71.    checkitemw 求婚戒指 1
    
72. #elsesay
    
73. 你没求婚戒指，弄到求婚戒指再来找我吧！！！\ \
    
74. <返回/@main>
    
75. #elseact
    
76.    break
    
77. 
    
78. #if
    
79. #act
    
80.    takew 求婚戒指 1
    
81.    marry
    
82. 
    
83. 
    
84. 
    
85. [@StartMarry]
    
86. #if
    
87.    checkmarry
    
88. #say
    
89. 你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
    
90. <返回/@main>
    
91. #act
    
92.    break
    
93. 
    
94. #if
    
95.    gender man
    
96. #act
    
97.    break
    
98. #say
    
99. 婚礼现在正式开始。\ \
    
100. 你愿意娶对方为妻，并照顾她一生一世吗？\ \
     
101. <我愿意/@RequestMarry>
     
102. 
     
103. #if
     
104.    gender
     
105. #act
     
106.    break
     
107. #say
     
108. 婚礼现在正式开始。\ \
     
109. 请耐心等待你心爱的人向你求婚\ \
     
110. 
     
111. 
     
112. [@RequestMarry]
     
113. #if
     
114.    checkmarry
     
115. #act
     
116.    break
     
117. #say
     
118. 你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
     
119. <返回/@main>
     
120. 
     
121. #if
     
122. #act
     
123.   marry requestmarry
     
124. [@WateMarry]
     
125. 你已向对方求婚，请耐心等待对方的答复。
     
126. 
     
127. [@RevMarry]
     
128. #if
     
129.    checkmarry
     
130. #act
     
131.    break
     
132. #say
     
133. 你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
     
134. <返回/@main>
     
135. 
     
136. #if
     
137. #say
     
138. 对方向你求婚，你是否答应嫁给他？ \ \
     
139. <我愿意/@ResposeMarry> \
     
140. <我不愿意/@ResposeMarryFail>
     
141. [@ResposeMarry]
     
142. #if
     
143.    checkmarry
     
144. #act
     
145.    break
     
146. #say
     
147. 你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
     
148. <返回/@main>
     
149. 
     
150. #if
     
151. #act
     
152.   marry responsemarry ok
     
153. 
     
154. [@ResposeMarryFail]
     
155. #if
     
156.    checkmarry
     
157. #act
     
158.    break
     
159. #say
     
160. 你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
     
161. <返回/@main>
     
162. 
     
163. #if
     
164. #act
     
165.   marry responsemarry fail
     
166. [@EndMarry]
     
167. 你们二个已经成为了一对全法夫妻了。\ \
     
168. <关闭/@exit>
     
169. [@EndMarryFail]
     
170. 结婚失败！\ \
     
171. <关闭/@exit>
     
172. [@MarryDirErr]
     
173. 对方没站好位置
     
174. 
     
175. [@MarryCheckDir]
     
176. 请站好位置\\
     
177. 
     
178. [@HumanTypeErr]
     
179. 你变态呀，既然选择一个非人类作为结婚对象。
     
180. 
     
181. [@MarrySexErr]
     
182. 你变态呀，既然同性恋。
     
183. 
     
184. ;==========================================
     
185. 离婚开始
     
186. [@unmarry]
     
187. #if
     
188.    checkmarry
     
189. #act
     
190.    unmarry
     
191. #elsesay
     
192. 你都没结婚离什么婚？？\ \
     
193. <返回/@main>
     
194. 
     
195. 
     
196. 
     
197. ;=======================================================
     
198. ;双方离婚时没面对面站好显示的信息
     
199. [@UnMarryCheckDir]
     
200. 要离婚是吧？离婚是二个人的事，必须二个人对面对站好位置，\
     
201. 如果人来不了你只能选择强行离婚姻了。\ \
     
202. <我要强行离婚/@fUnMarry>\
     
203. <返回/@main>
     
204. ;=======================================================
     
205. ;对面位置不是人物时显示的信息
     
206. [@UnMarryTypeErr]
     
207. 你对面站了个什么东西，怎么不太象人来的。\ \
     
208. <返回/@main>
     
209. 
     
210. ;=======================================================
     
211. ;开始离婚程序后，双方显示的信息
     
212. [@StartUnMarry]
     
213. #if
     
214.    gender man
     
215. #act
     
216.    BREAK
     
217. #say
     
218. 是否确定真的要与你共事多年的妻子离婚吗？\ \
     
219. <确定/@RequestUnMarry>
     
220. 
     
221. #if
     
222.   gender
     
223. #say
     
224. 你的老公现在向我请求离婚，是不是愿意协议离婚？ \ \
     
225. <确定/@RequestUnMarry>
     
226. #act
     
227.   break
     
228. 
     
229. ;=======================================================
     
230. ;发出离婚请求
     
231. [@RequestUnMarry]
     
232. #if
     
233.   checkmarry
     
234. #act
     
235.   unmarry requestunmarry
     
236. ;=======================================================
     
237. ;回应离婚请求
     
238. [@ResposeUnMarry]
     
239. #if
     
240.   checkmarry
     
241. #act
     
242.   unmarry responseunmarry
     
243. 
     
244. ;===============================================
     
245. ;请求离婚后显示的信息
     
246. [@WateUnMarry]
     
247. 你已向对方发出离婚请求，请耐心等待对方的答复。
     
248. 
     
249. ;===============================================
     
250. ;请求离婚后对方显示的信息
     
251. [@RevUnMarry]
     
252. 对方向你离婚请求，你是否答应离婚？ \ \
     
253. <我愿意/@RequestUnMarry>
     
254. <返回/@main>
     
255. 
     
256. ;===============================================
     
257. ;没结过婚的人点离婚后出的提示信息
     
258. [@ExeMarryFail]
     
259. 你都没结过婚，跑来做什么？ \ \
     
260. [返回/@main]
     
261. 
     
262. ;==============================================
     
263. ;强行离婚
     
264. [@fUnMarry]
     
265. #if
     
266.   checkitem 金条 1
     
267.   checkmarry
     
268. #act
     
269.   take 金条 1
     
270.   unmarry requestunmarry force
     
271. #elsesay
     
272. 要收一根金条的手续费，你没有金条，\
     
273. 我不能让你离婚。\
     
274. <确定/@exit>
     
275. ;==============================================
     
276. ;离婚完成后的提示信息
     
277. [@UnMarryEnd]
     
278. 呵呵，你已经脱离苦海了！！！ \ \
     
279. <退出/@exit>
     
280. [@asktime]
     
281. 你调查结婚时间的请求已发出，\
     
282. 请稍后。\
     
283. <确定/@exit>
     

复制代码