传奇一条龙分享功能超多的VIP脚本

[@main]

#IF
CHECKCREDITPOINT > 2
#say
<>   <VIP><Img:921:5:388:-9/@exit>你当前VIP权限:lv<$CREDITPOINT>   杀怪爆率倍数:<$KILLMONBURSTRATE>   经验倍数:<$KILLMONEXPRATE>\
<Img:83:7:45:20/@每日奖励><Img:84:7:76:20/@前往会员之家> \
<PlayImg:20:2370:1:850:15:72:0> <Img:925:5:301:118|22#加入条件:1000元宝^22#注:^250#点击按钮加入^250#也可用VIP证明加入/@加入>\  \
<PlayImg:20:2371:1:850:15:122:0> <Img:924:5:301:167|22#晋升条件:3600元宝.人物等级40^^250#点击按钮晋升/@升2>\  \
<PlayImg:20:2372:1:850:15:172:0> <Img:924:5:302:217|22#晋升条件:5600元宝.人物等级45^^250#点击按钮晋升/@升3>  
<Img:926:5:58:255/@下页> \   \  
<>    <VIP1:>杀<人>爆率加成:2%   杀怪经验加成:20%,开启随身泡点.每1秒3000经验      \
<>         <会员泡点:/SCOLOR=251><每秒泡点+8000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x1 聚灵珠x1 <开启快捷回收>\ \ \

<>    <VIP2:>杀<人>爆率加成:4%   杀怪经验加成:30%，随身泡点每1秒增加3500经验 \
<>         <会员泡点:/SCOLOR=251><每秒泡点+11000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x2 聚灵珠x2 <开启远程仓库>\ \ \

<>    <VIP3:>杀<人>爆率加成:6%   杀怪经验加成:50%，随身泡点每1秒增加4000经验  \
<>         <会员泡点:/SCOLOR=251><每秒泡点+14000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x3 聚灵珠x3 \ \ \

#ACT
OPENMERCHANTBIGDLG 5 920 1 0 10 20 0 105 1 0
#ELSEACT
goto @前三
break




[@下页]
#say
<>   <VIP><Img:921:5:388:-9/@exit>你当前VIP权限:lv<$CREDITPOINT>   杀怪爆率倍数:<$KILLMONBURSTRATE>   经验倍数:<$KILLMONEXPRATE>\

<PlayImg:20:2373:1:850:15:6:0> <Img:924:5:302:53|22#晋升条件:元宝7600.人物等级50^250#点击按钮晋升/@升4>   
<PlayImg:20:2374:1:850:-110:88:0> <Img:924:5:176:134|22#晋升条件:元宝9600.人物等级50^250#点击按钮晋升/@升5>  
<PlayImg:20:2375:1:850:-235:170:0> <Img:924:5:51:215|22#晋升条件:元宝11600.人物等级55^250#点击按钮晋升/@升6>
<PlayImg:20:2376:1:850:-360:252:0> <Img:924:5:-73:297|22#晋升条件:元宝13600.人物等级60^250#点击按钮晋升/@升7>  \
<Img:927:5:183:319/@main> \

<>    <VIP4:>杀<人>爆率加成:8%  杀怪经验加成:50%，随身泡点每1秒增加4500经验   \
<>         <会员泡点:/SCOLOR=251><每秒泡点+17000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x4 聚灵珠x4  \ \ \

<>    <VIP5:>杀<人>爆率加成:10%  杀怪经验加成:50%，随身泡点每1秒增加5000经验   \
<>         <会员泡点:/SCOLOR=251><每秒泡点+20000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x5 聚灵珠x5  \ \ \

<>    <VIP6:>杀<人>爆率加成:12%  杀怪经验加成:50%，随身泡点每1秒增加5500经验  \
<>         <会员泡点:/SCOLOR=251><每秒泡点+25000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x6 聚灵珠x6 \ \ \

<>    <VIP7:>杀<人>爆率加成:15% 杀怪经验加成:100%，随身泡点每1秒增加6000经验   \
<>         <会员泡点:/SCOLOR=251><每秒泡点+30000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x7 聚灵珠x7,15分钟自动特修装备 \ \ \

#ACT
OPENMERCHANTBIGDLG 5 920 1 0 10 20 0 105 1 0

[@前三]

<>   <VIP><Img:921:5:388:-9/@exit>你当前VIP权限:lv<$CREDITPOINT>   杀怪爆率倍数:<$KILLMONBURSTRATE>   经验倍数:<$KILLMONEXPRATE>\
<Img:83:7:45:20/@每日奖励><Img:84:7:76:20/@前往会员之家> \
<PlayImg:20:2370:1:850:15:72:0> <Img:925:5:301:118|22#加入条件:1000元宝^22#注:^250#点击按钮加入^250#也可用VIP证明加入/@加入>\  \
<PlayImg:20:2371:1:850:15:122:0> <Img:924:5:301:167|22#晋升条件:3600元宝.人物等级40^^250#点击按钮晋升/@升2>\  \
<PlayImg:20:2372:1:850:15:172:0> <Img:924:5:302:217|22#晋升条件:5600元宝.人物等级45^^250#点击按钮晋升/@升3>  
\   \  
<>    <VIP1:>杀<人>爆率加成:2%   杀怪经验加成:20%,开启随身泡点.每1秒3000经验      \
<>         <会员泡点:/SCOLOR=251><每秒泡点+8000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x1 聚灵珠x1 <开启快捷回收>\ \ \

<>    <VIP2:>杀<人>爆率加成:4%   杀怪经验加成:30%，随身泡点每1秒增加3500经验 \
<>         <会员泡点:/SCOLOR=251><每秒泡点+11000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x2 聚灵珠x2 <开启远程仓库>\ \ \

<>    <VIP3:>杀<人>爆率加成:6%   杀怪经验加成:50%，随身泡点每1秒增加4000经验  \
<>         <会员泡点:/SCOLOR=251><每秒泡点+14000经验/SCOLOR=242>\
<>         <每日奖励:/SCOLOR=251>超级历练药水x3 聚灵珠x3 \ \ \

#ACT
OPENMERCHANTBIGDLG 5 920 1 0 10 20 0 105 1 0
#ELSEACT
goto @前三
break





[@加入]
#If
CHECKCREDITPOINT > 0
#ACT
messagebox 你已经是VIP会员了无需重复加入
BREAK

#if
CHECKGAMEGOLD > 999
#ACT
GAMEGOLD - 1000
CREDITPOINT = 1
CONFERTITLE VIP徽章LV1
SENDMOVEMSG  0 0 70 540 1 -〖%s〗在VIP服务员处加入了VIP.
KILLMONEXPRATE 120 36000
KILLMONBURSTRATE 20140220 20140221 110 20140223 20140224 20140225 20140226 36000 20140227 20140228
goto @main
#elseact
MESSAGEBOX 需要1000元宝


[@升2]
#If
CHECKCREDITPOINT > 1
#ACT
messagebox 你已经晋升过了...你当前VIP等级为:lv<$CREDITPOINT>
BREAK

#If
CHECKCREDITPOINT < 1
#ACT
messagebox 你还没有加入本服VIP···请先加入后再晋升
BREAK


#If
CHECKLEVELEX > 39
NOT checknamelist ..\QuestDiary\数据文件\VIP每日奖励.txt
#ACT
MESSAGEBOX 请先领取VIP1的每日奖励在升级.不然就浪费了
break


#if
CHECKLEVELEX > 39
CHECKGAMEGOLD > 3599
#ACT
GAMEGOLD - 3600
CREDITPOINT = 2
DEPRIVETITLE VIP徽章LV1
CONFERTITLE VIP徽章LV2
SENDMOVEMSG  0 0 70 540 1 VIP玩家〖%s〗晋升为VIP2
DELNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
MESSAGEBOX 你在VIP会员中的权限晋升为LV2\\你可以重新领取今日会员福利了
KILLMONEXPRATE 130 36000
KILLMONBURSTRATE 20140220 20140221 115 20140223 20140224 20140225 20140226 36000 20140227 20140228
goto @main
#elseact
MESSAGEBOX 元宝不足200或者人物等级不足40级


[@升3]
#If
CHECKCREDITPOINT > 2
#ACT
messagebox 你已经晋升过了...你当前VIP等级为:lv<$CREDITPOINT>
BREAK

#If
CHECKCREDITPOINT < 2
#ACT
messagebox 请先晋升VIP2才可以晋升VIP3
BREAK


#If
CHECKLEVELEX > 44
NOT checknamelist ..\QuestDiary\数据文件\VIP每日奖励.txt
#ACT
MESSAGEBOX 请先领取VIP2的每日奖励在升级.不然就浪费了
break

#if
CHECKLEVELEX > 44
CHECKGAMEGOLD > 5599
#ACT
GAMEGOLD - 5600
CREDITPOINT = 3
DEPRIVETITLE VIP徽章LV2
CONFERTITLE VIP徽章LV3
SENDMOVEMSG  0 0 70 540 1 会员玩家〖%s〗晋升为VIP3
DELNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
MESSAGEBOX 你在VIP会员中的权限晋升为LV3\\你可以重新领取今日会员福利了
KILLMONEXPRATE 150 36000
KILLMONBURSTRATE 20140220 20140221 120 20140223 20140224 20140225 20140226 36000 20140227 20140228
goto @main
#elseact
MESSAGEBOX 元宝不足5600或人物等级不足45级


[@升4]
#If
CHECKCREDITPOINT > 3
#ACT
messagebox 你已经晋升过了...你当前VIP等级为:lv<$CREDITPOINT>
BREAK

#If
CHECKCREDITPOINT < 3
#ACT
messagebox 请先晋升VIP3才可以晋升VIP4
BREAK

#If
CHECKLEVELEX > 49
NOT checknamelist ..\QuestDiary\数据文件\VIP每日奖励.txt
#ACT
MESSAGEBOX 请先领取VIP3的每日奖励在升级.不然就浪费了
break



#if
CHECKLEVELEX > 49
CHECKGAMEGOLD > 7599
#ACT
GAMEGOLD - 7600
CREDITPOINT = 4
DEPRIVETITLE VIP徽章LV3
CONFERTITLE VIP徽章LV4
SENDMOVEMSG  0 0 70 540 1 会员玩家〖%s〗晋升为VIP4
DELNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
MESSAGEBOX 你在VIP会员中的权限晋升为LV4\\你可以重新领取今日会员福利了
KILLMONEXPRATE 150 36000
KILLMONBURSTRATE 20140220 20140221 130 20140223 20140224 20140225 20140226 36000 20140227 20140228
goto @下页
#elseact
MESSAGEBOX 元宝不足7600或人物等级不足50级


[@升5]
#If
CHECKCREDITPOINT > 4
#ACT
messagebox 你已经晋升过了...你当前VIP等级为:lv<$CREDITPOINT>
BREAK

#If
CHECKCREDITPOINT < 4
#ACT
messagebox 请先晋升VIP4才可以晋升VIP5
BREAK

#If
CHECKLEVELEX > 46
NOT checknamelist ..\QuestDiary\数据文件\VIP每日奖励.txt
#ACT
MESSAGEBOX 请先领取VIP4的每日奖励在升级.不然就浪费了
break


#if
CHECKLEVELEX > 46
CHECKGAMEGOLD > 9599
#ACT
GAMEGOLD - 9600
CREDITPOINT = 5
DEPRIVETITLE VIP徽章LV4
CONFERTITLE VIP徽章LV5
SENDMOVEMSG  0 0 70 540 1 会员玩家〖%s〗晋升为VIP5
DELNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
MESSAGEBOX 你在VIP会员中的权限晋升为LV5\\你可以重新领取今日会员福利了
KILLMONEXPRATE 150 36000
KILLMONBURSTRATE 20140220 20140221 140 20140223 20140224 20140225 20140226 36000 20140227 20140228
goto @下页
#elseact
MESSAGEBOX 元宝不足9600或等级不足等级50



[@升6]
#If
CHECKCREDITPOINT > 5
#ACT
messagebox 你已经晋升过了...你当前VIP等级为:lv<$CREDITPOINT>
BREAK

#If
CHECKCREDITPOINT < 5
#ACT
messagebox 请先晋升VIP5才可以晋升VIP6
BREAK

#If
CHECKLEVELEX > 48
NOT checknamelist ..\QuestDiary\数据文件\VIP每日奖励.txt
#ACT
MESSAGEBOX 请先领取VIP5的每日奖励在升级.不然就浪费了
break

#if
CHECKLEVELEX > 54
CHECKGAMEGOLD > 11599
#ACT
GAMEGOLD - 11600
CREDITPOINT = 6
DEPRIVETITLE VIP徽章LV5
CONFERTITLE VIP徽章LV6
SENDMOVEMSG  0 0 70 540 1 会员玩家〖%s〗晋升为VIP6
DELNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
MESSAGEBOX 你在VIP会员中的权限晋升为LV6\\你可以重新领取今日会员福利了
KILLMONEXPRATE 150 36000
KILLMONBURSTRATE 20140220 20140221 170 20140223 20140224 20140225 20140226 36000 20140227 20140228
goto @下页
#elseact
MESSAGEBOX 需要元宝11600等级55




[@升7]
#If
CHECKCREDITPOINT > 6
#ACT
messagebox 你已经晋升过了...你当前VIP等级为:lv<$CREDITPOINT>
BREAK

#If
CHECKCREDITPOINT < 6
#ACT
messagebox 请先晋升VIP6才可以晋升VIP7
BREAK

#If
CHECKLEVELEX > 59
NOT checknamelist ..\QuestDiary\数据文件\VIP每日奖励.txt
#ACT
MESSAGEBOX 请先领取VIP6的每日奖励在升级.不然就浪费了
break


#if
CHECKLEVELEX > 50
CHECKGAMEGOLD > 13599
#ACT
GAMEGOLD - 13600
CREDITPOINT = 7
DEPRIVETITLE VIP徽章LV6
CONFERTITLE VIP徽章LV7
SENDMOVEMSG  0 0 70 540 1 会员玩家〖%s〗晋升为VIP7
DELNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
MESSAGEBOX 你在VIP会员中的权限晋升为LV7\\你可以重新领取今日会员福利了
KILLMONEXPRATE 200 36000
KILLMONBURSTRATE 20140220 20140221 150 20140223 20140224 20140225 20140226 36000 20140227 20140228
goto @下页
#elseact
MESSAGEBOX 需要元宝13600等级60













[@每日奖励]
#If
CHECKCREDITPOINT = 0
#ACT
MESSAGEBOX 你没有资格
break


#If
checknamelist ..\QuestDiary\数据文件\VIP每日奖励.txt
#ACT
MESSAGEBOX 你今天已经领取过了
break

#If
CHECKCREDITPOINT = 1
#ACT
goto @lv1
break

#If
CHECKCREDITPOINT = 2
#ACT
goto @lv2
break

#If
CHECKCREDITPOINT = 3
#ACT
goto @lv3
break

#If
CHECKCREDITPOINT = 4
#ACT
goto @lv4
break

#If
CHECKCREDITPOINT = 5
#ACT
goto @lv5
break

#If
CHECKCREDITPOINT = 6
#ACT
goto @lv6
break

#If
CHECKCREDITPOINT = 7
#ACT
goto @lv7
break



[@LV1]
#If
CHECKBAGSIZE 5
#ACT
GiveStateItem 超级历练药水 1 1 0 0 1 1 0 1
GiveStateItem 超级聚灵珠 0 1 0 0 1 1 1 1
give  HP药水兑换卡 10
give  MP药水兑换卡 10
give  超级药水兑换卡 10
GAMEGIRD  + 30
ADDNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
SENDMSG 0 玩家〖%s〗领取了今日VIP-LV1福利
MESSAGEBOX 领取成功\\你领取了今日VIP-LV1福利
#ELSEACT
MESSAGEBOX 背包空格不足5

[@LV2]
#If
CHECKBAGSIZE 7
#ACT
GiveStateItem 超级历练药水 1 1 0 0 1 1 0 2
GiveStateItem 超级聚灵珠 0 1 0 0 1 1 1 2
give  HP药水兑换卡 20
give  MP药水兑换卡 20
give  超级药水兑换卡 20
GAMEGIRD  + 50
ADDNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
SENDMSG 0 玩家〖%s〗领取了今日VIP-LV2福利
MESSAGEBOX 领取成功\\你领取了今日VIP-LV2福利
#ELSEACT
MESSAGEBOX 背包空格不足7

[@LV3]
#If
CHECKBAGSIZE 10
#ACT
GiveStateItem 超级历练药水 1 1 0 0 1 1 0 3
GiveStateItem 超级聚灵珠 0 1 0 0 1 1 1 3
give  HP药水兑换卡  30
give  MP药水兑换卡  30
give  超级药水兑换卡 30
GAMEGIRD  + 100
ADDNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
SENDMSG 0 玩家〖%s〗领取了今日VIP-LV3福利
MESSAGEBOX 领取成功\\你领取了今日VIP-LV3福利
#ELSEACT
MESSAGEBOX 背包空格不足10

[@LV4]
#If
CHECKBAGSIZE 12
#ACT
GiveStateItem 超级历练药水 1 1 0 0 1 1 0 4
GiveStateItem 超级聚灵珠 0 1 0 0 1 1 1 4
give  HP药水兑换卡 40
give  MP药水兑换卡  40
give  超级药水兑换卡  40
GAMEGIRD  + 150
ADDNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
SENDMSG 0 玩家〖%s〗领取了今日VIP-LV4福利
MESSAGEBOX 领取成功\\你领取了今日VIP-LV4福利
#ELSEACT
MESSAGEBOX 背包空格不足12


[@LV5]
#If
CHECKBAGSIZE 14
#ACT
GiveStateItem 超级历练药水 1 1 0 0 1 1 0 5
GiveStateItem 超级聚灵珠 0 1 0 0 1 1 1 5
give  HP药水兑换卡 50
give  MP药水兑换卡 50
give  超级药水兑换卡 50
GAMEGIRD  + 200
ADDNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
SENDMSG 0 玩家〖%s〗领取了今日VIP-LV5福利
MESSAGEBOX 领取成功\\你领取了今日VIP-LV5福利
#ELSEACT
MESSAGEBOX 背包空格不足14

[@LV6]
#If
CHECKBAGSIZE 16
#ACT
GiveStateItem 超级历练药水 1 1 0 0 1 1 0 6
GiveStateItem 超级聚灵珠 0 1 0 0 1 1 1 6
give  HP药水兑换卡 50
give  MP药水兑换卡 50
give  超级药水兑换卡 50
GAMEGIRD  + 300
ADDNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
SENDMSG 0 玩家〖%s〗领取了今日VIP-LV6福利
MESSAGEBOX 领取成功\\你领取了今日VIP-LV6福利
#ELSEACT
MESSAGEBOX 背包空格不足16



[@LV7]
#If
CHECKBAGSIZE 17
#ACT
GiveStateItem 超级历练药水 1 1 0 0 1 1 0 7
GiveStateItem 超级聚灵珠 0 1 0 0 1 1 1 7
give HP药水兑换卡 50
give MP药水兑换卡 50
give 超级药水兑换卡 50
GAMEGIRD  + 500
ADDNAMELIST ..\QuestDiary\数据文件\VIP每日奖励.txt
SENDMSG 0 玩家〖%s〗领取了今日VIP-LV7福利
MESSAGEBOX 领取成功\\你领取了今日VIP-LV7福利
#ELSEACT
MESSAGEBOX 背包空格不足18

淡定，淡定，淡定……

太生气了，无法HOLD啦 >_<......

真是难得给力的帖子啊。

淡定，淡定，淡定……

感恩无私的分享与奉献 :)

无回帖，不论坛，这才是人道。

强烈支持楼主ing……

无回帖，不论坛，这才是人道。

无回帖，不论坛，这才是人道。