partySkill Increase Agi {
lvl 10
hp > 80%
sp > 50%
notWhileSitting 1
notInTown 1
timeout 1500
target_hp > 65%
}

partySkill Heal {
lvl 10
hp
sp > 10%
target_hp <= 75%
}

in macros.txt
######### OBB Quest ########

automacro OBB {
location comodo 73 194
inventory “Cyfar” > 49
inventory “Clam Shell” > 14
inventory “Crab Shell” > 9
inventory “Brigan” > 9
run-once 1
call OBB-1
}

macro OBB-1 {
do talk @npc (68 195)
}

automacro OBB1-1 {
location comodo 73 194
console /Responses/
run-once 1
call OBB-1-1
}

macro OBB-1-1 {
do talk resp 0
release OBB1-1
}

automacro OBB2-0 {
console /with that nugget of wisdom./
run-once 1
call OBB-2-1
}

automacro OBB2-1 {
console /You feel there may be something you missed./
run-once 1
call OBB-2-1
}

automacro OBB2-2 {
console /Come back later./
run-once 1
call OBB-2-1
}

automacro OBB2-3 {
console /Do me this favor, young man./
run-once 1
call OBB-2-1
}

automacro OBB2-4 {
console /much trouble for my own good./
run-once 1
call OBB-2-1
}

automacro OBB2-5 {
console /Calculating lockMap route to:/
run-once 1
call OBB-2-1
}

automacro OBB2-6 {
timeout 60
call OBB-2-1
}

macro OBB-2-1 {
release all
}

automacro quit {
storage “cyfar” < 1000
call quit-1
}

automacro quit1 {
storage "Brigan" < 200
call quit-1
}

automacro quit2 {
storage "Clam Shell" < 300
call quit-1
}

automacro quit3 {
storage "Crab Shell" < 200
call quit-1
}

macro quit-1 {
do quit
}

in config.txt
autoTalkCont 1

&

storageAuto 1
storageAuto_npc comodo 195 150
storageAuto_distance 9
storageAuto_npc_type 1
storageAuto_npc_steps c r1 n
relogAfterStorage 0
storageAuto_password

getAuto Cyfar {
minAmount 49
maxAmount 1000
passive
}

getAuto Clam Shell {
minAmount 14
maxAmount 300
passive
}

getAuto Crab Shell {
minAmount 9
maxAmount 200
passive
}

getAuto Brigan {
minAmount 9
maxAmount 200
passive
}

in autoexec.bat if wanna set up for 24/7
@echo off
:start

echo #############################
echo OBB Quest
echo Openkore SVN
echo #############################

cd D:\Bot\OBB\

D:\Bot\OBB\start.exe –control=Accounts/obb/Control –logs=Accounts/obb/logs

echo #############################
echo OBB Vendor
echo Openkore SVN
echo #############################

D:\Bot\OBB\start.exe –control=Accounts/vendor/Control –logs=Accounts/vendor/logs

echo #############################
echo Brigan Buyer
echo openkore 1.6.4 w/ auto trade macro
echo #############################

cd D:\Bot\Buyer\

D:\Bot\Buyer\start.exe –control=Brigan/Control –logs=Brigan/logs

echo #############################
echo Cyfar Buyer
echo openkore 1.6.4 w/ auto trade macro
echo #############################

D:\Bot\Buyer\start.exe –control=Cyfar/Control –logs=Cyfar/logs

echo #############################
echo Clamshell & crab Shell Buying at NPC comodo
echo Openkore SVN
echo #############################

cd D:\Bot\BCSCB\
D:\Bot\BCSCB\start.exe –control=NPCBuyer/Control –logs=NPCBuyer/logs

goto start

automacro giveSoul {
pm “link”
sp >= 200
class Soul Linker
exclusive 1
call soulthem
}

macro soulthem {
$i = @player ($.lastpm)
#$jobID = @eval ($::players{$::playersID[$i]}->{jobID})
$jobID = @eval ($::jobs_lut{$::players{$::playersID[$i]}->{jobID}})
log $.lastpm is a $jobID
if ($jobID = Peco Knight) goto knight
if ($jobID = Peco Lord Knight) goto knight
if ($jobID = Lord Knight) goto knight
if ($jobID = High Priest) goto priest
if ($jobID = Priest) goto priest
if ($jobID = High Wizard) goto wizard
if ($jobID = Wizard) goto wizard
if ($jobID = Whitesmith) goto smith
if ($jobID = Blacksmith) goto smith
if ($jobID = Hunter) goto sniper
if ($jobID = Sniper) goto sniper
if ($jobID = Assassin Cross) goto assassin
if ($jobID = Assassin) goto assassin
if ($jobID = Paladin) goto paladin
if ($jobID = Crusader) goto paladin
if ($jobID = Peco Paladin) goto paladin
if ($jobID = Peco Crusader) goto paladin
if ($jobID = Champion) goto champion
if ($jobID = Monk) goto professor
if ($jobID = Stalker) goto stalker
if ($jobID = Rouge) goto stalker
if ($jobID = Creator) goto creator
if ($jobID = Alchemist) goto creator
if ($jobID = Clown) goto clown
if ($jobID = Gypsy) goto clown
if ($jobID = Sage) goto professor
if ($jobID = Professor) goto professor
:knight
do sp 452 $i 5
stop
:priest
do sp 454 $i 5
stop
:wizard
do sp 453 $i 5
stop
:smith
do sp 458 $i 5
stop
:sniper
do sp 460 $i 5
stop
:assassin
do sp 457 $i 5
stop
:paladin
do sp 450 $i 5
stop
:champion
do sp 447 $i 5
stop
:professor
do sp 449 $i 5
stop
:creator
do sp 445 $i 5
stop
:clown
do sp 455 $i 5
stop
:professor
do sp 449 $i 5
stop
:BufPlayerEnd
release all
}

automacro coating {
console /\[dist=(.*)\] (.*) \((\d+)\): (\*Flag\s\d\*|fcp|paket|)$/
run-once 1
call {
$distance = $.lastMatch1
$namaPlayer = $.lastMatch2
$playerID = $.lastMatch3
$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : ‘null’)

#Nama guild yg mau di FCP
$guild1 = Tulis nama guid di sini contohnya seperti di bawah ini
$guild2 = ¤ S u S t e r š ¤
$guild3 = Namaguildyang di inginkan

if ($playerguild == $guild1) goto oke
if ($playerguild == $guild2) goto oke
if ($playerguild == $guild3) goto oke
goto lain

ke
if ($distance > 6) goto jauh
do c Bentar2 lagi FCP $namaPlayer

do sp “Heal” $playerID 10

goto end

:jauh
do c ui $namaPlayer jgn jauh2 klo minta FCP >.
goto end
:lain
do c sorry FCP cuman buat $guild
:end

release coating
}
}

automacro one {
location Payon
run-once 1
call ones
}
macro ones {
do sit
pause 2
do chat create “Geo 800 | Ho ct 801 | Magma 802″ 2 0 1111
release one
}

automacro two {
console /to start dealing, or ‘deal no’ to deny the deal./i
run-once 1
call {
do deal
}
}

automacro three {
console /finalized the Deal/i
call {
do deal
}
}

automacro four {
location Payon
run-once 1
exclusive 1
call fours
}

macro fours {
$.caller = automacro ones
$i = @player ($.lastrequest deal)
$.status = You gained 800 zeny.
$.status1 = You gained 801 zeny.
$.status2 = You gained 802 zeny.
$.zeny = 800
$.zeny1 = 801
$.zeny2 = 802
$posx = @rand (1,7)
$posy = @rand (1,7)
$cellIsFull = 0
do eval $::Macro::Data::varStack{cellIsFull} = 0;foreach (@{$::playersList->getItems()}) { next if (($_->{pos_to}{x} != $posx) || ($_->{pos_to}{y} != $posy));$::Macro::Data::varStack{cellIsFull} = 1; last;}
$mex = @arg (“$.pos”, 1)
$mey = @arg (“$.pos”, 2)
$herex = @eval ($mex + $posx)
$herey = @eval ($mey + $posy)
if (@invamount(Blue Gemstone) == 0) goto nogem
if ($.status == $zeny ) goto Geo
if ($.status1 == $zeny1 ) goto HO
if ($.status2 == $zeny2 ) goto Magma
:nogem
do c no gem
pause 0.2
do c sebentar y saya ambil gem dulu
pause 0.2
do chat leave
pause 0.1
do autostorage
:Geo
do chat leave
pause 0.3
do e thx
pause 0.4
do sp 34 $i 10
pause 0.2
do sp 29 $i 10
pause 0.5
do sl 27 $herex $herey
pause 2
do warp 2
pause 1
log You gained 800 zeny.
goto end
:HO
do chat leave
pause 0.3
do e thx
pause 0.4
do sp 34 $i 10
pause 0.2
do sp 29 $i 10
pause 0.5
do sl 27 $herex $herey
pause 2
do warp 1
pause 1
log You gained 801 zeny.
goto end
:Magma
do chat leave
pause 0.3
do e thx
pause 0.4
do sp 34 $i 10
pause 0.2
do sp 29 $i 10
pause 0.5
do sl 27 $herex $herey
pause 2
do warp 3
pause 1
log You gained 802 zeny.
goto end
:end
do c Thx sudah memakai Jasa Warp dari Kami….
pause 0.2
do sit
pause 0.6
do chat create “Geo 800 | Ho ct 801 | Magma 802″ 2 0 1111
log You are sitting.
release all
}

###########################################
Nama pub, harga dan warpnya di sesuiaikan
dengan anda
From: skynozz/Norman
###########################################