GOM引擎全服喊话功能脚本的制作教程

[@main]
<--------------------------/SCOLOR=229> <千里传音/SCOLOR=9> <--------------------------/SCOLOR=229>\
\ \
<此信息显示在屏幕正中间，从右向左飘出，全服都能看见！高端大气！/SCOLOR=250>\
<每次千里传音需要1金币!/SCOLOR=250>\
<Img:685:6:-6:4><Img:685:6:-241:4>\
<进行喊话/@喊话传音1>  <设置内容1{FCOLOR=70}/@@InPutString41>  <当前喊话内容：/fColor=254><$STR(S41)>\
<Img:685:6:-6:4><Img:685:6:-241:4>\
<进行喊话/@喊话传音2>  <设置内容2{FCOLOR=70}/@@InPutString42>  <当前喊话内容：/fColor=254><$STR(S42)>\
<Img:685:6:-6:4><Img:685:6:-241:4>\
<进行喊话/@喊话传音3>  <设置内容3{FCOLOR=70}/@@InPutString43>  <当前喊话内容：/fColor=254><$STR(S43)>\
<Img:685:6:-6:4><Img:685:6:-241:4>\

[@喊话传音1]
#IF
EQUAL S41
#ACT
MESSAGEBOX 请先设置喊话内容！
BREAK

#IF
checkgold 1
#ACT
TAKE 金币 1
SENDMOVEMSG 0 253 255 300 1 {【千里传音】/FCOLOR=250}{【<$USERNAME>】：/FCOLOR=70}{<$STR(S41)>/FCOLOR=251}
SENDMSG 1 151 235 {【千里传音】|250:0:1}{【<$USERNAME>】：|70:0:1}{<$STR(S41)>|151:0:1}
BREAK
#ELSEACT
MESSAGEBOX 你金币不足1个，无法喊话！
BREAK

[@InPutString41]
#or
CheckContainsText <$STR(S41)> @
CheckContainsText <$STR(S41)> (
CheckContainsText <$STR(S41)> )
CheckContainsText <$STR(S41)> [
CheckContainsText <$STR(S41)> ]
CheckContainsText <$STR(S41)> {
CheckContainsText <$STR(S41)> }
CheckContainsText <$STR(S41)> *
CheckContainsText <$STR(S41)> /
CheckContainsText <$STR(S41)> \
CheckContainsText <$STR(S41)> $
CheckContainsText <$STR(S41)> &
CheckContainsText <$STR(S41)> 妈
CheckContainsText <$STR(S41)> 逼
CheckContainsText <$STR(S41)> 操
CheckContainsText <$STR(S41)> 服
CheckContainsText <$STR(S41)> 贱
CheckContainsText <$STR(S41)> 客
CheckContainsText <$STR(S41)> G
CheckContainsText <$STR(S41)> M
CheckContainsText <$STR(S41)> 内
CheckContainsText <$STR(S41)> 比
CheckContainsText <$STR(S41)> 例
CheckContainsText <$STR(S41)> 托
CheckContainsText <$STR(S41)> 脱
CheckContainsText <$STR(S41)> 拖
CheckContainsText <$STR(S41)> Q
CheckContainsText <$STR(S41)> W
CheckContainsText <$STR(S41)> E
CheckContainsText <$STR(S41)> R
CheckContainsText <$STR(S41)> T
CheckContainsText <$STR(S41)> Y
CheckContainsText <$STR(S41)> U
CheckContainsText <$STR(S41)> I
CheckContainsText <$STR(S41)> O
CheckContainsText <$STR(S41)> P
CheckContainsText <$STR(S41)> A
CheckContainsText <$STR(S41)> S
CheckContainsText <$STR(S41)> D
CheckContainsText <$STR(S41)> F
CheckContainsText <$STR(S41)> G
CheckContainsText <$STR(S41)> H
CheckContainsText <$STR(S41)> J
CheckContainsText <$STR(S41)> K
CheckContainsText <$STR(S41)> L
CheckContainsText <$STR(S41)> Z
CheckContainsText <$STR(S41)> X
CheckContainsText <$STR(S41)> C
CheckContainsText <$STR(S41)> V
CheckContainsText <$STR(S41)> B
CheckContainsText <$STR(S41)> N
CheckContainsText <$STR(S41)> M
#act
MESSAGEBOX 输入内容包含特殊字符，无法提交！！！
break
#ELSEACT
GOTO @main
BREAK

[@喊话传音2]
#IF
EQUAL S42
#ACT
MESSAGEBOX 请先设置喊话内容！
BREAK

#IF
checkgold 1
#ACT
TAKE 金币 1
SENDMOVEMSG 0 253 255 300 1 {【千里传音】/FCOLOR=250}{【<$USERNAME>】：/FCOLOR=70}{<$STR(S42)>/FCOLOR=251}
SENDMSG 1 151 235 {【千里传音】|250:0:1}{【<$USERNAME>】：|70:0:1}{<$STR(S42)>|151:0:1}
BREAK
#ELSEACT
MESSAGEBOX 你金币不足1个，无法喊话！
BREAK

[@InPutString42]
#or
CheckContainsText <$STR(S42)> @
CheckContainsText <$STR(S42)> (
CheckContainsText <$STR(S42)> )
CheckContainsText <$STR(S42)> [
CheckContainsText <$STR(S42)> ]
CheckContainsText <$STR(S42)> {
CheckContainsText <$STR(S42)> }
CheckContainsText <$STR(S42)> *
CheckContainsText <$STR(S42)> /
CheckContainsText <$STR(S42)> \
CheckContainsText <$STR(S42)> $
CheckContainsText <$STR(S42)> &
CheckContainsText <$STR(S42)> 妈
CheckContainsText <$STR(S42)> 逼
CheckContainsText <$STR(S42)> 操
CheckContainsText <$STR(S42)> 服
CheckContainsText <$STR(S42)> 贱
CheckContainsText <$STR(S42)> 客
CheckContainsText <$STR(S42)> G
CheckContainsText <$STR(S42)> M
CheckContainsText <$STR(S42)> 内
CheckContainsText <$STR(S42)> 比
CheckContainsText <$STR(S42)> 例
CheckContainsText <$STR(S42)> 托
CheckContainsText <$STR(S42)> 脱
CheckContainsText <$STR(S42)> 拖
CheckContainsText <$STR(S42)> Q
CheckContainsText <$STR(S42)> W
CheckContainsText <$STR(S42)> E
CheckContainsText <$STR(S42)> R
CheckContainsText <$STR(S42)> T
CheckContainsText <$STR(S42)> Y
CheckContainsText <$STR(S42)> U
CheckContainsText <$STR(S42)> I
CheckContainsText <$STR(S42)> O
CheckContainsText <$STR(S42)> P
CheckContainsText <$STR(S42)> A
CheckContainsText <$STR(S42)> S
CheckContainsText <$STR(S42)> D
CheckContainsText <$STR(S42)> F
CheckContainsText <$STR(S42)> G
CheckContainsText <$STR(S42)> H
CheckContainsText <$STR(S42)> J
CheckContainsText <$STR(S42)> K
CheckContainsText <$STR(S42)> L
CheckContainsText <$STR(S42)> Z
CheckContainsText <$STR(S42)> X
CheckContainsText <$STR(S42)> C
CheckContainsText <$STR(S42)> V
CheckContainsText <$STR(S42)> B
CheckContainsText <$STR(S42)> N
CheckContainsText <$STR(S42)> M
#act
MESSAGEBOX 输入内容包含特殊字符，无法提交！！！
break
#ELSEACT
GOTO @main
BREAK

[@喊话传音3]
#IF
EQUAL S43
#ACT
MESSAGEBOX 请先设置喊话内容！
BREAK

#IF
checkgold 1
#ACT
TAKE 金币 1
SENDMOVEMSG 0 253 255 300 1 {【千里传音】/FCOLOR=250}{【<$USERNAME>】：/FCOLOR=70}{<$STR(S43)>/FCOLOR=251}
SENDMSG 1 151 235 {【千里传音】|250:0:1}{【<$USERNAME>】：|70:0:1}{<$STR(S43)>|151:0:1}
BREAK
#ELSEACT
MESSAGEBOX 你金币不足1个，无法喊话！
BREAK

[@InPutString43]
#or
CheckContainsText <$STR(S43)> @
CheckContainsText <$STR(S43)> (
CheckContainsText <$STR(S43)> )
CheckContainsText <$STR(S43)> [
CheckContainsText <$STR(S43)> ]
CheckContainsText <$STR(S43)> {
CheckContainsText <$STR(S43)> }
CheckContainsText <$STR(S43)> *
CheckContainsText <$STR(S43)> /
CheckContainsText <$STR(S43)> \
CheckContainsText <$STR(S43)> $
CheckContainsText <$STR(S43)> &
CheckContainsText <$STR(S43)> 妈
CheckContainsText <$STR(S43)> 逼
CheckContainsText <$STR(S43)> 操
CheckContainsText <$STR(S43)> 服
CheckContainsText <$STR(S43)> 贱
CheckContainsText <$STR(S43)> 客
CheckContainsText <$STR(S43)> G
CheckContainsText <$STR(S43)> M
CheckContainsText <$STR(S43)> 内
CheckContainsText <$STR(S43)> 比
CheckContainsText <$STR(S43)> 例
CheckContainsText <$STR(S43)> 托
CheckContainsText <$STR(S43)> 脱
CheckContainsText <$STR(S43)> 拖
CheckContainsText <$STR(S43)> Q
CheckContainsText <$STR(S43)> W
CheckContainsText <$STR(S43)> E
CheckContainsText <$STR(S43)> R
CheckContainsText <$STR(S43)> T
CheckContainsText <$STR(S43)> Y
CheckContainsText <$STR(S43)> U
CheckContainsText <$STR(S43)> I
CheckContainsText <$STR(S43)> O
CheckContainsText <$STR(S43)> P
CheckContainsText <$STR(S43)> A
CheckContainsText <$STR(S43)> S
CheckContainsText <$STR(S43)> D
CheckContainsText <$STR(S43)> F
CheckContainsText <$STR(S43)> G
CheckContainsText <$STR(S43)> H
CheckContainsText <$STR(S43)> J
CheckContainsText <$STR(S43)> K
CheckContainsText <$STR(S43)> L
CheckContainsText <$STR(S43)> Z
CheckContainsText <$STR(S43)> X
CheckContainsText <$STR(S43)> C
CheckContainsText <$STR(S43)> V
CheckContainsText <$STR(S43)> B
CheckContainsText <$STR(S43)> N
CheckContainsText <$STR(S43)> M
#act
MESSAGEBOX 输入内容包含特殊字符，无法提交！！！
break
#ELSEACT
GOTO @main
BREAK