本站主推发布:新开传奇发布网,新开传奇,新开传奇发布,176复古传奇,迷失传奇,战神传奇,传奇私服,找搜服,仙剑传奇
当前位置: zhaosf首页 > 开服资料 > 传奇脚本 >

宠物宝宝寄存新玩法脚本

时间:2016-09-12 00:49来源:新开传奇私服 作者:传奇私服发布网
服务端文件:QFunction-0.txt内增加以下脚本: [@KillMonster] #IF random [$宝宝几率] checkjob WARRIOR CHECKTEXTLIST $STR(S0) ../QuestDiary/数据/宝宝怪物.txt checkslavecount [$战士宝宝数量] #act MOBSLAVE $STR(S0) 1 1 #IF random [$宝宝几率] checkjob wizard CHECKTEXTLIST $STR(S0) ../QuestDiary/
服务端文件:QFunction-0.txt内增加以下脚本:
[@KillMonster]
#IF
random [$宝宝几率]
checkjob WARRIOR
CHECKTEXTLIST <$STR(S0)> ../QuestDiary/数据/宝宝怪物.txt
checkslavecount < [$战士宝宝数量]
#act
MOBSLAVE <$STR(S0)> 1 1
#IF
random [$宝宝几率]
checkjob wizard
CHECKTEXTLIST <$STR(S0)> ../QuestDiary/数据/宝宝怪物.txt
checkslavecount < [$法师宝宝数量]
#act
MOBSLAVE <$STR(S0)> 1 1
#IF
random [$宝宝几率]
checkjob taoist
CHECKTEXTLIST <$STR(S0)> ../QuestDiary/数据/宝宝怪物.txt
checkslavecount < [$道士宝宝数量]
#act
MOBSLAVE <$STR(S0)> 1 1

服务端文件:MirServer\Mir200\Envir\DefiniensConst.txt脚本:
;****************宝宝********************
战士宝宝数量 1
法师宝宝数量 1
道士宝宝数量 1
宝宝几率 1
存入费用 1
 
以下为宠物宝宝寄存NPC脚本:
[@main]
#ACT
MOV S50 <{寄存=FCO=10}/@main>
MOV S51 <{寄存=FCO=10}/@main>
MOV S52 <{寄存=FCO=10}/@main>
MOV S53 <{寄存=FCO=10}/@main>
MOV S54 <{寄存=FCO=10}/@main>
MOV S55 
MOV S56  
MOV S57  
MOV S60 无
MOV S61 无
MOV S62 无
MOV S63 无
MOV S64 无
#if
checkslavecount > 0
#act
MOV S60 <$BBINFO[1].NAME>
#if
checkslavecount > 1
#act
MOV S61 <$BBINFO[2].NAME>
#if
checkslavecount > 2
#act
MOV S62 <$BBINFO[3].NAME>
#if
checkslavecount > 3
#act
MOV S63 <$BBINFO[4].NAME>
#if
checkslavecount > 4
#act
MOV S64 <$BBINFO[5].NAME>
#IF
CHECKTEXTLIST <$STR(S60)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
MOV S50 <{寄存=FCO=250}/@寄存1>
#IF
CHECKTEXTLIST <$STR(S61)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
MOV S51 <{寄存=FCO=250}/@寄存2>
#IF
CHECKTEXTLIST <$STR(S62)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
MOV S52 <{寄存=FCO=250}/@寄存3>
#IF
CHECKTEXTLIST <$STR(S63)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
MOV S53 <{寄存=FCO=250}/@寄存4>
#IF
CHECKTEXTLIST <$STR(S64)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
MOV S54 <{寄存=FCO=250}/@寄存5>
 
;----------------------------------
#IF
NOT EQUAL B41   
#ACT
MOV S55 <{取出=FCO=250}/@取出1>
#IF
NOT EQUAL B42    
#ACT
MOV S56 <{取出=FCO=250}/@取出2>
#IF
NOT EQUAL B43    
#ACT
MOV S57 <{取出=FCO=250}/@取出3>
#if
isadmin
#say
;标语
{5=y}
{18=x}{【<$STR(S60)>】=FCO=251}
{22=x}{【<$STR(S61)>】=FCO=251}
{32=x}{【<$STR(S62)>】=FCO=251}
{40=x}{【<$STR(S63)>】=FCO=251}
{40=x}{【<$STR(S64)>】=FCO=251}\
{18=x}{-----------------------------------------------------=FCO=239}\
{0=y}{23=x}<$STR(S50)>
{40=x}<$STR(S51)>
{45=x}<$STR(S52)>
{48=x}<$STR(S53)>
{48=x}<$STR(S54)>\
{18=x}{-----------------------------------------------------=FCO=239}\
{5=y}{45=x}{【<$STR(B41)>】=FCO=251}
{75=x}{【<$STR(B42)>】=FCO=251}
{75=x}{【<$STR(B43)>】=FCO=251}
\
{18=x}{-----------------------------------------------------=FCO=239}\
{0=y}{50=x}<$STR(S55)>
{85=x}<$STR(S56)>
{90=x}<$STR(S57)>\
{18=x}{-----------------------------------------------------=FCO=239}\
;********************************************
[@寄存1]
#IF
CHECKTEXTLIST <$STR(S60)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
#ELSEACT
MESSAGEBOX 您的【<$STR(S60)>】我们没有记录再案,我们不给您寄存!
goto @main
break
#IF
CHECKGAMEGOLD ? [$存入费用]
#ACT
#ELSEACT
MESSAGEBOX 您的元宝不足【[$存入费用]】,寄存失败!
goto @main
break
#IF
EQUAL B41   
#ACT
GAMEGOLD - [$存入费用]
MOV B41 <$STR(S60)>
KILLSLAVE <$STR(S60)>
goto @main
break
#IF
EQUAL B42
#ACT
GAMEGOLD - [$存入费用]
MOV B42 <$STR(S60)>
KILLSLAVE <$STR(S60)>
goto @main
break
#IF
EQUAL B43
#ACT
GAMEGOLD - [$存入费用]
MOV B43 <$STR(S60)>
KILLSLAVE <$STR(S60)>
goto @main
break
#ELSEACT
MESSAGEBOX 最大只能寄存3只宝宝!
goto @main
break
[@寄存2]
#IF
CHECKTEXTLIST <$STR(S61)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
#ELSEACT
MESSAGEBOX 您的【<$STR(S61)>】我们没有记录再案,我们不给您寄存!
goto @main
break
#IF
CHECKGAMEGOLD ? [$存入费用]
#ACT
#ELSEACT
MESSAGEBOX 您的元宝不足【[$存入费用]】,寄存失败!
goto @main
break
#IF
EQUAL B41   
#ACT
GAMEGOLD - [$存入费用]
MOV B41 <$STR(S61)>
KILLSLAVE <$STR(S61)>
goto @main
break
#IF
EQUAL B42
#ACT
GAMEGOLD - [$存入费用]
MOV B42 <$STR(S61)>
KILLSLAVE <$STR(S61)>
goto @main
break
#IF
EQUAL B43
#ACT
GAMEGOLD - [$存入费用]
MOV B43 <$STR(S61)>
KILLSLAVE <$STR(S61)>
goto @main
break
#ELSEACT
MESSAGEBOX 最大只能寄存3只宝宝!
goto @main
break
[@寄存3]
#IF
CHECKTEXTLIST <$STR(S62)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
#ELSEACT
MESSAGEBOX 您的【<$STR(S62)>】我们没有记录再案,我们不给您寄存!
goto @main
break
#IF
CHECKGAMEGOLD ? [$存入费用]
#ACT
#ELSEACT
MESSAGEBOX 您的元宝不足【[$存入费用]】,寄存失败!
goto @main
break
#IF
EQUAL B41   
#ACT
GAMEGOLD - [$存入费用]
MOV B41 <$STR(S62)>
KILLSLAVE <$STR(S62)>
goto @main
break
#IF
EQUAL B42
#ACT
GAMEGOLD - [$存入费用]
MOV B42 <$STR(S62)>
KILLSLAVE <$STR(S62)>
goto @main
break
#IF
EQUAL B43
#ACT
GAMEGOLD - [$存入费用]
MOV B43 <$STR(S62)>
KILLSLAVE <$STR(S62)>
goto @main
break
#ELSEACT
MESSAGEBOX 最大只能寄存3只宝宝!
goto @main
break
[@寄存4]
#IF
CHECKTEXTLIST <$STR(S63)> ../QuestDiary/数据/宝宝怪物.txt 
#ACT
#ELSEACT
MESSAGEBOX 您的【<$STR(S63)>】我们没有记录再案,我们不给您寄存! (责任编辑:找搜服传奇发布网)
------分隔线----------------------------
栏目列表
推荐内容