Page 1 of 1

Macro for rogue. with auto wolf

Posted: July 22nd, 2004, 10:54 am
by tault_Tault Community
using this with autoit 3

For $i = 1 to 100000000
WinWaitActive("Knight OnLine Client")

$wolfTime = 120000
if Round($wolfTime, -2) >= 115000 then

Send ( "3" , 1 )
$wolfTime = 0
Sleep(2000)
endif

Do
$wolfTimer = TimerStart()
Sleep(200)
$far = PixelGetColor ( 785, 679 )
if $far = 65535 then
Send ( "z" , 1 )
endif

Do
$far = PixelGetColor ( 785, 679 )
if $far = 65535 then
Send ( "z" , 1 )
endif
$colour = PixelGetColor ( 469, 49 )
$attack = PixelGetColor ( 445, 755 )

call ("attack")

Until $colour <> 2237098
Send ( "6" , 1 )
$mana = PixelGetColor ( 210,27 )
if $mana = 0 then
Send ( "4" , 1 )
endif
$wolfTime = $wolfTime + TimerStop($wolfTimer)
Until Round($wolfTime, -2) >= 115000

if Round($wolfTime, -2) >= 120000 then
Send ( "5" , 1 )
Sleep(1000)
else
Send ( "5" , 1 )
Send ( "c" , 1 )
sleep(5000)
endif

Next



Func attack()
if $colour = 2237098 then
if $attack <> 14492160 then
$attacked = PixelGetColor ( 255, 10 )
if $attacked <> 2241518 then
Send ( "6" , 1 )
Sleep(10)
$colour = PixelGetColor ( 469, 49 )
else
Send ( "6" , 1 )
Sleep(10)
$colour = PixelGetColor ( 469, 49 )
endif
$hp = PixelGetColor ( 200, 10 )
if $hp = 0 then
Send ( "1" , 1 )
endif
endif
endif
EndFunc