[@Bluem2.net_宠物系统NPC]
{
#IF
CHECKINTS 0 = 0
#ACT
INTS 0 = 1
ADDSKILL 召唤宠物 3
INTS 2 = 1800
#IF
CHECKINTS 0 = 7
#SAY
<>\
<>\
<> <COLOR=#$0079FF 〝≈><COLOR=#$00A0FF 傲><COLOR=#$00B1FF 世><COLOR=#$00C2FF 傳><COLOR=#$00D3FF 奇><COLOR=#$00B1FF ≈><COLOR=#$00FFC5 正版><COLOR=#$00FFD6 授权><COLOR=#$00FFE7 ≈><COLOR=#$00FFF8 公司><COLOR=#$00F5FF 运营><COLOR=#$00E4FF ≈><COLOR=#$00D3FF 独><COLOR=#$00C2FF 家><COLOR=#$00B1FF 奉><COLOR=#$00A0FF 献><COLOR=#$0079FF ≈〞>\
<>\
<> 当前点卷:<$INTS9>\
<><PIC=Prguse3,653,1,0,0,133,33 LABEL=@晋级宠物 HINT=晋级宠物可以提升其伤害，每一级的宠物属性都有不同的BUFF><PIC=Prguse3,652,1,0,0,64,63 LABEL=@喂养宠物 HINT=喂养宠物可提升宠物的经验，经验满后才可以晋级宠物><PIC=Prguse3,655,1,0,0,-4,93 LABEL=@储存食物 HINT=储存食物可增加宠物与您并肩作战的时间，宠物在线10秒会消耗1点食物><PIC=Prguse3,654,1,0,0,-73,123 LABEL=@购买食物 HINT=购买食物>\
<>\
<> 宠物等级：<$INTS0>\ \
<> 宠物经验：0/0\ \
<> 食物储存：<$INTS2>\ \
<> 当前伤害：$(宠物7级伤害)\
<>\
<> <CMD=@购买食物 HINT=玛法大陆所有怪均爆\也可直接[购买食物]>竹子</>可以喂养宠物获得$(竹子加经验)点经验，经验满了必须使用<CMD=@无效 HINT=可在商铺中购买>熊猫烧酒</>晋级宠物。\
<> 玩家可以免费领取一次宠物，宠物免疫伤害、增加BUFF、帮忙打怪。\
<> 每一级的宠物属性都有不同的BUFF。\
<> 宠物只会攻击怪物，不会攻击人物以及英雄或宠物。\
<> 无论战斗、PK、群战、宠物都是不可缺少的。\
<> 学习<COLOR=#$0079FF 心灵召唤>可以随时召唤宠物到身边或锁定攻击目标！<学习心灵召唤/@心灵召唤>
#ACT
SetMerchantDlgImgName cw.png
BREAK
#IF
CHECKINTS 0 = 1
#ACT
CALCVAR HUMAN 宠物升级经验 = $(宠物1级经验)
CALCVAR HUMAN 宠物当前伤害 = $(宠物1级伤害)
CALCVAR HUMAN 宠物下级伤害 = $(宠物2级伤害)
#IF
CHECKINTS 0 = 2
#ACT
CALCVAR HUMAN 宠物升级经验 = $(宠物2级经验)
CALCVAR HUMAN 宠物当前伤害 = $(宠物2级伤害)
CALCVAR HUMAN 宠物下级伤害 = $(宠物3级伤害)
#IF
CHECKINTS 0 = 3
#ACT
CALCVAR HUMAN 宠物升级经验 = $(宠物3级经验)
CALCVAR HUMAN 宠物当前伤害 = $(宠物3级伤害)
CALCVAR HUMAN 宠物下级伤害 = $(宠物4级伤害)
#IF
CHECKINTS 0 = 4
#ACT
CALCVAR HUMAN 宠物升级经验 = $(宠物4级经验)
CALCVAR HUMAN 宠物当前伤害 = $(宠物4级伤害)
CALCVAR HUMAN 宠物下级伤害 = $(宠物5级伤害)
#IF
CHECKINTS 0 = 5
#ACT
CALCVAR HUMAN 宠物升级经验 = $(宠物5级经验)
CALCVAR HUMAN 宠物当前伤害 = $(宠物5级伤害)
CALCVAR HUMAN 宠物下级伤害 = $(宠物6级伤害)
#IF
CHECKINTS 0 = 6
#ACT
CALCVAR HUMAN 宠物升级经验 = $(宠物6级经验)
CALCVAR HUMAN 宠物当前伤害 = $(宠物6级伤害)
CALCVAR HUMAN 宠物下级伤害 = $(宠物7级伤害)
#IF
CHECKLEVELEX > 0
#SAY
<>\
<>\
<> <COLOR=#$0079FF 〝≈><COLOR=#$00A0FF 傲><COLOR=#$00B1FF 世><COLOR=#$00C2FF 傳><COLOR=#$00D3FF 奇><COLOR=#$00B1FF ≈><COLOR=#$00FFC5 正版><COLOR=#$00FFD6 授权><COLOR=#$00FFE7 ≈><COLOR=#$00FFF8 公司><COLOR=#$00F5FF 运营><COLOR=#$00E4FF ≈><COLOR=#$00D3FF 独><COLOR=#$00C2FF 家><COLOR=#$00B1FF 奉><COLOR=#$00A0FF 献><COLOR=#$0079FF ≈〞>\
<>\
<> 当前点卷:<$INTS9>\
<><PIC=Prguse3,653,1,0,0,133,33 LABEL=@晋级宠物 HINT=晋级宠物可以提升其伤害，每一级的宠物属性都有不同的BUFF><PIC=Prguse3,652,1,0,0,64,63 LABEL=@喂养宠物 HINT=喂养宠物可提升宠物的经验，经验满后才可以晋级宠物><PIC=Prguse3,655,1,0,0,-4,93 LABEL=@储存食物 HINT=储存食物可增加宠物与您并肩作战的时间，宠物在线10秒会消耗1点食物><PIC=Prguse3,654,1,0,0,-73,123 LABEL=@购买食物 HINT=购买食物>\
<>\
<> 宠物等级：<$INTS0>\ \
<> 宠物经验：<$INTS1>/<$HUMAN(宠物升级经验)>\ \
<> 食物储存：<$INTS2>\ \
<> 当前伤害：<$HUMAN(宠物当前伤害)> 下级伤害：<$HUMAN(宠物下级伤害)>\
<>\
<> <CMD=@购买食物 HINT=玛法大陆所有怪均爆\也可直接[购买食物]>竹子</>可以喂养宠物获得$(竹子加经验)点经验，经验满了必须使用<CMD=@无效 HINT=可在商铺中购买>熊猫烧酒</>晋级宠物。\
<> 玩家可以免费领取一次宠物，宠物免疫伤害、增加BUFF、帮忙打怪。\
<> 每一级的宠物属性都有不同的BUFF。\
<> 宠物只会攻击怪物，不会攻击人物以及英雄或宠物。\
<> 无论战斗、PK、群战、宠物都是不可缺少的。\
<> 学习<COLOR=#$0079FF 心灵召唤>可以随时召唤宠物到身边或锁定攻击目标！<学习心灵召唤/@心灵召唤>
#ACT
SetMerchantDlgImgName cw.png
BREAK
[@心灵召唤]
#ACT
QUERYVALUE 2 2 10 ~心灵召唤 学习心灵召唤后可以随时召唤宠物到身边或锁定攻击目标！\ \学习此技能需要4000点卷！\ \ 同·意 拒·绝\ ↓ ↓ QF
[~心灵召唤]
#IF
CHECKINTS 9 ? 4000
#ACT
INTS 9 - 4000
ADDSKILL 心灵召唤 1
GOTO @Bluem2.net_宠物系统NPC
BREAK
#ELSEACT
MESSAGEBOX 对不起，你没有足够的点卷!
BREAK
[@储存食物]
#ACT
QUERYVALUE 10 1 4 ~储存食物 宠物在作战的时候将消耗一定的食物\每个竹子可以增加$(竹子储存)食物点，请输入你想储存多少竹子？ QF
[@购买食物]
#ACT
QUERYVALUE 10 1 4 ~购买食物 请输入你想购买多少竹子？\竹子单价：$(竹子单价)点卷 QF
[@喂养宠物]
#ACT
QUERYVALUE 10 1 3 ~喂养宠物 请输入你想使用多少竹子喂养宠物？\每个竹子可提升宠物：$(竹子加经验)经验 QF
[@晋级宠物]
#IF
CHECKINTS 1 < <$HUMAN(宠物升级经验)>
#ACT
MESSAGEBOX 当前宠物经验不足<$HUMAN(宠物升级经验)>，晋级失败！
BREAK
#IF
CHECKINTS 0 = 7
#ACT
MESSAGEBOX 宠物已达到最高等级！
BREAK
#IF
checkitem 熊猫烧酒 1
#ACT
TAKE 熊猫烧酒 1
INTS 1 - <$HUMAN(宠物升级经验)>
INTS 0 + 1
GOTO @Bluem2.net_宠物系统NPC
BREAK
#ELSEACT
MESSAGEBOX 对不起您缺少晋级宠物的必要物品:<熊猫烧酒>
BREAK
[~储存食物]
#IF
LARGE M10 0
#ELSEACT
MESSAGEBOX 请输入正确数字!
BREAK
#IF
checkitem 竹子 <$STR(M10)>
#ACT
TAKE 竹子 <$STR(M10)>
MOV M10 $(竹子储存) <$STR(M10)>
INTS 2 + <$STR(M10)>
GOTO @Bluem2.net_宠物系统NPC
BREAK
#ELSEACT
MESSAGEBOX 对不起你没有足够的<竹子>喂养宠物！
BREAK
[~购买食物]
#IF
CHECKLEVELEX > 0
#ACT
MOV M11 <$STR(M10)> $(竹子单价)
#IF
CHECKINTS 9 < <$STR(M11)>
#ACT
MESSAGEBOX 对不起，你没有足够的点卷!
BREAK
#IF
LARGE M11 0
#ACT
INTS 9 - <$STR(M11)>
GIVE 竹子 <$STR(M10)>
SENDMSG 6 成功购买获得竹子:<$STR(M10)>!
GOTO @Bluem2.net_宠物系统NPC
BREAK
#ELSEACT
MESSAGEBOX 请输入正确数字!
BREAK
[~喂养宠物]
#IF
CHECKINTS 0 = 7
#ACT
MESSAGEBOX 宠物已达到最高等级，无须再喂养了！
BREAK
#IF
LARGE M10 0
#ELSEACT
MESSAGEBOX 请输入正确数字!
BREAK
#IF
checkitem 竹子 <$STR(M10)>
#ELSEACT
MESSAGEBOX 对不起你没有足够的<竹子>喂养宠物！
BREAK
#IF
CHECKINTS 1 < <$HUMAN(宠物升级经验)>
#ACT
TAKE 竹子 <$STR(M10)>
MOV M10 $(竹子加经验) <$STR(M10)>
INTS 1 + <$STR(M10)>
GOTO @Bluem2.net_宠物系统NPC
BREAK
#ELSEACT
MESSAGEBOX 宠物经验已满，使用熊猫烧酒可晋级宠物！
BREAK
}
[@Bluem2.net_宠物系统私人申明]
{
#if
CHECKLEVELEX > 0
#act
VAR Integer HUMAN 宠物当前等级
VAR Integer HUMAN 宠物当前伤害
VAR Integer HUMAN 宠物下级伤害
VAR Integer HUMAN 宠物升级经验
VAR Integer HUMAN 宠物职业
VAR Integer HUMAN 宠物性别
SetScTimer 10 10
#IF
CHECKINTS 0 = 1
#ACT
INTS 0 = 1
ADDSKILL 召唤宠物 3
INTS 2 = 18000
[@OnTimer10]
#IF
CHECKVAR HUMAN 宠物职业 > 0
#ELSEACT
BREAK
#IF
CHECKSLAVENAME $(宠物1级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
CHECKINTS 2 > 0
#ACT
INTS 2 - 1
BREAK
#IF
CHECKSLAVENAME $(宠物2级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
CHECKINTS 2 > 0
#ACT
INTS 2 - 1
BREAK
#IF
CHECKSLAVENAME $(宠物3级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
CHECKINTS 2 > 0
#ACT
INTS 2 - 1
BREAK
#IF
CHECKSLAVENAME $(宠物4级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
CHECKINTS 2 > 0
#ACT
INTS 2 - 1
BREAK
#IF
CHECKSLAVENAME $(宠物5级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
CHECKINTS 2 > 0
#ACT
INTS 2 - 1
BREAK
#IF
CHECKSLAVENAME $(宠物6级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
CHECKINTS 2 > 0
#ACT
INTS 2 - 1
BREAK
#IF
CHECKSLAVENAME $(宠物7级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
CHECKINTS 2 > 0
#ACT
INTS 2 - 1
BREAK
#IF
CHECKLEVELEX > 0
#ACT
KILLSLAVENAME $(宠物1级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
KILLSLAVENAME $(宠物2级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
KILLSLAVENAME $(宠物3级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
KILLSLAVENAME $(宠物4级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
KILLSLAVENAME $(宠物5级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
KILLSLAVENAME $(宠物6级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
KILLSLAVENAME $(宠物7级名字)<$HUMAN(宠物职业)><$HUMAN(宠物性别)>
CALCVAR HUMAN 宠物职业 = 0
CALCVAR HUMAN 宠物性别 = 0
BREAK
[@宠物系统常量加载]
#CALL [\Bluem2.net_宠物系统配置\宠物系统常量.ini] @宠物系统常量
}
|
