传奇部落

传奇服务端NPC脚本中行会竞价收人脚本是怎么制作的?

[复制链接]
发表于 2023-6-16 22:31:28 | 显示全部楼层 |阅读模式
QQ截图20230616222105.jpg - a* N7 U% M6 N$ Q

! |1 ?4 ~, n  [" b6 f3 x
% a" Z7 s4 w* E2 N6 q
8 Y2 B8 Q, ]1 J- J

6 O+ Z( `* \  R! ~[@main]
0 j- g- p9 Z3 U; Y#IF
! x- {3 F' J5 H9 N9 _  t0 m9 g#ACT
" U* e6 g( d" k! e! {* G  T6 OMOV S$第一行会竞标 <加入行会/@加入1>  B$ v+ l" e; t0 O7 }
MOV S$第二行会竞标 <加入行会/@加入2>
) ?6 H1 Q$ ?+ s* F% L: qMOV S$第三行会竞标 <加入行会/@加入3># Q& c& z4 \" u6 C
MOV S$等级要求1 <$STR(G304)>
7 n- `1 ?) j  y) pMOV S$等级要求2 <$STR(G305)>
- u; P" E( B3 FMOV S$等级要求3 <$STR(G306)>
" ?1 |: m/ p9 T$ d+ ]6 C9 I8 G; D" |: O0 J- ~

2 Y9 w+ D* d4 a* O#IF2 S9 N6 V- w7 ?
equal A304 允许收人4 c( b, [+ G# G# ~
#ACT5 t4 B2 j; s) R- [% D' T' @' N
MOV S$收人状态1 <允许加入/SCOLOR=250>
; s3 H7 q' M  [2 ^7 t/ n
- S5 \7 Z0 u& ^) B1 W. j" `$ K

  H( u2 l% }* p#IF: ?5 |/ l; G9 e( w$ F. ?( s3 [5 |
equal A305 允许收人
+ H1 d6 e- v% [  _+ p& _6 ~$ K#ACT7 b5 M, w- J5 y
MOV S$收人状态2 <允许加入/SCOLOR=250>
% }* j( Z1 L6 Y9 ]9 m
7 r& \# @' L8 F. ~0 e5 a& K

& k8 g& `, c, K, Q#IF
  J' s% c# B% G+ Q" E- zequal A306 允许收人
# u  ~1 b, c+ H* y8 }) I#ACT
% F( ~4 C9 o. W5 T7 MMOV S$收人状态3 <允许加入/SCOLOR=250>
* D9 W4 a+ x* t# Z+ [6 u' E+ Y) a% Z  q
, {! A1 R: K4 ]/ M6 n
#IF. w! |7 [7 g; ?) J9 j3 O: O+ M
equal A304) o4 p- F8 o# ?% G
#ACT
+ U( y4 H2 c% F0 ~; x; Q, p% cMOV S$收人状态1 <禁止加入/SCOLOR=249>- k  W0 E, A! q3 |. K
) q$ U" v2 Y; p! j, r- `5 F; S. s
  C: ^" A& F: F' A! i
#IF7 W4 c! o7 I/ y: C1 I6 v% s
equal A305
! P8 K* e1 q  \' c#ACT4 X4 _7 K, N, v8 l' Z& ]
MOV S$收人状态2 <禁止加入/SCOLOR=249>
8 F3 I2 k; l4 q2 }; O+ \. {8 Z, P* w
4 C0 n; q% w4 Z1 t9 m

, ^0 C( K( F# k0 g' L#IF
) W4 Q, P4 C6 i. }8 @2 @equal A306
1 N# w' L/ L8 W9 k3 i  k#ACT
% d9 w: [8 ~) OMOV S$收人状态3 <禁止加入/SCOLOR=249>
. q4 i/ h- \8 h0 C: O$ n
% s. j3 b6 {9 Q% b' I; z) W
: }3 `! f6 P5 ^# ~, F8 p0 }
#IF
, @0 S- S: h- _7 z/ I3 F! w- \#ACT
; @8 m4 ^' D! B% q% L/ S;为了加空格才转换9 p+ u4 t1 D/ P0 G1 Q4 h$ c* V
MOV S$行会名字1 <$STR(A300)>7 Y7 ^( `1 o+ X' ]+ C/ X: |4 T
MOV S$行会名字2 <$STR(A301)>$ \# A, O, [0 s, Y7 F2 Z
MOV S$行会名字3 <$STR(A302)>
' @6 c/ }( f) j  B9 c
/ h" N! A( N4 V3 y
0 h* n3 F% t% N8 h& O+ i0 \
SetStringBlank S$行会名字1 20 1
  Q( E8 L& P+ w8 p1 N8 R2 DSetStringBlank S$行会名字2 20 1
' v0 `% B# ]: H6 m+ ~  A" R
- x" H/ _) s9 X) c  v* z

0 R- a$ ?# I3 B3 o; s3 NMOV S$竞标价格1 <$STR(G300)>4 X# K2 l% D  x: Q  D: x' m2 z
MOV S$竞标价格2 <$STR(G301)>% L1 q& d: V- m8 H5 d0 H. ^8 i. B
MOV S$竞标价格3 <$STR(G302)>
! W; c  ^" E4 E$ h& t, D9 G! U
, H# C( ?! ~2 K9 f- o7 P0 V

* j4 m9 p6 |. ~0 ~SetStringBlank S$竞标价格1 16 14 Q' q' b; b4 j" E7 y, o
SetStringBlank S$竞标价格2 16 1. B5 m$ u9 \4 b. j0 x

% i$ R1 @9 |; s4 R. U) ~) V! I8 K
+ \7 W1 X. Z4 v, }! o6 v% e
#IF8 D2 h8 y+ |/ {9 s* L
ISGUILDMASTER
& B, p, i" C, x; T#ACT7 c& Y* j+ _, N9 r: b) R
MOV S$第一行会竞标 <出价竞标/@竞标1>
  s- n  f4 P- ^# K7 |! jMOV S$第二行会竞标 <出价竞标/@竞标2>
* o" \  e( l0 @" W8 CMOV S$第三行会竞标 <出价竞标/@竞标3>! y: i; A& m- J; B0 q' c- @
9 \: `' g+ J5 g% j2 W! f/ Z' k, |0 Z

& l, [) u  B* ]/ M;为了加空格才转换* d" G. V1 f& V: H8 x* c* D
MOV S$行会名字1 <$STR(A300)>
- D' n9 \3 }; h# x5 p( K3 VMOV S$行会名字2 <$STR(A301)>3 T1 H; F5 ~; n( n  _! I
MOV S$行会名字3 <$STR(A302)>
+ l5 G  K6 {1 Z* h+ \" E- x. C3 m  \
; K! ]! W; [8 O9 ~. c
% @+ g+ w! y4 x) W6 G5 y0 @
SetStringBlank S$行会名字1 20 1
* C- e& R. G$ M1 j: V& `  MSetStringBlank S$行会名字2 20 13 h# ~2 n+ v  ~  n

5 S- P! r& {( T/ ?% t9 [

2 z! U0 W  C4 }0 `: I* T+ I3 P* Z
) h- f" z' ?- J' x7 r5 z

2 ^7 Y0 t2 c  X+ |MOV S$竞标价格1 <$STR(G300)>
. y6 Z0 x7 e  k# z) @; tMOV S$竞标价格2 <$STR(G301)>0 v& e+ W6 q' q" W& g8 c9 P/ j
MOV S$竞标价格3 <$STR(G302)>: C; E# }" G! H* Q3 k

& ?8 R5 ~! p7 H8 @8 L, h

1 Q" S# K; s3 A! {& u4 }2 A( H+ R2 CSetStringBlank S$竞标价格1 16 19 t& y6 g1 S$ @) \6 M) D
SetStringBlank S$竞标价格2 16 12 s, m4 v1 N% d& \- r- N

# z" I. B: a3 G) X
! p, Y. O( C8 b' @
#IF
" N$ A) M9 V1 q9 _  T0 H+ LISGUILDMASTER
! K  b+ V# i; Bequal <$GUILDNAME> <$STR(A300)>; N6 r9 \" J5 @3 |, `' T+ X
#ACT, H4 ]5 @* c2 r" d# w  _
MOV S$等级要求1 <$STR(G304)><设置/@@InPutInteger85>1 t" h! x1 ?& N2 y
3 e6 u3 m6 [! v0 p0 R$ F2 M$ E- P6 f
3 P! I" N  o- q% u( U# k5 J
#IF* g: O6 C8 d% A# _
ISGUILDMASTER
6 ~; b, V: s" u, s: W1 E" g6 o/ ~equal <$GUILDNAME> <$STR(A301)># H5 c# X- V4 ?# F1 O+ z* {( ~
#ACT- g) j  z$ c# _: L+ Y
MOV S$等级要求2 <$STR(G305)><设置/@@InPutInteger86>4 F4 d2 f, K5 x
" e: U( o: g- ]3 B" u/ _
7 U3 s. J, o, z
#IF
8 }4 _, N) {# gISGUILDMASTER6 m5 S) \  p0 D4 ?( q3 |* s# ?
equal <$GUILDNAME> <$STR(A302)>
3 n, K+ \) q( b6 C( M#ACT3 ~3 g+ o) E9 @0 i- R. r
MOV S$等级要求3 <$STR(G306)><设置/@@InPutInteger87>
% a# f  Z1 `" n1 O* {
8 L" D6 `: y" g- O" e. l

+ k$ i* p6 d& B5 a' Z#IF
  F2 b3 j3 N$ B1 `ISGUILDMASTER9 \7 X5 l% y* F
equal A304 允许收人
% X& k+ Y& g1 h6 y! J2 h& q/ vequal <$GUILDNAME> <$STR(A300)>
1 l8 b- L- W# k* a2 E% G% L#ACT$ O6 U5 P' C: ~9 m4 O! F
MOV S$收人状态1 <允许/SCOLOR=250><设置/@收人1>
# L0 A' X2 N3 C( }1 Z' i$ w  e) h! E
) ~$ M- n; g4 K4 F% m
#IF: ~6 s/ ~2 d0 H6 G+ z
ISGUILDMASTER
2 \+ k4 o3 r1 aequal A305 允许收人
$ K" F2 F8 N3 h& X$ U3 ^; pequal <$GUILDNAME> <$STR(A301)>
! }% M  Z7 @& u7 P#ACT( |! S) M6 j3 m
MOV S$收人状态2 <允许/SCOLOR=250><设置/@收人2>7 `2 ~7 V+ l+ L4 \$ D# w. M
/ K$ e( v+ w) [: f

: ~+ P% _+ r8 m#IF4 P/ C" G& b; F/ J6 H2 A
ISGUILDMASTER
. E, `+ U8 y7 B1 _3 }/ w3 sequal A306 允许收人
7 d1 H, R5 W" [2 E/ \equal <$GUILDNAME> <$STR(A302)>
& w7 B2 O/ o9 [& v0 h: g. e. s#ACT
& }/ V- r' c8 W& W) i  n! cMOV S$收人状态3 <允许/SCOLOR=250><设置/@收人3>
3 U! j5 X! n. g! Q, c/ ~0 q9 q& ]9 @8 @" S

' D2 ^! S2 d* Q#IF
, M$ b! l+ d, HISGUILDMASTER+ x  L' C! J2 j7 A/ p# P0 Y3 d& j
equal A304
! N. O: B7 ]  K6 _9 h3 u& B. mequal <$GUILDNAME> <$STR(A300)>
& a" A8 U* R6 V( v' M#ACT
, S5 ]  L& B, U+ f  D/ GMOV S$收人状态1 <禁止/SCOLOR=249><设置/@收人1>2 Y# w& Y' x, `2 J; l/ h: Z
3 U( d1 x* r$ G. R. i

" j8 U3 ~( _0 r9 {% p& |- W#IF9 ?  r! c5 w/ ^' ~; i5 X' K
ISGUILDMASTER# U& S5 U$ @# r7 D" v4 p' N* a
equal A305
1 T, p- S7 A" W4 A1 {. T7 p3 @( H0 Xequal <$GUILDNAME> <$STR(A301)>% I7 m% ?5 @( a$ I% }3 c
#ACT4 c  ?" S0 w% J# K- S
MOV S$收人状态2 <禁止/SCOLOR=249><设置/@收人2>
8 p+ m; G& _- q% P+ \
- D( o  s% f7 H" }9 A" N
, m8 J+ C% d1 q
#IF2 \9 }6 }2 ^( t! y# W% W0 q
ISGUILDMASTER/ C3 a" }6 T, f. ?: A
equal A306
7 V# }) D. Q7 iequal <$GUILDNAME> <$STR(A302)>2 c  U* [# t! y6 c9 M. g& T1 H$ p
#ACT
( C3 c3 B6 r8 D* k. SMOV S$收人状态3 <禁止/SCOLOR=249><设置/@收人3>
0 M" N; S  q7 X' _. j3 F9 Y1 q
& P: z) C6 d/ [! o
#IF/ L- t( }! y6 J+ ^) x
#ACT  }% X+ {, E! D6 e/ N
goto @字符1
% h9 G- y. J# ?) m% d. z
% b1 J4 A, L# A3 F9 E" ~0 _0 P
& W! `0 ]8 \; d1 g/ F
#IF- E( O9 @; r* r% Y' x
#ACT
9 j# B( I  j# f1 W- f1 Y: c: dOPENMERCHANTBIGDLG 10 48 1 0 0 16 1 523 11
! s4 K* f0 R& t+ R#SAY" Q+ w1 X! G5 ^( j
& g1 W! Q, w8 G" |

" W" L2 c5 u( G* x- ~     {<$STR(S$行会名字1)>/SCOLOR=251}    {<$STR(S$行会名字2)>/SCOLOR=254}    <$STR(S$行会名字3)> \7 F' C" W7 B+ l# A3 ~  n* ]; v" u
 \" U+ ^) V, e; g9 I2 _$ ?
  <[竞价元宝]/SCOLOR=116> <$STR(S$竞标价格1)><[竞价元宝]/SCOLOR=116> <$STR(S$竞标价格2)> <[竞价元宝]/SCOLOR=116> <$STR(S$竞标价格3)>\8 l% i; b# P3 `. |& G# R5 g: @/ ]: T

  d( G1 |1 v5 \( }; G7 P( p. ]
% e- H* i) N7 m, M
 \
# d% d' B2 H* b1 p4 N  <[需要等级]/SCOLOR=116> <$STR(S$等级要求1)><[需要等级]/SCOLOR=116> <$STR(S$等级要求2)><[需要等级]/SCOLOR=116> <$STR(S$等级要求3)>\
/ i% K1 p+ J$ ^ \
# u) D2 f% }) [  <[收人状态]/SCOLOR=116> <$STR(S$收人状态1)>    <[收人状态]/SCOLOR=116> <$STR(S$收人状态2)>     <[收人状态]/SCOLOR=116> <$STR(S$收人状态3)>\) r; Y8 D6 O" M- o3 t3 d7 w
 \
, V: V6 {' X# G+ f/ M/ e. s     <$STR(S$第一行会竞标)>          <$STR(S$第二行会竞标)>          <$STR(S$第三行会竞标)> \5 S' X; n* `' \5 Y
 \# f$ e5 v7 K% x2 X4 A- R7 q
 <行会掌门可竞拍以上3个选项,每次需在当前竞价上加1000元宝!(每个位置分别竞拍)/SCOLOR=7>
1 n( P- K' G3 i) h" V
+ P. P. S- }3 S  j; D7 c4 h9 \

0 r' d& D* d3 c7 T0 G7 E) T" S( c[@字符1]
! g- b. C* J; M4 S#IF
' G8 ?" M; g* t1 E8 w) }ISGUILDMASTER
9 J  d5 Q; k5 g" \9 w7 ~equal <$GUILDNAME> <$STR(A300)>: H5 Y$ p$ E2 J
equal <$GUILDNAME> <$STR(A301)>$ h7 A+ ^/ t( i9 M
#ACT
3 `5 ?9 E2 h# c; E! B" DSetStringBlank S$收人状态1 20 1' Y6 a+ {, N1 t& o+ ]4 x
SetStringBlank S$收人状态2 20 1  Z: p% R  q& Q6 p) s. i" }( ~3 e( t
SetStringBlank S$等级要求1 35 1
! ~6 W& E$ m. B) m9 I9 w' uSetStringBlank S$等级要求2 36 1. u' W( z9 M+ E" X7 V, o$ H$ X2 v
BREAK4 a2 R) }0 n1 {4 \3 n1 O
# P- @. r$ b# j. h; I' K
7 a4 F5 \# p9 e  t1 W2 C' N" }
#IF% d% {: h* t4 ^6 `
ISGUILDMASTER
/ a" }+ e7 Z' Iequal <$GUILDNAME> <$STR(A300)>) O1 r! R- G9 S( p8 P0 M/ Q# e( V  ]
#ACT
8 H+ h1 y  o1 GSetStringBlank S$收人状态1 20 13 ^5 ?5 s0 l, m' X9 M& [- b
SetStringBlank S$收人状态2 20 1' `# r, R5 K9 y3 w' l
SetStringBlank S$等级要求1 35 1% Y' F/ |! Q+ y1 p1 o* i1 k
SetStringBlank S$等级要求2 17 1
9 F1 S- X% D( u1 sBREAK
" l. i% o" }" f. w0 i& K
- S8 A* H8 G  G0 o+ b
! `8 j1 H1 b0 {
#IF' s6 C* `# s6 \6 P6 P4 p+ G
ISGUILDMASTER
2 f, Z, L8 _* L9 D. J2 _equal <$GUILDNAME> <$STR(A301)>* d0 x/ O( [7 u" ]
#ACT
  ^; y" i1 h9 a" V# ySetStringBlank S$收人状态1 20 1
7 C3 H2 Z4 r9 a; w2 Y, i  ?7 SSetStringBlank S$收人状态2 20 1! ^; ]! J! k6 f( Z8 e
SetStringBlank S$等级要求1 16 16 d* j! R. J8 y  w7 N& Q
SetStringBlank S$等级要求2 36 1+ x6 z# i! C, I" h; f9 i
BREAK
8 ^3 o! E+ p3 }1 r
, z7 ?# @: n5 i1 C8 \2 f
- M0 w- W' E+ w7 P) r
#IF
+ f: u) o: R4 Q% \- O#ACT6 m7 b0 N7 U+ h
SetStringBlank S$收人状态1 20 1  e9 L, v$ y9 K! I: _* e. a
SetStringBlank S$收人状态2 20 1
0 g5 M" Y. G8 F6 uSetStringBlank S$等级要求1 16 1
0 U, i# B5 M4 [5 J; TSetStringBlank S$等级要求2 17 16 w& P$ s- ?) {1 A0 e
BREAK
2 F( `1 T9 N1 z) k; F# k" \/ ^, w/ b3 s* n$ P
6 p( ~) [5 Y1 P2 n: k
[@收人3]+ `) }% y8 T( m! I
#if/ |# a8 P) |% ^$ K! ]* ~2 O
equal A306 允许收人
7 x+ [) Y0 W+ R) G+ ?#act/ _7 M' t3 z/ i( r, ]
messagebox \\\您将关闭行会招募状态.确定关闭么?  @禁止3 @取消1 s  K; {3 O1 j+ q' X1 G
#elseact' Y$ n' Q  D4 N/ g4 t
messagebox \\\您将开启行会招募状态.确定开启么?  @允许3 @取消: r% _  F( ^9 g) j1 G
, ^) l' |8 e5 p& ~( K

& u  ^3 q; w# A  D[@允许3]
; a, \, Z1 H1 k# @, V- n! N#act
% k& C; R. R6 i& CMOV A306 允许收人8 S) H6 M& y; c
Messagebox  当前收人设置为允许收人3 |" l4 T/ _  @2 p2 R: m6 k( h% B
goto @main1 b2 V$ `+ ]7 U
% q# l# Q0 e: w( p2 u. U  T

6 e+ H4 ?/ i0 N& V: ^[@禁止3]
4 r7 x% s0 z7 Q& _#act# o( d6 m7 X. S7 u0 |0 n; ~
MOV A306
# X6 v; Q0 J+ v0 z0 d' `1 oMessagebox  当前收人设置为禁止收人: X% M; w, u3 I) \- ?* X
goto @main
% Q% o2 R# L# j; o7 f3 L7 [
( o/ C6 F  @2 S; c

( z5 I3 P- K3 g3 W2 A. j4 w[@收人2]- \! ~; u! M% u
#if) g5 l6 ^( ?7 U- o. @0 `+ K
equal A305 允许收人9 X4 ^- {. Z* @2 ]0 S! M% P. @
#act
; A  B# o: c& g8 }/ m- X( Y( ^messagebox \\\您将关闭行会招募状态.确定关闭么?  @禁止2 @取消$ O8 r- A# c2 N" Q
#elseact3 O4 t3 Z0 {0 ]& L
messagebox \\\您将开启行会招募状态.确定开启么?  @允许2 @取消/ ^& T3 g$ v/ T5 ]) I6 p" ^7 B
0 x9 s/ d/ m$ H  V. D* P  Y
% j' u* v: m& e7 C
[@允许2]; D# Q! s1 s& k0 k' S5 e4 _1 I% {
#act
6 i* Z* Z% q8 Q& ~2 X* P/ EMOV A305 允许收人' T6 q4 b1 q0 o1 }7 S, K. t
Messagebox  当前收人设置为允许收人
2 a7 p6 R2 ^7 Ogoto @main
4 k5 u8 i( s8 O1 \; Z/ C5 Y! t2 Y3 d6 q

3 N$ P8 t& F4 i9 T$ m5 ~+ l, h[@禁止2]$ n9 S% p; z2 _
#act5 Z( P1 T# I9 A, d' n7 e- R
MOV A305
5 v* @- _$ E  CMessagebox  当前收人设置为禁止收人
% s! \6 T) y  G; v! g" h$ {6 pgoto @main8 w6 z% M" j, E% J! n' u. t0 W
) c( S0 K) ^5 ?' @
9 V: e; O5 ~2 U" t4 L
[@收人1]
4 x+ r: k5 t, I* H: P#if+ z  [* y8 ^6 ]4 [
equal A304 允许收人/ N3 @% `" p1 T( _- T
#act
8 K0 k( z  F) {/ Y8 A% ?messagebox \\\您将关闭行会招募状态.确定关闭么?  @禁止1 @取消
, V% y  U8 r' H% Q) ^# y' W#elseact
* C7 x! p+ T& `messagebox \\\您将开启行会招募状态.确定开启么?  @允许1 @取消' y8 z: T8 @! B$ K5 r+ u3 S, E

6 }: G6 |( Y4 n( u, n9 K/ c

1 f1 s/ s. R& D# T[@允许1]
  e) D) l2 A8 \/ g& I& }1 b#act
) p/ q! M2 p. \# wMOV A304 允许收人0 D6 e7 X: v( n1 _" F# Z6 ]
Messagebox  当前收人设置为允许收人; K6 P, f0 Z  D: d
goto @main6 S, l6 u+ x5 a- [2 k
3 E% l7 d( ~8 h- H
+ o; |- j& P- [5 D& v
[@禁止1]! z+ j! S: ~0 q$ l9 t" t  V
#act6 W) X/ v  p3 O/ D, @+ L- o# E' }
MOV A304
$ s# }$ J. f, xMessagebox  当前收人设置为禁止收人  s% X3 g6 h/ J: y0 u* ]
goto @main! E1 N7 i' Y1 j6 g2 r# p$ E9 u

" `2 F! h) G# I; ?
1 b. I, g7 b/ O
[@InPutInteger85]9 p- V2 U' E# _5 x: B
#if$ `+ s9 `. t  V5 v( {' [
large N85 0
( x6 z7 g5 i! S& l& J+ TCheckStringlength <$STR(N85)> < 4( Y$ y! N% C# |
CheckStringlength <$STR(N85)> > 0
; W" p7 n" _+ Q/ B- p#ACT
$ o3 u" g: |* T0 \* {  X, dMOV <$STR(G304)> <$STR(N85)>  P, ~" Z% g! R5 K& b
Messagebox  当前收人设置为<$STR(N85)>级
4 U$ |1 M7 U1 T: x8 x7 D: T9 O" F; CGOTO @main
/ O! z! K& V  j; W# Y3 P7 uBREAK
1 e6 A9 U( k9 [+ p#ELSEACT5 [; Q* H% f2 ^1 W7 J
Messagebox  请输入正确的等级1 _) c! c8 P% {: q* p) [

- R& S) F( s4 Z: ]

0 Y# l" g3 Q1 [  ?+ q- ~[@InPutInteger86]% L8 T% `1 L) Z7 m
#if
# `0 I( T$ z  E0 K8 klarge N86 0
# {7 t# _& @5 o: \9 Z. V5 D: MCheckStringlength <$STR(N86)> < 4
  w" F1 p; o5 G/ R& \. s1 L1 fCheckStringlength <$STR(N86)> > 00 y( u% G2 g1 f9 Y' |- Q8 |
#ACT
6 n+ t% F' Y2 X, l0 ]" J0 kMOV <$STR(G305)> <$STR(N86)>
' K. G7 K1 a5 h7 ~9 O0 S, LMessagebox  当前收人设置为<$STR(N86)>级
9 Z2 N) A3 v; CGOTO @main 1 F8 v: ~( O8 H# |& }4 X' [4 G
BREAK1 C* ~' o( J4 H$ z8 L- p/ j
#ELSEACT5 T& V. x; O) d
Messagebox  请输入正确的等级, p0 |" X) k. N# V
1 D' n: X' h5 g9 D: k/ P+ i

  i2 K& O, ]7 l5 a5 G3 m3 U& W[@InPutInteger87]( c0 K& S# V7 P7 ?
#if. B% o+ V9 e: W( c5 {: C2 m
large N87 04 }# n1 V, W. f5 {
CheckStringlength <$STR(N87)> < 4
7 _, b9 @& {5 gCheckStringlength <$STR(N87)> > 0- e. @) i, c% b  b; Q1 `% N
#ACT
6 `- Y0 d5 h6 qMOV <$STR(G306)> <$STR(N87)>
, T) e8 N* t# w1 l# A7 XMessagebox  当前收人设置为<$STR(N87)>级1 f6 Z& x8 i6 H  ~& q) Y
GOTO @main 3 h) D, z; H, [  s$ x% k2 r
BREAK
. o  L- R* U# ~% u0 q#ELSEACT& S0 D) b: C8 C+ q& C. s7 E
Messagebox  请输入正确的等级
9 n# }7 n, g: K0 k$ \4 u" d: d2 E* m
- {  s9 P5 W8 C8 S) e! _& u% h! O
[@竞标1]/ Y$ Z# }& [: g* ~2 w" M, g
#if
, o: r3 z( L/ a. cequal <$GUILDNAME> <$STR(A300)>; R, M3 @1 q9 ~: s
#act7 V4 E9 F* U+ j/ h  O" o; ]+ \9 q
messagebox  您已竞标了第一行会竞标版.无需再次竞标.
& c# L/ }" Z" p- t% x! w+ Jbreak/ W( i  v  b% t( `1 D" |
/ S& H- F$ _$ L0 E

; |" L( M+ _, u- g. q#IF ( M( F4 L- z) a* {5 f
CheckGameGold > <$STR(G300)>
8 {" i1 R3 A; `; C#ACT
3 H* L$ O' |' j$ Z9 ]INC G300 10007 U2 Q( h) ]& n7 F
GameGold - <$STR(G300)>
/ `) w2 Z! K8 P( i+ O  iINC G445 10002 _) M+ W) q. g- W
mov A300 <$GUILDNAME>
# k' \- K, H2 m$ rGuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A300)>】荣登【第一行会竞拍版】
. ]0 i$ c: V* A7 nmov A304 允许收人0 O8 A, P& P8 o% L9 {3 U5 l- Y
GOTO @main " x# K% `! N. I: ~" S
BREAK
  y) U) O  k% e8 ~$ o#ELSEACT) [" f5 E2 O/ P" U# m
MOV N$第一行会价格 <$STR(G300)>7 `0 K+ b9 r" g
inc N$第一行会价格 1000
. X/ m" R9 I) b1 [2 ?) v/ v) hMessagebox  抱歉,本次竞拍需要<$STR(N$第一行会价格)>元宝,您的元宝不足6 Q0 C8 k+ ?, O7 s5 r  h5 q  T
, S, @  J+ U# D( G# D
, `- k! p$ G5 D2 h
[@加入1]
3 s' O* Y8 P& n+ \#IF
7 p2 [4 a6 w4 G4 u( HHAVEGUILD% w: Z9 o/ @' S
#ACT8 c9 O4 U  ]1 c2 G- t( Q  o
Messagebox  您当前已经加入行会.请退出后在加入.
% ]4 p  D, B$ f; tbreak
; l+ E  B& B! N! |4 j; ?0 N/ M5 T6 }% c! R; `: q% M

5 T1 L( z) W" i9 u) }4 l#if
0 b$ O% {: `( k; hequal <$STR(A300)> + q5 `  p. Y) P7 h# X* G3 s
#act% l3 P. q  D$ i/ f- ^. I: N/ A5 a
messagebox  当前天下第一行会竞标版会无人竞标
& y3 |9 D. b7 Wbreak
1 ~* [& m- _  B* k" ^1 k9 ?) t1 [& }- b# ]0 w& ?
/ H- h" B# W" @8 e' t" C
#if3 g- w9 i/ j! O- o. t8 d$ @
equal A304
% C) y" e$ t8 g1 D! `, E5 b0 P, ?#act6 O) J, t1 a- V. j
messagebox  当前<$STR(A300)>行会禁止收人
3 T/ _, A6 Y1 }6 H0 z. a& Z( [7 ebreak2 ^+ }$ G( r% l! s1 r* \; O
% K9 ]/ W. S2 A8 t& n/ r! E5 u

! H' P: J. r% y1 v  g- Q#if" s7 P" P' p7 F' L* M
CHECKLEVELEX < <$STR(G304)>) ^! s" a8 x: f5 E5 W
#act8 w4 T2 ~1 F; F1 k* Y+ i. |* U
messagebox  <$STR(A300)>行会禁止收人需要人物达到<$STR(G304)>级
# m  G, C8 t0 H( E- Cbreak" r; v% x" V, m0 N$ E. M3 S3 {

0 a: g: m5 G  }+ z( T( E  Q
) g& a; D0 o5 M2 r0 O0 `' A
#if! D& J4 a2 r- U1 w% g; ]3 q$ N$ W/ ^
#act
7 ^) _1 v& P# s' }ADDGUILDMEMBER <$STR(A300)>
3 @2 L, M, n8 H6 n+ n" n+ eGuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【行会竞标版】加入了【<$STR(A300)>】' I2 w* S& v: O- _( x% ^% C
break2 Q" i! e* ]; o3 L& V
4 P  f2 b: s" r3 ~6 u
5 ]) \6 O7 Z& s6 H
[@竞标2]
/ k! A# v* X' t! W5 b' _#if4 [" y5 \5 c( y7 k
equal <$GUILDNAME> <$STR(A301)>
" V) a, \7 X' }#act" [0 t  s6 n3 ^! b" T( a* Q# M. D
messagebox  您已竞标了第二行会竞标版.无需再次竞标.+ n+ U1 w# a7 N: s) A0 A+ {: f
break8 ~0 J" K, B; S8 Q" S& Z6 b1 [/ U
) k# \5 `' Q: R
7 _) E* ^& ~' |/ M
#IF
, @. y4 v: Q4 @0 E2 Q! P( NCheckGameGold > <$STR(G301)>/ P; e( I3 [5 }* T5 V0 o2 x, V: `& A
#ACT
, J6 ~4 j1 l1 `6 NINC G301 10005 a# _; `1 G1 w1 c0 b
GameGold - <$STR(G301)>& ^5 @# {- D  k& l6 N3 U; A
INC G445 10001 G  Y+ J9 R  x9 g
mov A301 <$GUILDNAME>2 X' ~( l. k8 Q
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A301)>】荣登【第二行会竞拍版】
7 ^+ U9 Q: }! g8 F( _mov A305 允许收人5 j5 D* G0 ^7 p( H0 i% G1 h, E
GOTO @main ' K' `& o7 @6 {: z2 b' n
BREAK
- s8 v. b: L" Z# G' u( P#ELSEACT( q- ~4 f0 |' Z  A
MOV N$第二行会价格 <$STR(G301)>2 g# D4 }6 y- b7 o" M
inc N$第二行会价格 1000' B3 ]- H: `+ C
Messagebox  抱歉,本次竞拍需要<$STR(N$第二行会价格)>元宝,您的元宝不足
/ q2 E, x) w  {9 D3 J$ R  U! v# v# P: G! [

3 g/ c$ W% G0 _[@加入2]
9 f8 H% g/ O. Y; t. w#IF
8 l+ i! s$ U, ?HAVEGUILD1 X4 h/ r+ E/ C0 e
#ACT
! B- m+ Q9 q& M1 rMessagebox  您当前已经加入行会.请退出后在加入.
9 J6 g# s6 B; q: M! J0 Hbreak
& J) i. @' _, t4 L4 D6 t9 i
- A! ^1 d- Z! f. Q+ j! I' g2 x* B
/ N: }) M3 O  X5 T# y5 n( M6 G; D
#if/ m3 \; F+ e* K0 E( `' w9 m
equal <$STR(A301)> ! H4 Y9 Z5 g4 p. B) O
#act
7 f1 M( C+ s5 f& [% Zmessagebox  当前天下第二行会竞标版会无人竞标
, T3 \7 p' _' s! i8 {break
! D, @$ h4 W) X4 N" F4 y% }" q( e* X' P9 P; S8 z  X" ]

# D2 M; _5 A3 Z! P. ^#if
9 s: \  n. g: [% J8 Bequal A305- ~# z1 w' U& r3 N/ a( U
#act3 f/ i, ]# t) s4 T9 `! w! s
messagebox  当前<$STR(A301)>行会禁止收人
7 p* o8 \4 }! k  V+ k7 a8 u# lbreak, Z* k- ?$ {! D6 C  @/ I
, @1 a% Q! S& i! J, f0 s
" U4 o! k( I7 h' c' z! E" d& m2 Z6 _/ H. G
#if
8 @' J" Z3 p/ ?CHECKLEVELEX < <$STR(G305)>
. \' ^3 b. X7 o/ U) v( B0 z#act& C+ M. m9 [# u2 t
messagebox  <$STR(A301)>行会禁止收人需要人物达到<$STR(G305)>级
4 ?  i/ p$ [6 y* N4 J9 Cbreak
; V7 A5 ?0 i3 L0 t2 S+ M7 c) S1 V4 u% e: L, P& @
5 C" N4 t0 e5 _
#if! J" B& K) E9 e* p4 \6 K$ ?
#act
# w& D% x- V- n0 A1 `9 Y. W# h& HADDGUILDMEMBER <$STR(A301)>% G5 e: Z$ ~" G5 w9 ?5 D: D# y, E
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【第二行会竞标版】加入了【<$STR(A301)>】
! W+ f7 h; n9 @7 B( y, Lbreak
; J$ f0 a& _0 }: _
0 H, z% f+ A, W; W9 h

( V2 [9 H- n  E[@竞标3]: d8 _2 a2 U' I3 h6 M( P- D% p
#if' D( o( R, H6 Y. r3 q  ^% E& r
equal <$GUILDNAME> <$STR(A302)>
( J! j3 y/ J0 O; v$ s! y#act/ Y9 K1 i- e9 W0 l) \
messagebox  您已竞标了第三行会竞标版.无需再次竞标.. ?+ n2 y% a8 K
break8 Y9 h- x# q6 f% h6 K7 f

' q: M1 a! a" S4 |0 P$ L" S
. ]! J# H8 Q5 E
#IF
2 m  l, g+ L% Y9 U9 vCheckGameGold > <$STR(G302)>. w9 r& X# g6 Q7 H; |
#ACT" `) ~4 O: g9 ?
INC G302 1000
+ @: T% {# ?/ e8 b, n% c: BGameGold - <$STR(G302)>5 w2 b8 P  K/ L9 r7 \
INC G445 1000
  a  J1 b0 k  C5 y% n1 Tmov A302 <$GUILDNAME>$ X3 Y9 d* \' R% @: v+ L
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A302)>】荣登【第三行会竞拍版】
: [+ C9 z8 b) ^* f; j$ L, h) qmov A306 允许收人1 }7 J5 X7 |3 J* L
GOTO @main 1 e% @+ J: t8 i, F' T5 z+ C  V) n
BREAK 2 d3 A9 x) j" g3 }. w9 \. F5 o
#ELSEACT9 X4 [" A; p5 O
MOV N$第三行会价格 <$STR(G302)>
* t1 W. }1 g. Ainc N$第三行会价格 1000
# P) V4 k3 h+ T( cMessagebox  抱歉,本次竞拍需要<$STR(N$第三行会价格)>元宝,您的元宝不足
" ?( ^- R9 u& _$ T: i9 A& j* D/ `+ Y
1 ]+ m: v8 T: N
* f( m5 ~; T% q% U, j
[@加入3]; H' o( \; M, ]- J
#IF9 l: P. O/ |5 ^! f) X5 ~
HAVEGUILD: W# \. Q/ Q2 M$ M
#ACT4 l) P0 T! t9 J/ w7 C1 D
Messagebox  您当前已经加入行会.请退出后在加入.
* F2 b( I; W$ w9 ebreak" `7 r# F: j7 |$ C. ?

. n, |, X* ~5 g- r, e" ^
; X0 O  \# {2 J2 ^2 d" L
#if8 @, F) R& K; [$ K$ b2 @: a
equal <$STR(A302)> / h) g6 ~, s1 |8 F3 N& s6 H# Y3 W
#act
) I2 J; g- Y5 G5 G2 i, emessagebox  当前天下第三行会竞标版会无人竞标' w$ ]( N" I. C2 [$ S
break
2 ^( U, F! P& S% D' B8 f& p  t
& V4 G% E* Z; _9 K& y

* M1 ]( Y+ `5 ^" t5 c#if0 s3 y% k- f6 G6 M" |0 k! ?- p* c( L* A8 b
equal A306
! h1 Y' V/ Q! O5 b$ c#act
: `3 W; y7 x& X2 bmessagebox  当前<$STR(A302)>行会禁止收人4 B' R9 d7 [9 D. E
break* Q/ i2 v/ ?5 D/ k$ r/ _" e5 [1 R

+ H; v8 I1 Q& `0 h5 d3 u' D+ ^
/ }$ W* s5 c5 d/ S
#if2 Y  f1 R5 ?3 L% h  ~% H8 l/ u* Q
CHECKLEVELEX < <$STR(G306)>$ q3 [0 ]; k& O$ x' m
#act
1 O  S' F+ J0 ]% L# t( Gmessagebox  <$STR(A302)>行会禁止收人需要人物达到<$STR(G306)>级; ^, k/ X4 [3 R  T0 s
break
; n9 `8 q9 i% ]
" V& R% f5 k! d& k* }% q0 M1 c! n

- s% p1 }" ?" d3 C3 [! S#if
! I" h9 K* u, ?# X/ R#act) c4 {% y) o$ F  `) T
ADDGUILDMEMBER <$STR(A302)>
( C6 r/ [6 O- x; c! C% t3 SGuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【第三行会竞标版】加入了【<$STR(A302)>】
1 ^3 x+ W' j8 Tbreak
  F* P, h- o4 N- [  L, R6 R: V" D1 T$ X! K
站长承接传奇一切业务,小问题免费咨询。站长QQ137919001
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|小黑屋|网站地图|皖ICP备18020244号-7|传奇部落

GMT+8, 2026-9-18 11:16 , Processed in 皖公网安备:34112402000394号 0.223528 second(s), 26 queries .