Simples Mining v1

Share, help and discuss macroing.
Post Reply
User avatar
Marcus
Newbie
Newbie
Posts: 2
Joined: 02 Apr 2019, 22:44

Code: Select all

//////////////////////////////////////////
//         Simple Mining Script V1      //
//               By Scharf              //
//////////////////////////////////////////

if not dead
    #equip check
    if rhandempty
        dclicktype 'pickaxe'
        pause 600
    endif
    #mining section
    hotkey 'use item in hand'
    waitfortarget 5000
    targetrelloc 0 0
    pause 1000
    #stop when no more ore
    if insysmsg "There is no metal here"
        overhead '> Move to Next Spot <' 33
            clearsysmsg
            random 8
            if insysmsg 'Random: 1'  
                walk 'North'
                walk 'North'
            elseif insysmsg 'Random: 2'
                walk 'Up'
                walk 'Up'
            elseif insysmsg 'Random: 3'
                walk 'West'
                walk 'West'
            elseif insysmsg 'Random: 4'
                walk 'Left'
                walk 'Left'
            elseif insysmsg 'Random: 5'  
                walk 'South'
                walk 'South'
            elseif insysmsg 'Random: 6'
                walk 'Down'
                walk 'Down'
            elseif insysmsg 'Random: 7'
                walk 'East'
                walk 'East'
            elseif insysmsg 'Random: 8'
                walk 'Right'
                walk 'Right'
            endif

    else
    #wait to loop
    pause 5000
    endif
endif
loop
Post Reply