最新传世私服主宰者购买以及令牌脚本

这东西本来就没有什么技术含量，适合新手用，老鸟也可以作为模板进行修改。

stditems添加：
1667;主宰者令牌;49;0;1;915;0;0;5233;180;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;5;0;
值得注意的是：180这个字符段是使用天数。


Merchant中添加
中州主宰者           0  471     216  传世主宰者 0  48  0  0 0
在：D:WolServerMir200Envirmarket_def中州   下新建txt文档，命名为“主宰者.txt”
里面的文档请自行添加。
[@main]　
传世VIP特权介绍:  　　特权一：<COLOR=GREEN 全服独家封号，全服上线通告。>　　特权二：<COLOR=GREEN 本体当前等级直升一级至下一级经验0%>　　特权三：<COLOR=GREEN 稳如泰山，不能被任何玩家推动。>　　特权四：<COLOR=GREEN 终身独享1.5倍经验，练级快人一步。>　　特权五：<COLOR=GREEN 终身独享1.2倍攻击，让你PK天下无敌。>　　特权六：<COLOR=GREEN 专属独家打宝地图，特戒爆率全服最高。>　　特价:198888元宝 <购买传世VIP/@buyVIP>    <下一页/@nextpage>　　<COLOR=RED 特别说明:新区第二天才出售主宰会员,带黄金武器按职业>
[@nextpage]
红袖/传世VIP特权介绍:特权七：<color=green 每日领取经验福利，至少一亿经验值>特权八：<COLOR=GREEN 专属二转70级极品双属性绝版红麒麟。><COLOR=RED 骑战移动速度+1>特权九：<COLOR=GREEN 全服独家，粉色封号让你个性张扬>特权十：<color=green 专属武器，让您纵横天下，无人能敌！><COLOR=RED 武器不会爆出>特权十一：<COLOR=GREEN 每日元宝返还100个，让您保赚不赔！></@@!PIC 黄金裁决>     </@@!PIC 黄金嗜魂>     </@@!PIC 黄金倚天剑><COLOR=GREEN 传世VIP活动特价：198888个元宝>  <购买传世VIP/@buyVIP>
[@buyVIP]
#if
CHECKNAMELIST ..QuestDiary数据文件主宰者.txt
#say
<color=green 你已经是传世主宰者了！>
#ELSEACT
goto @领取主宰[@领取主宰]
#IF
CHECKGAMEGOLD > 198889
#ACT
GAMEGOLD - 198888
CHANGEMODE 19 1
CHANGEMODE 18 1give 麒麟石 1
UPGRADEUSERITEM $PARAM(10) 8 = 1
UPGRADEUSERITEM $PARAM(10) 9 = 2
UPGRADEUSERITEM $PARAM(10) 4 = 70
give 主宰者令牌
UPGRADEUSERITEM $PARAM(10) 59 = 1
goto @武器
break
ADDVARLIST $USERNAME ..QuestDiary数据文件主宰者.txtSENDMSG 0 勇士<$USERNAME>在中州地图<传世主宰使者>处领取<传世主宰封号>希望他不要造就太重的杀孽5uwl.net!
SENDMSG 14 勇士<$USERNAME>在中州地图<传世主宰使者>处领取<传世主宰封号>希望他不要造就太重的杀孽!
#ELSEACT
MessageBox 对不起，您的元宝不足198888个！
break
[@武器]#IF
checkjob warrior
#ACT
GIVE 黄金裁决 1
UPGRADEUSERITEM $PARAM(10) 59 = 1
BREAK
#IF
checkjob wizard #ACT
GIVE 黄金嗜魂 1
UPGRADEUSERITEM $PARAM(10) 59 = 1
BREAK
#IF
checkjob taoist
#ACT
GIVE 黄金倚天剑 1
UPGRADEUSERITEM $PARAM(10) 59 = 1
BREAK

QManage文档中添加登陆加载的脚本：
#IF
CHECKVARLIST $USERNAME ..QuestDiary数据文件主宰者.txt
#ACT
CHANGEMODE 19 1
CHANGEMODE 18 1
break

QFunction-0  中添加：
[@StdModeFunc915]
#say
<COLOR=GREEN 欢迎使用传世主宰专属特权>
<领取每日经验奖励/@VIP经验>     <查看说明/@说明VIP经验>
<领取每日灵符奖励/@VIP灵符>     <查看说明/@说明VIP灵符>
<领取每日元宝返还/@VIP元宝>     <查看说明/@说明VIP元宝>
<进入主宰打宝地图/@vIP地图>     <查看说明/@说明VIP地图>
<开启麒麟变红特权/@麒麟变红>     <查看说明/@说明VIP麒麟>
<主宰者主城传送权/@传送>     <查看说明/@说明VIP传送>

 

 


[@说明VIP地图]
#ACT
MESSAGEBOX 主宰打宝地图:传世主宰者，专属打宝地图，爆率超高，出特戒与顶级,可组队进入
[@说明VIP麒麟]
#ACT
MESSAGEBOX 主宰专属红色麒麟:颜色更漂亮，属性更威猛！
BREAK
[@说明VIP元宝]
#ACT
MESSAGEBOX 主宰返还元宝:传世主宰者，每日可以领取返还的1000个元宝保证您在此服里长久下去，保赚不赔！
BREAK
[@说明VIP灵符]
#ACT
MESSAGEBOX 主宰灵符福利:传世主宰者，每日可以领取至少1000个灵符的奖励,灵符此处只显示数量，灵符领取请找祝福老人，福袋处领取奖励灵符
break
[@说明VIP经验]
#ACT
MESSAGEBOX 主宰经验福利:传世主宰者，每日可以领取至少一亿的经验值，元神在线获取三分之一经验值
break
[@说明VIP传送]
#ACT
MESSAGEBOX 主宰传送福利:传世主宰者，可随时随地传送到各大主城，方便快捷。
break


[@ViP地图]
#IF
CHECKNAMELIST ..QuestDiary数据文件主宰者.txt
#ACT
MAPMOVE bzfd
BREAK
#elseSAY
你现在还不是传世主宰者
[@VIP元宝]
#IF
CHECKNAMELIST ..QuestDiary数据文件主宰者.txt
#ELSEACT
BREAK
#IF
CHECKNAMELIST ..QUESTDIARY数据文件主宰元宝.TXT
#ACT
BREAK
#SAY
对不起，尊敬的传世主宰者，这里规定每位传世主宰者每天只能
领取一次主宰元宝，您今天已经领取过一次了，请明天再来
谢谢您的合作
#ELSEACT
GAMEGOLD + 1000
SENDMSG 0 恭喜传世主宰者<$USERNAME>领取每日元宝福利
ADDNAMELIST ..QUESTDIARY数据文件主宰元宝.TXT
break
#ELSESAY
尊敬的传世主宰者:
进今天的元宝奖励获得了1000个

[@vip灵符]
#IF
CHECKNAMELIST ..QuestDiary数据文件主宰者.txt
#ELSEACT
BREAK
#IF
CHECKNAMELIST ..QUESTDIARY数据文件主宰灵符.TXT
#ACT
BREAK
#SAY
对不起，尊敬的传世主宰者，这里规定每位传世主宰者每天只能
领取一次主宰灵符，您今天已经领取过一次了，请明天再来
谢谢您的合作
#ELSEACT
MOVR P0 500
INC P0 1000
CALCVAR HUMAN 福袋 + $STR(P0)
SAVEVAR HUMAN 福袋 ..QUESTDIARY数据文件个人变量个人变量.txt
SENDMSG 0 恭喜传世主宰者<$USERNAME>领取每日灵符福利
ADDNAMELIST ..QUESTDIARY数据文件主宰灵符.TXT
break
#ELSESAY
尊敬的传世主宰者:
进今天的灵符奖励获得了<$STR(P0)>个
<COLOR=GREEN 灵符可以去找祝福老人，福袋处领取>

[@VIP经验]
#IF
CHECKNAMELIST ..QuestDiary数据文件主宰者.txt
#ELSEACT
BREAK
#IF
CHECKNAMELIST ..QUESTDIARY数据文件主宰经验.TXT
#ACT
BREAK
#SAY
对不起，尊敬的传世主宰者，这里规定每位传世主宰者每天只能
领取一次主宰经验，您今天已经领取过一次了，请明天再来
谢谢您的合作
#ELSEACT
MOVR P0 500
INC P0 1000
MUL P0 100000
CHANGEEXP + 100000000
SENDMSG 0 恭喜传世主宰者<$USERNAME>领取每日经验
ADDNAMELIST ..QUESTDIARY数据文件主宰经验.TXT
break
#ELSESAY
尊敬的传世主宰者:
你今天获得了一亿点经验值

 

[@麒麟变红]
#IF
CHECKNAMELIST ..QuestDiary数据文件主宰者.txt
#act
goto @变红
#ELSEACT
messagebox 你没有权利使用，你不是传世主宰者！　本功能只能传世主宰者才可以使用！
break
close
[@变红]
#IF
EQUAL $PET.TYPE 1
#ACT
UPGRADEMON 3
Break
#elseact
UPGRADEMON 1
Break

 

[@传送]

 

      <中州王城/@中州>    <热砂荒漠/@沙漠>    <死水沼泽/@MAPNAME&7&62&40>    <魔隐村落/@魔音>
      <落霞岛屿/@落霞>    <禁地区域/@MAPNAME&4&350&166>    <西域奇境/@西域>    <海角村落/@海角>
      <沙城区域/@沙城>    <中州皇宫/@皇宫>    <炼狱海岛/@炼狱1海岛>    <灵犀仙岛/@灵犀>\
                                     <返 回/@主宰者菜单>

 

[@灵犀]
#IF
#ACT
MAPMOVE lxxd 73  64
BREAK

[@炼狱1海岛]
#IF
#ACT
MAPMOVE mh001
BREAK

 

[@皇宫]
#IF
#ACT
MAPMOVE sh000
BREAK

 

[@沙城]
#IF
#ACT
MAPMOVE shacheng  163  190
BREAK


[@海角]
#IF
#ACT
MAPMOVE 0 397  593
BREAK

[@西域]
#IF
#ACT
MAPMOVE 5  472  104
BREAK


[@落霞]
#IF
#ACT
MAPMOVE 1  238  236
BREAK


[@中州]
#IF
#ACT
MAPMOVE 0 473 223
BREAK

[@沙漠]
#IF
#ACT
MAPMOVE 2 223 448
BREAK

[@死水]
#IF
#ACT
MAPMOVE 7  62  40
BREAK

[@魔音]
#IF
#ACT
MAPMOVE 6 170  115
BREAK

[@中州]
#IF
#ACT
MAPMOVE 0 473 223
BREAK

其实主宰者令牌是有一个很漂亮的界面的。但是老大说这需要有个主宰者号  进行抓包，so。。。。不过根据主宰者令牌截图显示，现在除了主宰者护卫功能以外剩下的应该实现的差不多了