传奇私服版本结婚脚本制作教程

结婚脚本
7 {: F! t5 [( [4 W4 w+ R, c" t! s

4 l: `, V  \' t0 {[@main]
! c" ], x; {3 @<我想结婚/@marry>\
<我想离婚/@unmarry>\ \
<离开/@exit>


' Q, ~' s! M; p' W& }" y[@marry]
  s. {- h6 w6 Z/ y5 g求婚者必须是男性且拥有求婚戒指，\
6 \  `5 _2 ^" C+ W& U6 j3 A你准备好求婚了吗？\ \
1 [* [# Y1 E3 }) P. i1 V9 d<准备好了/@agree>\
! z/ |- q$ N! j1 T  `3 N<下次再来/@exit>\ \ \
<返回/@main>

* K; [" j* w! f
' f7 b- }5 `* r! a[@agree]
) @  k3 h  i2 j. @#if
9 T$ U1 B; g8 K# o  a   checkmarry
, N' T, p3 C6 K+ p. o+ ?! Q4 a#act
* {! P: y+ \7 |% O   break
#say
你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
#if
- s. Q: ]+ K$ O4 c& K+ T  checkposemarry
/ \2 C, B! V- C+ z% o. C#say
0 ?  E! y5 {9 q: o' z- H* z对方已经结过婚了，是不是想犯重婚罪呀！！！\ \
<返回/@main>
1 R# N; l2 ?* I#act
  break
1 o% J6 D+ H1 P

) S  |8 N8 Z( ?( r  p1 T5 M" C% s#if
# w8 `* m1 G. S9 E) x   gender man
#elsesay
只有男的向女的求婚，还没见过大姑娘向小伙子求婚的。\ \
& v$ C2 q- d3 v1 n* o<返回/@main>
#elseact
   break
* i4 k) R9 s  P# s4 D% [" r# ?& s


7 ?# B* ?7 {$ c( _
" j" U/ }( g7 U* h/ L! Y#if
  checkposegender 男
4 i5 F7 j: C5 Z; x1 i1 M+ o#say
你变态呀！！！想搞同性恋！！！ \ \
, t5 [' B" R7 e<返回/@main>
#act
' i3 y: Z5 b6 ~% O& n+ W  break
# ?! `, I9 i; P

#if
   checkposedir 2
#elsesay
你们二个面对面站好呀，不要乱动。\ \
/ Y/ y6 K0 U. i- W1 ~* G<返回/@main>
#elseact
  break


#if
  checklevel 40
. V9 K6 e% d& ^- J7 f6 m8 l, P#elsesay
- r3 W6 k. I9 R( T2 i! l8 N3 y结婚要求你的等级必须40级或以上，小伙子努力练好级再来找我。\ \
<返回/@main>
3 h' D6 p6 V# ^. Q#elseact
  break
# `# ?4 V" C* {) j3 Y#if
, @$ A1 A1 R& J& Z0 `  checkposelevel > 34
/ R- q" U" t  E3 a4 t; Z& l#elsesay
) C, j4 g$ G, o" Z5 N你的对象还没成年，等她长大点再来吧！小伙子不要心急嘛！\ \
$ w5 g/ C1 ^, O  `/ t: ~# N, W<返回/@main>
#elseact
  break
+ _! y# a. l1 d1 o# L* \#if
6 f. n. O( Q/ s   checkitemw 求婚戒指 1
& D3 R8 X3 _3 A#elsesay
你没求婚戒指，弄到求婚戒指再来找我吧！！！\ \
) j7 r) O9 S* t6 S! O! [<返回/@main>
. H( T9 v- I, j3 f" P#elseact
4 |5 i  B0 o* O; C% B   break


0 i, a$ ^  q* w5 H+ Q6 e#if
4 V, o& r- O' H#act
; C" Z2 t, }3 t0 h   takew 求婚戒指 1
2 K8 f2 @. r/ y. {% X$ I   marry
4 C, \& C( [( K6 @



* o! G" n0 e, ~( X  M; j
( a5 t- |+ {) {4 C[@StartMarry]
3 M. K$ ]4 A7 ?! d! w( G1 L#if
& X3 U& X8 V1 e8 {% Y" ~   checkmarry
( a. e! R- o5 t#say
你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
#act
   break

" }) Q' |) F# |& f7 |2 l7 C
  {/ K  d$ i) D( D: v#if
6 a7 o- e1 b) Q# O+ u# t. }' E) X   gender man
#act
   break
#say
婚礼现在正式开始。\ \
6 ?: s6 L9 D" k5 S, I你愿意娶对方为妻，并照顾她一生一世吗？\ \
<我愿意/@RequestMarry>

% c8 h8 a4 n& R- @, V" X! u
#if
   gender
  i0 W+ l3 G' W/ P#act
   break
" I/ T& G- t1 U#say
婚礼现在正式开始。\ \
请耐心等待你心爱的人向你求婚\ \

0 j8 {9 A# Q0 K, N! a% h

' Q& J& g6 M. a% w
$ g; @8 ^. |& j7 p  K+ C[@RequestMarry]
#if
   checkmarry
#act
4 q+ ~" u9 A$ k3 C   break
5 [' p, {/ o, Z#say
( }2 }* H; |" ^7 B0 @你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
7 l6 J) b, `# ~  a4 t$ k

#if
#act
1 @+ f2 c& @5 b  marry requestmarry
2 m0 l6 S* O+ P9 J; w& }2 T[@WateMarry]
: n8 j! p8 Q1 ]$ h你已向对方求婚，请耐心等待对方的答复。

& \* O2 n1 R. u4 t* _9 s: i
, i! E1 I3 u- d0 C0 @, ~1 J7 Y  N[@RevMarry]
3 z# Q2 u* s6 X5 u8 _1 V#if
   checkmarry
+ M8 B) T) J2 K9 F) O8 w#act
4 n% z# T" y9 U- t   break
#say
- X9 o/ ]* B! W' R" `) v+ e你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
) }! v& `; ], G4 _3 S9 y5 {<返回/@main>
, N+ E! @' Z+ v5 n8 Q( d

#if
4 S  J9 m3 n# T- a' u# x5 m+ Y#say
) W# o: {8 v2 N& T. b6 y- j对方向你求婚，你是否答应嫁给他？ \ \
8 l6 Q8 R% ^  w  h; Z<我愿意/@ResposeMarry> \
6 E1 s8 E+ q- G<我不愿意/@ResposeMarryFail>
, Q( ?# k/ o) b) W8 q[@ResposeMarry]
+ |; Y$ R* z3 e$ V#if
   checkmarry
#act
. A* S! X0 q4 V- z9 c' Y: w3 X   break
#say
  _" }* E% J( V! k- D2 I, p你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
. n& e% s. C! U) H9 a1 t<返回/@main>

4 k8 ]4 L2 c. o2 M. N8 J" X
3 j! W/ q( S; [' y#if
#act
  marry responsemarry ok
% L. f& Y4 b6 ]

6 g3 l( d' c/ p1 ~( P  r4 Z- j[@ResposeMarryFail]
  A  [  K0 ?4 l- n# d4 v3 z$ _#if
) x2 k0 `0 j6 L) j0 |2 t   checkmarry
#act
   break
#say
6 L+ _8 K+ `- U( P0 ^! ]( S你都结过婚了，还来注册结婚，想犯重婚罪呀！！！ \ \
<返回/@main>
/ V* }1 E& q8 {8 q

0 ^& T0 j9 d$ ^' U8 t#if
#act
7 q. E& U0 ], s6 w% K9 T  marry responsemarry fail
[@EndMarry]
7 K$ k# W# E5 ^# F+ w! ~4 o4 n你们二个已经成为了一对全法夫妻了。\ \
% @7 K! D" k( h+ ], E3 f1 I4 }# L<关闭/@exit>
3 H2 N1 [/ N- ^) H; M$ `" Y1 J[@EndMarryFail]
结婚失败！\ \
: v( w& ~: b% W! @<关闭/@exit>
& d9 w5 P" z8 b: ~3 u0 Z[@MarryDirErr]
5 E& A, m+ d3 [0 ]* M对方没站好位置


3 a7 m7 C5 Z) c( }, H3 G# I$ O[@MarryCheckDir]
* F* ?6 r7 a6 c7 S9 O请站好位置\\
- H3 A  i- }( L* k

[@HumanTypeErr]
; L& g% D! A+ Y你变态呀，既然选择一个非人类作为结婚对象。


[@MarrySexErr]
你变态呀，既然同性恋。
8 J. H$ h4 p/ p6 p! T$ {+ J/ @" h
; H6 g6 a7 y8 ~3 a! T) I
. E6 |- W/ \1 p9 i;==========================================
5 j" i7 E2 @9 ]5 H离婚开始
' E: a; e' E5 Y+ g+ m[@unmarry]
% C# C8 }; A8 {% O- X. G6 q* j* l#if
$ J# }2 G. M1 c, I5 ~* H   checkmarry
0 O3 b- M# ~. I2 S9 m& o  {#act
' g4 v  }$ n; W1 R& _/ J( h- P   unmarry
4 j& y* K/ W' W/ A* {9 g#elsesay
你都没结婚离什么婚？？\ \
<返回/@main>

# |$ F. N) G! c4 R- B$ u( M  }. v

: v' j; @$ |' h3 y" F
+ f/ C8 H' J# |; H( ~/ j
;=======================================================
2 l% H8 E. O: \: B9 I6 c' Q  B;双方离婚时没面对面站好显示的信息
" ~. a# I# E! v9 W1 m, l[@UnMarryCheckDir]
要离婚是吧？离婚是二个人的事，必须二个人对面对站好位置，\
& O9 }5 @( i/ g# ^如果人来不了你只能选择强行离婚姻了。\ \
0 r" f3 Z1 x8 {4 |* K6 P$ B<我要强行离婚/@fUnMarry>\
9 T( f; u2 R; ?4 L<返回/@main>
: ~, v7 e2 \0 ~! \% D2 d2 z;=======================================================
;对面位置不是人物时显示的信息
! `3 h! `" P, ]  }6 |[@UnMarryTypeErr]
- a+ C2 _; X6 u& s) z你对面站了个什么东西，怎么不太象人来的。\ \
8 H, W- O6 R* U<返回/@main>
6 h2 ^/ V6 o- K0 K$ O$ I( ~( V! @+ u
( w4 c4 K2 W3 \
;=======================================================
;开始离婚程序后，双方显示的信息
1 ~+ o; n: j/ ?8 P[@StartUnMarry]
0 X  R5 U6 d" h1 r#if
   gender man
#act
   BREAK
& M& N' `: g. B% K# {#say
是否确定真的要与你共事多年的妻子离婚吗？\ \
" G3 X; |/ P- x5 S1 e<确定/@RequestUnMarry>
5 Y" w% d& \/ }, V) r# O1 Z( B

6 X$ R/ d, P5 Z#if
  gender
0 l0 E/ R% e2 H- _0 \( r#say
9 j  ~# G- p7 y+ m1 H8 v2 [+ p$ i! O& R你的老公现在向我请求离婚，是不是愿意协议离婚？ \ \
# n2 B% Y2 v( |<确定/@RequestUnMarry>
#act
  break


;=======================================================
; I; @" C" B" J;发出离婚请求
[@RequestUnMarry]
1 h# T/ Z/ U* H' Z/ @6 t8 C#if
% c4 Z! Y& @: P, p; P) T, G  checkmarry
; ~/ `3 G9 F* ]8 {7 W5 W#act
( E( I+ a$ l& z1 i: W# h  unmarry requestunmarry
( a+ t' o  G. ~/ C7 r8 D;=======================================================
/ S4 U: ]6 i, X/ K;回应离婚请求
[@ResposeUnMarry]
#if
; a' U4 E8 t  j. q. a! w4 ?& ~  checkmarry
# o& I% ?5 j8 X: b#act
- j5 C6 }! y7 ~3 `0 N' n  unmarry responseunmarry


& N- h( X+ V5 i7 R) l;===============================================
;请求离婚后显示的信息
[@WateUnMarry]
# d" h3 ~* b! |; {5 k  W你已向对方发出离婚请求，请耐心等待对方的答复。


( s# c. S4 \; g/ M;===============================================
; d) P  P% u& B" _* e;请求离婚后对方显示的信息
[@RevUnMarry]
对方向你离婚请求，你是否答应离婚？ \ \
<我愿意/@RequestUnMarry>
% h/ l: x+ E4 F6 z4 i5 i8 O<返回/@main>
! J: d7 }7 f0 G2 ^* |+ C

3 L! [9 e6 E/ K8 k;===============================================
;没结过婚的人点离婚后出的提示信息
: f% |4 Z& _8 M1 o4 h4 j" _[@ExeMarryFail]
你都没结过婚，跑来做什么？ \ \
% @. y" _: S2 i[返回/@main]
' t, P$ q$ L) i
9 [( O& ?5 g2 W3 K0 e+ x
. T' G/ M  q! X- u2 I;==============================================
5 p* s3 [$ q! J& ];强行离婚
[@fUnMarry]
#if
  checkitem 金条 1
) H8 t- C  ?/ i6 Q8 E4 X9 ?  checkmarry
#act
  take 金条 1
' J' o: S: F5 K+ }; B2 h# Z. C  unmarry requestunmarry force
#elsesay
要收一根金条的手续费，你没有金条，\
我不能让你离婚。\
<确定/@exit>
( x4 ~/ j4 n( u* p: `8 g: D;==============================================
;离婚完成后的提示信息
3 W+ f6 m' ^/ l! I9 m: f! h" A[@UnMarryEnd]
呵呵，你已经脱离苦海了！！！ \ \
<退出/@exit>
[@asktime]
你调查结婚时间的请求已发出，\
# N9 ^( X3 T, U请稍后。\
<确定/@exit>