Tree Hugger Help

Discussion in 'Scar/Simba Help' started by ganster82, Nov 3, 2007.

Tree Hugger Help
  1. Unread #1 - Nov 3, 2007 at 11:46 PM
  2. ganster82
    Referrals:
    0

    ganster82 Guest

    Tree Hugger Help

    Yeah this script is alright and everything, But how can i keep my woodcutting axe in the first inventory slot without it making it drop it, Also i had a little problem idk what happened, My guy was in a house with the iron axe equipped gone. Confused me. Does this script have anti-randoms? J/w

    Well your help will be appreciated


    --thx--



    // ~ boom ~ \\
    //////denial\\\\\\
    ////tree hugger\\\\
    /////////1. 0\\\\\\\\\
    //____________________\\

    //how to use: setup right below, that explains most of it :)\\
    // note that this power/autominer won't work well in all mines\\
    {------------------------drops every 25 ore------------------------}
    {have pick equipped and inventory empty, don't wear anything you like}


    program moltenminer;

    const

    startupwait = 10000;//how long before script starts after compiling


    treecolor1 = 3567717;// set 3 tree colors.

    treecolor2 = 1452326;// set 3 tree colors.

    treecolor3 = 538158;// set 3 tree colors.

    choppinginterval = 9000;// time before chopping each log

    drop = true;// do you wanna drop? if false set logs to chop to 28

    logstochop = 100;//how many rocks to mine

    {.include SRL/SRL.scar}



    procedure treehugger;


    var
    i, x, y: integer;
    begin
    cleardebug;
    writeln('tree hugger will begin soon, please post comments bugs and ')
    writeln('sugestions on site you got this script from')
    writeln('treehugger 1.4 will include better antirandoms, form use and ability to chop better trees')



    wait(startupwait+random(1000))
    repeat

    i:= i + 1
    if (drop = true) then
    dropall;
    cleardebug;
    writeln('chopped: ' + inttostr(i))
    writeln('dropped: ' + inttostr(i))
    writeln('script has been working for ' + timerunning)

    if (FindColor(x, y, treecolor1, 0, 0, 517, 337)) or
    (FindColor(x, y, treecolor2, 0, 0, 517, 337)) and
    (FindColor(x, y, treecolor3, 0, 0, 517, 337))then
    mmouse(x,y,2,2)
    mouse(x,y,1,1,true)
    wait(choppinginterval+random(1000))
    until i = logstochop


    writeln('script has worked for ' + timerunning)
    writeln('logs chopped ' + inttostr(i))
    writeln('logs dropped ' +inttostr(i))
    end;


    begin
    setupsrl
    treehugger
    end.
     
  3. Unread #2 - Nov 4, 2007 at 8:45 PM
  4. oliver1205
    Joined:
    Feb 11, 2007
    Posts:
    124
    Referrals:
    1
    Sythe Gold:
    0

    oliver1205 Active Member

    Tree Hugger Help

    instead of dropall, use drop(2,28)

    and use findnoramlrandoms; to cover randoms
     
  5. Unread #3 - Nov 4, 2007 at 11:31 PM
  6. bojanglesman
    Joined:
    Nov 4, 2007
    Posts:
    32
    Referrals:
    0
    Sythe Gold:
    0

    bojanglesman Member

    Tree Hugger Help

    you should use code tags because its easier to read, and script looks good.
     
< Simple Click | need help with SCAR >

Users viewing this thread
1 guest


 
 
Adblock breaks this site