 | [@wooolVIP]
{
传世VIP特权介绍: \
特权一:<COLOR=GREEN 全服独家封号,全服上线通告。>\
特权二:<COLOR=GREEN 本体当前等级直升一级至下一级经验0%>\
特权三:<COLOR=GREEN 稳如泰山,不能被任何玩家推动。>\
特权四:<COLOR=GREEN 终身独享1.5倍经验,练级快人一步。>\
特权五:<COLOR=GREEN 终身独享1.2倍攻击,让你PK天下无敌。>\
特权六:<COLOR=GREEN 专属独家打宝地图,特戒爆率全服最高。>\
特价:88888元宝 <购买传世主宰/@buyVIP> <使用VIP特权/@useVIP> <下一页/@nextpage>\
<COLOR=RED 特别说明:尊贵身份先到先得,全服无限销售>
[@nextpage]
传世VIP特权介绍:\
特权七:<color=green 每日领取经验福利,至少一亿经验值>\
特权八:<COLOR=GREEN 专属二转70级极品属性绝版红麒麟。><COLOR=RED 骑战移动速度+1>\
特权九:<COLOR=GREEN 全服独家,粉色封号让你个性张扬>\
特权十:<color=green 专属武器,让您纵横天下,无人能敌!><COLOR=RED 武器不会爆出>\
特权十一:<COLOR=GREEN 每日元宝返还1000个,让您保赚不赔!>\
</@@!PIC 黄金裁决> </@@!PIC 黄金嗜魂> </@@!PIC 黄金倚天剑>\
<COLOR=GREEN 传世主宰活动特价:88888个元宝> <购买传世VIP/@buyVIP> <返回/@wooolvip>
[@useVIP]
#IF
EQUAL $CHANGEMODE.28 1
#SAY
<COLOR=GREEN 欢迎使用传世主宰专属特权>\
<领取每日经验奖励/@VIP经验> <查看说明/@说明VIP经验>\
<领取每日元宝返还/@VIP元宝> <查看说明/@说明VIP元宝>\
<进入主宰打宝地图/@vIP地图> <查看说明/@说明VIP地图>\
#ELSEACT
BREAK
#ELSESAY
对不起,你现在还不是主宰者
#IF
CHECK [90] 0
#SAY
<领取主宰者专属黄金武器/@领取黄金武器>\
#IF
CHECK [91] 0
#SAY
<领取主宰者专属双属性灵兽/@双属性灵兽>\
[@说明VIP地图]
#ACT
MESSAGEBOX 主宰打宝地图:传世主宰者,专属打宝地图,爆率超高,出特戒与顶级,可组队进入
BREAK
[@说明VIP元宝]
#ACT
MESSAGEBOX 主宰返还元宝:传世主宰者,每日可以领取返还的1000个元宝保证您在此服里长久下去,保赚不赔!
BREAK
[@说明VIP灵符]
#ACT
MESSAGEBOX 主宰灵符福利:传世主宰者,每日可以领取至少1000个灵符的奖励,灵符此处只显示数量,灵符领取请找祝福老人,福袋处领取奖励灵符
break
[@说明VIP经验]
#ACT
MESSAGEBOX 主宰经验福利:传世主宰者,每日可以领取至少一亿的经验值,元神在线获取三分之一经验值
break
[@ViP地图]
#IF
EQUAL $CHANGEMODE.28 1
#ACT
MAPMOVE bzfd
BREAK
#elseSAY
你现在还不是传世主宰者
[@VIP元宝]
#IF
EQUAL $CHANGEMODE.28 1
#ELSEACT
BREAK
#IF
CHECKNAMELIST ..\QUESTDIARY\数据文件\主宰元宝.TXT
#ACT
BREAK
#SAY
对不起,尊敬的传世主宰者,这里规定每位传世主宰者每天只能\
领取一次主宰元宝,您今天已经领取过一次了,请明天再来\
谢谢您的合作\
#ELSEACT
GAMEGOLD + 1000
SENDMSG 0 恭喜传世主宰者<$USERNAME>领取每日元宝福利
ADDNAMELIST ..\QUESTDIARY\数据文件\主宰元宝.TXT
break
#ELSESAY
尊敬的传世主宰者:\
进今天的元宝奖励获得了1000个\
[@vip灵符]
#IF
EQUAL $CHANGEMODE.28 1
#ELSEACT
BREAK
#IF
CHECKNAMELIST ..\QUESTDIARY\数据文件\主宰灵符.TXT
#ACT
BREAK
#SAY
对不起,尊敬的传世主宰者,这里规定每位传世主宰者每天只能\
领取一次主宰灵符,您今天已经领取过一次了,请明天再来\
谢谢您的合作\
#ELSEACT
CALCVAR HUMAN 福袋 + 1000
SAVEVAR HUMAN 福袋 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
SENDMSG 0 恭喜传世主宰者<$USERNAME>领取每日灵符福利
ADDNAMELIST ..\QUESTDIARY\数据文件\主宰灵符.TXT
break
#ELSESAY
尊敬的传世主宰者:\
进今天的灵符奖励获得了<$STR(P0)>个\
<COLOR=GREEN 灵符可以去找祝福老人,福袋处领取>
[@VIP经验]
#IF
EQUAL $CHANGEMODE.28 1
#ELSEACT
BREAK
#IF
CHECKNAMELIST ..\QUESTDIARY\数据文件\主宰经验.TXT
#ACT
BREAK
#SAY
对不起,尊敬的传世主宰者,这里规定每位传世主宰者每天只能\
领取一次主宰经验,您今天已经领取过一次了,请明天再来\
谢谢您的合作\
#ELSEACT
MOVR P0 500
INC P0 1000
MUL P0 100000
CHANGEEXP + $STR(P0)
SENDMSG 0 恭喜传世主宰者<$USERNAME>领取每日经验
ADDNAMELIST ..\QUESTDIARY\数据文件\主宰经验.TXT
break
#ELSESAY
尊敬的传世主宰者:\
你今天获得了<$STR(P0)>点经验值
[@buyvip]
#IF
SMALL G4 2
#SAY
现在是KQ的第<$STR(G4)>天,只有KQ第二天才可以购买传世主宰者
#ACT
BREAK
#IF
CHECKGAMEGOLD < 88888
#ACT
BREAK
#SAY
购买传世主宰者需要88888个元宝,你的元宝不足
#IF
CHECKBAGSIZE 3
#ELSEACT
BREAK
#ELSESAY
请预留至少3个包裹格子!!
#IF
CHECKNAMELIST ..\QuestDiary\数据文件\主宰名单.txt
#ACT
BREAK
#SAY
你已经是传世主宰者,无需重复购买!
#IF
!CHECKGAMEGOLD < 88888
#ACT
GAMEGOLD - 88888
CHANGEMODE 28 1
ADDNAMELIST ..\QuestDiary\数据文件\主宰名单.txt
MESSAGEBOX 恭喜你,成为传世主宰者,你可以使用点击主宰者特权领取你的专属武器和灵兽。
GOTO @levelUP
MESSAGEBOX 恭喜你,成为传世主宰者,你可以点击主宰者特权用来领取你的主宰者的专属东西
#say
恭喜你,成为传世主宰者,你可以使用点击<COLOR=GREEN 主宰者特权>\
领取你的专属武器和灵兽。\
[@领取黄金武器]
#IF
EQUAL $CHANGEMODE.28 1
#ELSEACT
MESSAGEBOX 你还是主宰者吗?
BREAK
#IF
CHECK [90] 1
#ACT
MESSAGEBOX 你已经领取过了
BREAK
#IF
checkjob Warr
#ACT
SET [90] 1
GIVE 黄金裁决 1
UpgradeUserItemEx $PARAM(0) 71 = 1
break
#IF
checkjob Wizard
#ACT
SET [90] 1
GIVE 黄金嗜魂 1
UpgradeUserItemEx $PARAM(0) 71 = 1
break
#IF
checkjob TAOS
#ACT
SET [90] 1
GIVE 黄金倚天剑 1
UpgradeUserItemEx $PARAM(0) 71 = 1
break
[@levelup]
#IF
EQUAL $TRJJ 99
#ACT
BREAK
#IF
LARGE $TRFL 2
#ACT
TRJJ + 1
CHANGEEXP - 9999999999
BREAK
#if
checklevelex < 71
#ACT
CHANGELEVEL + 1
CHANGEEXP - 9999999999
break
[@双属性灵兽]
#IF
EQUAL $CHANGEMODE.28 1
#ELSEACT
MESSAGEBOX 你还是主宰者吗?
BREAK
#IF
CHECK [91] 1
#ACT
MESSAGEBOX 你已经领取过了
BREAK
#ELSESAY
<COLOR=GREEN 尊贵的传世主宰者,请选择您要骑乘的灵兽>\
<COLOR=GREEN 二转70级绝版双属性灵兽,骑战速度永久+1>\
<我要迅天雷豹/@givest&豹魔石>\
<我要战天狂狮/@givest&狮魔石>\
<我要玄天麒麟/@givest&麒麟石>\
<我要炽天神凤/@GIVEST&凤凰石>\
<我要撼天灵虎/@givest&虎魔石>\
[@GIVEST]
#IF
EQUAL $CHANGEMODE.28 1
#ELSEACT
MESSAGEBOX 你还是主宰者吗?
BREAK
#IF
CHECK [91] 1
#ACT
MESSAGEBOX 你已经领取过了
BREAK
#IF
RANDOM 1
#ACT
SET [91] 1
MOV S50 $PARAM(50)
GIVE $PARAM(50) 1
UpgradeItemExDLS $PARAM(0) 20 = 2
UpgradeItemExDLS $PARAM(0) 28 = 1
UpgradeItemExDLS $PARAM(0) 22 = 2184
UpgradeItemExDLS $PARAM(0) 25 = 60
UpgradeItemExDLS $PARAM(0) 18 = 200
UpgradeItemExDLS $PARAM(0) 19 = 200
UpgradeItemExDLS $PARAM(0) 11 = 8
UpgradeItemExDLS $PARAM(0) 13 = 8
UpgradeItemExDLS $PARAM(0) 12 = 8
UpgradeItemExDLS $PARAM(0) 14 = 8
UpgradeItemExDLS $PARAM(0) 4 = 8
UpgradeItemExDLS $PARAM(0) 23 = 70
UpgradeItemExDLS $PARAM(0) 1 = 7
UpgradeItemExDLS $PARAM(0) 2 = 7
UpgradeItemExDLS $PARAM(0) 3 = 7
UpgradeItemExDLS $PARAM(0) 5 = 7
UpgradeItemExDLS $PARAM(0) 6 = 7
UpgradeItemExDLS $PARAM(0) 7 = 7
UpgradeItemExDLS $PARAM(0) 8 = 7
UpgradeItemExDLS $PARAM(0) 9 = 7
UpgradeItemExDLS $PARAM(0) 10 = 7
UpgradeItemExDLS $PARAM(0) 15 = 3
UpgradeItemExDLS $PARAM(0) 16 = 7
UpgradeItemExDLS $PARAM(0) 17 = 1
UPDATEMONSTONE 2
MESSAGEBOX 释放你的灵兽,系统将为你的灵兽附加极品属性
#SAY
传世至尊VIP独享,二转71级绝版灵兽\
#if
equal S50 麒麟石
#SAY
<请释放你的二转麒麟,我将为你的麒麟调整颜色/@换颜色>\
[@换颜色]
#if
!CHECKCLB
#ACT
MESSAGEBOX 请释放你的麒麟兽!
break
#IF
EQUAL $PET.NAME 玄天麒麟
#ACT
UPGRADEMON 2
MESSAGEBOX 请重新释放你的灵兽!
break
#ELSESAY
<请释放你的二转麒麟,我将为你的麒麟调整颜色/@换颜色>\
}
| |