|
来找我吧！
#ELSEACT
AddTextList <$STR(N81)> ..\QuestDiary\游戏功能\灵符解封\可领取内功经验\<$USERNAME>.txt
sendmsg 0 <$USERNAME>，在酒馆灵符解封师处开始解封<$STR(S80)>，请玛法的勇士们为<$USERNAME>祝福，祝<$USERNAME>成功！
BREAK
#ELSESAY
你现在申请使用灵符解封：<$STR(S80)>，请等待5分钟后再\
来找我吧！
[@确定普通解封1]
#IF
checknamelist ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
#ACT
MESSAGEBOX 正在为您解封，请耐心等待结果......
BREAK
#IF
CHECKLISTTEXT ..\QuestDiary\游戏功能\灵符解封\已解封物品\<$USERNAME>.txt <$STR(S80)>
#ACT
BREAK
#SAY
你已经解封过<$STR(S80)>了......
#IF
CHECKVAR HUMAN 时效灵符 > <$STR(N82)>
#ACT
CALCVAR HUMAN 时效灵符 - <$STR(N82)>
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
GOTO @确定普通解封11
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\可领经验名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#IF
CHECKVAR HUMAN 时效灵符 = <$STR(N82)>
#ACT
CALCVAR HUMAN 时效灵符 - <$STR(N82)>
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
GOTO @确定普通解封11
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\可领经验名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#IF
CHECKGAMEGIRD > <$STR(N82)>
#ACT
AddTextList <$USERNAME> ..\QuestDiary\游戏任务\不增加灵符名单.txt
GAMEGIRD - <$STR(N82)>
GOTO @确定普通解封11
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\可领经验名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#ELSEACT
BREAK
#ELSESAY
对不起，你的灵符或时效灵符数量不足，不能进行解封！
[@确定普通解封11]
#IF
random 5
#ACT
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\成功.txt
AddTextList <$STR(S80)> ..\QuestDiary\游戏功能\灵符解封\可领取物品\<$USERNAME>.txt
AddTextList <$STR(N81)> ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
AddTextList <$STR(S80)> ..\QuestDiary\游戏功能\灵符解封\已解封物品\<$USERNAME>.txt
sendmsg 0 <$USERNAME>，在酒馆灵符解封师处开始解封<$STR(S80)>，请玛法的勇士们为<$USERNAME>祝福，祝<$USERNAME>成功！
BREAK
#SAY
你现在申请使用灵符解封：<$STR(S80)>，请等待5分钟后再\
来找我吧！
#IF
random 2
#ACT
AddTextList <$STR(N81)> ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
sendmsg 0 <$USERNAME>，在酒馆灵符解封师处开始解封<$STR(S80)>，请玛法的勇士们为<$USERNAME>祝福，祝<$USERNAME>成功！
BREAK
#SAY
你现在申请使用灵符解封：<$STR(S80)>，请等待5分钟后再\
来找我吧！
#ELSEACT
AddTextList <$STR(N81)> ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
sendmsg 0 <$USERNAME>，在酒馆灵符解封师处开始解封<$STR(S80)>，请玛法的勇士们为<$USERNAME>祝福，祝<$USERNAME>成功！
BREAK
#ELSESAY
你现在申请使用灵符解封：<$STR(S80)>，请等待5分钟后再\
来找我吧！
[@InPutInteger2]
#IF
CHECKLISTTEXT ..\QuestDiary\游戏功能\灵符解封\解封内功名单.txt <$USERNAME>
#ACT
BREAK
#SAY
今日已修炼过内功经验了，请明日再来！
#IF
LARGE N2 0
SMALL N2 10000
#ACT
#ELSEACT
BREAK
#ELSESAY
输入的用于锻造经验的灵符申请范围在1~9999张之间\
#IF
CHECKVAR HUMAN 时效灵符 > <$STR(N2)>
#ACT
CALCVAR HUMAN 时效灵符 - <$STR(N2)>
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏任务\不增加灵符名单.txt
MOV N3
MUL N3 100000 N2
MOV N82 N2
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封内功名单.txt
AddTextList <$STR(N3)> ..\QuestDiary\游戏功能\灵符解封\可领取内功经验\<$USERNAME>.txt
sendmsg 5 您成功申请解封<$STR(N3)>内功经验！请5分钟后再来领取！
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#SAY
您成功申请解封<$STR(N3)>内功经验！请5分钟后再来领取！
#IF
CHECKVAR HUMAN 时效灵符 = <$STR(N2)>
#ACT
CALCVAR HUMAN 时效灵符 - <$STR(N2)>
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏任务\不增加灵符名单.txt
MOV N3
MUL N3 100000 N2
MOV N82 N2
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封内功名单.txt
AddTextList <$STR(N3)> ..\QuestDiary\游戏功能\灵符解封\可领取内功经验\<$USERNAME>.txt
sendmsg 5 您成功申请解封<$STR(N3)>内功经验！请5分钟后再来领取！
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#SAY
您成功申请解封<$STR(N3)>内功经验！请5分钟后再来领取！
#IF
CHECKGAMEGIRD > <$STR(N2)>
#ACT
AddTextList <$USERNAME> ..\QuestDiary\游戏任务\不增加灵符名单.txt
GAMEGIRD - <$STR(N2)>
MOV N3
MUL N3 100000 N2
MOV N82 N2
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封内功名单.txt
AddTextList <$STR(N3)> ..\QuestDiary\游戏功能\灵符解封\可领取内功经验\<$USERNAME>.txt
sendmsg 5 您成功申请解封<$STR(N3)>内功经验！请5分钟后再来领取！
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#SAY
您成功申请解封<$STR(N3)>内功经验！请5分钟后再来领取！
#ELSEACT
BREAK
#ELSESAY
对不起，你的灵符或时效灵符数量不足，不能进行解封！
[@InPutInteger1]
#IF
CHECKLISTTEXT ..\QuestDiary\游戏功能\灵符解封\解封经验名单.txt <$USERNAME>
#ACT
BREAK
#SAY
今日已修炼过经验了，请明日再来！
#IF
LARGE N1 0
SMALL N1 100
#ACT
#ELSEACT
BREAK
#ELSESAY
输入的用于锻造经验的灵符申请范围在1~99张之间\
#IF
CHECKVAR HUMAN 时效灵符 > <$STR(N1)>
#ACT
CALCVAR HUMAN 时效灵符 - <$STR(N1)>
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏任务\不增加灵符名单.txt
MOV N3
MUL N3 100000 N1
MOV N82 N1
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封经验名单.txt
AddTextList <$STR(N3)> ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
sendmsg 5 您成功申请解封<$STR(N3)>经验！请5分钟后再来领取！
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#SAY
您成功申请解封<$STR(N3)>经验！请5分钟后再来领取！
#IF
CHECKVAR HUMAN 时效灵符 = <$STR(N1)>
#ACT
CALCVAR HUMAN 时效灵符 - <$STR(N1)>
SAVEVAR HUMAN 时效灵符 ..\QuestDiary\数据文件\时效灵符.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏任务\不增加灵符名单.txt
MOV N3
MUL N3 100000 N1
MOV N82 N1
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封经验名单.txt
AddTextList <$STR(N3)> ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
sendmsg 5 您成功申请解封<$STR(N3)>经验！请5分钟后再来领取！
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#SAY
您成功申请解封<$STR(N3)>经验！请5分钟后再来领取！
#IF
CHECKGAMEGIRD > <$STR(N1)>
#ACT
AddTextList <$USERNAME> ..\QuestDiary\游戏任务\不增加灵符名单.txt
GAMEGIRD - <$STR(N1)>
MOV N3
MUL N3 100000 N1
MOV N82 N1
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
AddTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封经验名单.txt
AddTextList <$STR(N3)> ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
sendmsg 5 您成功申请解封<$STR(N3)>经验！请5分钟后再来领取！
SENDTIMEMSG 灵符解封时间剩余%s... 300 251 @灵符解封 0
BREAK
#SAY
您成功申请解封<$STR(N3)>经验！请5分钟后再来领取！
#ELSEACT
BREAK
#ELSESAY
对不起，你的灵符或时效灵符数量不足，不能进行解封！
[@领取经验]
#IF
checknamelist ..\QuestDiary\游戏功能\灵符解封\解封经验名单.txt
#ACT
MOV S2
GetRandomName ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt S2
CHANGEEXP + <$STR(S2)>
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封经验名单.txt
CLEARNAMELIST ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
sendmsg 0 <$USERNAME>在盟重灵符解封师(380,310)处使用灵符解封获得经验：<$STR(S2)>!
break
#SAY
你的经验增加<$STR(S2)>！
#IF
checknamelist ..\QuestDiary\游戏功能\灵符解封\可领经验名单.txt
#ACT
GOTO @领取经验1
break
#ELSEACT
break
#ELSESAY
你未在我这申请灵符解封，无法获取奖励！
[@领取经验1]
#IF
CHECKBAGSIZE 2
#ACT
MOV S2
GetRandomName ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt S2
#ELSEACT
break
#ELSESAY
请预留2格以上包裹空间后再来领取奖励！
#IF
checknamelist ..\QuestDiary\游戏功能\灵符解封\成功.txt
#ACT
MOV S1
GetRandomName ..\QuestDiary\游戏功能\灵符解封\可领取物品\<$USERNAME>.txt S1
break
#SAY
解封<$STR(S1)>成功，您是选择获得装备，还是获得经验？\ \
<选择装备/@获得普通装备> <获取经验/@获取普通经验>
#ELSEACT
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\成功.txt
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\可领经验名单.txt
CLEARNAMELIST ..\QuestDiary\游戏功能\灵符解封\可领取物品\<$USERNAME>.txt
CLEARNAMELIST ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
CHANGEEXP + <$STR(S2)>
sendmsg 0 <$USERNAME>在盟重灵符解封师(380,310)处使用灵符解封获得经验：<$STR(S2)>!
break
#ELSESAY
解封失败。\
你的经验增加<$STR(S2)>！
[@获取普通经验]
#ACT
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\成功.txt
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\可领经验名单.txt
CLEARNAMELIST ..\QuestDiary\游戏功能\灵符解封\可领取物品\<$USERNAME>.txt
CLEARNAMELIST ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
CHANGEEXP + <$STR(S2)>
sendmsg 0 恭喜：<$USERNAME>在盟重灵符解封师(380,310)处使用灵符解封获得经验：<$STR(S2)>!
break
#SAY
你选择了放弃装备，获得经验。\
你的经验增加<$STR(S2)>！
[@获得普通装备]
#IF
CHECKBAGSIZE 2
#ACT
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\成功.txt
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\可领经验名单.txt
CLEARNAMELIST ..\QuestDiary\游戏功能\灵符解封\可领取物品\<$USERNAME>.txt
CLEARNAMELIST ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
GIVE <$STR(S1)> 1
sendmsg 0 <$USERNAME>在盟重灵符解封师(380,310)处使用灵符解封获得装备：<$STR(S1)>!
break
#SAY
<$STR(S1)>已经给你，请拿好！
[@领取内功]
#IF
checknamelist ..\QuestDiary\游戏功能\灵符解封\解封内功名单.txt
#ACT
#ACT
MOV S2
GetRandomName ..\QuestDiary\游戏功能\灵符解封\可领取内功经验\<$USERNAME>.txt S2
CHANGEEXP + <$STR(S2)>
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封中名单.txt
DelTextList <$USERNAME> ..\QuestDiary\游戏功能\灵符解封\解封内功名单.txt
CLEARNAMELIST ..\QuestDiary\游戏功能\灵符解封\可领取经验\<$USERNAME>.txt
(责任编辑：找搜服传奇发布网) |
传奇灵魂解符师脚本(9)
时间:2017-05-16 00:11来源:传奇私服 作者:新开传奇网站
来找我吧！ #ELSEACT AddTextList $STR(N81) ..\QuestDiary\游戏功能\灵符解封\可领取内功经验\$USERNAME.txt sendmsg 0 $USERNAME，在酒馆灵符解封师处开始解封$STR(S80)，请玛
------分隔线----------------------------
- 推荐内容
-
- 传奇私服非常好玩，所以避坑攻略
传奇私服的好处可能有以下几个方面： 传奇私服可以让玩家体验...
- 热血传奇这款游戏是用什么语言编
热血传奇这款游戏是一款基于精灵的等距3D大型多人在线角色扮...
- 传奇QQ群新手礼包脚本
[@main] #IF #ACT OPENMERCHANTDLG npctp|37|1|564|382|4|0|0|1|530|80 BREAK #SAY {x=...
- 传奇趣味实物回收脚本
[@main] #if #ACT OPENMERCHANTBIGDLG 50 127 1 0 0 -10 1 491 53 #say ImgEx:50:43:44...
- 玩传奇更要记得让自己勇敢些
人海茫茫相识相知需要莫大的缘分现实如此传奇私服游戏里亦是...
- 自己写的传奇英雄、英雄合击技能
前提：该脚本自己测试，并开服使用！没有任何漏洞！但是还要...
- 传奇私服非常好玩，所以避坑攻略
Copyright © ZhaoSF.info 找搜服-传奇私服发布网 版权所有沪ICP备17017149号-1