作用條件是負重量要高於6000 
當然看的懂得可以自己改大略負重範圍 
使用方法是先將角色放至汶巴拉 
接著在黑窗上面打上macro start 
 
###############土原分解############### 
 
 
 
#手動開始,請先確定身上無土原和地礦 小黑窗輸入macro start 
macro start { 
        do move @rand (85, 88) @rand (157, 159) umbala 
        do talknpc 87 160 c r1 n 
        pause 2 
        do storage get 土靈原石 140 
    do storage close 
    } 
 
#身上有土原時,去土原分解房間 
automacro AutoDA{ 
        location umbala 
        inventory "土靈原石" > 9 
        exclusive 1 
        call { 
        do move 32 71 um_in 
        } 
} 
 
#身上有涂原石,開始分解,一次10個 
automacro AutoDB { 
        location um_in 32 71 
        inventory "土靈原石" > 0 
        macro_delay 0.5 
        exclusive 1 
        call { 
        do talknpc 44 71 c c r1 c r0 c d10 c d9 c c n 
# d10 是一次分解 10 個土原,d9 是他要你隨便選的數字 
        } 
} 
 
#判斷分解完後,存倉取倉等 
automacro AutoGetA { 
        inventory "土靈原石" == 0 
    inventory "地靈礦石" > 1000 
#若土原0個,地礦大於1000個,則啟動倉庫(140顆土原分解完後地礦一定大於1000,避免和下面的巨集衝突) 
        macro_delay 0.5 
        exclusive 1 
        call { 
           do move 132 144 umbala 
           do move @rand (84, 86) @rand (155, 159) umbala 
        do talknpc 87 160 c r1 n 
    pause 2 
    do storage add 地靈礦石 
    if (@storamount (土靈原石) > 140  ) goto checkA 
    if (@storamount (土靈原石) < 140  ) goto checkB 
 
    :checkA 
            call A 
            release all 
            stop 
 
    :checkB 
            call B 
            release all 
            stop 
 
        } 
} 
################################################## 
 
macro A { 
        if (@storamount (地靈礦石) > 28000  ) goto checkB 
#檢查倉庫地礦,若大於28000個開始販賣(倉庫物品上限三萬),若沒大於輒繼續分解土原 
        do storage get 土靈原石 140 
        pause 1 
        do storage close 
        release all 
        stop 
#自動重回automacro AutoDA 
 
    :checkB 
            call B 
            stop 
 
    } 
################################################## 
 
macro B { 
              pause 2 
        if (@storamount (地靈礦石) < 1000  )  goto checkC 
#若販賣到地礦小於1000個,繼續分解土原 
        do storage get 地靈礦石 1000 
        pause 1 
        do storage close 
        release all 
        stop 
#呼叫automacro AutoSellA 
 
    :checkC 
            call C 
            stop 
 
    } 
################################################## 
 
macro C { 
        if (@storamount (土靈原石) > 140  ) goto checkD 
        do storage close 
        pause 1 
        do relog 
        release all 
#地礦小於1000,土原小於140,結束 
 
    :checkD 
            call D 
            stop 
    } 
################################################## 
 
macro D { 
        do storage close 
        pause 1 
        call start 
        release all 
        stop 
#重回start取倉分解土原 
    } 
 
 
################################################## 
macro E { 
        do move @rand (85, 95) @rand (155, 159) umbala 
        do talknpc 87 160 c r1 n 
    pause 1 
 
    call B 
    release all 
    stop 
#回汶巴拉開倉,重回巨集B 
    } 
 
################################################## 
 
 
 
automacro AutoSellB { 
    run-once 1 
        location umbala 
        inventory "地靈礦石" == 1000 
        macro_delay 0.5 
        exclusive 1 
        call { 
    do move 101 154 
    pause 1 
        do talk @npc (102 154) 
        pause 1 
    do sell 
    pause 1 
    do sell @inventory(地靈礦石) 1000 
    do sell done 
    pause 2 
    release all 
        call E 
 
        stop 
    } 
 
} |   
 
 
 
 |