一个简单的行会招人竞标脚本

wojiajimi

{行会竞标及行会自助招人脚本}

适用引擎：Gom引擎、Gee引擎

脚本特色：行会竞标已经自助招人，非常简单一看就会，可自行进行扩展

占用变量：A50-A52、G56、G108-G110、S1、@@InPutString5、@@InPutInteger71

占用补丁：补丁效果自行寻找素材添加

1. 
   
2. ()
   
3. %100
   
4. [@main]
   
5. #act
   
6. #say
   
7. <PlayImg:34:31:1:100:515:95/@exit>
   
8. \ \ \ \ \ \ \ \ \
   
9. <>             <★━━━━★/SCOLOR=250>　　━━━ 行会【<$STR(A50)>】自助招人系统 ━━━\
   
10. <>             <┃/SCOLOR=250>行 <■/AUTOCOLOR=254,250,253,241> 竞<┃/SCOLOR=250>　　<加入该行会的最低等级要求是：/AUTOCOLOR=249><$STR(G108)>级以上\
    
11. <>             <┃/SCOLOR=250> <■/AUTOCOLOR=250,251,241,254>板<■/AUTOCOLOR=241,250,253,254> <┃/SCOLOR=250> 　　[<加入行会/@jrxh>]　[<参加竞价/@cyjj>]　[<管理选项/@竞标台管理>]\
    
12. <>             <┃/SCOLOR=250>会 <■/AUTOCOLOR=250,253,254,241> 价<┃/SCOLOR=250>　　\
    
13. <>             <★━━━━★/SCOLOR=250>　　━━━━━━━━━━━━━━━━━━━━━━━\
    
14. <>             <【行会名称】/SCOLOR=154>：【<$STR(A50)>】　　　　　<行会掌门：/SCOLOR=154>【<$STR(A52)>】\
    
15. <>             <【竞标价格】/SCOLOR=154>：【<$STR(G56)>】\
    
16. <>             <【掌门致辞】/SCOLOR=154>：【<$STR(A51)>】\ \ \
    
17. <>             <您支付比目前竞价多100万元宝，即可让你建的行会成为[天下第一行会]/AUTOCOLOR=250,253,254,241>\
    
18. 
    
19. [@cyjj]
    
20. #IF
    
21. HAVEGUILD
    
22. ISGUILDMASTER
    
23. checkgamegold > <$STR(G56)>
    
24. #ACT
    
25. INC G56 1000000
    
26. gamegold - <$STR(G56)>
    
27. mov A50 <$GUILDNAME>
    
28. mov A52 <$USERNAME>
    
29. Messagebox [成功]：您在行会竞价板上花了【<$STR(G56)>】个元宝竞得。
    
30. GuildNoticeMsg 5 9 【<$USERNAME>】的行会【<$STR(A50)>】评得实力行会，大家赶快来加入吧!
    
31. GuildNoticeMsg 5 9 【<$USERNAME>】的行会【<$STR(A50)>】评得实力行会，大家赶快来加入吧!
    
32. GuildNoticeMsg 5 9 【<$USERNAME>】的行会【<$STR(A50)>】评得实力行会，大家赶快来加入吧!
    
33. GuildNoticeMsg 5 9 【<$USERNAME>】的行会【<$STR(A50)>】评得实力行会，大家赶快来加入吧!
    
34. GuildNoticeMsg 5 9 【<$USERNAME>】的行会【<$STR(A50)>】评得实力行会，大家赶快来加入吧!
    
35. SENDMSG 6 提示：竞价成功，消费【<$STR(G56)>元宝】！你当前的元宝余额为【<$GAMEGOLD>】！！
    
36. BREAK
    
37. #ELSEACT
    
38. Messagebox [失败]：您的元宝不足或者您没有行会
    
39. 
    
40. [@jrxh]
    
41. #if
    
42. equal G109 1
    
43. #act
    
44. messagebox 对不起，本行会暂时不收人
    
45. break
    
46. 
    
47. #if
    
48. CHECKLEVELEX < <$STR(G108)>
    
49. #act
    
50. messagebox 等级不够！
    
51. break
    
52. 
    
53. #IF
    
54. ISGUILDMASTER
    
55. #ACT
    
56. Messagebox [失败]：您现在是行会掌门不能在加入其他行会！！
    
57. break
    
58. 
    
59. #IF
    
60. equal A50 <$GUILDNAME>
    
61. #ACT
    
62. Messagebox [失败]：您现在已经是【<$STR(A50)>】的行会成员了！！
    
63. break
    
64. #ELSEACT
    
65. goto @jrxh3
    
66. 
    
67. 
    
68. [@jrxh3]
    
69. #IF
    
70. HAVEGUILD
    
71. #ACT
    
72. Gmexecute 退出行会
    
73. DELAYGOTO 3 @jrxh4
    
74. #ELSEACT
    
75. goto @jrxh4
    
76. 
    
77. 
    
78. [@jrxh4]
    
79. #IF
    
80. equal A50
    
81. #ACT
    
82. Messagebox [失败]：现在还没行会竟价格
    
83. #ELSEACT
    
84. AddGuildMember <$STR(A50)>
    
85. SENDMSG 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A50)>】
    
86. SENDMSG 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A50)>】
    
87. SENDMSG 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A50)>】
    
88. SENDMSG 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A50)>】
    
89. SENDMSG 0 恭喜【<$USERNAME>】通过【天下第一行会】NPC加入了行会【<$STR(A50)>】
    
90. break
    
91. 
    
92. [@竞标台管理]
    
93. #if
    
94. ISGUILDMASTER
    
95. equal A50 <$GUILDNAME>
    
96. #act
    
97. goto @竞标台管理2
    
98. #elseact
    
99. SENDMSG 5 [只有本行会掌门才可以进行管理]
    
100. goto @main
     
101. 
     
102. [@竞标台管理2]
     
103. #if
     
104. equal G109 0
     
105. #act
     
106. mov S1 <开启/SCOLOR=250>
     
107. #if
     
108. equal G109 1
     
109. #act
     
110. mov S1 <关闭>
     
111. #if
     
112. equal G110 0
     
113. #act
     
114. mov S2 <允许/SCOLOR=250>
     
115. #if
     
116. equal g110 1
     
117. #act
     
118. mov S2 <禁止>
     
119. #if
     
120. #act
     
121. OPENMERCHANTBIGDLG 34 30 0 4 0 -95 0 0 0 \
     
122. #say
     
123. <PlayImg::34:31:1:100:515:95/@exit>
     
124. \ \ \ \ \ \ \ \ \
     
125. <>               →<修改公告内容/@@InPutString5>  当前公告内容:<$STR(S5)>\
     
126. <>               →<修改等级要求/@@InPutInteger71>  当前等级要求:<$STR(G108)>级\ \
     
127. <>               →<行会收人状态/SCOLOR=254>
     
128. 当前状态为：<$STR(s1)>  [<更改/@gg1>]\ \
     
129. <>               →<返回/@main>
     
130. 
     
131. [@gg1]
     
132. #if
     
133. equal G109 0
     
134. #act
     
135. mov G109 1
     
136. messagebox 行会收人状态→关闭
     
137. goto @竞标台管理
     
138. break
     
139. #if
     
140. equal G109 1
     
141. #act
     
142. mov G109 0
     
143. messagebox 行会收人状态→开放
     
144. goto @竞标台管理
     
145. break
     
146. 
     
147. [@InPutInteger71]
     
148. #if
     
149. large N71 10
     
150. small N71 150001
     
151. #act
     
152. mov G108 <$STR(N71)>
     
153. messagebox 设定成功，加入你的行会的最低等级要求是<$STR(N71)>级！
     
154. goto @竞标台管理
     
155. #elseact
     
156. messagebox 【错误提示】:\　\　　　　　　㈠　请输入一个10－150000间的整数！\　\　　　　　　㈡　请输入数字，勿输入其它字符！
     
157. goto @竞标台管理
     
158. 
     
159. 
     
160. [@InPutString5]
     
161. #if
     
162. #act
     
163. mov A51 <$STR(S5)>
     
164. messagebox 修改成功，公告内容为<$STR(S5)>！
     
165. goto @竞标台管理
     
166. #elseact
     
167. messagebox 【错误提示】:非法字符，请输入一段文本，勿输入其它字符！
     
168. goto @竞标台管理

复制代码