缩写巨集...
以下巨集，是我在巴哈上面，跟各位前辈们所学习到的
加上自己的使用习惯修改过，还有自己写的..
若是要转贴，欢迎..但请附上来源，感恩
另外若是下列巨集有问题的话，请提出来..好让小弟我修改..
１. 首先先用文字编辑器将以下文字加入任一 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：小小世界
