Sticky Rat/Swab the Deck

Moderator: Moderators

Message
Author
dezmay
Noob
Noob
Posts: 19
Joined: 02 Jun 2008, 21:22
Noob?: Yes

Sticky Rat/Swab the Deck

#1 Post by dezmay »

anyone can share their macro for this quest? Or kindly show me codes in capturing a pet. i can create my own macro but still noobish...

I will look on the manual to help me going. but if someone already have a premade kindly share.

dezmay
Noob
Noob
Posts: 19
Joined: 02 Jun 2008, 21:22
Noob?: Yes

Re: Sticky Rat/Swab the Deck

#2 Post by dezmay »

this is what i have now but not yet finished...

automacro start1 {
inventory "Leaf Cat Ball" = 0
location alberta
call rat
timeout 60
}

automacro start2 {
inventory "Leaf Cat Ball" <= 1
location alberta
call catchrat
timeout 60
}

automacro catch {
location alb_ship
call catchrat2
timeout 60
}

####################### MACROS ########################

macro rat {
do conf attackAuto 0
$x = @random ("104","105","106","103","102")
$y = @random ("56","57","55","58")
do move alberta $x $y
pause 4
do talknpc 105 60 c r0 n
}

macro catchrat {
do move 178 165
}

macro catchrat2 {
do conf attackAuto 2
pause 4
$m = $.lastMatch2
do pet capture $m
}

i got this error

"error in function 'pet [capture|c]' (Capture Pet)
must be a monster index"

anyone can check what i have done wrong. i am sorry for the being noob. :(

metalmarine
Noob
Noob
Posts: 13
Joined: 16 May 2011, 10:41
Noob?: No

Re: Sticky Rat/Swab the Deck

#3 Post by metalmarine »

read this topic,
http://forums.openkore.com/viewtopic.php?f=61&t=7169

EDIT:
I just thought its lame to just give idea when you have the real one.

Code: Select all

macro talkswab {
pause 2
$mcatball = @invamount (Mystic Leaf Cat Ball)
if ($mcatball > 0) goto pasamystic
goto mustcatch

:pasamystic
do talknpc 104 60 r0
pause 2
do talknpc 104 60 c n
pause 1
call talkmessage #proceed to message delivery quest
goto end

:mustcatch
$lball = @invamount (Leaf Cat Ball)
while ($lball < 5) as lball
do talknpc 104 60 r0 n
pause 1
do talk no
$lball++
log $lball
end lball

##Just nothing, but, ... really nothing...
$message = 1
while ($message < 5) as alert
log will catch rats
$message++
end alert
pause 1


if ($lball = 5) goto catchem
goto end
:catchem
do move alb_ship 121 100
do conf attackAuto 2
pause 1 

:end

release all
}

#IF YOU STILL HAVE A LEAF BALL, BE AGGRESSIVE

automacro sticky {
inventory "Leaf Cat Ball" > 0
monster Sticky Rat
run-once 1
exclusive 0
timeout 80
delay 0
call sticky
}

#AUTO ATTACK RATS

macro sticky {
do conf attackAuto 2
pause 0
release all
}

#YOU ARE NOW ATTACKING A RAT, WHILE YOU ATTACK AND HAVE LEAF BALL TRY TO CATCH RAT
#IF YOU RUN OUT OF LEAF BALL, BACK TO TOWN TO DELIVER THE MYSTIC BALL
#AND THEN TURN AUTO ATTACK OFF 

automacro mindex {
console /Monster Sticky Rat \((\d+)\) attacks you/i
run-once 1
exclusive 1
timeout 8
delay 0
call {
$lball = @invamount (Leaf Cat Ball)
if ($lball = 0) goto return
goto cont
:return
do conf attackAuto 0

pause 1
do move alberta 117 56
do conf attackAuto 0
pause 2
do talknpc 104 60 r0 n
call gotur  ### part of message delivery quest.
pause 1

:cont
$m = $.lastMatch1
log $m  
do im @inventory (Leaf Cat Ball) $m
pause 0
do pet c $m
release all
}
}

Post Reply