传奇单机版下载-传奇服务端-传奇一条龙-Gm版本库-传奇版本库GM基地论坛

 找回密码
 立即注册

LEG/BLUE引擎引擎行会竞价在线收人脚本 - 传奇私服脚本

查看: 625|回复: 0

LEG/BLUE引擎引擎行会竞价在线收人脚本

[复制链接]
发表于 2017-12-18 18:56:23 | 显示全部楼层 |阅读模式
(@@InPutString @@InPutInteger  )

[@MAIN]
<COLOR=CLLIME ★><COLOR=clltgray ━━━━><COLOR=CLLIME ★>   <COLOR=clltgray ━> <COLOR=cllime ◆>【<$STR(A64)>】<COLOR=cllime ◆><COLOR=clltgray 工会><COLOR=cllime ◆><COLOR=clltgray 招募中心><COLOR=cllime ◆> <COLOR=clltgray ━>\
<COLOR=clltgray ┃><COLOR=clfuchsia 行> <COLOR=claqua ■> <COLOR=clfuchsia 竞><COLOR=clltgray ┃>  <COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆> \
<COLOR=clltgray ┃> <COLOR=claqua ■>板<COLOR=claqua ■> ┃ <COLOR=clfuchsia ☆>                                        <COLOR=claqua ★>\
<COLOR=clltgray ┃><COLOR=clfuchsia 会> <COLOR=claqua ■> <COLOR=clfuchsia 标><COLOR=clltgray ┃>  <COLOR=claqua ★> <加入行会/@jrxh>  <参与竞标/@QFA>  <创建行会/@cjhh>  <等待添加/@s1231a> <COLOR=clfuchsia ☆>\
<COLOR=CLLIME ★><COLOR=clltgray ━━━━><COLOR=CLLIME ★> <COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★><COLOR=clfuchsia ☆><COLOR=claqua ★>\ \

<COLOR=cllime ▓竞标行会▓>: <COLOR=CLLIME →> <$STR(A64)> <COLOR=CLLIME ←>\
<COLOR=clfuchsia ▓竞标价格▓>: <COLOR=CLLIME →> <$STR(G48)> <COLOR=CLLIME ←>\
<COLOR=claqua 首次竞标价格为:50元宝起,即让行会竞标板上加入的是您行会。>\

[@sqhhz111]
<COLOR=clLime ★━━━━★   行会>【<$STR(A64)>】<COLOR=clLime 自助招人系统>\
<COLOR=clLime ┃行 ■ 收┃> \
<COLOR=clLime ┃ ■  ■ ┃>    <发布此行会全区在线收人信息/@jrxh1211>\
<COLOR=clLime ┃会 ■ 人┃> \
<COLOR=clLime ★━━━━★  ━━━━━━━━━━━━━━━━━━━━>\
 \
<COLOR=clAqua 【服务收费】:每次发送需要支付100元宝>\
<COLOR=clAqua 【服务说明】:发布行会收人信息给每个在线且没有行会的玩家>

[@jrxh1211]
#IF
;ISGUILDMASTER
CHECKGUILDLIST ..\QuestDiary\数据整理\竞价行会.txt
#ELSEACT
Messagebox [失败]:你不是【<$STR(A64)>】行会成员,不能发布此行会收人信息!
BREAK
#IF
CHECKGAMEGOLD > 99
#SAY
发送在线收人信息成功。\ \
行会【<$STR(A64)>】\
的招募成员信息已发送至每个在线且没有行会的玩家.
#ACT
GAMEGOLD - 100
Gmexecute 开始提问 @收人统计
#ELSESAY
元宝不够,操作失败

[@cjhh]
#IF
CheckLevelEX > 34
#ACT
MAPMOVE 0122 24 29
SENDMSG 0 玛法勇士 %s 从盟重"招兵买马"进入<比奇皇宫>创建行会 0 245
BREAK
#ELSESAY
你的等级不够35级,不能创建行会!~!~!~ \\

[@QFA]
#ACT
QUERYVALUE 8 1 8 @InPutString5 参与竞标必须输入(50~50000)的数值。
[@InPutString5]
#IF
CHECKGAMEGOLD < <$STR(M8)>
#ACT
MESSAGEBOX [提示]:你身上的元宝不足,无法参与竞标。
MOV M8 0
MOV D8 0
GOTO @MAIN
BREAK
#IF
large M8 50000
#ACT
MESSAGEBOX [提示]:请输入50000以下字符。
MOV M8 0
MOV D8 0
GOTO @MAIN
BREAK
#ELSEACT
Goto @InPutInteger8


[@InPutInteger8]
#if
SMALL M8 50
#ACT
MOV M8 0
MOV M8 0
MESSAGEBOX [提示]:参与竞标必须在50以上的数值!
GOTO @MAIN
BREAK

#if
large M8 <$STR(G48)>
HAVEGUILD
#ACT
mov G49 1
gamegold - <$STR(M8)>
mov A64 <$GUILDNAME>
mov G48 <$str(M8)>
MOV M8 0
MOV M8 0
Messagebox [成功]:你在行会竞标板上花了【<$STR(G48)>】个元宝竞得。
SENDMSG 0 恭喜【<$USERNAME>】在行会竞标板为行会【<$STR(A64)>】竞得,大家赶快来加入这个有实力的行会吧!  254 0 30
SENDMSG 0 恭喜【<$USERNAME>】在行会竞标板为行会【<$STR(A64)>】竞得,大家赶快来加入这个有实力的行会吧!  253 0 30
SENDMSG 0 恭喜【<$USERNAME>】在行会竞标板为行会【<$STR(A64)>】竞得,大家赶快来加入这个有实力的行会吧!  251 0 30
SENDMSG 0 恭喜【<$USERNAME>】在行会竞标板为行会【<$STR(A64)>】竞得,大家赶快来加入这个有实力的行会吧!  250 0 30
CLEARNAMELIST ..\QuestDiary\数据整理\竞价行会.txt
ADDGUILDLIST ..\QuestDiary\数据整理\竞价行会.txt
GOTO @MAIN
BREAK
#ELSEACT
Messagebox [失败]:你竞标的价格未高过对方行会或者你没有行会!!






[@cyjj]
#IF
HAVEGUILD
CHECKGAMEGOLD > <$STR(G48)>
#ACT
INC G48 1000
GAMEGOLD - <$STR(G48)>
mov A64 <$GUILDNAME>
mov G49 1
Messagebox [成功]:你在行会竞价板上花了【<$STR(G48)>】个元宝竞得。
SENDMSG 0 恭喜【<$USERNAME>】在行会竞价板为行会【<$STR(A64)>】竞得,大家赶快来加入这个有实力的行会吧!
GOTO @MAIN
BREAK
#ELSEACT
Messagebox [失败]:你的元宝不足或者你没有行会

[@jrxh]
#if
HAVEGUILD
#act
messagebox 你已经加入行会了...
break
#IF
equal G49 1
#ACT
Gmexecute 加入门派
AFFILIATEGUILD <$STR(A64)>
Messagebox [成功]:恭喜【<$USERNAME>】加入了行会【<$STR(A64)>】。
SENDMSG 0 恭喜【<$USERNAME>】通过行会竟标加入了行会【<$STR(A64)>】。 252 255 10
SENDMSG 0 恭喜:<$USERNAME>,通过行会竟标加入了行会【<$STR(A64)>】。 252 255
SENDMSG 0 恭喜:<$USERNAME>,通过行会竟标加入了行会【<$STR(A64)>】。 252 255
SENDMSG 0 恭喜:<$USERNAME>,通过行会竟标加入了行会【<$STR(A64)>】。 252 255
SENDMSG 0 恭喜:<$USERNAME>,通过行会竟标加入了行会【<$STR(A64)>】。 252 255
SENDMSG 0 恭喜:<$USERNAME>,通过行会竟标加入了行会【<$STR(A64)>】。 252 255
SENDMSG 0 恭喜:<$USERNAME>,通过行会竟标加入了行会【<$STR(A64)>】。 252 255
SENDMSG 0 恭喜:<$USERNAME>,通过行会竟标加入了行会【<$STR(A64)>】。 252 255
BREAK
#ELSEACT
Messagebox [失败]:目前没有行会竞得行会竞价板

[@IsInFilterList]
#Act
MessageBox 输入数据中包含了非法字符.请重新编辑...
Goto @Main
Break


回复

使用道具 举报

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

本版积分规则

Archiver/手机版/Gm版本库 ( 蜀ICP备20007044号-3 )|网站地图

GMT+8, 2024-12-23 12:06 , Processed in 0.112741 second(s), 16 queries .

Powered by GM版本库 X3.4

© 2001-2011 传奇版本库>  template by 版本库