作者Gradyfx (Grady)
看板WOW
标题[心得] 毁灭暗月卡散卡数量统计/交换用巨集
时间Thu Mar 31 12:24:52 2011
巨集A
作用: 统计身上+银行内的毁灭暗月卡散卡数量
程式码:
/run h={}nS={"波涛","流风","众石","余烬"}local s=""
for i=1,32 do j=ceil(i/8)h[i+32]=0 k=32+j n=GetItemCount(62020-i,1)
h[33-i]=n h[k]=h[k]+n/8 s="\t"..n..s if i%8==0 then s="\n"..nS[j]..s h[k+4]
=floor(h[k])h[k]=ceil(h[k])end end print(s)
-----------------------------------------------------
巨集B
作用: 根据巨集A的统计结果, 计算多余与缺乏的卡片, 贴至指定频道寻求交换,
会自动略过无需交换的系列, 如无卡可换则不会发出讯息.
卡片数量如有变动, 需要重新执行巨集A做统计.
程式码:
/run local s="",t for i=1,4 do t={"",""}for j=1,8 do d=h[i*8+j-8]
if d>h[37-i]then t[1]=t[1]..j end if d<h[41-i]then t[2]=t[2]
..j end end if t[1]~=""and t[2]~=""then s=s..nS[5-i]..t[1]..
"换"..t[2].." " end end SendChatMessage(s,"channel",nil,2)
最後的数字2可以代换为指定频道号码.
-----------------------------------------------------
程式码请自行黏贴成同一行, 上面列的每一行之间不可以有空格.
范例A:
余烬 49 43 30 35 36 38 32 39
众石 22 26 24 23 26 22 23 25
流风 36 42 32 37 35 35 40 38
波涛 31 26 25 25 25 15 14 19
范例B:
[2. 交易] [id]: 余烬128换3457 众石258换16 流风278换356 波涛12345换678
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 122.106.164.144
1F：推 vds:惊人... 03/31 12:25
2F：→ phire:应该是换行？ 03/31 12:29
※ 编辑: Gradyfx 来自: 122.106.164.144 (03/31 12:32)
3F：推 LisztLee:只好把稀缺卡摆银行.. 03/31 12:31
4F：推 lulanee:大户的巨集! 03/31 12:35
5F：推 oldriver:这篇巨集可以说是实用 应用度很广吧 03/31 12:40
6F：推 mantohu:GJ 03/31 13:01
7F：推 foreverk:超实用XD 03/31 13:11
8F：推 foolkids:鬼! 03/31 13:41
9F：推 garfunkel:有钱人的实用QQ 03/31 17:03
10F：推 somnolentcat:赞 03/31 17:59
11F：推 adayoegi:强大... 03/31 22:05
12F：推 okis:推阿 超好用~ 06/09 19:35
13F：推 scom:实用推!!!!!!!!! 06/21 19:43
14F：推 t860101:推 08/11 01:19