[巨集]法師巨集(1.09)

changmang 發表日期: 0000-00-00 00:00:00

更新日期: 2006-03-01 11:19:01

喝水吃麵包
/*判斷血與魔少500的時候喝水或是回魔*/
/script d=UnitHealthMax("player")-UnitHealth("player"); if(d>500) then UseAction(37); end;
/script e=UnitManaMax("player")-UnitMana("player"); if(e>500) then UseAction(38) ;end;

法師變形術
/*變羊的時候說出怪物的等級名子*/
/script SendChatMessage("我要把" .. UnitLevel("target").. "級的" ..UnitName("target") .. "變羊，請不要打他！" , "party")
/施放 變形術()

魔法反制巨集
/*取消你正在施放的魔法，立即使用魔法反制*/
/script SpellStopCasting()
/script CastSpellByName("counterspell")

奧術智慧
/*當沒有目標或是目標是敵人對自己用祕法智慧*/
/施放 奧術智慧()
/Script if(SpellIsTargeting()) then SpellTargetUnit("Player"); end;


魔暴術
/*魔暴很花魔所以我另外加了一個可以回魔的判斷*/
/施放 魔爆術()
/SCRIPT if(UnitMana("player")<=390) then if not(IsUsableAction(40)==1) then
UseAction(40);else UseAction(41);end;end;


segeyi
發言日期: 2006-06-06 18:24:35
以下是參考各位大大巨集加以整理修改的...
=============================================================
顯示自己目前血量法力%的巨集

/script TargetUnit("player"); th=UnitHealth("Target")/UnitHealthMax("Target")*100; tm=UnitMana("Target")/UnitManaMax("Target")*100; SendChatMessage(format("救命啊...我被怪打，我的血量只剩：%d%%　我的法力只剩：%d%%　危險～危險!!", th, tm), "yell");

=============================================================
自我繃帶　　/*使用快捷列第22個、當目標是空或是敵人選擇自己//*自動標示下一個目標*/

/script UseAction(22);if(SpellIsTargeting()) then SpellTargetUnit("Player");end;TargetLastEnemy();

=============================================================
解除詛咒　　/*若是選到敵人，則選回自己*/

/script if(UnitExists("target") and UnitInParty("target")) then SendChatMessage("【%T】別怕..我幫你解咒囉...","SAY");SpellStopCasting(); CastSpellByName("解除次級詛咒");TargetLastEnemy();end;

=============================================================
喝水吃麵包　　/*判斷血與魔少 90% 的時候喝水或是回魔，要是沒有麵包或是晶水，則自動製作*/

/e 刈包、豆漿　元氣！
/script gc=GetActionCount;c=CastSpellByName;u=UseAction;p="player";if(gc(23)==0)then c("造食術");end;if(gc(24)==0)then c("造水術");end;if((UnitHealth(p)/UnitHealthMax(p)*100)<90)then u(23);end;if((UnitMana(p)/UnitManaMax(p)*100)<90)then u(24);end;

=============================================================
法師變形術　　/*當對象是敵對的時候，變羊並說出怪物的等級名字*/

/script t="target";if (UnitExists(t) and UnitIsEnemy("player",t)) then SendChatMessage(" 把﹝" .. UnitLevel(t) .. "級﹞的【%T】變羊！","SAY");SpellStopCasting();CastSpellByName("變形術"); TargetLastEnemy();end;

=============================================================
魔法反制巨集　　/*當對象是敵對的時候，取消你正在施放的魔法，立即使用魔法反制並說出怪物的等級名字*/

/script t="target";if (UnitExists(t) and UnitIsEnemy("player",t)) then SendChatMessage("把﹝" .. UnitLevel(t) .. "級﹞的【%T】法術反制，引牠回來囉","SAY");SpellStopCasting();CastSpellByName("法術反制"); end;

=============================================================
魔暴術　　/*魔暴很花魔又容易死所以我另外加了一個可以回魔回血的判斷*/

/SCRIPT if(UnitMana("player")<=390) then if not(IsUsableAction(21)==0) then UseAction(21);else UseAction(20);end;end;
/SCRIPT if(UnitHealth("player")<=1000) then if not(IsUsableAction(19)==0) then UseAction(19);else UseAction(18);end;end;
/施放 魔爆術

=============================================================

祕法智慧　　/*當沒有目標或是目標是敵人對自己用祕法智慧*/

/施放 祕法智慧()
/Script if(SpellIsTargeting()) then SpellTargetUnit("Player"); end;

=============================================================

騎馬　　/*[紫色骷髏戰馬][棍子上的胡蘿蔔][學徒之靴][破布手套]*/

/script UseContainerItem(4,12);
/script PickupContainerItem(4,9);
/script PickupInventoryItem(1);
/script PickupContainerItem(4,10);
/script PickupInventoryItem(7);
/script PickupContainerItem(4,11);
/script PickupInventoryItem(15);

=============================================================


關於 UseAction(XX); 使用第幾欄位的物品 ( 快速鍵上的欄位喔 )

我的放置物品 ( 配合目前巨集 )
18　極效治療石 ( 1200 )
19　極效治療石 ( 1440 )
20 法力寶石 ( 次級 )
21 法力寶石 ( 最高級 )
22 繃帶
23 麵包
24 魔晶水

第一列 快速鍵 1～12
第二列 快速鍵 13～24
........
依此列推

=============================================================
/*依對象等級施放秘法智慧*/
/script r=5;l={1,14,28,42,56};if not UnitIsFriend("player","target") then TargetUnit("player");end;t=UnitLevel("target");for i=r,1,-1 do if (t>=l[i]-10) then CastSpellByName("祕法智慧(等級 "..i..")");break;end;end


=============================================================
轉載自 巴哈 segeyi 發言日期: 2007-01-11 23:01:58
生產麵包如下：

/script l={1,5,15,25,35,45,55};for j=7,1,-1 do if (UnitLevel("target")>=l[j]) then CastSpellByName("造食術(等級 "..j..")");break;end;end;

生產礦泉水如下：

/script l={1,5,15,25,35,45,55};for j=7,1,-1 do if (UnitLevel("target")>=l[j]) then CastSpellByName("造水術(等級 "..j..")");break;end;end;

改良
/script r=6;l={1,5,15,25,35,45,55};if not UnitIsFriend("player","target")then TargetUnit("player");end;t=UnitLevel("target");for i=r,1,-1 do if (t>=l[i]-10) then CastSpellByName("造食術(等級 "..i..")");break;end;end

/script r=6;l={1,5,15,25,35,45,55};if not UnitIsFriend("player","target")then TargetUnit("player");end;t=UnitLevel("target");for i=r,1,-1 do if (t>=l[i]-10) then CastSpellByName("造水術(等級 "..i..")");break;end;end