传奇技术教你制作GOM引擎跨区喇叭制作脚本教程

[@main]
#if
#act
MESSAGEBOX 温馨提示：\　\①本服不允许发布虚假信息,骂服黑服的言论!\　\②骂服黑服的,全服全区永久封禁帐号机器码IP,不予提现!\　\③隐藏姓名喊话的,本服管理可以实时看到!
#say
全服喊话在屏幕正中间，从右向左飘出,全服都能看见！高端大气!\
为了防止刷屏，每次喊话需要2000元宝!\
格式<①/SCOLOR=249>：\
<显示名字/SCOLOR=250>+说话内容        【<确定使用/@@InPutString88>】\ \

格式<②/SCOLOR=249>：\
<隐藏名字/SCOLOR=250>+说话内容        【<确定使用/@@InPutString89>】\ \


　                                          【<返回/@main>】【<关闭/@eXIT>】

[@InPutString88]
#IF
checknamelist ..\..\..\..\禁止喇叭.txt
#ACT
MESSAGEBOX 你的喇叭功能已经封禁！
break

#IF
CheckContainsText <$SERVERNAME> 测试
#ACT
MESSAGEBOX  测试区封禁使用！
BREAK

#OR
CheckContainsText S88 退
CheckContainsText S88 不玩
CheckContainsText S88 时装
CheckContainsText S88 无量
CheckContainsText S88 垃圾
CheckContainsText S88 垃圾F
CheckContainsText S88 内F
CheckContainsText S88 内服
CheckContainsText S88 内副
CheckContainsText S88 拖
CheckContainsText S88 Q
CheckContainsText S88 群
CheckContainsText S88 管理
CheckContainsText S88 跑
CheckContainsText S88 路
CheckContainsText S88 提现
CheckContainsText S88 体现
CheckContainsText S88 B服
CheckContainsText S88 倒闭
CheckContainsText S88 黄
CheckContainsText S88 GM
CheckContainsText S88 回收
CheckContainsText S88 账号
CheckContainsText S88 刷装备
CheckContainsText S88 脱机
CheckContainsText S88 拖机
CheckContainsText S88 挂
CheckContainsText S88 拖
CheckContainsText S88 脱
CheckContainsText S88 托
CheckContainsText S88 别玩
CheckContainsText S88 证据
CheckContainsText S88 截图
CheckContainsText S88 Y
CheckContainsText S88 歪
CheckContainsText S88 手动
CheckContainsText S88 骗
CheckContainsText S88 你
CheckContainsText S88 我
CheckContainsText S88 死
CheckContainsText S88 家
CheckContainsText S88 F
CheckContainsText S88 9
CheckContainsText S88 0
CheckContainsText S88 扣
CheckContainsText S88 全
CheckContainsText S88 题
CheckContainsText S88 踢
CheckContainsText S88 体
CheckContainsText S88 替
CheckContainsText S88 w
CheckContainsText S88 W
CheckContainsText S88 C
CheckContainsText S88 c
#act
MESSAGEBOX 提示：你输入的信息有敏感字符，请勿使用数字与敏感字!!!
BREAK


#IF
CHECKGAMEGOLD > 1999
#act
GAMEGOLD - 2000
SENDMOVEMSG 0 253 255 350 1 玩家[<$USERNAME>]说：<$STR(S88)>
AddTextListEx ..\..\..\..\喇叭文件.txt                                                           > 0
AddTextListEx ..\..\..\..\喇叭文件.txt <$SERVERNAME>:<$USERID>:<$USERNAME>:<$STR(S88)> 0
AddTextListEx ..\..\..\..\喇叭文件.txt <$YEAR>年<$MONTH>月<$DAY>日<$HOUR>时<$MINUTE>分<$SECOND>秒 0
#ELSEACT
MESSAGEBOX 元宝不足！
BREAK

[@InPutString89]
#IF
checknamelist ..\..\..\..\禁止喇叭.txt
#ACT
MESSAGEBOX 你的喇叭功能已经封禁！
break

#IF
CheckContainsText <$SERVERNAME> 测试
#ACT
MESSAGEBOX  测试区封禁使用！
BREAK

#OR
CheckContainsText S89 退
CheckContainsText S89 不玩
CheckContainsText S89 时装
CheckContainsText S89 无量
CheckContainsText S89 垃圾
CheckContainsText S89 垃圾F
CheckContainsText S89 内F
CheckContainsText S89 内服
CheckContainsText S89 内副
CheckContainsText S89 拖
CheckContainsText S89 Q
CheckContainsText S89 群
CheckContainsText S89 管理
CheckContainsText S89 跑
CheckContainsText S89 路
CheckContainsText S89 提现
CheckContainsText S89 体现
CheckContainsText S89 B服
CheckContainsText S89 倒闭
CheckContainsText S89 黄
CheckContainsText S89 GM
CheckContainsText S89 回收
CheckContainsText S89 账号
CheckContainsText S89 刷装备
CheckContainsText S89 脱机
CheckContainsText S89 拖机
CheckContainsText S89 挂
CheckContainsText S89 拖
CheckContainsText S89 脱
CheckContainsText S89 托
CheckContainsText S89 别玩
CheckContainsText S89 证据
CheckContainsText S89 截图
CheckContainsText S89 Y
CheckContainsText S89 歪
CheckContainsText S89 手动
CheckContainsText S89 骗
CheckContainsText S89 你
CheckContainsText S89 我
CheckContainsText S89 死
CheckContainsText S89 家
CheckContainsText S89 F
CheckContainsText S89 9
CheckContainsText S89 0
CheckContainsText S89 扣
CheckContainsText S89 全
CheckContainsText S89 题
CheckContainsText S89 踢
CheckContainsText S89 体
CheckContainsText S89 替
CheckContainsText S89 w
CheckContainsText S89 W
CheckContainsText S89 C
CheckContainsText S89 c
#act
MESSAGEBOX 提示：你输入的信息有敏感字符，请勿使用数字与敏感字!!!
BREAK

#IF
CHECKGAMEGOLD > 1999
#act
GAMEGOLD - 2000
SENDMOVEMSG 0 253 255 350 1 玩家说：<$STR(S89)>
AddTextListEx ..\..\..\..\喇叭文件.txt                                                           > 0
AddTextListEx ..\..\..\..\喇叭文件.txt <$SERVERNAME>:<$USERID>:<$USERNAME>:<$STR(S89)> 0
AddTextListEx ..\..\..\..\喇叭文件.txt <$YEAR>年<$MONTH>月<$DAY>日<$HOUR>时<$MINUTE>分<$SECOND>秒 0
#ELSEACT
MESSAGEBOX 元宝不足！
BREAK