|
引用 | 編輯
segeyi
2006-10-20 16:52 |
樓主
▼ |
||
x0
以下巨集，是我在巴哈上面，跟各位前輩們所學習到的 加上自己的使用習慣修改過，還有自己寫的.. 若是要轉貼，歡迎..但請附上來源，感恩 另外若是下列巨集有問題的話，請提出來..好讓小弟我修改.. １. 首先先用文字編輯器將以下文字加入任一 UI 的 lua 檔案後方，或是使用這個檔案 縮寫巨集 UI 下載 下載後可檢查壓縮檔內的 ShortMacro.lua 這個檔案是否為以下內容，若是不是的話請修改.. (記事本就可以修改囉) 這代表我忘記更新了 XD (逃... --[[ ============================================== ==== 在縮寫巨集中 ============================ ==== i、j、k：用來當作迴圈次數變數 =========== ==== x、X、y、z、Z：用來當作一般變數========== ============================================== --]] --[[ ============================================== ============== 各個巨集指令縮寫 ============== ============================================== --]] B="BattleGround"; -- 戰場頻道 (/bg) C="Channel"; -- 自定頻道 (/1,/2,...) 需要使用 頻道號碼 當做條件 CID=CheckInteractDistance; -- 檢查與目標距離 CPB=CancelPlayerBuff; -- 取消玩家的有益法術 CSBN=CastSpellByName; -- 使用名稱為 XXX 的技能 CT=ClearTarget; -- 取消目前選擇的目標 E="Emote"; -- 表情頻道 (/em) or (/e) f=format; -- 格式 %s 文字、%d 數字、%i 整數 G="Guild"; -- 公會頻道 (/g) GAC=GetActionCount; -- 取得該快速鍵上的數量 GIIC=GetInventoryItemCooldown; -- 取得玩家身上裝備的冷卻時間 GNPM=GetNumPartyMembers; -- 取得隊伍玩家的數量 GNRM=GetNumRaidMembers; -- 取得團隊玩家的數量 GPMP=GetPlayerMapPosition; -- 取得玩家所在位置座標 GSC=GetSpellCooldown; -- 取得法術冷卻時間 GTT=GetTrackingTexture; -- 取得目前搜尋技能的名稱 GZT=GetZoneText; -- 取得玩家目前所在地圖名稱 IUA=IsUsableAction; -- 快速鍵 O="Officer"; -- 幹部頻道 (/o) P="Party"; -- 隊伍頻道 (/p) p="player"; -- 玩家 R="Raid"; -- 團隊頻道 (/raid) or (/ra) r=random; -- 亂數產生 RW="Raid_Warning"; -- 團隊警告頻道 (/rw) S="Say"; -- 一班說話頻道 (/say) or (/s) s="spell"; -- 技能 SCM=SendChatMessage; -- 發出說話的指令 SIT=SpellIsTargeting; -- 檢查目標是否已經使用此技能 ( 不能使用代表已經使用 ) SSC=SpellStopCasting; -- 取消目前所施展的法術 STU=SpellTargetUnit; -- 對此目標 XXX 使用技能 t="target"; -- 目前目標 TLE=TargetLastEnemy; -- 上次所選的敵方單位 TLT=TargetLastTarget; -- 上次所選的目標單位 TNE=TargetNearestEnemy; -- 最近的敵方單位 TU=TargetUnit; -- 目標單位 UA=UseAction; -- 使用快速鍵 UB=UnitBuff; -- 單位有益法術 UC=UnitClass; -- 單位種族 UCI=UseContainerItem; -- 使用背包內的物品 UD=UnitDebuff; -- 單位的損害法術 UE=UnitExists; -- 單位是否存活著 UH=UnitHealth; -- 單位目前生命力 UHM=UnitHealthMax; -- 單位最大生命力 UIE=UnitIsEnemy; -- 單位是否敵對 UIF=UnitIsFriend; -- 單位是否有善 UII=UseInventoryItem; -- 使用裝備在身上的物品道具 UIP=UnitInParty; -- 隊伍中的單位 UL=UnitLevel; -- 單位等級 UN=UnitName; -- 單位姓名 UM=UnitMana; -- 單位目前魔力 UMM=UnitManaMax; -- 單位最大魔力 US=UnitSex; -- 單位性別 W="Whisper"; -- 密語頻道 (/whisper) or (/w) 需要使用 玩家ID 來當作條件 Y="Yell"; -- 大喊頻道 (/yell) or (/y) --[[ ========================================================= 取消有益的法術 用法：CancelBuff("法術名稱") ========================================================= --]] function CancelBuff(BuffName) GameTooltip:SetOwner(UIParent); if (not BuffName) then BuffName="*"; end local currBuffName; for CancelBuffLoop=0,15,1 do GameTooltip:ClearLines(); GameTooltip:SetPlayerBuff(CancelBuffLoop); currBuffName = string.lower(GameTooltipTextLeft1:GetText() or ""); if (currBuffName and string.find(currBuffName, string.lower(BuffName))) then CancelPlayerBuff(CancelBuffLoop); end; end; end; --[[ ========================================================= 檢查目標 法術中文名稱 or DeBuff 型態 用法：CheckBuff("法術名稱",1 or 2) 說明：1 法術名稱為 Buff 中文名稱後時用、2 法術名稱為 DeBuff 型態時用 例如：CheckBuff("祕法智慧",1)、CheckBuff("詛咒",2) ========================================================= --]] function CheckBuff(BuffName,BuffType) local CheckBuffChars=0; GameTooltip:SetOwner(UIParent); if (not BuffName) then BuffName="*"; end; local currBuffName; for CheckBuffLoop=0,15,1 do GameTooltip:ClearLines(); if (BuffType == 1) then GameTooltip:SetUnitBuff("target",CheckBuffLoop); currBuffName = string.lower(GameTooltipTextLeft1:GetText() or ""); end; if (BuffType == 2) then GameTooltip:SetUnitDebuff("target",CheckBuffLoop); currBuffName = string.lower(GameTooltipTextRight1:GetText() or ""); end; if (currBuffName and string.find(currBuffName, string.lower(BuffName))) then CheckBuffChars=1; end; end; return CheckBuffChars; end; --[[ ========================================================= 檢查目標 [法術名稱] 後判斷該 [法術名稱] 為何，並施放技能 1 不然就施放技能 2，若是不想施放請打 "" 用法：CheckBuffC("法術名稱",1 or 2,"技能1","技能2") 說明：1 法術名稱為 Buff 中文名稱後時用、2 法術名稱為 DeBuff 型態時用 例如：CheckBuffC("詛咒",2,"解除次級詛咒","") ========================================================= --]] function CheckBuffC(BuffName,BuffType,SpellName1,SpellName2) if CheckBuff(BuffName,BuffType)==1 then CastSpellByName(SpellName1); else CastSpellByName(SpellName2); end; end; --[[ ========================================================= 回傳與目標的大約距離 1 = 可查看，距離 5.55 碼以內 2 = 可交易，距離 11.11 碼以內 3 = 可決鬥，距離 10 碼以內 4 = 可跟隨，距離 28 碼以內 99 = 距離 28 碼以上 ========================================================= --]] function Distance() for DistanceLoop=4,1,-1 do if(CheckInteractDistance("target",DistanceLoop)==1) then if (DistanceLoop==4) then return 28; end; if (DistanceLoop==3) then return 10; end; if (DistanceLoop==2) then return 11; end; if (DistanceLoop==1) then return 5; end; else return 99; end; end; end; --[[ ========================================================= 顯示訊息 用法：Printf(你要印出的、文字、數字、function) ========================================================= --]] function Printf(msg) DEFAULT_CHAT_FRAME:AddMessage(msg,1.0,0.22,0); end; --[[ ========================================================= 顯示目前對象的血量百分比 Target Blood Percent 用法：Hp("target"或"player") ========================================================= --]] function HP(TBP) return (UnitHealth(TBP)/UnitHealthMax(TBP)*100); end; --[[ ========================================================= 顯示目前對象的魔力百分比 Target Mana Percent 用法：Hp("target"或"player") ========================================================= --]] function MANA(TMP) return (UnitMana(TMP)/UnitManaMax(TMP)*100); end; 2. 將您所想要的巨集複製貼上，有的巨集還在測試中..有問題請提出來，3Q 第一個巨集為正式巨集、第二個為縮寫過的巨集， 由於正式巨集容易超過 255 字元，才會有這樣的想法出現 ( 很多巨集都超過 255 字元了，囧rz.. ) 而我的快速鍵使用量的並不多，所以我的巨集都是將物品放在快速鍵上執行 關於技能ID的算法： 技能書內第一個頁籤[綜合]的第一個技能開始算起 用累加的方式從 1 開始計算 ... =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 當雙飾品沒在 CD 中就使用，並發射寒冰箭=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script p="palyer";UII=UseInventoryItem;GIIC=GetInventoryItemCooldown;if (GIIC(p,14)>0) then if (GIIC(p,13)==0) then UII(13);end;else UII(14);end;CastSpellByName("寒冰箭"); /script if (GIIC(p,14)>0) then if (GIIC(p,13)==0) then UII(13);end;else UII(14);end;CastSpellByName("寒冰箭"); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 檢查自身 Hp(1000)、Mp(390) & 飾品 CD 並施放魔爆術 =- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script p="player";IUA=IsUsableAction;UA=UseAction;UII=UseInventoryItem;GIIC=GetInventoryItemCooldown;SpellStopCasting();if (UnitMana(p)<391) then if (not IUA(21)==0) then UA(21);else UA(20);end;end;if (GIIC(p,14)>0) then if (GIIC(p,13)==0) then UII(13);end;else UII(14);end;CastSpellByName("魔爆術"); /script SSC();if (UM(p)<391) then if (not IUA(21)==0) then UA(21);else UA(20);end;end;if (UH(p)<1001) then if (not IUA(19)==0) then UA(19);else UA(18);end;end;if (GIIC(p,14)>0) then if (GIIC(p,13)==0) then UII(13);end;else UII(14);end;CSBN("魔爆術"); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 萬用冰箱巨集，當冰箱時取消冰箱，當CD中使用冷卻=-=-=- 我的技能 ID：28 = 寒冰屏障、44 = 急速冷卻=-=-=-=-=-= =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script SpellStopCasting();CancelBuff("寒冰屏障");if (GetSpellCooldown(28,s)>= 60) then if (GetSpellCooldown(44,s)== 0) then CastSpellByName("急速冷卻");else DEFAULT_CHAT_FRAME:AddMessage(format("**** ...[寒冰屏障] & [急速冷卻] 還在 CD 中... ****"));end;else CastSpellByName("寒冰屏障");end; /script SSC();CancelBuff("寒冰屏障");if (GSC(28,s)>= 60) then if (GSC(44,s)== 0) then CSBN("急速冷卻");else DEFAULT_CHAT_FRAME:AddMessage(f("**** ...[寒冰屏障] & [急速冷卻] 還在 CD 中... ****"));end;else CSBN("寒冰屏障");end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 當[靈風法術]啟動就放炎暴術，不然就施展寒冰箭=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- ......................... 還沒測試過，幫巴友寫的 .. ......................... /script p="player";for i=1,16 do UnitBuff(p,i);GameTooltip:SetUnitBuff(p,i);if (GameTooltipTextLeft1:GetText()=="靈風法術") then CastSpellByName("炎暴術");else CastSpellByName("寒冰箭");end;end; /script for i=1,16 do UB(p,i);GameTooltip:SetUnitBuff(p,i);if (GameTooltipTextLeft1:GetText()=="靈風法術") then CastSpellByName("炎暴術");else CastSpellByName("寒冰箭");end;end; ......................... 使用 Function 的巨集 .... ......................... /script TargetLastEnemy();CheckBuffC("靈風法術",1,"炎暴術","寒冰箭"); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 當雙飾品沒在 CD 中就使用，=-=-=-=-=-=-=-=-=-=-=-=-=- 並檢查技能[燃燒]是否在 CD 中，不然就施展[火球術]=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- ......................... 還沒測試過，幫巴友寫的 .. ......................... /script p="palyer";U=UseInventoryItem;G=GetInventoryItemCooldown;C=CastSpellByName;if G(p,14)>0 then if G(p,13)==0 then U(13);end;else U(14);end;if (GetSpellCooldown("燃燒技能ID號碼","spell")==0 then C("燃燒");else C("火球術");end; /script if GIIC(p,14)>0 then if GIIC(p,13)==0 then UII(13);end;else UII(14);end;if (GSC("燃燒技能ID號碼",s)==0 then CastSpellByName("燃燒");else CastSpellByName("火球術");end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 將團隊內被心控的變羊 LV1=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script p="player";R="Raid";for i=1,GetNumRaidMembers() do if (UnitIsFriend(p,R..i) and UnitIsEnemy(p,R..i)) then TargetUnit(R..i);SpellStopCasting();SendChatMessage("【%T】吃你的草吧！","Say");CastSpellByName("變形術(等級 1)");TargetLastEnemy();break;end;end; /script for i=1,GNRM() do if (UIF(p,R..i) and UIE(p,R..i)) then TU(R..i);SSC();SCM("【%T】吃你的草吧！",S);CastSpellByName("變形術(等級 1)");TLE();break;end;end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 將存活的敵方變豬=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script t="target";x={"羊","豬","烏龜"};X=x[math.random(getn(x))];if (UnitExists(t) and UnitIsEnemy("player",t)) then SpellStopCasting();SendChatMessage(UnitLevel(t).."級【%T】變"..X.."囉！","Say");if (X=="羊") then X="形";end;CastSpellByName("變"..X.."術");TargetLastEnemy();end; /script x={"羊","豬","烏龜"};X=x[math.random(getn(x))];if (UE(t) and UIE(p,t)) then SSC();SCM(UL(t).."級【%T】變"..X.."囉！",S);if (X=="羊") then X="形";end;CSBN("變"..X.."術");TLE();end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 依照等及施放 [祕法智慧] =-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script t="target";p="player";x=5;l={1,14,28,42,56};if (UnitMana(p)>1600 and UnitIsFriend(p,t)) then for j=x,1,-1 do if (UnitLevel(t);>=l[j]-10) then SendChatMessage("智慧之神啊！請您賜給【%T】，您的祝福吧！","Emote");CastSpellByName("祕法智慧(等級 "..j..")");break;end;end;end; /script x=5;l={1,14,28,42,56};if ((UM(p)>1600) and UIF(p,t)) then for j=x,1,-1 do if (UL(t);>=l[j]-10) then SCM("智慧之神啊！請您賜給【%T】，您的祝福吧！",E);CSBN("祕法智慧(等級 "..j..")");break;end;end;end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 檢查自身 Hp、Mp 自動吃 or 製作：麵包、晶水=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /e 刈包、豆漿 元氣！ /script gc=GetActionCount;c=CastSpellByName;UA=UseAction;p="player";if (GAC(23)==0) then CSBN("造食術");end;if (GAC(24)==0) then CSBN("造水術");end;if (UnitHealth(p)/UnitHealthMax(p)*100)<95) then UA(23);end;if ((UnitMana(p)/UnitManaMax(p)*100)<95) then UA(24);end; /script if (GAC(23)==0) then CSBN("造食術");end;if (GAC(24)==0) then CSBN("造水術");end;if ((HP(p)<95) then SCM("哎啊！我體力透支了，讓我休息一下！",E);UA(23);end;if (MANA(p)<95) then SCM("腦筋打結了！讓我整理一下思緒！",E);UA(24);end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 對友善單位 or 自己使用繃帶=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script UseAction(22); if (SpellIsTargeting()) then SpellTargetUnit("player");end; TargetLastEnemy(); /script UA(22); if (SIT()) then STU(p);end; TLE(); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 法術反制訊息=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script t="target";if (UnitExists(t) and UnitIsEnemy("player",t)) then SpellStopCasting();SendChatMessage("把﹝..UnitLevel(t).."級﹞的【%T】法術反制囉","Say");CastSpellByName("法術反制");end; /script if (UE(t) and UIE(p,t)) then SSC();SCM("把"..UL(t).."級﹞的【%T】法術反制囉",S);CastSpellByName("法術反制");end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 顯示自己的血量百分比=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script t="target";TargetUnit("player");SendChatMessage(format("救命啊...我被怪打，我的血量只剩：%d%% 我的法力只剩：%d%% 危險～危險!!",UnitHealth(t)/UnitHealthMax(t)*100,UnitMana(t)/UnitManaMax(t)*100), "Yell"); /script TU(p);SCM(f("哇！有怪物想謀殺我！，我的血量只剩：%d%% 我的法力只剩：%d%% 危險！", HP(p),MANA(p)),Y); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 顯示 [對方] 的血量百分比=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script t="target";SendChatMessage(format("注意！！﹝%s﹞級【%s】←他的血量只剩：%d%%。",UnitLevel(t),UnitName(t),UnitHealth(t)/UnitHealthMax(t)*100), "Yell"); /script SCM(f("注意！！﹝%s﹞級【%s】←血量只剩：%d%%。",UL(t),UN(t),HP(p)),Y); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 替隊伍友善單位解除詛咒=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script t="target";if (UnitExists(t) and UnitIsFriend("player",t)) then SendChatMessage("【%T】..我幫你解咒囉...","Say");SpellStopCasting();CastSpellByName("解除次級詛咒");TargetLastEnemy();end; /script if (UE(t) and UIF(p,t)) then SCM("【%T】..我幫你解咒囉...",S);SSC();CastSpellByName("解除次級詛咒");TLE();end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 取得目前地圖及座標位置=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script px,py=GetPlayerMapPosition("player");DEFAULT_CHAT_FRAME:AddMessage(format("[%s] %i,%i",GetZoneText(),px*100,py*100));SendChatMessage(format("目前所在的地圖：[%s] 座標位置：%i,%i",GetZoneText(),px*100,py*100),"Guild"); /script px,py=GPMP(p);DEFAULT_CHAT_FRAME:AddMessage(f("[%s] %i,%i",GZT(),px*100,py*100));SCM(f("目前所在的地圖：[%s] 座標位置：%i,%i",GZT(),px*100,py*100),G); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 閃現術=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script SpellStopCasting(); /施放 閃現術 /script SSC();CastSpellByName("閃現術"); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 隨機３種座騎=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 背包編號順序為 4 3 2 1 0=-=-=-=-=-=-=-=-=-=-=-=-=-=- 包包位置以16格包為例=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 1 2 3 4 =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 5 6 7 8 =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 09 10 11 12 =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 13 14 15 16 =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script x={"紫色骷髏戰馬","霜狼嗥叫者","迅捷祖利安猛虎"};z=0;TargetUnit("player");for j=1,3 do if (CheckBuff(x[j],1)==1) then CancelBuff(x[j]);z=1;end;end;if (z==0) then UseContainerItem(0,random(3)+1);end;ClearTarget(); /script x={"紫色骷髏戰馬","霜狼嗥叫者","迅捷祖利安猛虎"};z=0;TU(p);for j=1,3 do if (CheckBuff(x[j],1)==1) then CancelBuff(x[j]);z=1;end;end;if (z==0) then UCI(0,random(3)+1);end;CT(); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 切換雙採集=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script gtt=GetTrackingTexture();if (gtt==nil) then gtt="none";end;if (string.find(gtt,"Earthquake")) then CastSpellByName("尋找草藥");else CastSpellByName("尋找礦物");end; /script gtt=GTT();if (gtt==nil) then gtt="none";end;if (string.find(gtt,"Earthquake")) then CSBN("尋找草藥");else CSBN("尋找礦物");end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 骰子=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /roll =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 跟術士要糖；牧師要耐、精；小德要腳印；法師要包、水=- 記得要客氣有禮貌一點啊，不然會被加入黑名單唷=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script t="target";if (UnitSex(t)==2) then x="大哥" else x="大姊";end;if (UnitClass(t)=="術士") then SendChatMessage("哈囉！"..x.." 請問可以給我顆【糖】嗎?! 感恩！","Whisper","通用語",UnitName(t));end; /script if (US(t)==2) then x="大哥" else x="大姊";end;if (UC(t)=="術士") then SCM("嗨！"..x.."請問可以給我顆【糖】嗎？感恩！",W,"通用語",UN(t));end; ......................... 進階修改術、牧、德、法... ......................... /script z={"術士","牧師","德魯伊","法師"};Z={"給我顆糖","幫我加耐力、精神","幫我加腳印","給我幾組包、水"};if (UnitSex("target")==2) then x="大哥"; else x="大姊";end;for j=1,4 do if (UnitClass(t)==z[j]) then SendChatMessage("嗨！"..x.."請問可以"..Z[j].."嗎？感恩。","Whisper","通用語",UnitName("target"));end;end; /script z={"術士","牧師","德魯伊","法師"};Z={"給我顆糖","幫我加耐力、精神","幫我加腳印","給我幾組包、水"};for j=1,4 do if (UC(t)==z[j]) then SCM("嗨！請問可以"..Z[j].."嗎？感恩。^_^",W,"通用語",UN(t));end;end; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Kuso 出局！！ =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script SendChatMessage(" 嗶嗶！！給﹝" .. UnitLevel("target") .. "級﹞【%T】一張紅牌！！你出局了！！","Emote"); /script SCM(" 嗶嗶！！給﹝" .. UL(t) .. "級﹞【%T】一張紅牌！！你出局了！！",E); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 忙碌 OR 想偷懶的時候，設定 DND 請勿干擾訊息 =-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /dnd 測試巨集中，[魔法肉桂麵包]、[魔法晶水]每組若是肯支付1G的話，歡迎內洽！ =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 說出自己所選擇的目標=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script SendChatMessage("【"..UnitLevel("target").."級】的﹝"..UnitClass("target").."﹞"..UnitName("target"),"Say"); /script SCM(UL(t).." 級 "..UN(t),S); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 把視角拉很遠很遠的方法 ( N = 1 ~ 4 )，請記得修改 N=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- /script SetCVar("cameraDistanceMaxFactor", N); =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 我的快速鍵： 14 紫色骷髏戰馬 15 霜狼嗥叫者的號角 16 迅捷祖利安猛虎 17 極效治療石 ( 1200 ) 18 極效治療石 ( 1320 ) 19 極效治療石 ( 1440 ) 20 法力黃水晶 ( 775 ~ 925 ) 21 法力紅寶石 ( 1000 ~ 1200 ) 22 厚符文布繃帶 23 魔法肉桂麵包 24 魔法晶水 快速鍵全圖應為 37 25 38 26 39 27 40 28 （正中央為遊戲畫面） 41 29 42 30 43 31 44 32 45 33 46 34 47 35 48 36 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 （以上為介面設定內可自行增加的快捷鍵） 01 02 03 04 05 06 07 08 09 10 11 12--shift+1 13 14 15 16 17 18 19 20 21 22 23 24--shift+2 伺服器：布洛米爾 種族職業：不死法師 ID：小小世界  x1
|
|||
|
引用 | 編輯
bassplayer
2006-11-09 18:00 |
2樓
▲ ▼ |
|
試用結果，真的很好用!!
但是有個地方有問題 我本身是牧師 鎖怪的時候，CID=CheckInteractDistance，沒有反應 將此定義刪除後恢復正常 @"@ x0
|
|
