Menu
What's new
UOGamers Community

This is a sample guest message. Register a free account today to become a member! Once signed in, you'll be able to participate on this site by adding your own topics and posts, as well as connect with other members through your own private inbox!

  • To obtain new Razor updates, please reinstall Razor from our new website.

Lumberjack script, for all who can't search. PART 1

A

Aronyc Tymewell

Wanderer
Lumberjack script, for all who can't search. PART 1

Ok so I got a request to come up with a descent lumberjacking script, this is one i used, and it worked very well, just need lots of saws and hatchets and your gold... i'll try to write one soon but until then, here ya go

btw this is PART 1, so copy paste the code below into a text file, then copy paste the code in PART 2 (seperate thread) into the same text file AFTER the code from part 1. its not rocket sience.


Code: 
;7/25/04
;Jebbits On The Fly Lumber Rail 10
initevents
key p alT
;******** INITIAL SETTINGS*****************
set %bank #true
set %recall #false
set %hideme #true
set %menu #true
set %stop 999999
set %runenum 7                   ;rune number placement in book
set %object euhzjmd            ;Runebook ID
set %home 2
set %axes lsf_bsf_nsf_zrf_rmh_lph_uoh_fsf
set %script #TRUE
set %b 0
set %first 0
set %set1 0
set %set2 0
set %number 2
set %b 0
set %logs zlk
set %boards tlk
set %all %boards , _ , %logs
set %saw agg_egg
set %delay 30
set %targetfirst 0
set %counterstarted 0
set %scnt 0
set %secureid 0
set %sss 0
SET %S 0
set %n 0
set %o 0
set %jin #jindex
SET %cx #charposx
SET %cy #charposy
set %maxweight #maxweight - 25
set *511 pause
set %home %home + 1

;*********PAPERDOLL SETUP********************
Menu Clear
   Menu hide
   Menu Window size 310 40
   Menu Window Color $D9D0C8
   Menu Font bgcolor $D9D0C8
   Menu Font Color Black
Menu Font Style b
Menu font size 12
   Menu Font Name tahoma
   Menu Window Title Jebbits Lumber Rail
   Menu Text txt 10 10 Please Rate This Script If  You Use It
   menu show 270 0
wait 60
   menu hide

Menu Clear
   Menu hide
   Menu Window size 250 50
   Menu Window Color $D9D0C8
   Menu Font bgcolor $D9D0C8
   Menu Font Color Black
Menu font size 10
   Menu Font Name tahoma
   Menu Window Title Jebbits Lumber Rail
   Menu Text txt 10 10 Initializing
   menu show 270 0
   menu hideeuo

menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing.
Menu Text txt1 10 30 Opening Paperdoll
Event macro 8 1
      wait 20
      contpos 650 0
      event macro 8 7
      wait 20
menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing..
Menu Text txt1 10 30 Opening Status
event macro 8 2
      wait 20
      contpos 200 200
      wait 20
     CLICK 596 358
menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing...
Menu Text txt1 10 30 Opening Backpack
event macro 8 7
	 wait 20
      contpos 615 330
      wait 10
      set %backpackid #contid
      set %bb C_ , %backpackid
      wait 10
menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing....
Menu Text txt1 10 30 Finding Axe
           finditem %axes C_ , #charid
            wait 10
if #findkind = -1
finditem %axes c_ , %Backpackid
wait 20
if #findkind = -1 2
display msg Hey did you forget an axe for cutting the wood.
halt
 menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing.....
Menu Text txt1 10 30 Finding Saw
         finditem %saw C_ , %backpackid
        if #findid = x 2
        display msg Hmmmm not finding any Saw in your pack.
        halt
menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing.......
Menu Text txt1 10 30 Locating Secure Container
        finditem jif_kif_iif_HIF G_1
        wait 10
if #findid = x && %bank = #false 2
       display msg Make sure you are standing next to a large wood or metal chest. Then restart the script
       halt
if %bank = #true
msg bank $
      wait 20
      set #LOBJECTID #findid
	event macro 17 0
      wait 20
contpos 98 95
      set %secureid #findid
      ignoreitem #lobjectid
menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing........
Menu Text txt1 10 30 Locating Storage Box
WAIT 10
        finditem cud_hkf c_
        wait 10
if #findid = x 2
       display msg Make sure you have a small WOOD BOX in your secure. Then restart the script
       halt
      wait 20
      set #LOBJECTID #findid
      set %orebagid #findid
      ignoreitem reset
      set #lobjectid %secureid
      wait 10
   menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing.........
Menu Text txt1 10 30 Arming Axe
gosub axearm
wait 50

sub axearm
set %hold #lobjectid
finditem %axes c_ , #charid
if #findkind = 0
{
set %helditem #findid
return
}
if #findkind = -1
{
finditem %axes c_ , %Backpackid
if #findkind = -1
{
finditem %axes c_ , %Secureid
if #findkind = -1 && %cutting = 99

pause
}
set #rhandid #findid
set %helditem #findid
dropp:
event macro 24 2
finditem %helditem c_ , #charid
if findkind = -1
goto dropp
set #lobjectid %hold
}
return
if %recall = #false
{
        goto menu
}
 menu delete txt
menu delete txt1
Menu Text txt 10 10 Initializing......
Menu Text txt1 10 30 Setting up rune book ID
finditem %object c_ , %backpackid
wait 10
if #findid = x 2
display msg You do not have a rune book in your pack.
halt
      set #LOBJECTID #findid
	event macro 17 0
      wait 1s
      set %drag #contkind
      click 465 334 r


menu:
menu HIDE
CLICK 128 192 R

set %first 0
set %set1 0
set %set2 0
gosub remember

;**********RUNEBOOK SET UP****************************
;****************MAIN MENU**********************

gosub setup
sub setup
hh:
display yesnocancel Click Yes If you wish to Mark a rail spot. Click no if you are finished. Click cancel if your wish to re-target a location
if #dispres = no
{
deletejournal
return
}
if #dispres = Cancel
{
    set %nn %nn - 1
    set %oo %oo - 1
    goto hh
}
if #dispres = yes
{
    GOSUB FINDtool
    set #lobjectid %helditem
    event macro 17 0
    set %first %first + 1
    wait 20
waiting:
    if #targcurs = 1
     goto waiting
      set %set1 #cursorx
       set %set2 #cursory
        gosub remember
if #weight > %maxweight
gosub cut
        goto hh
}
return

gosub gohome
loop:
gosub chop
gosub findtool
gosub maketool
gosub chop
gosub check
goto loop

;******FIND Tool SUBROUTINE***********
sub findtool
finding:
finditem %helditem
       wait 5
       if #findid <> X
return
else
finditem %axes c_ , %backpackid
       wait 5
       if #findid = X
{
gosub gohome
gosub house
GOSUB RETURN
}
set %helditem #findtype
return

;***********Sub Chop*****************
sub chop
WALKAGAIN:
if %nn < %home 2
      gosub loc
      GOTO WALKAGAIN
      set #ltargetkind 2
RETURN:
if %nn < %home
      return
if %health = #true && #hits < #maxhits - 10
      gosub health
      finditem %helditem
if #findkind = -1
      gosub armaxe
      set #lobjectid %helditem
      event macro 17 0
      SET %FINDX #LTARGETX
if %x <> 1 2
      click %digspotx %digspoty d
      click %digspotx %digspoty d
IF %FINDX <> #LTARGETX
      set %x 1
      wait 10
      event macro 22
      gosub check
if %mark = 99
{
      set %MARK 0
      gosub loc
}
      GOTO RETURN
return


;**************CHECK SUBROUTINE****************
sub check
set %checkit #jindex
FOR %i %jin %checkit
{
   SCANJOURNAL %I
if Your_backpack_is_full in #journal
gosub full
If you_destroyed in #journal
gosub checktool
if Can't_place in #journal
gosub place
if not_enough in #journal || cannot_see in #journal || far_away in #journal || can't_use in #journal
gosub allelse
        }
SET %JIN %CHECKIT + 1
finditem %axes C_ , #charid
if #findkind = -1
gosub axearm
if #findkind = -1
goto runhome
	set %counter %counter + 1
	scanjournal
if #weight > %maxweight
		{
DELETEJOURNAL
finditem %LOGS c_ , %backpackid
       if finditem <> x
                                   {
     gosub cut
gosub recheck
     return
                                  }
runhome:
if %recall = #true
gosub recall
   GOSUB GOHOME
      gosub house
       gosub goback

        RETURN
}
If you_destroyed in #journal 1
          gosub checktool
			if %counter = 20
set %x + 1
if %counter = 20
   set %counter 0
     if %counter > 19
       gosub checktool
         wait 55
	return


sub full
deletejournal
gosub cut
gosub recheck
 return


sub place
deletejournal
set %checkweight #weight
gosub cut
if %checkweight = #weight
goto runhome
return

sub allelse
SET %MARK 99
DELETEJOURNAL
 RETURN



;***********HOUSE SUBROUTINE************
sub house
set %cutting 99
set %nn 1
set %oo 1
set %o 1
set %n 1
;***********WALKING TO SECURE*************
set %scnt #scnt
movingtime:
if #scnt - %scnt > 4
     {
      set %scnt #scnt
      event macro 5 1
      event macro 5 1

           }
      move %cx %cy 0 1s
if #charposx <> %cx ||  #charposy <> %cy
      goto movingtime
      set %x + 1
      set %counter 0
;***************************HIDING********************
if %hideme
      event macro 13 21
      wait 5
;****************FIND AND OPEN CHEST*************
opensecure:
;Find chest
if %bank = #true 2
   msg Bank $
   goto skip
FINDITEM %SECUREID
IF #FINDKIND = -1
{
GOTO OPENSECURE:
}
skip:
      ;Open chest
      set #LOBJECTID %secureid
      set #findmod 0_0
      set #NEXTCPOSX 27
      set #NEXTCPOSY 49
      event macro 17 0
set %scnt #scnt + 5
WaitSecureToOpen:
if %scnt < #scnt
goto opensecure
    finditem %orebagid
if #findid <> %orebagid
	goto WaitSecureToOpen
INGOREITEM RESET
finditem %axes c_ , #charid
if #findid = x
{
gosub findtool
gosub axearm
}
gosub more

;*************FILE SPLIT******************
 
A

Aronyc Tymewell

Wanderer
yes i believe so, as for the version, i dont care what version it is, it gave me 9k boards in about 3 hours with no problem. if it works, why improve it. and if you have the newer version, then post it. or the link..
 
O

Ozzie-demise

Wanderer
Well if you want to train lumberjacking fast i advise u just hit a guild member with a crappy hatchet. This GMed my lumberjacking in about 1hr.
 
R

Ryuchi

Wanderer
*totally new to scripts*

Sooooo what program do you use this with and how in the nine hells do you use it?
 
R

Ryuchi

Wanderer
ok, im having a hell of a time trying to work this...
it says i need to have a small wood box in my secure, or something, what exactly does this mean? I thought it meant you need a secure small wooden box in a house or something... which i do have if thats what it does mean. i don't know
 
R

Ryuchi

Wanderer
Did the creator of this script make some sort of help thing? I have a problem and i have no idea what to do to make it work...
 
J

Jebbit

Wanderer
This may be old, but hey its my script so figured i would post. Yes it is currently updated with a new menu for ease of use. feel free to visit Easyuo.com.
 
A

Andzx

Wanderer
Jebbit said:
This may be old, but hey its my script so figured i would post. Yes it is currently updated with a new menu for ease of use. feel free to visit Easyuo.com.
Click to expand...
It didn't work for me. The scrip srews up by dragging the carpentery menu down to the...err allmoust out of the screen and so it doesnt hit the boards button...and then just stays at this state... Any idea why is this happening?
 
G

Gargamel

Wanderer
I had the same problem as you Andzx but what I did to fix it was to not click on anything at all when it was running, I just sat back and watched it go and it worked fine.
 
You must log in or register to reply here.
Top