热点推荐

小喇叭+ 发布

01-16 02:17
01-16 02:04
01-13 17:30
查看: 1862|回复: 0

[脚本示例] GOM引擎混沌神塔脚本,传奇一条龙测试期间副本暂未开放脚本命令司徒

[复制链接]
avatar

签到天数: 350 天

[LV.8]以坛为家I

7651

主题

255

回帖

31万

积分

司徒主管

Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20

UID
1
司徒币
260203
传世币
3000
元宝
0
在线时间
266 小时

最佳新人灌水之王

QQ
online_admin 发表于 2020-12-30 13:03:12 | 显示全部楼层 |阅读模式
[@Main]  #IF
  CHECKTEXTLIST ..\QuestDiary\测试奖励\服务器状态控制.txt 测试
  #Act
  MESSAGEBOX [操作提示]:\ \      测试期间副本暂未开放......
  Break
  #IF
  CHECKTEXTLIST ..\QuestDiary\测试奖励\服务器状态控制.txt 开区
  #Act
  CloseBigDialogBox
  Goto @混沌神塔数据获取
  MOV N$资源序号                        14
  MOV N$背景图片序号                921
  MOV N$装备展示特效开始图号        910
  MOV S$装备展示1                ‹Img:623:20:22:-120|251#爆率物品:本服所有装备>
  MOV S$装备展示2                ‹Img:624:20:38:-120|251#爆率物品:本服所有装备>
  MOV S$装备展示3                ‹Img:591:20:52:-120|251#爆率物品:本服所有特殊>
  MOV S$装备展示4                ‹Img:534:20:66:-116|251#爆率物品:本服所有生肖>
  MOV S$装备展示5                ‹Img:75:20:84:-120|251#爆率物品:本服所有技能书>
  MOV S$进入地图按钮        ‹imgex:‹$Str(N$资源序号)>:901:902:901:320:-140|^-^251#进入需要10人民币^-^/@进入地图>
  OPENMERCHANTBIGDLG ‹$str(N$资源序号)> ‹$str(N$背景图片序号)> 1 4 15 -60 1 720 11
  HCALL ‹$USERNAME> @每日刷新混沌神塔
  #say
  \ \ \ \
  {第一名:‹$str(S$跨区混沌神塔区服0)>‹$str(S$跨区混沌神塔名称0)>        ‹$str(S$跨区混沌神塔层数0)>层 /fcolor=243}\ \
  {第二名:‹$str(S$跨区混沌神塔区服1)>‹$str(S$跨区混沌神塔名称1)>        ‹$str(S$跨区混沌神塔层数1)>层 /fcolor=251}\ \
  {第三名:‹$str(S$跨区混沌神塔区服2)>‹$str(S$跨区混沌神塔名称2)>        ‹$str(S$跨区混沌神塔层数2)>层 /fcolor=253}\ \
  {第四名:‹$str(S$跨区混沌神塔区服3)>‹$str(S$跨区混沌神塔名称3)>        ‹$str(S$跨区混沌神塔层数3)>层 /fcolor=146}\ \
  {第五名:‹$str(S$跨区混沌神塔区服4)>‹$str(S$跨区混沌神塔名称4)>        ‹$str(S$跨区混沌神塔层数4)>层 /fcolor=250}\ \
  {‹$str(S$当前名次)> /fcolor=249}\ \ \ \ \
  { ‹$str(N$混沌神塔奖池总额)>/fcolor=243}‹元/fcolor=250>\
  { ‹$str(N$混沌神塔奖励1)>/fcolor=242}{元/fcolor=243}\
  { ‹$str(N$混沌神塔奖励2)>/fcolor=242}{元/fcolor=251}\
  { ‹$str(N$混沌神塔奖励3)>/fcolor=242}{元/fcolor=253}\
  { ‹$str(N$混沌神塔奖励4)>/fcolor=242}{元/fcolor=146}\
  { ‹$str(N$混沌神塔奖励5)>/fcolor=242}{元/fcolor=250}\
  \ \ \ \
  ‹playimg:‹$str(N$资源序号)>:‹$str(N$装备展示特效开始图号)>:10:200:8:-119:0:0>
  ‹playimg:‹$str(N$资源序号)>:‹$str(N$装备展示特效开始图号)>:10:200:-2:-119:0:0>
  ‹playimg:‹$str(N$资源序号)>:‹$str(N$装备展示特效开始图号)>:10:200:-14:-119:0:0>
  ‹playimg:‹$str(N$资源序号)>:‹$str(N$装备展示特效开始图号)>:10:200:-24:-119:0:0>
  ‹playimg:‹$str(N$资源序号)>:‹$str(N$装备展示特效开始图号)>:10:200:-36:-119:0:0>\
  ‹$str(S$装备展示1)>
  ‹$str(S$装备展示2)>
  ‹$str(S$装备展示3)>
  ‹$str(S$装备展示4)>
  ‹$str(S$装备展示5)>\
  ‹$str(S$进入地图按钮)>‹imgex:‹$str(N$资源序号)>:898:899:900:415:-97|-^250#昨日总奖池:‹$str(N$昨日总奖池)>元^-^
  243#第一名:‹$str(S$昨日混沌神塔区服0)>‹$str(S$昨日混沌神塔名称0)>        奖励金额:‹$str(S$昨日混沌神塔奖励0)>     领取状态:‹$str(S$领取状态0)>^-^
  251#第二名:‹$str(S$昨日混沌神塔区服1)>‹$str(S$昨日混沌神塔名称1)>        奖励金额:‹$str(S$昨日混沌神塔奖励1)>     领取状态:‹$str(S$领取状态1)>^-^
  253#第三名:‹$str(S$昨日混沌神塔区服2)>‹$str(S$昨日混沌神塔名称2)>        奖励金额:‹$str(S$昨日混沌神塔奖励2)>     领取状态:‹$str(S$领取状态2)>^-^
  254#第四名:‹$str(S$昨日混沌神塔区服3)>‹$str(S$昨日混沌神塔名称3)>        奖励金额:‹$str(S$昨日混沌神塔奖励3)>     领取状态:‹$str(S$领取状态3)>^-^
  250#第五名:‹$str(S$昨日混沌神塔区服4)>‹$str(S$昨日混沌神塔名称4)>        奖励金额:‹$str(S$昨日混沌神塔奖励4)>     领取状态:‹$str(S$领取状态4)>^-/@领取奖励>
  [@领取奖励]
  #IF
  equal T4
  #act
  messagebox 你尚未进入昨日排名.
  break
  #IF
  checkcontainstextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[已领取]
  #act
  messagebox 你已经领取过了奖励.
  break
  #IF
  NOT checkcontainstextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[未领取]
  #act
  messagebox 你尚未进入昨日排名.
  break
  #if
  #ACT
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 0 S$领取判断0 N$领取金额0
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 1 S$领取判断1 N$领取金额1
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 2 S$领取判断2 N$领取金额2
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 3 S$领取判断3 N$领取金额3
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 4 S$领取判断4 N$领取金额4
  #IF
  equal S$领取判断0 ‹$str(T4)>[未领取]
  #act
  gamepoint + ‹$str(N$领取金额0)>
  Getrandomtext ..\QuestDiary\功能文件\给于项链.txt S$给于项链
  Give ‹$STR(S$给于项链)> 1
  Getrandomtext ..\QuestDiary\功能文件\给于装备.txt S$给于装备
  Give ‹$STR(S$给于装备)> 1
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\数据文件勿动\混沌神塔喇叭.txt ‹混沌神塔排名奖励:/FCOLOR=224>恭喜昨日混沌神塔第一名‹≮‹$SERVERNAME>≯/FCOLOR=224>玩家‹“‹$USERNAME>”/FCOLOR=253>成功领取“‹混沌神塔排名第一/FCOLOR=242>”奖励“{‹$str(N$领取金额0)>RMB点以及[‹$STR(S$给于项链)>]一条+[‹$STR(S$给于装备)>]一件../FCOLOR=254}”.. 0
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[未领取]:‹$str(N$领取金额0)>
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[已领取]:‹$str(N$领取金额0)> 0
  goto @main
  break
  #IF
  equal S$领取判断1 ‹$str(T4)>[未领取]
  #act
  gamepoint + ‹$str(N$领取金额1)>
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\数据文件勿动\混沌神塔喇叭.txt ‹混沌神塔排名奖励:/FCOLOR=224>恭喜昨日混沌神塔第二名‹≮‹$SERVERNAME>≯/FCOLOR=224>玩家‹“‹$USERNAME>”/FCOLOR=253>成功领取“‹混沌神塔排名第二/FCOLOR=242>”奖励“{‹$str(N$领取金额1)>RMB点/FCOLOR=254}”.. 0
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[未领取]:‹$str(N$领取金额1)>
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[已领取]:‹$str(N$领取金额1)> 1
  goto @main
  break
  #IF
  equal S$领取判断2 ‹$str(T4)>[未领取]
  #act
  gamepoint + ‹$str(N$领取金额2)>
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\数据文件勿动\混沌神塔喇叭.txt ‹混沌神塔排名奖励:/FCOLOR=224>恭喜昨日混沌神塔第三名‹≮‹$SERVERNAME>≯/FCOLOR=224>玩家‹“‹$USERNAME>”/FCOLOR=253>成功领取“‹混沌神塔排名第三/FCOLOR=242>”奖励“{‹$str(N$领取金额2)>RMB点/FCOLOR=254}”.. 0
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[未领取]:‹$str(N$领取金额2)>
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[已领取]:‹$str(N$领取金额2)> 2
  goto @main
  break
  #IF
  equal S$领取判断3 ‹$str(T4)>[未领取]
  #act
  gamepoint + ‹$str(N$领取金额3)>
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\数据文件勿动\混沌神塔喇叭.txt ‹混沌神塔排名奖励:/FCOLOR=224>恭喜昨日混沌神塔第四名‹≮‹$SERVERNAME>≯/FCOLOR=224>玩家‹“‹$USERNAME>”/FCOLOR=253>成功领取“‹混沌神塔排名第四/FCOLOR=242>”奖励“{‹$str(N$领取金额3)>RMB点/FCOLOR=254}”.. 0
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[未领取]:‹$str(N$领取金额3)>
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[已领取]:‹$str(N$领取金额3)> 3
  goto @main
  break
  #IF
  equal S$领取判断4 ‹$str(T4)>[未领取]
  #act
  gamepoint + ‹$str(N$领取金额4)>
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\数据文件勿动\混沌神塔喇叭.txt ‹混沌神塔排名奖励:/FCOLOR=224>恭喜昨日混沌神塔第五名‹≮‹$SERVERNAME>≯/FCOLOR=224>玩家‹“‹$USERNAME>”/FCOLOR=253>成功领取“‹混沌神塔排名第五/FCOLOR=242>”奖励“{‹$str(N$领取金额4)>RMB点/FCOLOR=254}”.. 0
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[未领取]:‹$str(N$领取金额4)>
  deltextlist ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt
  addtextlistex ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt ‹$str(T4)>[已领取]:‹$str(N$领取金额4)> 4
  goto @main
  break
  [@进入地图]
  #IF
  CHECKTEXTLIST ..\QuestDiary\测试奖励\服务器状态控制.txt 测试
  #Act
  MESSAGEBOX [操作提示]:\ \      测试期间副本暂未开放......
  Break
  #IF
  checkgamepoint ‹ 10
  #act
  MESSAGEBOX 进入失败:\\RMB点不足10元!
  break
  #IF
  #act
  HCALL ‹$USERNAME> @个人序号获取
  #if
  #act
  gamepoint - 10
  MOV N$混沌神塔金额累计 10
  MOVR N$随机 0 1000000
  MOV N$混沌神塔当前层 1
  MOV S$混沌神塔地图号 当前层‹$str(N$混沌神塔当前层)>x‹$username>x‹$str(N$随机)>x‹$day>x‹$hour>x‹$minute>
  ADDMIRRORMAP T339 ‹$str(S$混沌神塔地图号)> 跨服混沌神塔‹$str(N$混沌神塔当前层)>层 3600 0159 9999
  mongenex ‹$str(S$混沌神塔地图号)> 20 23 通天教主88001 5 1 0 251
  CreateNPC 混沌神塔 ‹$str(S$混沌神塔地图号)> 20 23 15 混沌神塔内 1
  map ‹$str(S$混沌神塔地图号)>
  HCALL ‹$USERNAME> @每日刷新混沌神塔
  HCALL ‹$USERNAME> @混沌神塔层数记录
  [@混沌神塔数据获取]
  IF
  #ACT
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 5 N$昨日总奖池
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录A.txt 0 S$昨日混沌神塔名称0 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录B.txt 0 S$昨日混沌神塔区服0 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 0 S$领取状态0 S$昨日混沌神塔奖励0
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录A.txt 1 S$昨日混沌神塔名称1 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录B.txt 1 S$昨日混沌神塔区服1 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 1 S$领取状态1 S$昨日混沌神塔奖励1
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录A.txt 2 S$昨日混沌神塔名称2 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录B.txt 2 S$昨日混沌神塔区服2 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 2 S$领取状态2 S$昨日混沌神塔奖励2
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录A.txt 3 S$昨日混沌神塔名称3 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录B.txt 3 S$昨日混沌神塔区服3 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 3 S$领取状态3 S$昨日混沌神塔奖励3
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录A.txt 4 S$昨日混沌神塔名称4 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日排行记录B.txt 4 S$昨日混沌神塔区服4 S$无效
  getliststring ..\..\..\..\通区文本\通区混沌神塔\昨日奖励领取.txt 4 S$领取状态4 S$昨日混沌神塔奖励4
  INC S$昨日混沌神塔奖励0 元
  INC S$昨日混沌神塔奖励1 元
  INC S$昨日混沌神塔奖励2 元
  INC S$昨日混沌神塔奖励3 元
  INC S$昨日混沌神塔奖励4 元
  DEC S$领取状态0 1 5
  DEC S$领取状态1 1 5
  DEC S$领取状态2 1 5
  DEC S$领取状态3 1 5
  DEC S$领取状态4 1 5
  DEC S$昨日混沌神塔区服0 1 5
  DEC S$昨日混沌神塔区服1 1 5
  DEC S$昨日混沌神塔区服2 1 5
  DEC S$昨日混沌神塔区服3 1 5
  DEC S$昨日混沌神塔区服4 1 5
  DEC S$昨日混沌神塔名称0 1 5
  DEC S$昨日混沌神塔名称1 1 5
  DEC S$昨日混沌神塔名称2 1 5
  DEC S$昨日混沌神塔名称3 1 5
  DEC S$昨日混沌神塔名称4 1 5
  getliststring ..\..\..\..\通区文本\通区混沌神塔\奖池金额.txt 0 N$混沌神塔奖池总额
  MOV N$混沌神塔奖励1 ‹$str(N$混沌神塔奖池总额)>
  MOV N$混沌神塔奖励2 ‹$str(N$混沌神塔奖池总额)>
  MOV N$混沌神塔奖励3 ‹$str(N$混沌神塔奖池总额)>
  MOV N$混沌神塔奖励4 ‹$str(N$混沌神塔奖池总额)>
  MOV N$混沌神塔奖励5 ‹$str(N$混沌神塔奖池总额)>
  MUL N$混沌神塔奖励1 15
  MUL N$混沌神塔奖励2 10
  MUL N$混沌神塔奖励3 8
  MUL N$混沌神塔奖励4 5
  MUL N$混沌神塔奖励5 3
  DIV N$混沌神塔奖励1 100
  DIV N$混沌神塔奖励2 100
  DIV N$混沌神塔奖励3 100
  DIV N$混沌神塔奖励4 100
  DIV N$混沌神塔奖励5 100
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录B.txt 0 S$跨区混沌神塔区服0
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录B.txt 1 S$跨区混沌神塔区服1
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录B.txt 2 S$跨区混沌神塔区服2
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录B.txt 3 S$跨区混沌神塔区服3
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录B.txt 4 S$跨区混沌神塔区服4
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录A.txt 0 S$跨区混沌神塔名称0 S$跨区混沌神塔层数0
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录A.txt 1 S$跨区混沌神塔名称1 S$跨区混沌神塔层数1
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录A.txt 2 S$跨区混沌神塔名称2 S$跨区混沌神塔层数2
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录A.txt 3 S$跨区混沌神塔名称3 S$跨区混沌神塔层数3
  getliststring ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录A.txt 4 S$跨区混沌神塔名称4 S$跨区混沌神塔层数4
  DEC S$跨区混沌神塔区服0 1 5
  DEC S$跨区混沌神塔区服1 1 5
  DEC S$跨区混沌神塔区服2 1 5
  DEC S$跨区混沌神塔区服3 1 5
  DEC S$跨区混沌神塔区服4 1 5
  DEC S$跨区混沌神塔名称0 1 5
  DEC S$跨区混沌神塔名称1 1 5
  DEC S$跨区混沌神塔名称2 1 5
  DEC S$跨区混沌神塔名称3 1 5
  DEC S$跨区混沌神塔名称4 1 5
  MOV S$输入字符 ‹$str(S$跨区混沌神塔层数0)>
  goto @混沌神塔层数计算
  MOV S$跨区混沌神塔层数0 ‹$str(S$输入字符)>
  MOV S$输入字符 ‹$str(S$跨区混沌神塔层数1)>
  goto @混沌神塔层数计算
  MOV S$跨区混沌神塔层数1 ‹$str(S$输入字符)>
  MOV S$输入字符 ‹$str(S$跨区混沌神塔层数2)>
  goto @混沌神塔层数计算
  MOV S$跨区混沌神塔层数2 ‹$str(S$输入字符)>
  MOV S$输入字符 ‹$str(S$跨区混沌神塔层数3)>
  goto @混沌神塔层数计算
  MOV S$跨区混沌神塔层数3 ‹$str(S$输入字符)>
  MOV S$输入字符 ‹$str(S$跨区混沌神塔层数4)>
  goto @混沌神塔层数计算
  MOV S$跨区混沌神塔层数4 ‹$str(S$输入字符)>
  setstringblank S$跨区混沌神塔区服0 25 1
  setstringblank S$跨区混沌神塔区服1 25 1
  setstringblank S$跨区混沌神塔区服2 25 1
  setstringblank S$跨区混沌神塔区服3 25 1
  setstringblank S$跨区混沌神塔区服4 25 1
  setstringblank S$跨区混沌神塔名称0 15 1
  setstringblank S$跨区混沌神塔名称1 15 1
  setstringblank S$跨区混沌神塔名称2 15 1
  setstringblank S$跨区混沌神塔名称3 15 1
  setstringblank S$跨区混沌神塔名称4 15 1
  setstringblank S$跨区混沌神塔层数0 4 0
  setstringblank S$跨区混沌神塔层数1 4 0
  setstringblank S$跨区混沌神塔层数2 4 0
  setstringblank S$跨区混沌神塔层数3 4 0
  setstringblank S$跨区混沌神塔层数4 4 0
  getstringpos ..\..\..\..\通区文本\通区混沌神塔\跨区排行记录A.txt ‹$STR(T4)>‹$USERNAME>:‹$str(U2)>‹$str(T4)>
  INC N0 1
  MOV S$当前名次 第‹$str(N0)>名
  #IF
  large N0 99999
  #act
  MOV S$当前名次 未上榜
  #IF
  EQUAL S$昨日混沌神塔名称0
  #act
  MOV S$昨日混沌神塔区服0 暂无当前排名记录
  MOV S$昨日混沌神塔奖励0 暂无排名
  MOV S$领取状态0 [无记录]
  #IF
  EQUAL S$昨日混沌神塔名称1
  #act
  MOV S$昨日混沌神塔区服1 暂无当前排名记录
  MOV S$昨日混沌神塔奖励1 暂无排名
  MOV S$领取状态1 [无记录]
  #IF
  EQUAL S$昨日混沌神塔名称2
  #act
  MOV S$昨日混沌神塔区服2 暂无当前排名记录
  MOV S$昨日混沌神塔奖励2 暂无排名
  MOV S$领取状态2 [无记录]
  #IF
  EQUAL S$昨日混沌神塔名称3
  #act
  MOV S$昨日混沌神塔区服3 暂无当前排名记录
  MOV S$昨日混沌神塔奖励3 暂无排名
  MOV S$领取状态3 [无记录]
  #IF
  EQUAL S$昨日混沌神塔名称4
  #act
  MOV S$昨日混沌神塔区服4 暂无当前排名记录
  MOV S$昨日混沌神塔奖励4 暂无排名
  MOV S$领取状态4 [无记录]
  #IF
  #act
  setstringblank S$昨日混沌神塔区服0 25 1
  setstringblank S$昨日混沌神塔区服1 25 1
  setstringblank S$昨日混沌神塔区服2 25 1
  setstringblank S$昨日混沌神塔区服3 25 1
  setstringblank S$昨日混沌神塔区服4 25 1
  setstringblank S$昨日混沌神塔名称0 15 1
  setstringblank S$昨日混沌神塔名称1 15 1
  setstringblank S$昨日混沌神塔名称2 15 1
  setstringblank S$昨日混沌神塔名称3 15 1
  setstringblank S$昨日混沌神塔名称4 15 1
  setstringblank S$昨日混沌神塔奖励0 9 1
  setstringblank S$昨日混沌神塔奖励1 9 1
  setstringblank S$昨日混沌神塔奖励2 9 1
  setstringblank S$昨日混沌神塔奖励3 9 1
  setstringblank S$昨日混沌神塔奖励4 9 1
  [@混沌神塔层数计算]
  #IF
  checkstringlength ‹$str(S$输入字符)> = 8
  #act
  DEC S$输入字符 4 99
  break
  #IF
  checkstringlength ‹$str(S$输入字符)> = 7
  #act
  DEC S$输入字符 3 99
  break
  #IF
  checkstringlength ‹$str(S$输入字符)> = 6
  #act
  DEC S$输入字符 2 99
  break
  #IF
  checkstringlength ‹$str(S$输入字符)> = 9
  #act
  DEC S$输入字符 5 99
  break
  #IF
  checkstringlength ‹$str(S$输入字符)> = 10
  #act
  DEC S$输入字符 6 99
  break

帖子地址: 





上一篇:GOM引擎传奇一条龙开区时福利夺宝脚本记录总抽奖次数教程司徒
下一篇:GOM引擎魔塔传送脚本 传奇一条龙开区时指定称号进入地图命令4tuu
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【乱回复灌水将给予禁言处理】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则