网站公告 客户中心 成功案例 资源下载 技术教程 汇款方式
网站首页 开区套餐 广告宣传 游戏版本 网站模版 主机租用 游戏引擎 登陆器 版本定做 游戏测试区
 
您现在的位置： 诚信网络 >> 文章中心 >> 脚本教程 >> 正文

一个摇骰子进入通天塔的脚本GOM
作者：佚名 来源：本站原创 点击数： 更新时间：2020-11-16 17:33:24

[@通天塔]
{
#if
Small <$Map> 88060
#ACT
LOADVAR GLOBAL 全区塔消费记录 ..\..\..\..\奇迹通天塔\塔消费记录.txt
OPENMERCHANTBIGDLG 2 17 0 0 1 1 1 381 3
#Say
\ \ \
<>                {<$USERNAME>/SCOLOR=19} <您好/SCOLOR=151> <〖我是通天使者〗/SCOLOR=209>\ \
<><1、杀死当前怪物即可点击进入下一层,每层收费1元,该图爆特殊材料./AUTOCOLOR=254>\ \
;<><2、30层开始,摇筛子进入下一层,135后退对应层数,246前进对应层数./AUTOCOLOR=251>\ \
<><2、层数越高,怪物越厉害,爆率也就越高,里面有几率出全服所有装备./AUTOCOLOR=253>\ \
\ \
<>                        <我要进入下层|^251#花费“1元”进入下层^-^249#每一分钱都记录入总奖池^-^224#当前奖池基金为:<$GLOBAL(全区塔消费记录)>元/@下一层>     \         

 

#if
large <$Map> 88059
Small <$Map> 88108
#ACT
LOADVAR GLOBAL 全区塔消费记录 ..\..\..\..\奇迹通天塔\塔消费记录.txt
OPENMERCHANTBIGDLG 2 17 0 0 1 1 1 381 3
#Say
\ \ \
<>                {<$USERNAME>/SCOLOR=19} <您好/SCOLOR=151> <〖我是通天使者〗/SCOLOR=209>\ \
<><1、杀死当前怪物即可点击进入下一层,每层收费1元,该图爆特殊材料./AUTOCOLOR=254>\ \
<><2、60层开始,摇筛子进入下一层,135后退对应层数,246前进对应层数./AUTOCOLOR=251>\ \
<><2、层数越高,怪物越厉害,爆率也就越高,里面有几率出全服所有装备./AUTOCOLOR=253>\ \
\ \
<>                        <我要进入下层|^251#花费“1元”进入下层^-^249#每一分钱都记录入总奖池^-^224#当前奖池基金为:<$GLOBAL(全区塔消费记录)>元/@下一层>


#if
Equal <$Map> 88108
#Act
OPENMERCHANTBIGDLG 2 17 0 0 1 1 1 381 3
#Say
\ \ \
<>                {<$USERNAME>/SCOLOR=19} <您好/SCOLOR=151> <〖我是通天使者〗/SCOLOR=209>\ \
<><你已经达到通天塔顶层了,你可点击NPC返回继续闯关,或进入其它地图./AUTOCOLOR=254>\ \
<><返回的同时你将获得/AUTOCOLOR=251><“8888火龙币+288W元宝奖励”>\ \
<><如果你是当日前五名玩家晚上12点可前往通天塔NPC处领取一份排名奖励./AUTOCOLOR=253>\ \
\ \
<>                        <返回第一大陆/@返回第三大陆>             

[@返回第三大陆]
#if
CHECK [24] 0
CHECKBAGSIZE  1
#Act
SET [24] 1
MOVR P7 301 321
MOVR P8 319 339
MAPMOVE n3n <$STR(p7)> <$STR(p8)>
GAMEDIAMOND + 8888
GAMEGOLD + 2888888
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt <通天塔通关奖励:/FCOLOR=224>恭喜<≮<$SERVERNAME>≯/FCOLOR=224>玩家<“<$USERNAME>”/FCOLOR=253>成功通关“<通天塔108层/FCOLOR=242>”奖励“<8888火龙币+288W元宝+江湖令/FCOLOR=254>”.. 0
#Elseact
MESSAGEBOX 返回失败：\\背包中缺少1个空格\\你已经领取过了！！
break

[@下一层]
#if
CHECKGAMEPOINT < 1
#Act
MESSAGEBOX 进入失败：\\缺少1元人民币！
break

#if
large <$Map> 88059
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#act
goto @名字检测
Movr D0 6
Inc D0 1
PlayDice 1 @运行骰子
break

#if
Small <$Map> 88108
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#act
Mov N$MAP <$Map>
Inc N$MAP 1
Map <$Str(N$MAP)>
MonGenEx <$Str(N$MAP)> 25 25 通天教主<$Str(N$MAP)>  2 1 0 253
LOADVAR HUMAN 塔层数 ..\..\..\..\奇迹通天塔\塔层数.txt
CALCVAR HUMAN 塔层数 + 1
SAVEVAR HUMAN 塔层数 ..\..\..\..\奇迹通天塔\塔层数.txt
GAMEPOINT - 1
LOADVAR GLOBAL 全区塔消费记录 ..\..\..\..\奇迹通天塔\塔消费记录.txt
CALCVAR GLOBAL 全区塔消费记录 + 1
SAVEVAR GLOBAL 全区塔消费记录 ..\..\..\..\奇迹通天塔\塔消费记录.txt
goto @刷怪AQ
goto @名字检测
;AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔闯关]:|251:235:0}{<$SERVERNAME>|242:4:0}的勇士{“<$USERNAME>”|249:4:0}在:{『通天塔』|70:4:0}成功闯入{「<$MapTitle>」|151:4:0},通天塔总奖池{≮<$GLOBAL(全区塔消费记录)>≯|224:4:0}元人民币！ 0
break


#if
#Act
messagebox 清理完此地图怪物才有资格进入下一层！！
break

[@运行骰子]
#if
Equal D0 1
large <$Map> 88059
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#Act
Mov N$MAP <$Map>
Dec N$MAP 1
goto @地图传送
break

#if
Equal D0 2
large <$Map> 88059
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#Act
Mov N$MAP <$Map>
Inc N$MAP 2
goto @地图传送
break

#if
Equal D0 3
large <$Map> 88059
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#Act
Mov N$MAP <$Map>
Dec N$MAP 3
;Map <$Str(N$MAP)>
goto @地图传送
break

#if
Equal D0 4
large <$Map> 88059
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#Act
Mov N$MAP <$Map>
Inc N$MAP 4
;Map <$Str(N$MAP)>
goto @地图传送
break

#if
Equal D0 5
large <$Map> 88059
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#Act
Mov N$MAP <$Map>
Dec N$MAP 5
goto @地图传送
break

#if
Equal D0 6
large <$Map> 88059
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#Act
Mov N$MAP <$Map>
Inc N$MAP 6
goto @地图传送
break

[@地图传送]
#if
large N$MAP 88107
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#Act
Mov N$MAP 88108
MonGenEx <$Str(N$MAP)> 25 25 通天教主88108  2 1 0 253
;MonGenEx <$Str(N$MAP)> 25 25 东方不败·圣者[MAXSSS]  2 1 0 253
GAMEPOINT - 1
LOADVAR GLOBAL 全区塔消费记录 ..\..\..\..\奇迹通天塔\塔消费记录.txt
CALCVAR GLOBAL 全区塔消费记录 + 1
SAVEVAR GLOBAL 全区塔消费记录 ..\..\..\..\奇迹通天塔\塔消费记录.txt
LOADVAR HUMAN 塔层数 ..\..\..\..\奇迹通天塔\塔层数.txt
CALCVAR HUMAN 塔层数 + 1
SAVEVAR HUMAN 塔层数 ..\..\..\..\奇迹通天塔\塔层数.txt
Map <$Str(N$MAP)>
goto @刷怪AQ
goto @名字检测
;AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔闯关]:|251:235:0}{<$SERVERNAME>|242:4:0}的勇士{“<$USERNAME>”|249:4:0}在:{『通天塔』|70:4:0}成功闯入{「<$MapTitle>」|151:4:0},通天塔总奖池{≮<$GLOBAL(全区塔消费记录)>≯|224:4:0}元人民币！ 0
break


#if
large <$Map> 88059
Small <$Map> 88108
CheckRangeMonCount <$Map> 19 23 500 = 0
Not CHECKGAMEPOINT < 1
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主<$Str(N$MAP)>  2 1 0 253
GAMEPOINT - 1
LOADVAR GLOBAL 全区塔消费记录 ..\..\..\..\奇迹通天塔\塔消费记录.txt
CALCVAR GLOBAL 全区塔消费记录 + 1
SAVEVAR GLOBAL 全区塔消费记录 ..\..\..\..\奇迹通天塔\塔消费记录.txt
LOADVAR HUMAN 塔层数 ..\..\..\..\奇迹通天塔\塔层数.txt
CALCVAR HUMAN 塔层数 + 1
SAVEVAR HUMAN 塔层数 ..\..\..\..\奇迹通天塔\塔层数.txt
Map <$Str(N$MAP)>
goto @刷怪AQ
goto @名字检测
;AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔闯关]:|251:235:0}{<$SERVERNAME>|242:4:0}的勇士{“<$USERNAME>”|249:4:0}在:{『通天塔』|70:4:0}成功闯入{「<$MapTitle>」|151:4:0},通天塔总奖池{≮<$GLOBAL(全区塔消费记录)>≯|224:4:0}元人民币！ 0
break


[@刷怪AQ]
#if
random 88
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·机械公敌[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·机械公敌[MAX]≯|224:54:0}！ 0
break

#if
random 108
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·鬼侵战神[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·鬼侵战神[MAX]≯|224:54:0}！ 0
break

#if
random 128
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·狂爆猪王[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·狂爆猪王[MAX]≯|224:54:0}！ 0
break

#if
random 158
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·双面阎罗[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·双面阎罗[MAX]≯|224:54:0}！ 0
break

#if
random 188
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·八卦尊者[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·八卦尊者[MAX]≯|224:54:0}！ 0
break

#if
random 228
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·释迦摩尼[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·释迦摩尼[MAX]≯|224:54:0}！ 0
break

#if
random 258
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·隐世王者[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·隐世王者[MAX]≯|224:54:0}！ 0
break

#if
random 288
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·武神天下[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·武神天下[MAX]≯|224:54:0}！ 0
break

#if
random 308
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·巨灵锤王[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·巨灵锤王[MAX]≯|224:54:0}！ 0
break

#if
random 358
large <$Map> 88060
#Act
MonGenEx <$Str(N$MAP)> 25 25 通天教主·万法至尊[MAX] 2 1 0 69
AddTextListEx ..\..\..\..\奇迹通天塔\全区喊话.txt {[通天塔特殊怪物]:|253:54:0}{<$SERVERNAME>|242:54:0}的勇士{“<$USERNAME>”|249:54:0}在{「<$MapTitle>」|151:54:0},成功召唤出特殊怪物{≮通天教主·万法至尊[MAX]≯|224:54:0}！ 0
break

 


[@名字检测]
#if
Not CHECKTEXTLIST ..\..\..\..\奇迹通天塔\当日人物名字.txt <$USERNAME>
#Act
AddTextListEx ..\..\..\..\奇迹通天塔\当日人物名字.txt <$USERNAME> 0
AddTextListEx ..\..\..\..\奇迹通天塔\当日人物区字.txt <$SERVERNAME> 0

 

 

}
  • 上一篇文章：

  • 下一篇文章： 没有了
    		•
     
    分类导航
     
     
    咨询购买