Pheros Bastet at 20:23, 28 May 2010

2010-05-28T20:23:44Z

Pheros Bastet at 20:14, 28 May 2010

2010-05-28T20:14:48Z

Pheros Bastet at 20:13, 28 May 2010

2010-05-28T20:13:32Z

Pheros Bastet: New page: ; copy paste everything in a text file, save it with onionswood.ahk and start it with AHK ; all are for AHK

  ^+[:: ;STRG SHIFT [ WinSet, Region, , A return  ^+d:: ;STRG SHIFT d Wins...

2010-05-28T20:10:04Z

New page: ; copy paste everything in a text file, save it with onionswood.ahk and start it with AHK ; all are for AHK <pre> ^+[:: ;STRG SHIFT [ WinSet, Region, , A return ^+d:: ;STRG SHIFT d Wins...

New page

; copy paste everything in a text file, save it with onionswood.ahk and start it with AHK
; all are for AHK

<pre>

^+[:: ;STRG SHIFT [
WinSet, Region, , A
return

^+d:: ;STRG SHIFT d
Winset, Disable, , A
return

^+]:: ;STRG SHIFT ]
Winset, Enable, , A
return

^+e::Edit
;STRG SHIFT E

^+q::Pause, Toggle
;STRG SHIFT Q

^+r::Reload
;STRG SHIFT R

^+x::ExitApp
; Exit macro strg shift X

; Atitd screen groesse 1149, 822
^+F12:: ;strg shift f12
WinSet, Style, -0xC00000, eGenesis Client
WinMove, eGenesis Client, , 0, 0, 1149, 822
return

; ---- check Water ----
checkwater()
{
Sleep, 400
PixelGetColor, water01, 342, 66 ; 3. posi water
PixelGetColor, water02, 277, 69 ; 2. posi water
Mousegetpos, mx2, my3
Sleep, 400
if (water01 = 0xD6AA8C) ;Water 3. posi da
{
MouseClick, right, 345, 83 ; click water
Sleep, 500
mousemove, mx2, my3
Sleep, 200
checkgather()
checkwater()
}
if (water02 = 0xEFC7B5) ;Water 2. posi da
{
MouseClick, right, 277, 69 ; click water
Sleep, 500
mousemove, mx2, my3
Sleep, 200
checkgather()
checkwater()
}

}
return

;---------------------------------------------
;------------------ W O O D ------------------
;---------------------------------------------

;needs adjustments on your site
; basic idea:
; pin each tree after the next on left side, then after 9 trees, next on right side
; then set coords to run to next tree
; remain to carry grilled cabbage, maybe set coords where to eat again
; double F8 max zoomed out!
; pin consume window right to items/skill tab
; pin "stash to WH window" between chat and consume window after taken hatchet and all stuff u need including 100 wood

; place mouse over point of stashing wood before start wood macro

^+w:: ; strg shift w
MouseX = 13 ; sets F and G line
MouseGetPos, woodx01, woodx02
loop
{
checkeatend() ; perception food
sleep, 300

loop, 5 ;anzahl wood runs
{
IfWinactive, eGenesis Client
{
MouseClick, left, MouseX, 40 ;1. Baum fenster top left
sleep, 200
checkwood()
sleep, 300
MouseClick, left, MouseX, 124 ;2. Baum fenster unter 1. fenster top left
sleep, 200
checkwood()
sleep, 200
;moving
MouseClick, left, 819, 190 ; MOVING
Sleep, 400
MouseClick, left, MouseX, 208 ;3 baum fenster
sleep, 200
checkwood()
sleep, 200
;moving
MouseClick, left, 819, 190 ; MOVING
Sleep, 400
MouseClick, left, MouseX, 292 ;4 baum fenster
sleep, 200
checkwood()
sleep, 200
MouseClick, left, MouseX, 376 ;5 baum fenster
sleep, 200
checkwood()
sleep, 200
;moving
MouseClick, left, 819, 190 ; MOVING
Sleep, 400
MouseClick, left, MouseX, 460 ;6 baum fenster
checkwood()
;moving
MouseClick, left, 819, 190 ; MOVING
Sleep, 400
MouseClick, left, MouseX, 544 ;7 baum fenster, left
checkwood()
;moving
MouseClick, left, 819, 190 ; MOVING
Sleep, 400
MouseClick, left, MouseX, 628 ;8 baum fenster,
checkwood()
;moving
MouseClick, left, 969, 288 ; MOVING
Sleep, 400
MouseClick, left, MouseX, 712 ;9 baum fenster, LINKS
checkwood()
MouseClick, left, 843, 40 ;1 baum fenster, RECHTS bottle tree
checkwood()
;moving
MouseClick, left, 869, 418 ; MOVING
Sleep, 400
MouseClick, left, 845, 124 ;2 baum fenster, RECHTS Royal Palm
checkwood()
;moving back
MouseClick, left, 417, 474 ; MOVING
Sleep, 400
}
}

MouseClick, left, 446, 230 ; movig to stop point
sleep 900
MouseClick, right, woodx01, woodx02
sleep 75000
MouseClick, right, woodx01, woodx02
sleep 1900
MouseClick, right, woodx01, woodx02
sleep 1900
MouseClick, right, 570, 449
sleep 3900
MouseClick, left, 547, 675
sleep 500

}
return

checkwood()
{
MouseGetPos, MouseX, MouseY
Sleep, 200
wood02 := MouseY + 8
wood03 := MouseY + 12
woodi1 := MouseY - 20
Sleep, 200

loop ; checks ob holzfenster da is
{
Sleep, 250
MouseClick, left, MouseX, woodi1 ;check color
Sleep, 1000
PixelGetColor, wood04, MouseX, wood03 ;G from Gather Wood
PixelGetColor, wood06, MouseX, wood02 ;F from fertilize
Sleep, 200
if (wood04 != 0) ; nix DA
{
Sleep, 300
wood06 := 1
}
if (wood06 = 0) ;F from fertilize is DA!
{
Sleep, 200
wood04 := 1
Sleep, 200
MouseClick, right, 377, 197 ;STOP moving
Sleep, 1000
}
if (wood04 = 0) ; G from Gather Wood is DA!
{
MouseClick, left, MouseX, wood02 ;Get wood
Sleep, 500
break
}
}
sleep, 111
loop ; checks ob holz genommen
{
Sleep, 250
MouseClick, left, MouseX, woodi1 ;check color
Sleep, 500
PixelGetColor, wood05, MouseX, wood02 ;F from fertilize
Sleep, 200
if (wood05 != 0)
{
Sleep, 500
}
if (wood05 = 0)
{
break
}
}
} ; wood ende

;needs special screen settings, so try it first
; 4 onions
; 1 jug, 4 seeds needed
; u need to stand near water and on sand

; -----------------------------------------
; ------------- O N I O N -----------------
; -----------------------------------------
^+O:: ; strg shift O
loop,
{
IfWinactive, eGenesis Client
{
; plant -> place "plant onion windows" top left
sleep 200
MouseClick, right, 87, 40, 1, 0
sleep 400
; 1. seed rechts
MouseClick, right, 44, 21, 1, 0
sleep 400
MouseClick, right, 87, 77, 1, 0
sleep 150
MouseClick, right, 87, 77, 1, 0
sleep 400
MouseClick, right, 33, 139, 1, 0
sleep 400
; 2. seed, unten
MouseClick, right, 44, 21
sleep 400
MouseClick, right, 64, 100
sleep 150
MouseClick, right, 64, 100
sleep 400
MouseClick, right, 33, 139
sleep 400
; 3. seed, links
MouseClick, right, 44, 21
sleep 400
MouseClick, right, 40, 76
sleep 150
MouseClick, right, 40, 76
sleep 400
MouseClick, right, 33, 139
sleep 400
; 4. seed, oben
MouseClick, right, 44, 21
sleep 400
MouseClick, right, 64, 54
sleep 150
MouseClick, right, 64, 54
sleep 400
MouseClick, right, 33, 139
sleep 400
; -------------------------------------
; Moves windows right plant
MouseClick, right, 624, 409
MouseGetPos, Moov01, Moov02
sleep 200
MouseMove , Moov01+13, Moov02-21
sleep 51
Click down
sleep 50
MouseMove , 205, 178
MouseGetPos, Moov01, Moov02
sleep 200
Click up
sleep 150
MouseClick, right, Moov01+162, Moov02
sleep 350
; Moves windows down plant
MouseClick, right, 577, 466
MouseGetPos, Moov01, Moov02
sleep 200
MouseMove , Moov01+13, Moov02-21
sleep 51
Click down
sleep 50
MouseMove , 465, 178
MouseGetPos, Moov01, Moov02
sleep 200
Click up
sleep 150
MouseClick, right, Moov01+162, Moov02
sleep 350
; Moves windows left plant
MouseClick, right, 515, 418
MouseGetPos, Moov01, Moov02
sleep 200
MouseMove , Moov01+13, Moov02-21
sleep 51
Click down
sleep 50
MouseMove , 685, 178
MouseGetPos, Moov01, Moov02
sleep 200
Click up
sleep 150
MouseClick, right, Moov01+162, Moov02
sleep 350
; Moves windows top plant
MouseClick, right, 579, 360
MouseGetPos, Moov01, Moov02
sleep 200
MouseMove , Moov01+13, Moov02-21
sleep 51
Click down
sleep 50
MouseMove , 910,178
MouseGetPos, Moov01, Moov02
sleep 200
Click up
sleep 150
MouseClick, right , Moov01+162, Moov02
sleep 350
; -------------------------------------
; Water
loop, 4
{
checkwater()
MouseClick, right, 250, 206
sleep 500
checkwater()
MouseClick, right, 500, 205
sleep 500
checkwater()
MouseClick, right, 710, 206
sleep 500
checkwater()
MouseClick, right, 950, 205
sleep 1000
}
loop ; 1. onion
{
click 250, 173
sleep 500
ImageSearch, Px, Py, 190, 190, 370, 230, *50 Find_Harvest_th.png
sleep 150
if (ErrorLevel < 1)
{
Click 250 , 206 ;Click Harvest This
sleep 400
Click 367, 175 ; unpin window
break
}
}
loop ; 2. onion
{
click 500, 173
sleep 500
ImageSearch, Px, Py, 450, 190, 610, 230, *50 Find_Harvest_th.png
sleep 150
if (ErrorLevel < 1)
{
Click 500, 205 ;Click Harvest This
sleep 400
Click 627, 177 ; unpin window
break
}
}

loop ; 3. onion
{
click 710, 173
sleep 500
ImageSearch, Px, Py, 670, 190, 840, 230, *50 Find_Harvest_th.png
sleep 150
if (ErrorLevel < 1)
{
Click 710, 206 ;Click Harvest This
sleep 400
Click 847, 175 ; unpin window
break
}
}

loop ; 4. onion
{
click 950, 173
sleep 500
ImageSearch, Px, Py, 890, 190, 1060, 230, *50 Find_Harvest_th.png
sleep 150
if (ErrorLevel < 1)
{
Click 950, 205 ;Click Harvest This
sleep 400
Click 1072, 176 ; unpin window
break
}
}

}
sleep 5000
}
return

@@ Line 8: / Line 8: @@
 ; both macro needs to be have screen size changed by hitting strg-shift-f12
 ; wood macro needs be set before
 <pre>

User:Nisu Bastet/macro/onion and wood - Revision history

Pheros Bastet at 20:23, 28 May 2010

Pheros Bastet at 20:14, 28 May 2010

Pheros Bastet at 20:13, 28 May 2010

Pheros Bastet: New page: ; copy paste everything in a text file, save it with onionswood.ahk and start it with AHK ; all are for AHK
^+[:: ;STRG SHIFT [ WinSet, Region, , A return ^+d:: ;STRG SHIFT d Wins...

@@ Line 42: / Line 42: @@
-; Atitd screen groesse  1149, 822
+; Atitd screen size
 ^+F12:: ;strg shift f12
 WinSet, Style, -0xC00000, eGenesis Client
-WinMove, eGenesis Client, , 0, 0, 1149, 822
+WinMove, eGenesis Client, , 0, 0, 1151, 824
 return

@@ Line 1: / Line 1: @@
 ; copy paste everything in a text file, save it with onionswood.ahk and start it with AHK
-; all are for AHK
+; check screen shots before
 <pre>
@@ Line 84: / Line 91: @@
 ; pin "stash to WH window" between chat and consume window after taken hatchet and all stuff u need including 100 wood
 ; place mouse over point of stashing wood before start wood macro
@@ Line 239: / Line 247: @@
 ; 1 jug, 4 seeds needed
 ; u need to stand near water and on sand
 ; -----------------------------------------