传奇素材脚本 发表于 2018-1-1 09:31:00

500pi-GOM行会无漏洞招人脚本

本帖最后由 传奇素材脚本 于 2018-1-1 09:32 编辑

500pi欢迎广大传奇爱好者提供相关资源、本站力争成为最公益的素材脚本交流站

===========================================================

资源下载:

===========================================================

资源演示：
(@@InPutInteger @@InPutString @InPutInteger @InPutString @storage @getback @getnextpage @getPreviouspage)
[@main]
#IF
NOT ISGUILDMASTER
#ACT
OPENMERCHANTBIGDLG 1 493 1 4 0 0 20 390 7
MOV <$STR(S$行会一名字)> <$STR(A30)>
MOV <$STR(S$行会二名字)> <$STR(A40)>
MOV <$STR(S$行会三名字)> <$STR(A50)>
SetStringBlank <$STR(S$行会一名字)> 14 1
SetStringBlank <$STR(S$行会二名字)> 14 1
SetStringBlank <$STR(S$行会三名字)> 14 1
#SAY

　　　　　　　         <行会自助招人/AUTOCOLOR=250>\　\
<------------------------------------------------------------------/AUTOCOLOR=14> \
　<【天下第一行会】/AUTOCOLOR=249>:<$STR(S$行会一名字)><【招募】/AUTOCOLOR=249>:<$STR(A32)>   <【竞价】/AUTOCOLOR=249>:<$STR(G30)> \\
　<【天下第二行会】/AUTOCOLOR=253>:<$STR(S$行会二名字)><【招募】/AUTOCOLOR=253>:<$STR(A42)>   <【竞价】/AUTOCOLOR=253>:<$STR(G40)> \\
　<【天下第三行会】/AUTOCOLOR=146>:<$STR(S$行会三名字)><【招募】/AUTOCOLOR=146>:<$STR(A52)>   <【竞价】/AUTOCOLOR=146>:<$STR(G50)> \
<------------------------------------------------------------------/AUTOCOLOR=14> \
　    <您需支付高于天下第一行会竞标价格10000元宝即可竞标成功/AUTOCOLOR=250>\　\

　<加入天下第一行会/@加入行会1>       <加入天下第二行会/@加入行会2>       <加入天下第三行会/@加入行会3>
#ELSEACT
OPENMERCHANTBIGDLG 1 493 1 4 0 0 20 390 7
MOV <$STR(S$行会一名字)> <$STR(A30)>
MOV <$STR(S$行会二名字)> <$STR(A40)>
MOV <$STR(S$行会三名字)> <$STR(A50)>
SetStringBlank <$STR(S$行会一名字)> 14 1
SetStringBlank <$STR(S$行会二名字)> 14 1
SetStringBlank <$STR(S$行会三名字)> 14 1
#elseSAY

　　　　　　　         <行会自助招人/AUTOCOLOR=250>\　\
<------------------------------------------------------------------/AUTOCOLOR=14> \
　<【天下第一行会】/AUTOCOLOR=249>:<$STR(S$行会一名字)><【招募】/AUTOCOLOR=249>:<$STR(A32)>   <【竞价】/AUTOCOLOR=249>:<$STR(G30)> \\
　<【天下第二行会】/AUTOCOLOR=253>:<$STR(S$行会二名字)><【招募】/AUTOCOLOR=253>:<$STR(A42)>   <【竞价】/AUTOCOLOR=253>:<$STR(G40)> \\
　<【天下第三行会】/AUTOCOLOR=146>:<$STR(S$行会三名字)><【招募】/AUTOCOLOR=146>:<$STR(A52)>   <【竞价】/AUTOCOLOR=146>:<$STR(G50)> \
<------------------------------------------------------------------/AUTOCOLOR=14> \
　    <您需支付高于天下第一行会竞标价格10000元宝即可竞标成功/AUTOCOLOR=250>\　\

　       <竞标天下第一行会/@竞标行会1>         <行会招募状态设置/@行会招募设置>

[@行会招募设置]
#if
equal <$GUILDNAME> <$STR(A30)>
#act
goto @天下第一行会开关
break

#if
equal <$GUILDNAME> <$STR(A40)>
#act
goto @天下第二行会开关
break

#if
equal <$GUILDNAME> <$STR(A50)>
#act
goto @天下第三行会开关
break

#elseact
messagebox \\\您的行会未登天下行会榜.


[@天下第一行会开关]
#if
equal A32 开启
#act
messagebox \\\您将关闭行会招募状态.确定关闭么？@确定关闭天下第一行会 @取消
#elseact
messagebox \\\您将开启行会招募状态.确定开启么？@确定开启天下第一行会 @取消


[@天下第二行会开关]
#if
equal A42 开启
#act
messagebox \\\您将关闭行会招募状态.确定关闭么？@确定关闭天下第二行会 @取消
#elseact
messagebox \\\您将开启行会招募状态.确定开启么？@确定开启天下第二行会 @取消

[@天下第三行会开关]
#if
equal A52 开启
#act
messagebox \\\您将关闭行会招募状态.确定关闭么？@确定关闭天下第三行会 @取消
#elseact
messagebox \\\您将开启行会招募状态.确定开启么？@确定开启天下第三行会 @取消



[@确定关闭天下第一行会]
#act
MOV A32 关闭
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经关闭招募状态.想投奔的下次请早！
goto @main

[@确定开启天下第一行会]
#act
MOV A32 开启
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 249 251 【<$USERNAME>】统治的天下第一行会【<$STR(A30)>】已经开启招募状态.想投奔赶快了！
goto @main



[@确定关闭天下第二行会]
#act
MOV A42 关闭
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经关闭招募状态.想投奔的下次请早！
goto @main

[@确定开启天下第二行会]
#act
MOV A42 开启
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 253 0 【<$USERNAME>】统治的天下第二行会【<$STR(A40)>】已经开启招募状态.想投奔赶快了！
goto @main


[@确定关闭天下第三行会]
#act
MOV A52 关闭
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经关闭招募状态.想投奔的下次请早！
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经关闭招募状态.想投奔的下次请早！
goto @main

[@确定开启天下第三行会]
#act
MOV A52 开启
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经开启招募状态.想投奔赶快了！
GuildNoticeMsg 146 0 【<$USERNAME>】统治的天下第三行会【<$STR(A50)>】已经开启招募状态.想投奔赶快了！
goto @main



[@竞标行会1]
#if
equal <$GUILDNAME> <$STR(A30)>
#act
messagebox \\\您已是天下第一行会老大.无需再次竞标.
break

#if
equal <$GUILDNAME> <$STR(A40)>
#act
MOV <$STR(N$竞标价格一)> <$STR(G30)>
INC <$STR(N$竞标价格一)> 10000
goto @二进一
break

#if
equal <$GUILDNAME> <$STR(A50)>
#act
MOV <$STR(N$竞标价格一)> <$STR(G30)>
INC <$STR(N$竞标价格一)> 10000
goto @三进一
break

#if
NOT equal <$GUILDNAME> <$STR(A30)>
NOT equal <$GUILDNAME> <$STR(A40)>
NOT equal <$GUILDNAME> <$STR(A50)>
#act
MOV <$STR(N$竞标价格一)> <$STR(G30)>
INC <$STR(N$竞标价格一)> 10000
goto @三进一
break



[@三进一]
#if
CHECKGAMEGOLD > <$STR(N$竞标价格一)>
#act
GAMEGOLD - <$STR(N$竞标价格一)>
MOV A50 <$STR(A40)>
MOV A52 <$STR(A42)>
MOV G50 <$STR(G40)>

MOV A40 <$STR(A30)>
MOV A42 <$STR(A32)>
MOV G40 <$STR(G30)>

MOV A30 <$GUILDNAME>
MOV A32 开启
MOV G30 <$STR(N$竞标价格一)>
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A30)>】荣登【天下第一行会】
goto @main
#elseact
messagebox \\\您的元宝不足<$STR(N$竞标价格一)>.无法竞标天下第一行会


[@二进一]
#if
CHECKGAMEGOLD > <$STR(N$竞标价格一)>
#act
GAMEGOLD - <$STR(N$竞标价格一)>
MOV A40 <$STR(A30)>
MOV A42 <$STR(A32)>
MOV G40 <$STR(G30)>
MOV A30 <$GUILDNAME>
MOV A32 开启
MOV G30 <$STR(N$竞标价格一)>
GuildNoticeMsg 249 251 恭喜【<$USERNAME>】统治的行会【<$STR(A30)>】荣登【天下第一行会】
goto @main
#elseact
messagebox \\\您的元宝不足<$STR(N$竞标价格一)>.无法竞标天下第一行会





===========================================================

【注：帖子中的资源只显示了部分-如需完整资源请下载附件】

xgxhzl 发表于 2018-1-21 00:08:03

的点点滴滴多多多多多多多多多

xgxhzl 发表于 2018-1-21 00:08:21

的点点滴滴多多多多多多多多多

xgxhzl 发表于 2018-1-21 00:08:39

的点点滴滴多多多多多多多多多多多

xgxhzl 发表于 2018-1-21 00:08:56

的点点滴滴多多多多多多多多

444101012 发表于 2018-3-17 11:33:57

MOV <$STR(S$行会二名字)> <$STR(A40)>MOV <$STR(S$行会二名字)> <$STR(A40)>MOV <$STR(S$行会二名字)> <$STR(A40)>

198903042 发表于 2018-4-9 22:56:11

天第一次来到500Pi、感觉好像找到了家呢

传奇霸业 发表于 2018-5-15 15:52:40

今天第一次来到500Pi、感觉好像找到了家呢

373880095 发表于 2018-12-3 14:30:17

今天第一次来到500Pi、感觉好像找到了家呢

jian8653865 发表于 2018-12-9 19:34:41

https://www.500pi.com/source/plugin/nciaer_facecomment/template/images/121.gif
楼主你好、借一步说话、有句红包当讲不当讲
页: [1] 2 3
查看完整版本: 500pi-GOM行会无漏洞招人脚本