隐藏内容
本脚本仅适合铁血、时光、魔魇模式。 [@VIP触发] { [@_VIP_打开界面] #IF EQUAL $Task(14) 1 #ACT UpdateTask 14 2 SENDMSG 5 您正在查看VIP系统! break #IF RANDOM 1 #ACT SENDMSG 5 您正在查看VIP系统! break [@_VIP_充值] #IF CHECKGAMEGOLD < $PARAM(0) #ACT SENDMSG 5 您的元宝不足 break #IF RANDOM 1 #ACT MOV M80 $VIPLEVEL MOV M81 $PARAM(0) GAMEGOLD – $PARAM(0) BINDGAMEGOLD + $PARAM(0) #IF !EQUAL $Table(SG_Pritime).Tim24 $DATE #ACT Table SG_ACTIVE Liv01 + 30 Table SG_ACTIVE Liv02 + 30 Table SG_ACTIVE Liv09 + 1 Table SG_Pritime Tim24 = $DATE SENDMSG 5 今日第1次完成[VIP充值],增加活跃度积分30! HCALL $USERNAME @活跃度奖励 #IF LARGE $VIPLEVEL 9 #ACT SENDMSG 5 新区VIP最高为10级!,您当前是vip#32<$VIPLEVEL>,充值vip元宝数为:<$VIPEXP>,剩余元宝数#32<$GAMEGOLD> break #ELSEACT CHANGEVIPEXP + $STR(M81) SENDMSG 5 充值新区VIP成功!,您当前是vip#32<$VIPLEVEL>,充值vip元宝数为:<$VIPEXP>,剩余元宝数#32<$GAMEGOLD> #IF LARGE $VIPLEVEL $STR(M80) #ACT MOV M80 $VIPLEVEL MULT M80 10 INC M80 200 Table SG_ENERGY RGY06 = $STR(M80) SENDMSG 14 恭喜<$USERNAME>勇士升级为VIP<$VIPLEVEL>,享有尊贵特权,还有绑定元宝天天领,真是羡煞旁人! #IF LARGE $VIPLEVEL 8 #ACT CHANGENAMECOLOR 253 break [@_VIP_扩展包裹] #IF SMALL $BAGSIZE 66 #ACT MESSAGEBOX 大侠,请先将主体包裹扩充完再来 break #IF SMALL $VIPLEVEL 1 #ACT MESSAGEBOX 您不是VIP break #IF CHECKITEM 包裹扩充符 1 #ACT MOV P8 $BAGSIZE INC P8 1 TAKE 包裹扩充符 1 BAGSIZE $STR(P8) SENDMSG 5 恭喜你的VIP包裹扩充成功。 break #ELSEACT MESSAGEBOX 大侠,你没有包裹扩充符 break [@_VIP_扩展仓库] #IF SMALL $VIPLEVEL 1 #ACT MESSAGEBOX 您不是VIP break #IF CHECKITEM 仓库扩充符 1 #ACT TAKE 仓库扩充符 1 StorageSize + 1 SENDMSG 5 恭喜你的VIP仓库扩充成功。 break #ELSEACT MESSAGEBOX 大侠,你没有仓库扩充符 break [@_VIP_升级礼包] #IF SMALL $VIPLEVEL 1 #ACT MESSAGEBOX 您不是VIP无法领取奖励! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 $VIPLEVEL #ACT MESSAGEBOX 您已经领取过奖励! break #IF CHECKBAGSIZE 7 #ACT #ELSEACT MESSAGEBOX 请腾出更多包裹! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 0 #ACT give 强化石 1 1 give 淬炼石 1 1 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 50 TABLE SG_PRIVITE Hum13 = 1 MESSAGEBOX 你成功领取了VIP1升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 1 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 50 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 2 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 2 TABLE SG_PRIVITE Hum13 = 2 MESSAGEBOX 你成功领取了VIP2升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 2 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 100 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 4 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 4 TABLE SG_PRIVITE Hum13 = 3 MESSAGEBOX 你成功领取了VIP3升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 3 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 100 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 6 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 6 TABLE SG_PRIVITE Hum13 = 4 MESSAGEBOX 你成功领取了VIP4升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 4 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 100 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 8 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 8 TABLE SG_PRIVITE Hum13 = 5 MESSAGEBOX 你成功领取了VIP5升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 5 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 100 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 10 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 10 TABLE SG_PRIVITE Hum13 = 6 MESSAGEBOX 你成功领取了VIP6升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 6 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 5 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 100 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 20 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 20 TABLE SG_PRIVITE Hum13 = 7 MESSAGEBOX 你成功领取了VIP7升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 7 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 10 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 10 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 200 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 30 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 30 TABLE SG_PRIVITE Hum13 = 8 MESSAGEBOX 你成功领取了VIP8升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 8 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 10 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 10 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 200 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 50 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 50 TABLE SG_PRIVITE Hum13 = 9 MESSAGEBOX 你成功领取了VIP9升级礼包! break #IF EQUAL $TABLE(SG_PRIVITE).Hum13 9 #ACT give 仓库扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 10 give 包裹扩充符 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 10 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 200 give 强化石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 100 give 淬炼石 1 1 UPGRADEUSERITEM $PARAM(10) 20 = 100 TABLE SG_PRIVITE Hum13 = 10 MESSAGEBOX 你成功领取了VIP10升级礼包! break [@_VIP_每日福利] VIP 每日福利特权\ 只有VIP才可以领取每日福利。\\\\ <领取福利/@handleVIPPrize> <离开/@exit><返回/@main> [@handleVIPPrize] VIP #IF SMALL $VIPLEVEL 1 #SAY 您不是vip玩家 <离开/@exit> #ACT break #IF EQUAL $Table(SG_Pritime).Tim14 $DATE #SAY 您已经领取过今日福利 <离开/@exit> #ACT break #IF CHECKBAGSIZE 3 #ACT MOV M80 $VIPLEVEL MULT M80 2 #ELSEACT MESSAGEBOX 请腾出更多包裹! break #IF LARGE $VIPLEVEL 4 #SAY 领取福利成功! <返回/@exit> #ACT give 超级天山雪莲 2 1 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = $STR(M80) Table SG_Pritime Tim14 = $DATE break #IF LARGE $VIPLEVEL 2 #SAY 领取福利成功! <返回/@exit> #ACT give 超级天山雪莲 1 1 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = $STR(M80) Table SG_Pritime Tim14 = $DATE break #IF RANDOM 1 #SAY 领取福利成功! <返回/@exit> #ACT give 天山雪莲 $VIPLEVEL 1 give 飞行靴 1 1 UPGRADEUSERITEM $PARAM(10) 20 = $STR(M80) Table SG_Pritime Tim14 = $DATE break [@_VIP_神行千里] VIP <color=red 神行千里> \ VIP1-2可以使用初级传送功能 \ VIP3-5可以使用中级传送功能 \ VIP6以上可以使用高级传送功能 \ 每次传送需要消耗1个飞行靴。 \\ <传送地点说明/@ToFly> \ <使用初级传送/@PutongChuansong> \ <使用中级传送/@ZhongjiChuansong> \ <使用高级传送/@GaojiChuansong> \\ <离开/@exit> [@ToFly] VIP <color=orange 初级传送地点:>\ 落霞岛、中州魔法祭祀、中州铁匠铺、中州书店、\ 中州药店、中州首饰店、中州仓库、比武准备场。\ <color=orange 中级传送地点:>\ 将军坟一层入口、将军坟东一层入口、尸王殿、\ 机关洞、蛇魔谷、逆魔古刹、通天塔、禁地、地下魔域。\ <color=orange 高级传送地点:>\ 将军殿、中枢大殿、盘蛇道、八仙纵横、尸上行、\ 逆魔古刹四层、苍茫大厅。\ <返回/@_VIP_神行千里>\ [@GaojiChuansong] VIP #IF SMALL $VIPLEVEL 1 #SAY 您不是vip\ <返回/@_VIP_神行千里> #ACT break #IF LARGE $VIPLEVEL 5 #SAY VIP6级以上可使用以下传送功能\ <将军殿入口/@SendTo&H073&140&153> <中枢大殿入口/@SendTo&M004&24&127>\ <盘蛇道/@SendTo&N004&208&477> <八仙纵横/@SendTo&TT008&166&211>\ <逆魔古刹四层/@SendTo&S018&152&285> <苍茫大厅/@SendTo&AS002&24&118>\ <尸上行入口/@SendTo&J006&45&13> \ 传送功能使用有风险,请谨慎使用!\ <返回/@_VIP_神行千里> #ACT break #ELSESAY \\您不是vip6级以上玩家,无法使用高级传送功能 <返回/@main> #ELSEACT break [@ZhongjiChuansong] VIP #IF SMALL $VIPLEVEL 1 #SAY 您不是vip\ <返回/@_VIP_神行千里> #ACT break #IF LARGE $VIPLEVEL 2 #SAY VIP3-5可使用以下传送功能\ <将军坟一层入口/@SendTo&0&51&181> <逆魔古刹/@SendTo&3&368&716>\ <将军坟东一层入口/@SendTo&0&775&401> <通天塔/@SendTo&5&141&111>\ <尸王殿/@SendTo&T015&63&134> <禁地之门/@SendTo&4&53&187>\ <机关洞/@SendTo&2&218&440> <地下魔域/@SendTo&7&383&54>\ <蛇魔谷/@SendTo&10&60&44>\ 传送功能使用有风险,请谨慎使用!\ <返回/@_VIP_神行千里> #ACT break #ELSESAY \\您不是vip3级以上玩家,无法使用高级传送功能 <返回/@main> #ELSEACT break [@PutongChuansong] VIP #IF SMALL $VIPLEVEL 1 #SAY 您不是vip\ <返回/@_VIP_神行千里> #ACT break #IF LARGE $VIPLEVEL 0 #SAY VIP1-2级可使用以下传送功能\ <落霞岛/@SendTo&1&246&243> <中州药店/@SendTo&0&494&274>\ <中州魔法祭祀/@SendTo&0&426&179> <中州首饰店/@SendTo&0&471&252>\ <中州铁匠铺/@SendTo&0&420&248> <中州仓库/@SendTo&0&374&214>\ <中州书店/@SendTo&SH010&7&13> <比武准备场/@SendTo&SH003&15&28>\ 传送功能使用有风险,请谨慎使用!\ <返回/@_VIP_神行千里> #ACT break [@SendTo] #IF CHECKITEM 飞行靴 1 #ACT MAPMOVE $SCRIPTPARAM(1) $SCRIPTPARAM(2) $SCRIPTPARAM(3) UPGRADEUSERITEM $ITEMMAKEINDEX[飞行靴] 20 – 1 break #ELSEACT SENDMSG 5 缺少传送道具“飞行靴”,无法使用传送功能,请到商城购买。 break } |