[巨集]法師巨集(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

[巨集]指令、巨集(1.09)

●聊天指令
/s /say 一般
/p /party 隊伍
/g /ghelp 公會
/y /yell 大喊
/w 密語
/e e=角色表情及動作
/r 回復上則密語
/chat /chathelp 列出聊天命令

●私人聊天室指令

/chat 列出聊天指令
/join /channel /chan 創造or加入頻道
/cinvite /chatinvite 邀請
/ckick(kick) 踢出
/ban /unban 禁止發言/取消禁止發言
/mute /squelch /unvoice /unmute /unsquelch /void 改變頻道中玩家權限
/mod /moderator(moderate) /unmod /unmoderator 改變頻道中主持人狀態
/moderate 切換主持
/password /pass 改變密碼
/announcement /ann 開關 加入及離開的公告
/chatlist /chatwho /chatinfo 列出頻道或頻道成員
/afk /dnd 設置你的標誌為「離開」或「請勿打擾」
/# /c /csay 發送文字到頻道# 例:/1 Hi!
/leave /chatleave /chatexit 離開頻道
/owner 顯示或改變聊天頻道的名字

巨集指令介紹

http://www.wowwiki.com/index.php/World_of_Warcraft_API

/played 查詢角色遊戲時間

一鍵脫光
用途：被敵對陣營追殺時，可以省些修裝費
/script local i,j,k=1 myG={}for j=0,4do for k=1,GetContainerNumSlots(j)do if not GetContainerItemLink(j,k)then if GetInventoryItemLink("player",i)then PickupInventoryItem(i) PickupContainerItem(j,k)myG[i]={j,k}end i=i+1if i>19then j,k=5,20 end end end end

繃綁帶後，將目標轉回到敵人身上
/script TargetUnit("player");
/script UseContainerItem(0,1);
/script TargetLastEnemy();

解除特殊過濾字
/console SET profanityFilter "0"

依對象等級施放秘法智慧

/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

[巨集]牧師巨集(1.09)

#轉載自 巴哈 unasky777 發言日期: 2007-01-07 03:42:42
依照等級施放[真言術：盾]
/script r=6;l={10,20,30,40,50,60};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

#轉載自 巴哈 whocare 發言日期: 2007-01-07 00:21:15
依照等級施放[真言術：韌]
/script r=6;l={10,20,30,40,50,60};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

#轉載自 巴哈 whocare 發言日期: 2007-01-04 09:48:44
牧師巨集：依照等級施放[神聖之靈]（精神）
/script r=4;l={20,30,40,50,60};if not UnitIsFriend("player","target")then TargetUnit("player");end;t=UnitLevel("target");for i=r,1,-1 do if (t>=l[i]) then CastSpellByName("神聖之靈(等級 "..i..")");break;end;end

#轉載自 巴哈 whocare 發言日期: 2007-01-04 09:48:44
牧師巨集：依照等級施放[恢復](10)
/script LR={8,14,20,26,32,38,44,50,56,60}; if not UnitIsFriend("player","target") then TargetUnit("player") end; Lv=UnitLevel("target") for i=10,1,-1 do if (Lv>=LR[i]-10) then CastSpellByName("恢復(等級 "..i..")");break;end;end

告知隊伍施放復活術
/施放 復活術(等級 1)
/ra [%t] 復活吧! 我的勇士

#轉載自 巴哈 tekkentea 發言日期: 2007-01-12 20:45:56
依等級施放 恢復術
/script GameTooltip:SetOwner(UIParent) z=0 for i=1,16 do UnitBuff("target",i);GameTooltip:SetUnitBuff("target",i);if GameTooltipTextLeft1:GetText()=="恢復" then z=1 ;end;end;
/script if z==0 then CastSpellByName("恢復") end

[巨集]獵人巨集(1.09)

轉載自 巴哈 LI00 發言日期: 2006-12-01 15:14:38
寵物控制，沒目標時寵物跟隨，有目標時寵物攻擊、寵物被動互相切換。
/script if UnitName("target")==nil then Pa=1 PetFollow()end if Pa>0 then PetPassiveMode()Pa=0 else PetAttack()Pa=1 end
此巨集有缺點，請在遊戲一開始沒目標時先按一下讓巨集把1代入Pa函數。不然會出現... Pa = nil 的錯誤。
(不是..cript if UnitName("target")==nil.. 這裡錯哦！一開始我以為是這裡錯 ~"~)
打完怪也請放棄目標在按一下讓Pa初始化，要打下一隻怪才能確保按一下寵會衝出去！


守護切換，當沒目標時切換為獵豹守護，否則 靈猴、雄鷹(先施放) 互相切換。
/script c=CastSpellByName z=0 for i=0,15 do if GetPlayerBuffTexture(i)=="Interface\\Icons\\Spell_Nature_RavenForm"then z=1 end end
/script if UnitName("target") == nil then c("獵豹守護")else if z>0 then c("靈猴守護")else c("雄鷹守護")end end
此巨集也是有缺點，沒目標時按2次會開啟 獵豹守護 又關掉。
我曾經想修改，可是用了多個方法都是...字數過長，所以我放棄了。
不想裝其他巨集UI就將就將就吧！


緩技，目標沒有獵人印記就放，目標的距離在5碼內就施放摔絆，否則施放震盪射擊。
/script c=CastSpellByName z=0 for i=1,16do if UnitDebuff("Target",i)=="Interface\\Icons\\Ability_Hunter_SniperShot"then z=1 end end
/script if z<1>


射擊，站在原地就放瞄準射擊，目標沒有毒蛇釘刺就放毒蛇釘刺，走動中放祕法射擊。
/script c=CastSpellByName c("瞄準射擊")z=0 for i=1,16do if UnitDebuff("Target",i)=="Interface\\Icons\\Ability_Hunter_Quickshot"then z=1 end end if z<1>40 then c("毒蛇釘刺")else CastSpellByName("祕法射擊")end
如果非射擊系的自己把 c("瞄準射擊") 拿掉就好。

[巨集]通用巨集(1.09)

自我繃帶
/*使用快捷列第15個、當目標是空或是敵人選擇自己//*自動標示下一個目標*/
/script UseAction(15)
/Script if ( SpellIsTargeting() ) then SpellTargetUnit("Player");end;
/script TargetLastEnemy()

===================================================================
轉載自 巴哈 weepingfire 發言日期: 2007-01-13 10:34:47
切換礦草雷達
/script gtt=GetTrackingTexture();if gtt==nil then gtt="none";end;
/script if(string.find(gtt,"INV_Misc_Flower_02")) then CastSpellByName("尋找礦物");else CastSpellByName("尋找草藥");end;