作者Gradyfx (Grady)
看板WOW
标题[徵文]COD大宗物资采购专用巨集
时间Thu Jun 9 16:00:51 2011
巨集A
作用: 设定收COD信件中的物品价格, 单位是G
格式:
/run pA={"
物品A物品B","
物品C","
物品D"}pP={"
价格A","
价格C","
价格D"}
范例:
/run pA={"烬花心绽花风暴藤艾萨拉的帷纱","暮光茉莉鞭尾蜥草","烈性生命",
"奎蛇之舌冰棘","永恒生命","虎百合金黄苜蓿"}pP={35/20,50/20,9,25/20,6,20/20}
说明:
以上范例会用每组35G的价格, 收购烬花等草药. 因为定价一般是用每组价格,
所以写成
35/20就会自动被换算成每根草
1g75s, 方便修改. 在字数限制内可以放很多组.
限制: 1. 该物品个别价格必须为
整数 (
每个1g25s OK,
每个3g33s33.333c 不OK)
2. 所有品名可以在搜寻字串中找到的物品都会被视为符合预设条件.
如果设定"黄铁矿石", "铁矿"跟"铁矿石"都会被同价格付款.
3. 不会考虑你的财力. 例如喊收烈性生命9g, 对方一次寄1000个来,
会照付9000g. (注: COD有每封10000G的内建上限)
巨集B
作用: 由前往後取出信箱内每封COD信件的第一格物品, 会根据巨集A的价格进行判定,
只有对方开出的价格完全符合的情况下才会收信. 价格不符或非COD信件都会被
自动略过.
每按一次取一封. (巨集A定价动作只需要重登入或改价後按过
一次)
程式码:
/run for m=1,50 do local t=0 v=select(6,GetInboxHeaderInfo(m))for i=1,12 do n,
_,c=GetInboxItem(m,i)for j=1,table.maxn(pA) do if n and pA[j]:find(n)then t=t+
c*pP[j]end end end if v>0 and v/10000==t then TakeInboxItem(m,1)end end
以下为无用巨集, 千万不要点, 尤其是没戴耳机的时候. 巨集B按第二次取消.改fR调速度
/run rA=random fA={"Critical","Heavy","Medium","Light"}fR=1
程式码请自行黏贴成同一行, 上面列的每一行之间不可以有空格.
/run T5,F5=T5 or 0,F5 or CreateFrame("frame")if X5 then X5=nil else X5=
function()local t=GetTime()if t-T5>fR then PlaySoundFile("Sound\\Creature\\Pal
etress\\AC_Paletress_Wound"..fA[rA(4)].."0"..rA(3)..".wav")T5=t end end end F5
:SetScript("OnUpdate",X5)
有用请给个
推, 谢谢大家.
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.24.0.213
1F：推 jeremmmy:用不到 但是给推XXD 06/09 16:08
2F：推 qoh:泡泡快来看这篇阿... 06/09 16:09
3F：推 Chihuah:看起来很厉害 虽然用不到 但还是推啦! 06/09 16:20
4F：推 ironsalami:推啊 奸商好用 XDD! 06/09 16:27
5F：推 im2a27:很强大 06/09 16:36
6F：推 Erich:不愧是大户… 06/09 16:47
7F：推 tkplay:实用，之前的暗月卡巨集也很好用，推~ 06/09 17:03
8F：推 slow1235:push!! 06/09 17:06
9F：推 nick5130:推 06/09 17:21
10F：推 icedvd: 06/09 17:43
11F：推 Seraph529:开灯後的东西好奇怪.... 06/09 17:56
12F：推 soulknight:大户.....小弟有点欠缺盘缠XD 06/09 18:09
13F：推 PPCYes:...只好推黑字了 06/09 19:11
14F：→ furbyyeh:烬花心绽花风暴藤艾萨拉的帷纱 ... 06/09 19:29
15F：推 okis:大推阿~~ 暗黑 科科 06/09 19:39
16F：推 wowsonic:我想要请问有没有类似这种收信的脚本是反过来可以寄东西 06/09 19:48
17F：→ wowsonic:到其他分身的巨集，谢谢!! 06/09 19:49
18F：→ Gradyfx:有的, 事实上任何想象得到的都可以用巨集达成. 06/09 20:02
19F：推 yang910228:这超有用啊! 06/09 20:06
20F：推 wowsonic:那请问,如果要寄出相同物件的程式码，该如何去写，谢谢! 06/09 20:17
21F：→ Gradyfx:用GetContainerItemInfo(b,s)比对每格品名/数量, 06/09 20:27
22F：→ Gradyfx:再把符合条件的用UseContainerItem(b,s)放进去寄信格. 06/09 20:27
23F：推 lpiglet:有看有推 其实这种心得文多点推会有更多心得文 06/09 22:42
24F：推 adayoegi:推看不到的巨集XD 06/09 23:05
25F：推 jamteam:等我回锅再战! 小壁虎你等着 06/09 23:10
26F：推 usoko:想知道那个暗黑巨集的作用XD 06/10 00:56
27F：推 Cycylno:就是重复放出某种女性单位受伤的音效吧 XD 06/10 09:58
28F：推 H05: 06/10 19:26