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

[@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_推广系统常量
}

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

我看不错噢 谢谢楼主！1314学习网越来越好！

看了LZ的帖子，我只想说一句很好很强大！

额额额额额额额额额额