行会招募 必要在剧本头增长(@@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
热2024-03-29
热2013-08-13
热2013-10-02
热2024-06-26
热2013-09-10
热2013-01-26