传奇部落

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

[复制链接]
发表于 2023-6-16 22:31:28 | 显示全部楼层 |阅读模式
QQ截图20230616222105.jpg
9 A* _% v1 G2 y& t2 K4 {* t
8 _8 J  P% a/ d$ p0 i8 ^9 j8 N3 l9 n- \" y" ]" J, B" j0 d, E
% D0 o* s0 b; L; [0 W
8 Y2 f6 C! K. n
[@main]
# [0 J' g0 E. H, `6 _$ D#IF8 i& {" h" C9 ?) G
#ACT5 s4 i! F, ^3 C" d: q- a; p
MOV S$第一行会竞标 <加入行会/@加入1>
; R/ S4 U7 {2 O$ C$ I& o& ^MOV S$第二行会竞标 <加入行会/@加入2>
* Y- z% f4 [1 c$ q8 F8 SMOV S$第三行会竞标 <加入行会/@加入3>; n& E/ D& m/ n" ^; r/ s; F' E8 T1 N
MOV S$等级要求1 <$STR(G304)>: S1 Y& L. E+ @
MOV S$等级要求2 <$STR(G305)>
2 E; O- x" \3 R+ z  K; ^MOV S$等级要求3 <$STR(G306)>% I. Z6 B( H- e, ?. z, }% ?. Q) _
4 Z' x: h' N; f/ M0 W& N3 P( i

! I: V; O+ z% J( d5 h/ a#IF
6 w  p& e0 R1 @, j) o& e; f) K* Fequal A304 允许收人
" d/ ?% K" w$ O) ]! b' p#ACT
( ^4 u; P+ Z2 Y) N7 k& |MOV S$收人状态1 <允许加入/SCOLOR=250>1 [8 R" X% E4 U& c' q

9 }) P  d! p! Y) q- `
: h8 Y3 h( ^# ^! N. U" z) G
#IF
: ^6 C/ a3 x& l" W8 O8 Q- w; F' Uequal A305 允许收人  W5 |; |6 ]* ~  A+ I( @
#ACT
1 W6 J  t  T$ t1 q- fMOV S$收人状态2 <允许加入/SCOLOR=250>
; M0 }3 t+ E8 d$ {# M, B8 ^$ t% z9 n0 B  G/ L
& E/ M2 x' [6 _
#IF4 N: x2 b/ J& j4 m+ h% Z" \
equal A306 允许收人1 r. b) u! }5 E! Z/ s2 }
#ACT
8 U4 J" Z4 |; S) c6 U( I7 lMOV S$收人状态3 <允许加入/SCOLOR=250>
; O; [! p; _/ L+ b6 k2 r  D. W
* i+ Y$ u+ A8 l0 w
3 V9 M- M! B( t) u; l; B% z
#IF# p" g: Y% K. f
equal A3046 @4 O5 i+ |# z/ L8 x" u
#ACT
. f4 ^! ?0 y7 ?MOV S$收人状态1 <禁止加入/SCOLOR=249>& C5 ~$ d5 \: l# h
0 k2 O' N% J" ]" ]
8 K8 U$ a$ f( u1 r- t- \7 h; o$ @
#IF5 |) q+ V: O2 I6 K6 c; i. i; u
equal A305
# D, W% `+ l4 I! ^; j#ACT. O0 B4 H* p& j; Y: N* m7 s
MOV S$收人状态2 <禁止加入/SCOLOR=249>
1 o, Z, e( s& n& t
8 d, S. ?, U; n( I8 d( m
9 h7 k" Z3 v# B+ X- k' ^- b
#IF! R/ O! z/ n, n3 }$ Q
equal A306
4 K+ q; o) k7 ~5 Y& k$ _#ACT
7 P; k# A7 }6 sMOV S$收人状态3 <禁止加入/SCOLOR=249>9 `+ E. M9 ~/ Y% ~- R: I
# p+ c- a! L$ I3 n# }
# K8 I! h$ s6 y& Q) D" Z, J3 q) H
#IF
* M  Q, K& V' c. a#ACT# b3 f& N5 v5 Z, k$ T
;为了加空格才转换
/ y+ G3 S' |! s8 ?! z8 j+ q% YMOV S$行会名字1 <$STR(A300)>* K1 v; K8 _9 U1 L. \) s
MOV S$行会名字2 <$STR(A301)>& a0 N9 F4 B5 Q' F+ ?* @8 G+ v
MOV S$行会名字3 <$STR(A302)>
& ^6 A4 r, ^- y" l
+ N7 b  N  w$ H. C. h$ `6 V

3 l) {. _; o' C( uSetStringBlank S$行会名字1 20 1# g4 i! _/ X- o1 b3 l8 Y
SetStringBlank S$行会名字2 20 1% q: j8 W: [/ s. }
/ p4 G5 Z) P0 X% N
( T/ o1 N6 q- F3 w( k2 r
MOV S$竞标价格1 <$STR(G300)>
1 a1 N# s7 K9 l8 f( VMOV S$竞标价格2 <$STR(G301)>
* O1 s" A" ]/ l' _! I$ x  kMOV S$竞标价格3 <$STR(G302)>, C; x" I3 p$ t' u: k) F! N% s

& c4 j: X- F# v
+ C1 p: h6 L* q' H; p5 ^0 d! f
SetStringBlank S$竞标价格1 16 1
9 `" F4 H9 f# J8 h- l  Z+ GSetStringBlank S$竞标价格2 16 1, d. F5 n9 M0 C  w. M1 P

, c3 t; V  \: V. j7 z! p+ h0 Z" }
! \& P6 X3 o) i' a5 {, {. U8 j
#IF/ i' |/ ]% P7 `' w
ISGUILDMASTER
( e5 a  c+ z9 b4 \#ACT9 p/ Z* V8 z* Q7 Q* d1 [* W6 R
MOV S$第一行会竞标 <出价竞标/@竞标1>3 P; J5 A+ G  {
MOV S$第二行会竞标 <出价竞标/@竞标2>* H% u1 m; u/ D  e( N% v
MOV S$第三行会竞标 <出价竞标/@竞标3>% o+ U3 \4 x; `2 H) q8 B
. b; F7 w3 _0 x2 B/ O

, K" W1 K0 M' k9 F6 \4 R2 e1 ^& z0 [;为了加空格才转换
5 v* }' Q4 i5 O6 ?+ c6 ~, HMOV S$行会名字1 <$STR(A300)>' |% d4 @& k" f/ Q
MOV S$行会名字2 <$STR(A301)>8 x1 O1 G4 x8 \2 i
MOV S$行会名字3 <$STR(A302)>. t. \1 `- y  M  R/ G

$ `2 w, Z- N# H5 H+ d- A# ?
3 E0 v/ q. j4 j6 T& [
SetStringBlank S$行会名字1 20 1
3 [( g' I& V2 s& xSetStringBlank S$行会名字2 20 19 }! y1 W+ A) N! J. ^5 J% x
1 m3 B. p* R' j

! d# ?/ A' r0 m; c0 t8 y) ?9 h0 D$ e& q- a1 N+ K

# m! S, H& I) e+ D4 A$ O, DMOV S$竞标价格1 <$STR(G300)>
" ?1 v4 V4 Q$ i5 b4 I; U, hMOV S$竞标价格2 <$STR(G301)>
3 K& \% r; r# J% o5 q2 uMOV S$竞标价格3 <$STR(G302)>, N8 {( D* G; [$ N

/ w; z6 Q! |# d% j) T& ~
% c5 ?* y, j  ^, M: u
SetStringBlank S$竞标价格1 16 18 N1 P/ _+ O" g5 w$ _" N$ A
SetStringBlank S$竞标价格2 16 1: V* M. Q. |2 T& p' ]9 t) b

. c/ N3 s2 T. N: V# D
; {* O" |$ d( Y$ V7 n
#IF
: s* y& f7 z; K4 I1 I7 vISGUILDMASTER
1 [) l, F& D' D. ]7 I5 Mequal <$GUILDNAME> <$STR(A300)>5 e* s$ i" D% q- A; a. b  A7 a
#ACT
  b/ E1 ]) d; \4 Y, d% Q* _MOV S$等级要求1 <$STR(G304)><设置/@@InPutInteger85>- r3 S0 J* g  r* n* w2 Y  B

" M# t# c  c6 v" v- |; U
( z$ [& j) s/ b; K, k
#IF
( U  e2 n' T. }ISGUILDMASTER
8 U; E  _) V% w+ e2 v0 Dequal <$GUILDNAME> <$STR(A301)>
6 ?: I+ s9 ]2 _8 c2 L" Y1 n#ACT, j0 C" z2 P3 d1 Y
MOV S$等级要求2 <$STR(G305)><设置/@@InPutInteger86>
2 P5 k1 s; E1 y: E% j, F4 x9 E5 F  G( R, o7 }: s
' Q/ D/ b% l. U2 W
#IF
0 U$ v  e2 ?" I1 D* fISGUILDMASTER& j$ V. n. W3 D1 n* I
equal <$GUILDNAME> <$STR(A302)>
) Q3 f0 G5 h1 R. c# w#ACT
7 `' u& j; g: h& S; IMOV S$等级要求3 <$STR(G306)><设置/@@InPutInteger87>
# q. z& b9 `3 |: d3 `& _" k7 {3 h5 ~. K& o- N
/ C* K  T7 O2 Y$ R, ]
#IF
5 A6 }; U+ z% `0 _$ ^8 A, FISGUILDMASTER9 c0 W5 u1 P; G$ r. i  h
equal A304 允许收人* H2 J) z1 f' v# z
equal <$GUILDNAME> <$STR(A300)>4 r9 O1 z6 Y; f6 }" T8 p$ b: [% n
#ACT' {: C9 v0 P/ f7 y) Z7 J2 w
MOV S$收人状态1 <允许/SCOLOR=250><设置/@收人1>
* [, e. s1 W% G4 P0 U4 J  l+ O" I' A5 C: r
& k% F" j2 _* y; \5 f3 B4 a; k* b
#IF8 A4 B: v2 p2 ~" p
ISGUILDMASTER
3 ?) ~9 Y2 M; ^" A3 L; xequal A305 允许收人
' w  Q/ s) X1 {* @6 \( b6 \- J; S0 Bequal <$GUILDNAME> <$STR(A301)>
% ^# A4 ~! \3 k5 h& x  S#ACT
, W- E! G( j, G1 J7 tMOV S$收人状态2 <允许/SCOLOR=250><设置/@收人2>6 C  c+ t* G, k5 J
* I8 b3 N5 b+ I$ l9 o
' u* a# z2 I3 r, P
#IF
; Z5 r! h- ]' w5 _ISGUILDMASTER
9 G- x7 e7 x3 H) A4 fequal A306 允许收人
5 ^' Q+ J1 _/ N) L4 v) Gequal <$GUILDNAME> <$STR(A302)>
( {  s+ x( K8 I* @( @; P/ s" r3 V#ACT
+ N0 N, ^$ k. U* {MOV S$收人状态3 <允许/SCOLOR=250><设置/@收人3>4 c# ~; c2 m  Q2 ]
: F$ D9 O. U8 u( T; V! q9 J

- f$ K5 ^* _# c* R#IF+ [$ v5 |+ a& @, Y0 X# e0 W
ISGUILDMASTER
- m7 G4 L/ P& lequal A304% Z5 z& Q: y* D
equal <$GUILDNAME> <$STR(A300)>
* }5 N1 Q' `6 F6 D' j# F# j#ACT: a2 e6 Z- i: x- ?; {* ]; J$ ]
MOV S$收人状态1 <禁止/SCOLOR=249><设置/@收人1>* A4 d; ~9 s. S) n' K
, |4 c3 s. b3 D
, A1 m( Z1 A; T8 m. k- M
#IF
  j& h& n& x# Y" N! [5 R! SISGUILDMASTER+ z3 G' c9 M0 l
equal A305# s3 R: G5 K* s0 _" p% A, T
equal <$GUILDNAME> <$STR(A301)>+ U/ ?$ W" Z( t6 R
#ACT! G" v4 ?+ F% f( |
MOV S$收人状态2 <禁止/SCOLOR=249><设置/@收人2>
/ z: Y7 T+ h% d% s
1 r% K8 k+ N5 d: b; S, k4 U2 }) k
; D6 a7 {4 R/ `6 n- C
#IF+ J& d: V( V1 g5 _% }. @
ISGUILDMASTER) O, B: Q& [) H3 Z7 R+ F' f
equal A306! c2 `. K6 z  Y* B3 v) X
equal <$GUILDNAME> <$STR(A302)>, [/ R' o# A# o
#ACT
) s2 }8 a& C& b& _' V. o5 PMOV S$收人状态3 <禁止/SCOLOR=249><设置/@收人3>, a/ V. u& ~- J
4 f1 h2 l0 x# k# D8 |1 c8 K( O
4 i  m' L8 n( N6 e; @9 a8 ?
#IF
* C" x0 q  |; q#ACT
: h4 S5 `2 f2 bgoto @字符1! u6 Y- k% }1 Z, ]9 j, c, ?
5 y, y6 M. q6 o9 P

2 K3 s- f7 r& M! M( \) U% h$ d#IF# C* q6 F: k$ L9 d7 a
#ACT
$ t3 {$ a6 X) ]' _9 [4 M% jOPENMERCHANTBIGDLG 10 48 1 0 0 16 1 523 119 h$ \% |5 _0 e. R- F6 P( E" {
#SAY
* U! }3 [, ?8 B1 O2 e: y
0 {0 Q8 N2 R0 M6 y3 A& [) T6 V

1 o6 r0 y- X0 [- V! J0 S3 P3 h     {<$STR(S$行会名字1)>/SCOLOR=251}    {<$STR(S$行会名字2)>/SCOLOR=254}    <$STR(S$行会名字3)> \6 ~& {% F/ A7 V  u' D# W
 \
; X  w0 O" g4 h" z* I- ^8 C- t  <[竞价元宝]/SCOLOR=116> <$STR(S$竞标价格1)><[竞价元宝]/SCOLOR=116> <$STR(S$竞标价格2)> <[竞价元宝]/SCOLOR=116> <$STR(S$竞标价格3)>\
, r. J1 L0 O6 v; a7 E# K  y  Q! D5 [0 ^8 m% u, j2 Y8 |1 B
8 ~& s6 h  D9 G0 B
 \" k' C) f. I- C' `, B
  <[需要等级]/SCOLOR=116> <$STR(S$等级要求1)><[需要等级]/SCOLOR=116> <$STR(S$等级要求2)><[需要等级]/SCOLOR=116> <$STR(S$等级要求3)>\
9 c# R% N/ h) A; k! G; x4 I/ m& j \
# s9 F1 f# @6 u  <[收人状态]/SCOLOR=116> <$STR(S$收人状态1)>    <[收人状态]/SCOLOR=116> <$STR(S$收人状态2)>     <[收人状态]/SCOLOR=116> <$STR(S$收人状态3)>\8 e% ^3 `9 m3 {2 W/ I. l) f3 L
 \5 C& A5 g7 F/ Z- I% I8 w
     <$STR(S$第一行会竞标)>          <$STR(S$第二行会竞标)>          <$STR(S$第三行会竞标)> \
4 ~! B5 b9 z3 Y! y5 W \
/ n! W% h6 ~$ _9 V8 `+ i. b$ M <行会掌门可竞拍以上3个选项,每次需在当前竞价上加1000元宝!(每个位置分别竞拍)/SCOLOR=7>
6 I/ U; o% L0 e9 N1 r' X5 x
- j( M+ X8 C/ e% B, x3 H
1 p/ ]+ z. B+ Y, H6 S
[@字符1]
8 w$ |" Z( a1 s- d! D' D3 m#IF1 t" F; ^: ~  [8 a% E" d! o/ V! n
ISGUILDMASTER
9 B; w+ L8 `" a: Eequal <$GUILDNAME> <$STR(A300)>
6 ^8 R9 j  Y6 N: N& Nequal <$GUILDNAME> <$STR(A301)>. Q# Z& B4 I" r1 R/ E6 j9 K
#ACT+ O" x. P+ z2 }  E3 j6 ^
SetStringBlank S$收人状态1 20 1
9 _6 l& F. ?/ E4 L* h# PSetStringBlank S$收人状态2 20 1# L, f' Z# {" [
SetStringBlank S$等级要求1 35 1
, b+ k3 e/ I2 |: m$ p9 N" |7 @SetStringBlank S$等级要求2 36 1* Y6 v% k, t% W- r/ H* @3 z
BREAK; N. w; Q! v& I% N
/ f) \& e% C9 g$ u5 Z

9 Q3 T0 A, ~& s8 j! z* f! f3 @#IF' N& C! n5 F+ m2 t& U% r
ISGUILDMASTER; i& l4 C! ^  O% z# X1 E3 ?9 e6 J% O
equal <$GUILDNAME> <$STR(A300)>
% R) w1 X9 \$ G" V+ i#ACT7 z& {/ L, h! u2 p: v
SetStringBlank S$收人状态1 20 12 A! q! p, Q! }. p. D) P$ C, `" j6 r
SetStringBlank S$收人状态2 20 10 r. T0 I1 k2 D9 [
SetStringBlank S$等级要求1 35 1
8 r3 i1 p: ^7 U0 `; c# D' @6 _/ USetStringBlank S$等级要求2 17 1# k; }# g0 {5 U
BREAK0 s" l8 y; h' G7 C3 ^

" @/ Y4 |* [8 Q/ R) z% n
& b6 ^* r) ?8 R, u, S
#IF  ?3 T) Q# z) u" i
ISGUILDMASTER
; H/ b) X1 s* J9 dequal <$GUILDNAME> <$STR(A301)>
" R/ Z! Q" l# \+ t8 q: j#ACT
( j$ P7 F1 w& ]6 S1 M  ?1 S) h$ W" HSetStringBlank S$收人状态1 20 1' J" v) f. z, \" d7 F1 A
SetStringBlank S$收人状态2 20 1
# Y$ U" a/ B# S7 e  u" cSetStringBlank S$等级要求1 16 1
/ n7 ~3 z$ {9 XSetStringBlank S$等级要求2 36 1( A# M% A- R7 ?) @% t
BREAK3 R. I& z; P1 P4 m) A

' E$ v5 M" G* b. V
: t3 Z6 o" H4 w, Q- A7 v
#IF
8 Z0 f4 l9 o9 k# i+ e8 `3 U; `#ACT0 \: a" i" O5 S
SetStringBlank S$收人状态1 20 1* a0 g+ U4 e& \
SetStringBlank S$收人状态2 20 1" l/ s6 @  E1 ^7 @) U  f8 w
SetStringBlank S$等级要求1 16 1
" s# J* n, M% h, j4 e! J! i; U  m' USetStringBlank S$等级要求2 17 1% m3 P: i4 B3 f' I/ F# s2 t
BREAK
0 I4 Z' X% j7 G, V4 @; T: ~# }( ^0 v, @  S, ]6 H2 T
( U. k4 I, v8 z) e/ ?( e9 h
[@收人3]7 S5 X7 e+ @& _+ u/ f
#if
& p) g( Y4 c: ?0 D" z1 ]2 cequal A306 允许收人
9 E+ x& Y) e# l0 X& y5 U#act
* I8 b' w: b9 X2 amessagebox \\\您将关闭行会招募状态.确定关闭么?  @禁止3 @取消
# N9 ]; P! B: i) Y. p#elseact
# W0 m' X. k( [* n6 N$ {: bmessagebox \\\您将开启行会招募状态.确定开启么?  @允许3 @取消+ Y( _. l8 T- x+ G

, K4 _/ c% f3 R7 X" D5 r

4 p- L) |* p' i! N[@允许3]1 M4 V  N& U' H2 b; Y' Q) [
#act* v, W* P+ e- K, P! e" [
MOV A306 允许收人# o; H" w, ]2 Q% P, e
Messagebox  当前收人设置为允许收人
# y2 I) Z  {4 a% Lgoto @main( c) _& H  J. R3 z6 R% e& q. u

. [6 P+ j. I* q9 x9 @; V

9 _$ {4 X% b4 C' I) ^# j3 W[@禁止3]
. r- h( {+ Y, ]. J. n9 g$ o) R#act
, x/ |! _4 D( I5 W4 o0 [MOV A306
# t# H- }6 g% C1 e: gMessagebox  当前收人设置为禁止收人
* B1 G1 b# {9 I0 O  F6 Rgoto @main" V0 B7 B& j- O* O1 h: C" j7 `! d
5 F8 w# T  P' [7 r. n" e

- ^6 Y( e& ]6 X[@收人2]
& n, @: i; u9 m7 g#if$ P7 {8 w( J( f7 Z* r/ I" P3 D4 u
equal A305 允许收人
# B. c2 e5 ^4 g6 [: U0 P# a#act
6 c5 C) a  w% z8 amessagebox \\\您将关闭行会招募状态.确定关闭么?  @禁止2 @取消, K: J/ w6 v; g# x. [
#elseact6 j7 i1 g7 c2 s1 e* ]
messagebox \\\您将开启行会招募状态.确定开启么?  @允许2 @取消6 O) O* I3 L, {/ _2 H  ?  W

8 ]9 ]8 q. |; j% C2 x6 r) M, P
9 y8 W# F. ]8 @5 Z
[@允许2]) Z( e5 L0 E. v$ L5 A; b
#act
! h% o: H- b! ~' J: {  ^MOV A305 允许收人" |' U6 m+ j4 c) [  T) n
Messagebox  当前收人设置为允许收人
1 i, ?2 w/ R; T+ }goto @main
" B% }% B4 y5 R3 Q, Y0 I5 O: r5 R5 }1 P/ n. O8 Y* p7 |! H8 l

& W* U6 @" b1 F. {[@禁止2]
1 u( E, e9 Y7 P4 h#act. G3 R: @* |9 f7 B1 o% U+ `0 |1 R+ m
MOV A305" J: [9 g3 k0 W1 I
Messagebox  当前收人设置为禁止收人! s; A" F1 j! B# F- a) o* r
goto @main  C$ i+ H" J. T

! b2 N0 F/ v$ |3 Q1 @5 ~, V

7 \: @" h: n2 b! U6 [4 Y  {6 f[@收人1]
; N* v/ Y5 e4 C) o3 J#if
( D  U1 h/ S% _+ A! Xequal A304 允许收人
+ ]( l  N* p% x- n% B$ n#act
% _; o- p0 k. {% g( B( u1 O* w4 F0 J) Vmessagebox \\\您将关闭行会招募状态.确定关闭么?  @禁止1 @取消
! C4 M, k% E5 F7 v#elseact; K- I6 J5 o/ p' u: @. v6 g
messagebox \\\您将开启行会招募状态.确定开启么?  @允许1 @取消
2 |% M8 {5 \5 D) P' ?
! }6 f( G; z- t" Z  B! o' j
7 D0 [, i# a$ {2 Y
[@允许1]
1 }1 R/ h" q% ^  e( t; H( J3 W0 v#act
6 e# Z9 h2 M! nMOV A304 允许收人
! c5 G2 d+ o/ i* K7 q" wMessagebox  当前收人设置为允许收人- ~2 Q' z+ N& ^2 m/ O4 D
goto @main$ E% X' [/ n( i! P3 g3 e4 M" |2 r& X
. g# B& A- l4 W/ S

& ?  F3 K' t# n- S[@禁止1]
" L4 S8 T- T/ F. t# s9 @2 N#act- z% r) x4 x# G! N
MOV A3041 ^/ O! e- ]! k* v. W+ w
Messagebox  当前收人设置为禁止收人
1 B3 l6 @9 w) Y1 agoto @main# k, L& |+ X& V, N

& g! ~! x3 f% K

1 L3 U5 \: }" }3 ^& d- [9 g[@InPutInteger85]0 S, t* ?9 h, p# d
#if
, z6 [! d6 W" k; b9 V6 {' W, glarge N85 0& |0 u8 O" U( |( F) V9 e6 Q
CheckStringlength <$STR(N85)> < 42 h& c* |9 i9 M2 I- c8 P
CheckStringlength <$STR(N85)> > 02 R7 A$ [8 R/ v. s3 |
#ACT
# B% p: m- y, ]7 B/ gMOV <$STR(G304)> <$STR(N85)>
  n8 r4 F7 h. t0 \+ V" z6 ~Messagebox  当前收人设置为<$STR(N85)>级- L5 C& D( h, M- J+ E* e$ I
GOTO @main 1 M% B/ `# E  ?! p
BREAK$ _/ [) d/ c& s* T; i
#ELSEACT9 N2 B# E+ k  V' U( G, D
Messagebox  请输入正确的等级
( o' }" R9 y8 ~; y  V' e( F7 }: `0 J( @" A

: K* ~4 t' X9 u* k0 J' l% Z[@InPutInteger86]
, T4 U7 ^+ c) S: A  K/ y$ U#if8 j' V* `# n7 ]0 A
large N86 07 k0 \2 D( p; j/ X' b7 S8 n
CheckStringlength <$STR(N86)> < 4" z' f$ Z) s5 ?/ h9 k
CheckStringlength <$STR(N86)> > 0. K. |& H9 I2 t/ v9 |8 y2 s
#ACT/ v  s8 g8 g2 ~
MOV <$STR(G305)> <$STR(N86)>- D/ {' o' F: \/ F) Y( [# n, O
Messagebox  当前收人设置为<$STR(N86)>级
+ ^6 G, ?7 A/ A, y6 ^/ {GOTO @main & L6 V7 e* e9 r
BREAK
3 u  A  S" ^# `* [  x( @0 b1 k3 _#ELSEACT4 h- S: H2 _0 q8 h- i4 a  M
Messagebox  请输入正确的等级
+ h: o$ j; }* |) G1 y
4 {5 H. F/ P& v4 f) k6 H
' i; A! d+ z# ?2 z' u% U& |" M
[@InPutInteger87]
6 N/ x: K& Y' [; K* B2 b#if# n* ^, N0 |& Q
large N87 0
' Z2 k! k& i- yCheckStringlength <$STR(N87)> < 4
: g5 B, S! f9 M1 S& r. `& ECheckStringlength <$STR(N87)> > 0  S1 u+ @; }4 _$ R, v$ w$ R
#ACT4 |4 `5 Z9 V& y- q' m$ E, t1 x/ Z
MOV <$STR(G306)> <$STR(N87)>+ w5 ^! w8 G. v" t
Messagebox  当前收人设置为<$STR(N87)>级8 b! K5 G: O( y! v
GOTO @main
! k9 L2 ^5 X5 F# EBREAK) w" f# C0 O( u3 `- g% {* G
#ELSEACT* [: S0 E! N; m& A5 ]
Messagebox  请输入正确的等级
) n8 g% [+ s: Z# G" l/ |" a4 o4 o7 Q: W
7 p' z9 S' ]" D7 D
[@竞标1]
- |# {* c- z9 \8 z7 V! g#if
5 ?$ K! ~( ?$ Q0 M) o6 [4 tequal <$GUILDNAME> <$STR(A300)>9 Q) o7 B' s: j3 W7 J
#act
( p; @' l/ g2 P7 omessagebox  您已竞标了第一行会竞标版.无需再次竞标.6 ^9 l' e1 e& L6 d& {8 C, ~& |+ P
break
- y2 P- J' C% H% R8 {
+ R' Y$ @% m- Z
) P4 O: b" q8 l2 \: F
#IF , L; K! q1 t. |1 E: K4 h5 W1 l4 N5 T
CheckGameGold > <$STR(G300)>6 h9 ?! N6 g( Q4 n2 v" n
#ACT
1 g* Y; b+ b* y4 KINC G300 1000
4 e1 L- {: `8 A( {5 q; o! v; JGameGold - <$STR(G300)>
+ s) i/ ]7 y$ S2 }: f* A1 KINC G445 10000 w" [1 S- x2 ~( Z) s. x7 K; j) p! |
mov A300 <$GUILDNAME>
+ {& U4 M' N' c: e# QGuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A300)>】荣登【第一行会竞拍版】
, y% X) S1 _8 J+ Gmov A304 允许收人
! S: ]: k% t5 vGOTO @main
' F" F$ O0 \8 [, I1 {: bBREAK ! @$ V3 c: Z1 S/ p2 `! j
#ELSEACT
) H- R2 ~6 {/ zMOV N$第一行会价格 <$STR(G300)>3 H* e3 W) n" [9 n0 U7 A9 p4 b
inc N$第一行会价格 10002 H' ^/ {( ~( v- f; }
Messagebox  抱歉,本次竞拍需要<$STR(N$第一行会价格)>元宝,您的元宝不足
% C9 o: b5 n; v( f' `) q  p6 p0 Q0 R! _& k8 d- @) z! P
8 t: b9 B+ B  r! x8 x
[@加入1]2 G/ q' b( z$ A; g1 J
#IF& A4 O, G: d2 F5 C# q! w
HAVEGUILD7 P: M: G* ?1 |( v5 u* v4 F: Y
#ACT# k* K) j  y0 T& G
Messagebox  您当前已经加入行会.请退出后在加入.
: W* ?4 D- g& a) s5 M4 ^3 d' m" A2 }break
" W6 s! B: n4 r4 A1 k& K. q
# j3 K, }( a: ]) ?
1 b5 _/ k- M5 j2 s- o
#if
3 V5 h- A& O* t! \# _$ jequal <$STR(A300)> 6 g5 K8 V& g- x2 J" L: w
#act8 B% Y* r" f2 E2 K+ _
messagebox  当前天下第一行会竞标版会无人竞标# Q$ s( `1 q8 b5 p3 F; y+ L+ f
break
( a8 H: h; V$ ]/ k
; V8 y" v' T- X+ F

6 {4 g) V$ b. C5 E#if
4 }- v4 q6 B/ m1 C6 ?equal A304- o3 m2 J  j! U9 D* W; s* E( N
#act
* `0 k7 S, C5 H% d, n. t- Kmessagebox  当前<$STR(A300)>行会禁止收人4 N/ G8 z) T2 b2 l
break
! V- K9 E1 N. d; D  }
: x& w* a1 e* w. {# u" P8 g0 F
: v1 z9 d( p5 b6 x: h6 F" J
#if* N' J3 u6 A5 r$ s/ T  u8 K
CHECKLEVELEX < <$STR(G304)>! L9 v% T) s" g- N! O
#act" s' U( f/ j! N) O5 }* @
messagebox  <$STR(A300)>行会禁止收人需要人物达到<$STR(G304)>级
: {# {3 j/ s: e/ @' zbreak
: a! n7 Q. @5 i/ m$ ]. W
: V- E& E: `0 C% L3 _& C' E
/ M9 i: Z- |  p, y
#if
7 S8 F3 B7 o- J2 K. ^$ `#act
; ^' T$ [5 k  Z1 GADDGUILDMEMBER <$STR(A300)>/ g9 b' ?! w" j4 U: A* a. M* t/ X5 V/ ~
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【行会竞标版】加入了【<$STR(A300)>】( y& I' [% ]2 w, p& P; u
break
1 f7 c1 ]$ t* ?$ ~  X& N' [" _7 W, X* ]
! v: n2 {; l- o) n/ T1 @9 T
[@竞标2]
8 X% \7 W7 R! s$ ]0 I#if: o" h6 }6 ~" R5 ^( o! E
equal <$GUILDNAME> <$STR(A301)>
7 b  e4 ]- i; e9 U2 y#act
; f# G* W9 Z4 a% qmessagebox  您已竞标了第二行会竞标版.无需再次竞标.; D* t! e0 S1 l" V( |
break, }. i5 s; q& p8 z- Q4 ?
0 {- T$ j  E# Y4 P' X% c7 I, k

- I: ]3 c) x0 H6 D#IF ! _3 \3 Q) p( D: k2 ]0 E7 k
CheckGameGold > <$STR(G301)>
; h3 j$ U% @, T4 y#ACT
+ N$ Y; l+ v5 C$ x! z" J& T6 M: I, |INC G301 1000& i" W6 [3 [3 L7 K
GameGold - <$STR(G301)>
0 ?4 O" L) `! L$ ~% D4 YINC G445 1000
( o9 \: k! o" u2 e$ D8 l2 imov A301 <$GUILDNAME>
7 o5 I1 h( Q# L9 a- o  cGuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A301)>】荣登【第二行会竞拍版】
& ]/ E( b( n+ F* Q% b/ dmov A305 允许收人. p: l  o$ a. @5 B- b, K$ ^
GOTO @main
8 g( @1 |0 w6 I3 E0 MBREAK * \/ k/ q: p. B4 ^7 {9 S
#ELSEACT
) n0 N0 j7 p! Y1 OMOV N$第二行会价格 <$STR(G301)>
. ?3 \: K1 B0 ^5 F9 d# uinc N$第二行会价格 10000 U: C3 d7 Q& p+ E8 r1 [
Messagebox  抱歉,本次竞拍需要<$STR(N$第二行会价格)>元宝,您的元宝不足
7 O  n* t) g3 C. R7 u" c4 J* d! w$ x8 W/ |' M1 ]' |
5 b. J* v  K' n7 K" T  R
[@加入2], P9 M4 t+ u( N( W
#IF
  j* z) ~9 r7 S/ q& h# DHAVEGUILD
+ b" O2 g1 {2 Q5 S! ~" x8 }# u#ACT$ v3 H$ D- t! N
Messagebox  您当前已经加入行会.请退出后在加入.! L' K" {- h* u4 n( X/ A
break
4 B: z1 w! F" h; n0 t9 \, r6 B2 _7 U* \! @3 r' ^

: j" N: T2 ?5 J  Z#if8 e& L* i  d7 v0 A5 {- C  l2 n
equal <$STR(A301)> $ A1 c  s4 J+ R
#act- t! E5 z8 U9 I: W! e
messagebox  当前天下第二行会竞标版会无人竞标
# x# e5 o6 _0 x1 o1 P$ [4 i+ ~break  }' {5 q- n5 x* y( @9 M# W; D

' ]% l: b" K( ~* T

/ r5 g; F* N1 {0 ]# y#if
1 U0 N  b9 I, Q" dequal A305
) S+ @+ D8 k5 ~# Z#act
) m6 J) O5 y3 r, d# }/ Xmessagebox  当前<$STR(A301)>行会禁止收人. n5 |) y5 W, z6 n/ D8 J
break
/ L6 q1 \4 I+ _  X, i  c
( [) s6 F% n, _' b: i2 D& G

, Q) j7 f- d1 d( e. e3 b4 |#if
+ D& N/ ~8 y/ [3 D% jCHECKLEVELEX < <$STR(G305)>4 X) z, `- z3 J- Z( d
#act* ?- b3 T( U7 V1 A5 G1 U. H  K
messagebox  <$STR(A301)>行会禁止收人需要人物达到<$STR(G305)>级
" V/ [" \' J( e8 c4 |1 vbreak
( {6 J6 @0 H  K4 {
5 f* L: i% |4 p' C
3 v& p9 W/ l# \1 Y8 b+ Y
#if
, j' k6 d' d0 b5 f#act
0 \3 a4 k2 I7 n9 t# kADDGUILDMEMBER <$STR(A301)>) x: N# c" r2 ^2 x; Q
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【第二行会竞标版】加入了【<$STR(A301)>】
3 Z: Y3 z! u  x2 R' O! Abreak5 E* j, a6 ~& n

& w. P( \9 g. f7 b& v, `; A/ [% I) H
" K% x" c$ a7 \  q
[@竞标3]
$ j6 h; x3 n0 N% }#if* m) |9 m: g% }* U( `5 K6 H" M
equal <$GUILDNAME> <$STR(A302)>
- l* p/ J0 Q* m* c7 s+ X$ {7 e#act0 J1 F" K6 w4 T$ Y& B
messagebox  您已竞标了第三行会竞标版.无需再次竞标.3 r: D3 x+ f: Z0 {$ U% O
break
/ u; }! B2 o# b* {2 `5 N! m. e! D1 U, i  `& q0 K
( {" ]: u+ ?0 {6 {+ @  k) j# `; z* K8 t
#IF 3 v. a9 t9 \* M4 `" H4 O( Q
CheckGameGold > <$STR(G302)>
& Q4 x5 x4 G  f! Z6 L& i. b% p#ACT* F' X8 b2 B- \
INC G302 1000; t& ^, y" k6 w. R; K* U
GameGold - <$STR(G302)>
7 Q7 f2 N; Y& Z% O8 y. y; D: ^6 W/ `& XINC G445 1000
3 a/ B# Y1 h4 ~* [9 Imov A302 <$GUILDNAME>
& F7 A9 b# e8 k# p; hGuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A302)>】荣登【第三行会竞拍版】/ f' ?2 [* _/ l
mov A306 允许收人( z: r( k% F; ]$ G9 Y- r
GOTO @main 7 l+ N: z1 J  b7 |
BREAK
+ n: A3 \& @: `3 m% _1 i#ELSEACT; ^6 ?  Q9 _' l5 j1 A
MOV N$第三行会价格 <$STR(G302)>0 v' W) P9 u! V
inc N$第三行会价格 1000
& T; Y! @/ B; y' M$ BMessagebox  抱歉,本次竞拍需要<$STR(N$第三行会价格)>元宝,您的元宝不足+ ]8 ]9 X. [$ P! ~1 W3 q* d1 n

- z, S% w" l2 S. u
9 m9 d" K; B9 m5 m1 N
[@加入3]
6 d6 s- ~1 m2 h4 g# g( t6 K' `7 H#IF
6 }, L) j* Q+ W9 c9 zHAVEGUILD
- @. [, ~/ _3 W. c) ]9 a/ Z! ]& L#ACT
2 D! Q% t0 Y0 o* e3 b1 iMessagebox  您当前已经加入行会.请退出后在加入.* F3 @. m# K4 X8 e, T
break
  l: m5 `1 @2 K! B8 m4 S
0 U3 |) f( ?4 Y; r" N% |* k; E+ Y$ F
- C$ E6 J4 L! L/ M  e6 [
#if
, p. a( p$ A$ fequal <$STR(A302)>
' ]% r' w; r. K( M/ B#act
4 `: n( l, \. M( f8 o0 U7 emessagebox  当前天下第三行会竞标版会无人竞标
: h9 W# S! p: }& j9 I: X1 fbreak
! I0 n- t, e4 C7 Q0 D+ v1 n+ \1 e( m4 C
' k5 ~" k) ^3 `
#if
$ \0 H, E. Z2 l5 [, Z. s9 Pequal A3064 k; O: P; R( N9 j1 M
#act' t; l) `4 i4 e4 t1 O: |% p
messagebox  当前<$STR(A302)>行会禁止收人
3 w  \6 q. R6 i3 n4 w4 \8 |# dbreak
3 T* ^+ r1 W' p9 F; W, V$ H% ]  Q' e8 e* ~$ U& ~$ @) v4 v0 U

  M5 G& [' Q! Q2 A. U5 z2 k#if( ^) v" ^+ O. C; _, g7 J* P9 z8 c
CHECKLEVELEX < <$STR(G306)>) ]' T" u3 l: d
#act$ A8 Y7 J! T$ o
messagebox  <$STR(A302)>行会禁止收人需要人物达到<$STR(G306)>级2 `# y1 ]/ o: H: ]! g
break
* A6 k* h- F. Z8 }! C* h$ I3 E& J! {6 \2 W

( G  N- g% |! r! d  g#if% H7 g/ |+ @6 P3 Y( U2 z+ g( {- ~
#act
' o) C0 t; U* N! Z6 lADDGUILDMEMBER <$STR(A302)>6 t  Q0 B5 y1 b8 Z9 @( }
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】通过【第三行会竞标版】加入了【<$STR(A302)>】" t. O6 M' m& z
break9 t$ `5 q+ D3 N( Y9 L

! }: J9 T3 x. ]. [' {5 r
站长承接传奇一切业务,小问题免费咨询。站长QQ137919001
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2026-11-2 20:16 , Processed in 皖公网安备:34112402000394号 0.222033 second(s), 27 queries .