脚本范例：
老GOM引擎元素洗练脚本,每次洗练随机给予装备1-10元素属性
[@main]
<> <> <>\ \ \
<元素洗练:每次洗练随机给予装备1-10点元素属性/SCOLOR=254>\
<当然,前提是你必须要消耗200000YB,我可以免费帮你洗练/SCOLOR=254>\ \
<> <洗练武器|253#元素属性:豹击几率增加/@武器>
<> <洗练衣服|253#元素属性:物理伤害减少/@衣服>
<> <洗练头盔|253#元素属性:法法伤害减少/@头盔>
<> <洗练项链|253#元素属性:增加目标打出率/@项链>\ \
<> <洗练左手|253#元素属性:忽视目标防御/@左手>
<> <洗练左戒|253#元素属性:增加攻伤害/@左戒>
<> <洗练右手|253#元素属性:忽视目标防御/@右手>
<> <洗练右戒|253#元素属性:增加攻伤害/@右戒>\ \
<> <洗练腰带|253#元素属性:人物体力增加/@腰带>
<> <洗练靴子|253#元素属性:人物法力增加/@靴子>\
[@武器]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$豹击 1 11
SetNewItemValue 1 0 = <$STR(N$豹击)>
SENDMSG 6 武器豹击增加<$STR(N$豹击)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@衣服]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$物伤 1 11
SetNewItemValue 0 2 = <$STR(N$物伤)>
SENDMSG 6 衣服物理伤害减少增加<$STR(N$物伤)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@头盔]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$魔伤 1 11
SetNewItemValue 4 3 = <$STR(N$魔伤)>
SENDMSG 6 头盔法法伤害减少增加<$STR(N$魔伤)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@项链]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$目标 1 11
SetNewItemValue 3 6 = <$STR(N$目标)>
SENDMSG 6 项链目标打出率元素增加<$STR(N$目标)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@左手]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$忽视 1 11
SetNewItemValue 5 4 = <$STR(N$忽视)>
SENDMSG 6 左手忽视目标防御增加<$STR(N$忽视)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@右手]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$忽视 1 11
SetNewItemValue 6 4 = <$STR(N$忽视)>
SENDMSG 6 右手忽视目标防御增加<$STR(N$忽视)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@靴子]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$法力 1 11
SetNewItemValue 11 8 = <$STR(N$法力)>
SENDMSG 6 靴子法力增加<$STR(N$法力)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@腰带]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$体力 1 11
SetNewItemValue 10 7 = <$STR(N$体力)>
SENDMSG 6 腰带体力增加<$STR(N$体力)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@左戒]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$攻 1 11
SetNewItemValue 7 1 = <$STR(N$攻)>
SENDMSG 6 左戒攻伤害增加<$STR(N$攻)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
[@右戒]
#IF
CHECKGAMEGOLD > 199999
#act
GAMEGOLD - 200000
movR N$攻 1 11
SetNewItemValue 8 1 = <$STR(N$攻)>
SENDMSG 6 右戒攻伤害增加<$STR(N$攻)>%
#ELSEACT
messagebox [提示]：洗练属性需要20万YB！
