2024-05-07
(@@InPutString @@InPutInteger @MDlgImgName=MerchantDlg.PNG)
[@在线广播]
{
#act
SetMerchantDlgImgName MerchantDlg.PNG
#say
<COLOR=clRed New~HOT> <COLOR=$00FF92 ≡≡≡★★★><COLOR=$00FFA3 全><COLOR=$00FFB4 服><COLOR=$00FFC5 广><COLOR=$00FFD6 播><COLOR=$00FFE7 ★★★≡≡≡>
<COLOR=clLime 年轻人,我这可以提供一些服务但是要给点小费给我才帮你做事！>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=clRed [><全服喊话/@广播><COLOR=clRed ]> <COLOR=$00FFAADD 全服大部分玩家都能看到你的喊话内容>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=clRed [><全服广告/@展示物品><COLOR=clRed ]> <COLOR=$00FFAADD 给我看下你要展示的物品,我可以在全服给你置顶广告>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=clRed [><物品查询/@搜索><COLOR=clRed ]> <COLOR=$00FFAADD 告诉我你要找的东西。我去帮你找！[没找到不收费]>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=$000077FF 请注意自己的广告词！否则封号处理！！！！！！！>
<COLOR=clRed [><关闭窗口/@close><COLOR=clRed ]>
[@展示物品]
#act
QUERYITEMDLG 请放你要展示的物品 @gggc 0
[@gggc]
#if
#ACT
close
#if
#ACT
SetMerchantDlgImgName MerchantDlg.PNG
#if
#SAY
<COLOR=clRed New~> <COLOR=$00FF92 ≡★><COLOR=$00FFA3 全><COLOR=$00FFB4 服><COLOR=$00FFC5 广><COLOR=$00FFD6 播><COLOR=$00FFE7 ★≡>
<COLOR=clLime 年轻人,不错！不错！这宝贝你是哪里弄到的！>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=clRed 你的物品：><$DLGITEMSHOW>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=$0000E7F7 现在你可以告诉你的广告词的我可以帮你全区置顶通告一下！>
<COLOR=$0000E7F7 每次全服广播需要花费100个金币！装B的利器、神豪的象征>
<COLOR=clRed ----------------------------------------------------------->
<输入广告词/@@inputstring2>
<COLOR=clRed [><关闭窗口/@close><COLOR=clRed ]>
[@@inputstring2]
#if
#ACT
#SAY
<COLOR=clLime 年轻人,别说我坑你！再给你次机会确认一下>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=clRed 你的物品：><$DLGITEMSHOW>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=clRed 你的广告词：><$STR(S2)>
<COLOR=clRed ----------------------------------------------------------->
<COLOR=$0000E7F7 每次广播全服置顶30秒！费用为100个金币一次！>
<没问题射广告吧/@showMyItem1>
<COLOR=clRed [><关闭窗口/@close><COLOR=clRed ]>
[@showMyItem1]
#if
CHECKGOLDCOUNT ? 100
#ACT
TAKE 金币 100
SENDMSG 1 本区神豪：玩家广告→【<$USERNAME>:<$DLGITEMSHOW>..<$STR(S2)>】 255 241 65000
SendScrollMsg 成贯：玩家广告→【`NAME=%s:~<$DLGITEMSHOW>..<$STR(S2)>】
MESSAGEBOX 发送成功！
#elseact
messagebox 发送广告需要100个金币！
[@搜索]
#if
CHECKGOLDCOUNT ? 20
#act
QUERYVALUE 0 0 20 @searchitem 请在下面输入你要搜索的物品(收小费20金币)： QF
#elseact
messagebox 没有20金币还想让我办事？
[@searchitem]
#IF
CHECKGOLDCOUNT ? 20
SEARCHONSALEITEM <$STR(S0)> 金币 10
#ACT
TAKE 金币 20
#ELSEACT
SENDMSG 5 你找的东西太稀少了！全区都没人摆摊卖这玩意！累死我了！
[@广播]
#IF
CHECKGAMEGOLD > 49999
#ACT
QUERYVALUE 30 0 60 ~全服广播 请输入你要进行全服广播的文字：(可以30个字，收费50000元宝) QF
BREAK
#ELSEACT
MESSAGEBOX 提示：每发送一次需要50000元宝！千里传音命令【@传】
BREAK
[~全服广播]
#IF
EQUAL S30
#ACT
MESSAGEBOX 请输入您要发送的内容，否则无法发送！
BREAK
#IF
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
SENDMSG 0 <$USERNAME>[<$LEVEL>级]：<$STR(S30)> 255 249 5
SENDMSG 0 <$USERNAME>[<$LEVEL>级]：<$STR(S30)> 255 249 5
SENDMSG 0 <$USERNAME>[<$LEVEL>级]：<$STR(S30)> 255 249 5
SENDMSG 0 【%s】：<$STR(S30)> 255 245
SENDMSG 0 【注：以上信息为玩家〖%s〗所发，请注意核实内容真实性，防止上当受骗，任何通过喊话系统留下QQ号的都是老六】 170 255
MOV S30
BREAK
#ELSEACT
MESSAGEBOX 提示：每发送一次需要50000元宝！千里传音命令【@传】
BREAK
[@close]
#act
close
}
上一篇:
传奇新区城主给予领奖台脚本
下一篇:
传奇英雄等级英雄升级给予技能脚本
