服务端文件: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
[@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)>】我们没有记录再案,我们不给您寄存!
(责任编辑:找搜服传奇发布网) |