GOM引擎抽奖娱乐脚本

9420Gm传奇论坛

[@MAIN]
#if
#act
OPENMERCHANTBIGDLG 1 28 1 4 20 -60 1

#say
<ImgEx:0:1823:1824:1825:340:-15/@exit>
\ \
.......................<暴风传奇欢迎您>........................\ \
<您当前的等级是/AUTOCOLOR=70><$LEVEL>级.<您当前的元宝/AUTOCOLOR=70>:<$GAMEGOLD><您当前的金刚石/AUTOCOLOR=70>:<$GAMEDIAMOND>\
为了提高游戏的娱乐性 也为了回馈大家对本F的支持\
每冲值1元赠送2个金刚石 10个金刚石可抽奖一次有几率获得\
赤月装备,经验卷,怒斩,龙牙,逍遥扇,大量元宝等等..\
装备打怪都可获得 绝不影响游戏平衡\
<>                                              <试试手气/@Star>      \
............<每次抽奖必获2000W经验.可以提升到55级/SCOLOR=251>.................\


[@Star]
#if
CHECKLEVELEX > 54
#ACT
GOTO @去55
#ELSEACT
GOTO @去54

[@去54]
#if
CHECKGAMEDIAMOND > 9
#act
GAMEDIAMOND - 10
CHANGEEXP + 20000000
SendCenterMsg 250 0 玩家『<$USERNAME>』抽奖获得2000W经验，经验涨得哗哗的！ 1 5
SENDMSG 7 提示：恭喜您获得2000万经验！
GetRandomText ..\QuestDiary\金刚石抽奖物品.txt S$10
GIVE <$STR(S$10)> 1
SENDMSG 0  250 252 恭喜玩家【<$USERNAME>】使用金刚石抽获得物品【<$STR(S$10)>】.
#ELSEACT
SENDMSG 5 提示：你金刚石不足10颗！

[@去55]
#if
CHECKGAMEDIAMOND > 9
#act
GAMEDIAMOND - 10
CHANGEEXP + 1
GetRandomText ..\QuestDiary\金刚石抽奖物品.txt S$10
GIVE <$STR(S$10)> 1
SENDMSG 0  250 252 恭喜玩家【<$USERNAME>】使用金刚石抽获得物品【<$STR(S$10)>】.
#ELSEACT
SENDMSG 5 提示：你金刚石不足10颗！

hswd

这东西我收了！谢谢楼主！9420Gm论坛真好！