游客您好
第三方账号登陆
  • 点击联系客服

    在线时间:9:00-17:00

    联系QQ

    3543403617

    电子邮件

    3543403617@QQ.com
  • PKhuo手机版

    GM资源教程随时查询

  • 扫描二维码

    进传奇GM资源交流群

Lv.9 管理员
1号会员,0活跃值,2021.07.08 加入
  • 16491发帖
  • 14731主题
  • 0关注
  • 0粉丝
这个人很懒,什么也没有留下。
最新源码 更多>
游戏视频 更多>
脚本教程 更多>

[BLUE引擎] BLUE引擎 推广系统脚本源码教程

[复制链接]
pkhuo 发表于 2021-9-30 20:59:14 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题
[@Bluem2.net_推广系统NPC]
{
#IF
CHECKLEVELEX > 0
#ACT
CALCVAR HUMAN 推广推广码 =
CALCVAR HUMAN 推广邀请码 =
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\空格.txt S0
;---------------------
#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务012) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>


#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务034) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>

#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务056) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>

#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务078) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>

#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务090) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广邀请码 + <$STR(S12)>

;---------------------------------------------------------------------------------------------------------
#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务12) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>


#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务34) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>

#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务56) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>

#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务78) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>

#IF
CHECKLEVELEX > 0
#ACT
MOV P7 0
MOV P9 16384

#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>
#IF
LARGE P9 0
#ACT
MOV P8 <$STR(P7)>
DIV P9 2
INC P8 <$STR(P9)>
DEC P8 1
#IF
LARGE P9 0
CHECKMISSION $(推广占用任务90) > <$STR(P8)>
#ACT
INC P7 <$STR(P9)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(P7)>
MOV S11 <$STR(P7)>
DEC S10 3 100
DEC S11 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S10)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换2 <$STR(S11)> S12
CALCVAR HUMAN 推广推广码 + <$STR(S12)>

#IF
Check $(推广占用标识1) 1
#ACT
INI_WRITE_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广码数据.INI 推广码数据 <$HUMAN(推广推广码)> <$USERNAME>
MOV S10
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\邀请人数.INI 邀请人数 <$HUMAN(推广推广码)> S10
INC S10 <$STR(S0)>
DEC S10 11 100
CALCVAR HUMAN 成功邀请人数X = <$STR(S10)>
MOV S10
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广完成.INI 推广完成 <$HUMAN(推广推广码)> S10
INC S10 <$STR(S0)>
DEC S10 11 100
CALCVAR HUMAN 推广完成人数X = <$STR(S10)>
MOV S10
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广收益.INI 推广收益 <$HUMAN(推广推广码)> S10
INC S10 <$STR(S0)>
DEC S10 11 100
CALCVAR HUMAN 我的推广收益X = <$STR(S10)>
MOV S10
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广收益.INI 推广收益 <$HUMAN(推广推广码)>可领取 S10
INC S10 <$STR(S0)>
DEC S10 11 100
CALCVAR HUMAN 可领推广收益X = <$STR(S10)>
#ELSEACT
MOV S10 <$STR(S0)>
DEC S10 11 100
CALCVAR HUMAN 推广推广码 = <$STR(S10)>
CALCVAR HUMAN 成功邀请人数X = <$STR(S10)>
CALCVAR HUMAN 推广完成人数X = <$STR(S10)>
CALCVAR HUMAN 我的推广收益X = <$STR(S10)>
CALCVAR HUMAN 可领推广收益X = <$STR(S10)>

#IF
Check $(推广占用标识2) 1
#ACT
INI_WRITE_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\邀请码数据.INI 邀请码数据 <$HUMAN(推广邀请码)> <$USERNAME>
MOV S10
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广码数据.INI 推广码数据 <$HUMAN(推广邀请码)> S10
INC S10 <$STR(S0)>
DEC S10 15 100
CALCVAR HUMAN 介绍人角色名X = <$STR(S10)>
#ELSEACT
MOV S10 <$STR(S0)>
DEC S10 11 100
CALCVAR HUMAN 推广邀请码 = <$STR(S10)>
MOV S10 <$STR(S0)>
DEC S10 15 100
CALCVAR HUMAN 介绍人角色名X = <$STR(S10)>

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(S0)>
DEC S10 11 100

#IF
CHECKVAR HUMAN 推广邀请码 = <$STR(S10)>
#ACT
CALCVAR HUMAN 推广邀请码 = <输入邀请码/@输入邀请码>

#IF
CHECKLEVELEX > 0
#SAY
    <COLOR=#$0079FF 〝≈><COLOR=#$00A0FF 蓝><COLOR=#$00B1FF 色><COLOR=#$00C2FF 出><COLOR=#$00D3FF 品><COLOR=#$00B1FF ≈><COLOR=#$00FFC5 正版><COLOR=#$00FFD6 授权><COLOR=#$00FFE7 ≈><COLOR=#$00FFF8 公司><COLOR=#$00F5FF 运营><COLOR=#$00E4FF ≈><COLOR=#$00D3FF 独><COLOR=#$00C2FF 家><COLOR=#$00B1FF 奉><COLOR=#$00A0FF 献><COLOR=#$0079FF ≈〞>\
<COLOR=#$D3D3D3 玩家等级达到> <COLOR=#$FFBF00 [$(推广上家等级至少)级]> <COLOR=#$D3D3D3 即可申请成为推广员,可招募低于> <COLOR=#$2FFFAD [$(推广下家等级低于)级]> <COLOR=#$D3D3D3 的>\
<COLOR=#$D3D3D3 玩家为下家。推广员享受下家每次充值> <COLOR=#$EE82EE $(推广充值分红)%> <COLOR=#$D3D3D3 的元宝分红,下家等级>\
<COLOR=#$D3D3D3 达到> <COLOR=#$FFFF00 [$(推广成功玩家等级)级]> <COLOR=#$D3D3D3 双方均可获得> <COLOR=#$0000FF RMB$(推广成功RMB奖励)员> <COLOR=#$D3D3D3 奖励!>\
<COLOR=#$00393942 ──────────────────────────────>\
<COLOR=#$D3D3D3 我的> <邀请码/@邀请码>  [ <$HUMAN(推广推广码)> ]   <COLOR=#$D3D3D3 介绍人角色名> [ <$HUMAN(介绍人角色名X)> ]\
<COLOR=#$D3D3D3 成功邀请人数> [ <$HUMAN(成功邀请人数X)> ]   <COLOR=#$D3D3D3 介绍人邀请码> [ <$HUMAN(推广邀请码)> ]\
<COLOR=#$D3D3D3 到达$(推广成功玩家等级)级人数> [ <$HUMAN(推广完成人数X)> ]\
<COLOR=#$D3D3D3 我的推广收益> [ <$HUMAN(我的推广收益X)> ]   <COLOR=#$D3D3D3 当前可领收益> [ <$HUMAN(可领推广收益X)> ]\
<[申请推广员]/@申请推广员>                  <[领取推广收益]/@领取推广收益>

[@领取推广收益]
#IF
Check $(推广占用标识1) 1
#ELSEACT
MESSAGEBOX 推广员才能在此领取收益!
BREAK
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 0
INI_READ_INTEGER ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广收益.INI 推广收益 <$HUMAN(推广推广码)>可领取 D10
#IF
CHECKNAMELIST ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\☆奖励现金名单.txt HardDisk
#ACT
MESSAGEBOX 您有现金奖励还未领取,请联系游戏管理员发放!
#IF
LARGE D10 0
#ACT
INI_WRITE_INTEGER_EX ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广收益.INI 推广收益 <$HUMAN(推广推广码)>可领取 = 0
GAMEGOLD + <$STR(D10)>
SENDMSG 0 推广播报:<$USERNAME>,成功领取推广收益[<$STR(D10)>元宝]! 85 251
SENDMSG 0 推广播报:<$USERNAME>,成功领取推广收益[<$STR(D10)>元宝]! 85 251 10
GOTO @MAIN
BREAK
#ELSEACT
MESSAGEBOX 对不起,您目前没有可领取收益!
BREAK






[@邀请码]
#IF
Check $(推广占用标识1) 1
#ACT
MESSAGEBOX 您的推广码已出现在对话框!对准它[CTRL+鼠标左键]可快速复制
SENDMSG 7 <$HUMAN(推广推广码)>
BREAK
#ELSEACT
MESSAGEBOX 此处为推广员复制推广码专用!
BREAK


[@输入邀请码]
#IF
Check $(推广占用标识1) 1
#ACT
MESSAGEBOX 你早已成为推广员了!不能成为被邀请的对象!
BREAK
#IF
CHECKLEVELEX ? $(推广下家等级低于)
#ACT
MESSAGEBOX 对不起,等级低于[$(推广下家等级低于)级]才能成为被邀请的对象!
BREAK
#IF
Check $(推广占用标识2) 1
#ACT
MESSAGEBOX 你早已成为被邀请的对象了!
BREAK
#IF
Check $(推广占用标识2) 0
#ACT
MOV S15
QUERYVALUE 15 0 10 ~输入邀请码 请输入邀请您玩家的邀请码 NPC
BREAK

[~输入邀请码]
#IF
EQUAL S15
#ACT
MESSAGEBOX 请输入正确邀请码!
GOTO @MAIN
BREAK
#IF
CHECKLEVELEX > 0
#ACT
MOV S11
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广码数据.INI 推广码数据 <$STR(S15)> S11
#IF
EQUAL S11
#ACT
MESSAGEBOX 请输入正确邀请码!
GOTO @MAIN
BREAK
#IF
EQUAL S11 <$USERNAME>
#ACT
MESSAGEBOX 请输入其他玩家的邀请码!
GOTO @MAIN
BREAK
#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$STR(S15)>
DEC S10 2 100
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
MOV S10 <$STR(S15)>
DEC S10 3 100
DEC S10 1 1
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务012) 1
SETMISSION ^ $(推广占用任务012) <$STR(S13)>
MOV S10 <$STR(S15)>
DEC S10 4 100
DEC S10 1 2
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
MOV S10 <$STR(S15)>
DEC S10 5 100
DEC S10 1 3
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务034) 1
SETMISSION ^ $(推广占用任务034) <$STR(S13)>
MOV S10 <$STR(S15)>
DEC S10 6 100
DEC S10 1 4
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
MOV S10 <$STR(S15)>
DEC S10 7 100
DEC S10 1 5
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务056) 1
SETMISSION ^ $(推广占用任务056) <$STR(S13)>
MOV S10 <$STR(S15)>
DEC S10 8 100
DEC S10 1 6
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
MOV S10 <$STR(S15)>
DEC S10 9 100
DEC S10 1 7
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务078) 1
SETMISSION ^ $(推广占用任务078) <$STR(S13)>
MOV S10 <$STR(S15)>
DEC S10 10 100
DEC S10 1 8
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
MOV S10 <$STR(S15)>
DEC S10 1 9
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务090) 1
SETMISSION ^ $(推广占用任务090) <$STR(S13)>
SET $(推广占用标识2) 1
INI_WRITE_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\邀请码数据.INI 邀请码数据 <$STR(S15)> <$USERNAME>
INI_WRITE_INTEGER_EX ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\邀请人数.INI 邀请人数 <$STR(S15)> + 1
MOV S15
GOTO @MAIN
BREAK


[@申请推广员]
#IF
Check $(推广占用标识1) 1
#ACT
MESSAGEBOX 你早已成为推广员了!
BREAK
#IF
CHECKLEVELEX < $(推广上家等级至少)
#ACT
MESSAGEBOX 对不起,等级达到[$(推广上家等级至少)级]才能申请当推广员!
BREAK
#IF
CHECKLEVELEX > 0
#ACT
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
MOV S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务12) 1
SETMISSION ^ $(推广占用任务12) <$STR(S13)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务34) 1
SETMISSION ^ $(推广占用任务34) <$STR(S13)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务56) 1
SETMISSION ^ $(推广占用任务56) <$STR(S13)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务78) 1
SETMISSION ^ $(推广占用任务78) <$STR(S13)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
MOV S13 <$STR(S11)>
ReadRandomLine ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\推广码抽取.txt S10
INC S15 <$STR(S10)>
INI_READ_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广抽取检测\转换.INI 转换1 <$STR(S10)> S11
INC S13 <$STR(S11)>
SETMISSION + $(推广占用任务90) 1
SETMISSION ^ $(推广占用任务90) <$STR(S13)>
SET $(推广占用标识1) 1
INI_WRITE_STRING ..\QuestDiary\Bluem2.net_游戏功能配制\推广系统\推广数据\推广码数据.INI 推广码数据 <$STR(S15)> <$USERNAME>
SENDMSG 0 推广播报:<$USERNAME>,成功申请为推广员,他的推广码是:<$STR(S15)> 85 251
MOV S15
GOTO @MAIN
BREAK

[@推广系统常量加载]
#CALL [Bluem2.net_游戏功能配制\推广系统\Bluem2.net_推广系统常量.INI] @Bluem2.net_推广系统常量
}


游客,如果您要查看本帖隐藏内容请回复



回复

使用道具 举报

精彩评论2

小白学习 发表于 2022-3-28 22:08:36 | 显示全部楼层

我看不错噢 谢谢楼主!1314学习网越来越好!
回复

使用道具 举报

siyuntian 发表于 2022-4-22 11:17:02 | 显示全部楼层
看了LZ的帖子,我只想说一句很好很强大!
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【右侧内容,后台自定义】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

PKhuo论坛手机版

扫一扫二维码

传奇最全教程基地

Powered by PKhuo!X3.4 ©2001-2013 Comsenz Inc. 湘ICP备15015719号-5 |Sitemap|友链申请|网站地图