antyvfl 发表于 2022-10-9 00:48:10

传世分阶领会员是如何添加到服务端的

[@main]

<一星传世主宰者领取四大令牌-免费领取/@领取四大令牌> 无等级限制，完全免费！\
<color=green 等级达到65级   >+ 领取金牌会员奖励！<领取金牌会员/@领取金牌会员a>\\
<color=green 等级达到天人50重 >+ 领取主宰五期奖励！<领取主宰五期/@领取主宰五期a>\\
<color=green 等级达到天仙50重 >+ 领取尊贵会员奖励！<领取尊贵会员/@领取尊贵会员a>\\
<color=green 等级达到上仙 1重 >+ 领取主宰六期奖励！<领取主宰六期/@领取主宰六期a>\


[@领取四大令牌]
#if
;checkVAR HUMAN 本体主宰星 > 0
#act
give 主宰六期令牌 1
give 尊贵会员令牌 1
give 主宰五期令牌 1
give 金牌会员令牌 1
#elseact
messagebox 您还不是主宰者吧？？？
break

[@GM签到五倍凭证]
#if
CHECKGAMEGOLD \ 150000
#act
GAMEGOLD - 150000
give 签到五倍凭证 1
#elseact
messagebox 元宝不足，购买失败!
break

[@GM签到两倍凭证]
#if
CHECKGAMEGOLD \ 50000
#act
GAMEGOLD - 50000
give 签到两倍凭证 1
#elseact
messagebox 元宝不足，购买失败!
break



[@领取主宰六期a]
等级达到上仙 1重均可领取主宰六期奖励！<领取主宰六期/@领取主宰六期>\\
<color=green 主宰六期每日福利：>\
<每日元宝500000个/@主宰六期元宝>\
<每日领取仙官材料500套/@主宰六期抽御龙>\\
<返回/@main>\


[@领取主宰六期]
#if
checkitem 主宰六期令牌 1
#act
messagebox 奖励只能领取一次！
break
#elseact
goto @领取主宰六期aaa
break

[@领取主宰六期aaa]
#IF
LARGE $AmbitKind 6
#ACT
goto @领取主宰六期ddd
#elseact
messagebox 以你目前的能力还不足以领取该奖励！
break


[@领取主宰六期ddd]
#if
#act
give 主宰六期令牌 1
sendmsg 14 恭喜<%S>以上仙1重的能力领取奖励-主宰六期令牌！凭此令牌，<%S>又可多去6个打宝地图寻宝咯！
BREAK
#say
恭喜您以上仙1重的能力领取奖励-主宰六期令牌！\
凭此令牌，您又可多去6个打宝地图寻宝咯！\

[@主宰六期抽御龙]
#IF
LARGE $AmbitKind 6
#elseact
take 主宰六期令牌 1
messagebox 以你目前的能力还不足以领取该奖励！
break
#if
checknamelist ..\QuestDiary\数据文件\主宰六期抽御龙.txt
#act
messagebox 奖励每日只能领取一次！
break
#if
checkitem 主宰六期令牌 1
#act
give 仙元石(大) 1
UPGRADEUSERITEM $PARAM(10) 20 = 500
give 仙命石 1
UPGRADEUSERITEM $PARAM(10) 20 = 500
give 仙锐石 1
UPGRADEUSERITEM $PARAM(10) 20 = 500
give 仙甲石 1
UPGRADEUSERITEM $PARAM(10) 20 = 500
give 碧落星空(大) 1
UPGRADEUSERITEM $PARAM(10) 20 = 500
addnamelist ..\QuestDiary\数据文件\主宰六期抽御龙.txt
sendmsg 14 恭喜<%S>领取【主宰六期领取仙官材料】奖励！
MESSAGEBOX 恭喜领取【主宰六期领取仙官材料】奖励！
break
[@主宰六期元宝]
#IF
LARGE $AmbitKind 6
#elseact
take 主宰六期令牌 1
messagebox 以你目前的能力还不足以领取该奖励！
break
#if
checknamelist ..\QuestDiary\数据文件\主宰六期元宝.txt
#act
messagebox 奖励每日只能领取一次！
break
#if
checkitem 主宰六期令牌 1
#act
GAMEGOLD + 500000
addnamelist ..\QuestDiary\数据文件\主宰六期元宝.txt
sendmsg 14 恭喜<%S>领取【主宰六期每日元宝50w个】奖励！
MESSAGEBOX 恭喜领取【主宰六期每日元宝50w个】奖励！
break



[@领取尊贵会员a]
等级达到天仙50重均可领取主宰五期奖励！<领取尊贵会员/@领取尊贵会员>\\
<返回/@main>\


[@领取尊贵会员]
#if
checkitem 尊贵会员令牌 1
#act
messagebox 奖励只能领取一次！
break
#elseact
goto @领取尊贵会员aaa
break

[@领取尊贵会员aaa]
#IF
SMALL $AmbitKind 5
#ACT
messagebox 以你目前的能力还不足以领取该奖励！
break
#IF
SMALL $AmbitLevel 50
#ACT
messagebox 以你目前的能力还不足以领取该奖励！
break
#IF
#act
give 尊贵会员令牌 1
sendmsg 14 恭喜<%S>以天仙50重的能力领取奖励-尊贵会员令牌！凭此令牌，<%S>又可多去6个打宝地图寻宝咯！
BREAK
#say
恭喜您以天仙50重的能力领取奖励-尊贵会员令牌！\
凭此令牌，您又可多去6个打宝地图寻宝咯！\

[@尊贵会员抽盘古]
#IF
SMALL $AmbitKind 5
#ACT
take 尊贵会员令牌 1
messagebox 以你目前的能力还不足以领取该奖励！
break
#if
checknamelist ..\QuestDiary\数据文件\尊贵会员抽盘古.txt
#act
messagebox 奖励每日只能领取一次！
break
#if
checkitem 尊贵会员令牌 1
#act
give 仙元石(大) 1
UPGRADEUSERITEM $PARAM(10) 20 = 300
give 仙命石 1
UPGRADEUSERITEM $PARAM(10) 20 = 300
give 仙锐石 1
UPGRADEUSERITEM $PARAM(10) 20 = 300
give 仙甲石 1
UPGRADEUSERITEM $PARAM(10) 20 = 300
give 碧落星空(大) 1
UPGRADEUSERITEM $PARAM(10) 20 = 300
addnamelist ..\QuestDiary\数据文件\尊贵会员抽盘古.txt
sendmsg 14 恭喜<%S>领取【尊贵会员领取仙官材料】奖励！
MESSAGEBOX 恭喜领取【尊贵会员领取仙官材料】奖励！
break

[@尊贵会员元宝]
#IF
SMALL $AmbitKind 5
#ACT
take 尊贵会员令牌 1
messagebox 以你目前的能力还不足以领取该奖励！
break
#if
checknamelist ..\QuestDiary\数据文件\尊贵会员元宝.txt
#act
messagebox 奖励每日只能领取一次！
break
#if
checkitem 尊贵会员令牌 1
#act
GAMEGOLD + 400000
addnamelist ..\QuestDiary\数据文件\尊贵会员元宝.txt
sendmsg 14 恭喜<%S>领取【尊贵会员每日元宝400000个】奖励！
MESSAGEBOX 恭喜领取【尊贵会员每日元宝400000个】奖励！
break



[@领取主宰五期a]
等级达到天人50重均可领取主宰五期奖励！<领取主宰五期/@领取主宰五期>\\
<返回/@main>\


[@领取主宰五期]
#if
checkitem 主宰五期令牌 1
#act
messagebox 奖励只能领取一次！
break
#elseact
goto @领取主宰五期aaa
break

[@领取主宰五期aaa]
#IF
SMALL $AmbitLevel 50
#ACT
messagebox 以你目前的能力还不足以领取该奖励！
break
#elseact
goto @领取主宰五期ddd
break

[@领取主宰五期ddd]
#if
#act
give 主宰五期令牌 1
sendmsg 14 恭喜<%S>以天人50重的能力领取奖励-主宰五期令牌！凭此令牌，<%S>又可多去6个打宝地图寻宝咯！
BREAK
#say
恭喜您以天人50重的能力领取奖励-主宰五期令牌！\
凭此令牌，您又可多去6个打宝地图寻宝咯！\

[@主宰五期抽龙魂]
#if
checknamelist ..\QuestDiary\数据文件\主宰五期抽龙魂.txt
#act
messagebox 奖励每日只能领取一次！
break
#if
checkitem 主宰五期令牌 1
#act
give 仙元石(大) 1
UPGRADEUSERITEM $PARAM(10) 20 = 100
give 仙命石 1
UPGRADEUSERITEM $PARAM(10) 20 = 100
give 仙锐石 1
UPGRADEUSERITEM $PARAM(10) 20 = 100
give 仙甲石 1
UPGRADEUSERITEM $PARAM(10) 20 = 100
give 碧落星空(大) 1
UPGRADEUSERITEM $PARAM(10) 20 = 100
addnamelist ..\QuestDiary\数据文件\主宰五期抽龙魂.txt
sendmsg 14 恭喜<%S>领取【主宰五期领取仙官材料】奖励！
MESSAGEBOX 恭喜领取【主宰五期领取仙官材料】奖励！
break

[@主宰五期元宝]
#if
checknamelist ..\QuestDiary\数据文件\主宰五期元宝.txt
#act
messagebox 奖励每日只能领取一次！
break
#if
checkitem 主宰五期令牌 1
#act
GAMEGOLD + 100000
GAMEGOLD + 100000
addnamelist ..\QuestDiary\数据文件\主宰五期元宝.txt
sendmsg 14 恭喜<%S>领取【主宰五期每日元宝100000个】奖励！
MESSAGEBOX 恭喜领取【主宰五期每日元宝100000个】奖励！
break

[@领取金牌会员a]
等级达到65级均可领取金牌会员奖励！<领取金牌会员/@领取金牌会员>\\
<返回/@main>\


[@金牌会员抽战魂]
#if
checknamelist ..\QuestDiary\数据文件\金牌会员抽战魂.txt
#act
messagebox 奖励每日只能领取一次！
break
#if
checkitem 金牌会员令牌 1
#act
give 仙元石(大) 1
UPGRADEUSERITEM $PARAM(10) 20 = 20
give 仙命石 1
UPGRADEUSERITEM $PARAM(10) 20 = 20
give 仙锐石 1
UPGRADEUSERITEM $PARAM(10) 20 = 20
give 仙甲石 1
UPGRADEUSERITEM $PARAM(10) 20 = 20
give 碧落星空(大) 1
UPGRADEUSERITEM $PARAM(10) 20 = 20
addnamelist ..\QuestDiary\数据文件\金牌会员抽战魂.txt
sendmsg 14 恭喜<%S>领取【金牌会员领取仙官材料】奖励！
MESSAGEBOX 恭喜领取【金牌会员领取仙官材料】奖励！
break

[@金牌会员元宝]
#if
checknamelist ..\QuestDiary\数据文件\金牌会员元宝.txt
#act
messagebox 奖励每日只能领取一次！
break
#if
checkitem 金牌会员令牌 1
#act
GAMEGOLD + 5000
GAMEGOLD + 5000
addnamelist ..\QuestDiary\数据文件\金牌会员元宝.txt
sendmsg 14 恭喜<%S>领取【金牌会员每日元宝5000个】奖励！
MESSAGEBOX 恭喜领取【金牌会员每日元宝5000个】奖励！
break


[@领取金牌会员]
#if
checkitem 金牌会员令牌 1
#act
messagebox 奖励只能领取一次！
break
#if
checklevelex > 64
#act
give 金牌会员令牌 1
sendmsg 14 恭喜<%S>以65级的能力领取奖励-金牌会员令牌！凭此令牌，<%S>又可多去6个打宝地图寻宝咯！
BREAK
#say
恭喜您以65级的能力领取奖励-金牌会员令牌！\
凭此令牌，您又可多去6个打宝地图寻宝咯！\

#ELSEACT
break
#ELSESAY
您的等级好像还不够65级呀！\
再接再厉吧！\


ade004 发表于 2022-10-9 05:02:29

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

sss1354 发表于 2022-10-11 23:50:33

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

q774505813 发表于 2022-10-14 01:13:59

看到这帖子真是高兴！

wjx003006 发表于 2022-10-18 14:16:00

真是难得给力的帖子啊。

happy5210 发表于 2022-10-21 07:57:11

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

websky20110101 发表于 2022-10-23 00:13:59

真是难得给力的帖子啊。

122025848 发表于 2022-10-27 04:19:59

楼主加油，我们都看好你哦。

ggjute 发表于 2022-10-30 20:22:05

真是被感动的痛哭流涕……

tt8bj 发表于 2022-10-31 02:38:17

强烈支持楼主ing……
页: [1] 2
查看完整版本: 传世分阶领会员是如何添加到服务端的