临沂火车站周边宾馆:DZ的宏有哪些。。

来源:百度文库 编辑:神马品牌网 时间:2024/04/30 12:01:48
同上。。可以的话再说一下怎么设置一个宏。。

1。关于什么时候需要运行“剑”和“匕首”这两个宏。每次上线时,因为上次保存的资料不在了;有更好的武器了;给武器附魔了,附魔前后会判断为不同的物品。
2。如果没有运行“剑”而运行“邪恶攻击”,会把现有的武器拿掉。这可以认为是bug,希望高人替我改正。
3。升级技能后需要修改相应技能的宏。必须使CastSpellByName中的技能名字(等级)符合你现在的技能和等级。
MACRO 1 "换武器" Ability_ThunderBolt.blp
/script UseContainerItem (0,2)
END
MACRO 2 "绷带" Spell_Nature_Rejuvenation.blp
/script UseItemByName("厚丝质绷带")
/script if ( SpellIsTargeting() ) then TargetUnit("player"); end
END
MACRO 3 "左手" Spell_Shadow_Fumble.blp
/script UseItemByName("速效毒药 III")
/script PickupInventoryItem (17)
END
MACRO 4 "宏" Spell_Nature_AstralRecal.blp
/macro
END
MACRO 5 "坐" Spell_Nature_Invisibilty.blp
/施放 影遁(种族特长)
/sit
END
MACRO 6 "交换" Ability_DualWield.blp
/script PickupInventoryItem (17)
/script PickupInventoryItem (16)
END
MACRO 7 "右手" Spell_Nature_UndyingStrength.blp
/script UseItemByName("速效毒药 III")
/script PickupInventoryItem (16)
END
MACRO 9 "匕首" Ability_SteelMelee.blp
/script setglobal("dagger", GetInventoryItemLink("player", 16))
/script SendChatMessage("匕首"..dagger, "WHISPER", this.language, "哦也哦也");
END
MACRO 10 "剑" Ability_MeleeDamage.blp
/script setglobal("sword", GetInventoryItemLink("player", 16))
/script SendChatMessage("剑"..sword, "WHISPER", this.language, "哦也哦也");
END
MACRO 11 "背刺" Ability_BackStab.blp
/script if dagger == GetInventoryItemLink("player", 16) then CastSpellByName("背刺(等级 5)") end
/script if dagger == GetInventoryItemLink("player", 16) then bag,slot=-1,16 end
/script if dagger == GetInventoryItemLink("player", 17) then bag,slot=-1,17 end
/script for i=NUM_BAG_FRAMES,0,-1 do for j=GetContainerNumSlots(i),1,-1 do if dagger == GetContainerItemLink(i,j) then bag,slot=i,j end end end
/script if bag and slot then if bag == -1 and slot==16 then else if bag == -1 then PickupInventoryItem(slot) else PickupContainerItem(bag,slot) end PickupInventoryItem(16) end end
END
MACRO 12 "伏击" Ability_Rogue_Ambush.blp
/script if dagger == GetInventoryItemLink("player", 16) then CastSpellByName("伏击(等级 4)") end
/script if dagger == GetInventoryItemLink("player", 16) then bag,slot=-1,16 end
/script if dagger == GetInventoryItemLink("player", 17) then bag,slot=-1,17 end
/script for i=NUM_BAG_FRAMES,0,-1 do for j=GetContainerNumSlots(i),1,-1 do if dagger == GetContainerItemLink(i,j) then bag,slot=i,j end end end
/script if bag and slot then if bag == -1 and slot==16 then else if bag == -1 then PickupInventoryItem(slot) else PickupContainerItem(bag,slot) end PickupInventoryItem(16) end end
END
MACRO 13 "剔骨" Ability_Rogue_Eviscerate.blp
/script if sword == GetInventoryItemLink("player", 16) then CastSpellByName("剔骨(等级 6)") end
/script if sword == GetInventoryItemLink("player", 16) then bag,slot=-1,16 end
/script if sword == GetInventoryItemLink("player", 17) then bag,slot=-1,17 end
/script for i=NUM_BAG_FRAMES,0,-1 do for j=GetContainerNumSlots(i),1,-1 do if sword == GetContainerItemLink(i,j) then bag,slot=i,j end end end
/script if bag and slot then if bag == -1 and slot==16 then else if bag == -1 then PickupInventoryItem(slot) else PickupContainerItem(bag,slot) end PickupInventoryItem(16) end end
END
MACRO 14 "肾击" Ability_Rogue_KidneyShot.blp
/script CastSpellByName("肾击(等级 1)")
/script if sword == GetInventoryItemLink("player", 16) then bag,slot=-1,16 end
/script if sword == GetInventoryItemLink("player", 17) then bag,slot=-1,17 end
/script for i=NUM_BAG_FRAMES,0,-1 do for j=GetContainerNumSlots(i),1,-1 do if sword == GetContainerItemLink(i,j) then bag,slot=i,j end end end
/script if bag and slot then if bag == -1 and slot==16 then else if bag == -1 then PickupInventoryItem(slot) else PickupContainerItem(bag,slot) end PickupInventoryItem(16) end end
END
MACRO 15 "凿击" Ability_Gouge.blp
/script if sword == GetInventoryItemLink("player", 16) then CastSpellByName("凿击(等级 3)") end
/script if sword == GetInventoryItemLink("player", 16) then bag,slot=-1,16 end
/script if sword == GetInventoryItemLink("player", 17) then bag,slot=-1,17 end
/script for i=NUM_BAG_FRAMES,0,-1 do for j=GetContainerNumSlots(i),1,-1 do if sword == GetContainerItemLink(i,j) then bag,slot=i,j end end end
/script if bag and slot then if bag == -1 and slot==16 then else if bag == -1 then PickupInventoryItem(slot) else PickupContainerItem(bag,slot) end PickupInventoryItem(16) end end
END
MACRO 16 "邪恶攻击" Spell_Shadow_RitualOfSacrifice.blp
/script if sword == GetInventoryItemLink("player", 16) then CastSpellByName("邪恶攻击(等级 6)") end
/script if sword == GetInventoryItemLink("player", 16) then bag,slot=-1,16 end
/script if sword == GetInventoryItemLink("player", 17) then bag,slot=-1,17 end
/script for i=NUM_BAG_FRAMES,0,-1 do for j=GetContainerNumSlots(i),1,-1 do if sword == GetContainerItemLink(i,j) then bag,slot=i,j end end end
/script if bag and slot then if bag == -1 and slot==16 then else if bag == -1 then PickupInventoryItem(slot) else PickupContainerItem(bag,slot) end PickupInventoryItem(16) end end
END
MACRO 17 "偷袭" Ability_CheapShot.blp
/script CastSpellByName("偷袭")
/script if sword == GetInventoryItemLink("player", 16) then bag,slot=-1,16 end
/script if sword == GetInventoryItemLink("player", 17) then bag,slot=-1,17 end
/script for i=NUM_BAG_FRAMES,0,-1 do for j=GetContainerNumSlots(i),1,-1 do if sword == GetContainerItemLink(i,j) then bag,slot=i,j end end end
/script if bag and slot then if bag == -1 and slot==16 then else if bag == -1 then PickupInventoryItem(slot) else PickupContainerItem(bag,slot) end PickupInventoryItem(16) end end
END

%t已经被我用砖头拍晕了,不要攻击~---闷棍的,哈哈
其他的可以去网上看看,很多太复杂了.我也懒得研究