行会招募
必要在剧本头增长(@@InPutString)
#IF
CHECKGAMEGOLD > <$STR(G30)> 检测元宝是否年夜于G30变量的元宝
CHECKGAMEGOLD > 500 检测元宝是否年夜于500个
#ACT
INC G30 500 赋与G30变量为500
GAMEGOLD - <$STR(G30)> 扣除元宝数目
剧本示例
(@@InPutString)
[@main]
\
<★━━━━★/FCOLOR=250> <━━━━━━行会自助※招人体系━━━━━/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
<┃ 行会板 ┃/FCOLOR=249> 【<$STR(A31)>】正在招收成员,<参加此行会/@jrxh>\ \
<★━━━━★/FCOLOR=249> <━━━━━━━━━━━━━━━━━━━━/AUTOCOLOR=254,251,168,191,250,70,245,249,253>\ \
\ <加入竞价/@cyjj> [竞价元宝数]:<$STR(G30)>→[竞得行会名]:【<$STR(A31)>】 \ \
[@cyjj]
#IF
HAVEGUILD
CHECKGAMEGOLD > <$STR(G30)>
CHECKGAMEGOLD > 500
#ACT
INC G30 500
GAMEGOLD - <$STR(G30)>
mov A31 <$GUILDNAME>
mov G31 1
Messagebox [胜利]:你在行会竞价板上花了【<$STR(G30)>】个元宝竞得。
SENDMSG 0 恭喜【<$USERNAME>】在行会竞价板为行会【<$STR(A31)>】竞得,年夜家从速来参加这个有实力的行会吧!
GOTO @MAIN
BREAK
#ELSEACT
Messagebox [失败]:你的元宝不敷500个或者你没有行会
[@jrxh]
#IF
equal <$STR(A31)> 暂无
#ACT
MESSAGEBOX [失败]:今朝没有行会竞得行会竞价板
#ELSEACT
GOTO @jrxh1
BREAK
[@jrxh1]
#IF
HAVEGUILD
#ACT
MESSAGEBOX [失败]:您已经有行会了。无法申请!
#ELSEACT
GOTO @jrxh2
BREAK
[@jrxh2]
#IF
equal G31 1
#ACT
AddGuildMember <$STR(A31)> <$USERNAME>
Messagebox [胜利]:恭喜【<$USERNAME>】参加了行会【<$STR(A31)>】。
BREAK
[@InPutString50]
#IF
EQUAL S50
#ACT
Messagebox [失败]:请输入所要颁发的笔墨。不克不及发空新闻。
GOTO @MAIN
BREAK
#IF
CHECKGAMEGOLD > <$STR(G34)>
#ACT
INC G34 1
GAMEGOLD - <$STR(G34)>
MOV A38 <$STR(S50)>
MOV A36 <$USERNAME>
MOV S3
INC S3 <$STR(S50)>
INC S3 /AUTOCOLOR=addnamelist ..\QuestDiary\网蓝检测\色彩.txt S30
INC S3 <$STR(S30)>
INC S3 >
MOV A37 <$STR(S3)>
MOV A39 ╚┄┄┄┄┄┄┄╝\留言者:<$USERNAME>\ \╔┄┄┄┄┄┄┄╗\┊玩家公开留言板┊\
MOV S50
Messagebox [胜利]:你在留言板上写下了以下一段话。\ \ <$STR(A38)>
SENDMSG 0 【<$USERNAME>】在留言竞价板留下一句话,年夜家从速去查看一下吧!
GOTO @MAIN
BREAK
#ELSEACT
MOV S50
Messagebox [失败]:你的元宝不敷!\ \ 必需付出比<$STR(G34)>多1个元宝才可以留言。
GOTO @MAIN
BREAK
[@IsInFilterList]
#IF
#ACT
MESSAGEBOX [提醒]:输入数据中包括了非法字符,请从新编纂!
BREAK