Macro Check Antibot

automacro GM {
console /.*Police: I really sorry but i need to know if you.*/i
call {
do eval Utils::Win32::playSound('C:\Windows\media\tada.wav');
pause 1
do eval Utils::Win32::playSound('C:\Windows\media\tada.wav');
}
}

Daftar Blog Updated 16 Agustus 2012

Daftar Blog Update :
Cek Disini

Openkore Packet Extractor Cara Untuk Generate recvpackets.txt

Download :
Disini

Cara Pemakaian (Singkat) :
1.Pilih Ragexemu
2.Extract
3.Selesai

Bot Sering DC Saat Di Map Setelah Patch Balancing 08-08-2012

[Rabu Agustus 2012]
Solusi terbaiknya download OK SVN :
http://openkore.collectskin.com/openkore.zip

Config dan Macro Release | Reading Spell Book Warlock

[CONFIG]
useSelf_skill Reading Spellbook {
    lvl 10
    whenStatusInactive EFST_SPELLBOOK7
}

[MACRO]
automacro arrowcraft {
console /.*Received Possible Arrow Craft List.*/i
call {
do arrowcraft 1
}
}

automacro monsters {
monster Magmaring
status EFST_SPELLBOOK7
run-once 1
call {
do sm 2230 $.lastMonsterID
release monsters
}
}
*diedit sendiri yang di bold

Membuat Items_control + mon_control dengan MiBurn

Download :

DISINI
(Cari MiBurn)

Cara Penggunaan :
1. Buka miburn.ini
2. Tempatkan directory RO mu
    ex ROdir = C:/Gravity/RO/data.grf
3.Jalankan MiBurn.exe dan pilih tempat dimana akan bot
4. Membuat mon_control dan items_control dengan mencentang opsi yang ada
5. Selesai tekan create mon/items_control.txt

Macro Buka Chatroom dan Nyimpen Hasil Chatnya

**Cara Penggunaan buat FILE TEXT bernama dat.txt dalem CONTROL

automacro tulis {
console /\[dist=(.*)\] (.*) \((\d+)\): (.*)/i
call {
do c "Postinganmu Sudah Disimpan..."
tulise("$.lastMatch2","$.lastMatch4");
}
}

sub tulise {
open(FILE,">>",Settings::getControlFilename("dat.txt"));
print FILE "$_[0] : $_[1]\n" ;
close FILE;
}
}

automacro duduk {
console /You are sitting/i
call {
pause 4
do chat create "Posting Yuk..."
}
}

Cara Setting getAuto | Otomatis Mengambil Barang Dari Storage

getAuto digunakan untuk mengambil Potion dari storage maupun dimanfaatkan untuk vending

Syntaxnya :

getAuto (Nama Item) {
 minAmount (Nilai)
 maxAmount (Nilai)
 passive (Flag)
}

Contoh :

getAuto White Potion {
 minAmount 0
 maxAmount 100
 passive 0
}

Keterangan :

Bot akan mengambil White Potion jika Item tersebut 0 dan dia akan mengambil 100 White Potion

** 

passive 0 = akan melakukan getAuto tanpa menunggu AI Autostorage

passive 1 = menunggu autostorage untuk menggunakan getAuto

Macro Pharmacy

automacro create {
location geffen_in
sp > 5%
inventory "Medicine Bowl" > 0
call wsp
run-once 1
}

macro acidbottle {
do ss 228 10
pause 0.1
do send 8E 01 E0 1B 00 00 00 00 00 00
call release
}
macro plantbottle {
do ss 228 10
pause 0.1
do send 8E 01 E1 1B 00 00 00 00 00 00
call release
}
macro minebottle {
do ss 228 10
pause 0.1
do send 8E 01 E2 1B 00 00 00 00 00 00
call release
}
macro cw {
do ss 228 10
pause 0.1
do send 8E 01 E3 1B 00 00 00 00 00 00
call release
}

macro wsp {
do ss 228 10
pause 0.1
do send 8E 01 23 02 00 00 00 00 00 00
call release
}
macro wp {
do ss 228 10
pause 0.1
do send 8E 01 F8 01 00 00 00 00 00 00
call release
}
macro firebottle {
do ss 228 10
pause 0.1
do send 8E 01 DF 1B 00 00 00 00 00 00
call release
}
macro redpot {
do ss 228 10
pause 0.1
do send 8E 01 F5 01 00 00 00 00 00 00
call release
}
macro BP {
do ss 228 10
pause 0.1
do send 8E 01 F9 01 00 00 00 00 00 00
call release
}
macro anodyne {
do ss 228 10
pause 0.1
do send 8E 01 5D 02 00 00 00 00 00 00
call release
}
macro rsp {
do ss 228 10
pause 0.1
do send 8E 01 21 02 00 00 00 00 00 00
call release
}
macro ysp {
do ss 228 10
pause 0.1
do send 8E 01 22 02 00 00 00 00 00 00
call release
}
macro alchol {
do ss 228 10
pause 0.1
do send 8E 01 CA 03 00 00 00 00 00 00
call release
}
macro acidbottle {
do ss 228 10
pause 0.1
do send 8E 01 E0 1B 00 00 00 00 00 00
call release
}

macro release {
pause 3
release create
}

Cara Penggunaan Lihat Bagian ''call wsp" Untuk menggunakan selain WSP bisa diganti sesuai dengan nama macro diatas (ex : ysp,rsp,acidbottle)

Macro Paket Lewat Whisp

automacro paket {
pm /paket/
call {
do sp 34 $.lastpm
do sp 29 $.lastpm
}
}

automacro heal {
pm /heal/
call {
do sp 28 $.lastpm
pause 1
do sp 28 $.lastpm

Macro Jalan Bolak Balik | Jalan Muter Di LockMap

Hahahaha bingung bikin judul postingan , contohnya seperti ini :
Bot di lockMap ingin mondar mandir di tempat x y dan x1 y1

automacro jalan {
location NamaFild 111 222
run-once 1
call {
do conf lockMap_x 333
do conf lockMap_y 444
release jalan
}
}

automacro balik {
location NamaFild 333 444
run-once 1
call {
do conf lockMap_x 111
do conf lockMap_y 222
release balik
}


#Keterangan : 111 222 333 444 itu koordinat karakter

Cara Transaksi Lewat Bot

Untuk cara transaksi lewat bot memang tidak bisa menggunakan deal "Nama Player" tapi melainkan menggunakan binID nya sebagai deal..

Nah bagaimana cara melihat bin ID tersebut ??

Ketik 'pl' pada console nanti akan keluar sebagai berikut

-----------Player List-----------
#    Name                                Sex   Lv  Job         Dist  Coord
0    ragnarokindo                       
1    ragna_mania                     
2    ragnarokindomania.blogspot.com                     


untuk transaksi pada ragnarokindo kita ketik deal 0
untuk transkasi pada ragna_mania kita ketik deal 1

Untuk yang kita transaksikan baiknya kita menyetting config dealAuto 3 untuk auto deal


Macro yg berguna :
jika setelah trans ini untuk deal barang dari 0 - 10

macro while {
$i = 0
while ($i < 11) as loop
deal add $i
$i++
end loop
}

Cara Mengatasi Antibot dengan responseOnASCIInumber

 Antibotnya seperti ini :


Untuk Menggunakan ini Download dlu reactOnNPC download di tab Download


Sekalian download responseOnASCII number di tab Download juga

Untuk cara penggunaan :
1. Letakkan kedua plugins tersebut dalam folder plugins
2. Letakkan kode blok ASCIINumber Killer di Config

ASCIInumberKiller {
lengthCharNumber 8
BgColor ^[D-Fd-f][A-Fa-f0-9][D-Fd-f][A-Fa-f0-9]{3}
}

lengthCharNumber 8 
Panjang baris setiap garis pesan NPC
BgColor ^[D-Fd-f][A-Fa-f0-9][D-Fd-f][A-Fa-f0-9]{3}
Untuk triggers Regular Experssion (Sesuaikan server biasanya sudah benar seperti diatas )

Jika sudah selesai menambahkan kode blok ASCIInumberKiller Kita gabungkan dengan plugin reactOnNPC 
Untuk penggunaan seperti ini :

#Gunakan ini untuk jenis talk num
reactOnNPC ASCIInumberKiller num {
   type number
      msg_0 /.*/
      msg_1 /.*/
      msg_2 /.*/
      msg_3 /.*/
}

#Gunakan ini untuk menjawab jenis text
reactOnNPC ASCIInumberKiller text {
   type text
      msg_0 /.*/
      msg_1 /.*/
      msg_2 /.*/
      msg_3 /.*/
}

biasanya paling sering digunakan ada talk num dan baris berjumlah 8 maka akan menjadi :
reactOnNPC ASCIInumberKiller num {
   type number
      msg_0 /.*/
      msg_1 /.*/
      msg_2 /.*/
      msg_3 /.*/
      msg_4 /.*/
      msg_5 /.*/
      msg_6 /.*/
      msg_7 /.*/
      msg_8 /.*/
}

Cara Mengatasi Antibot dengan responseOnASCIInumber

Untuk Menggunakan ini Download dlu reactOnNPC download di tab Download

Sekalian download responseOnASCII number di tab Download juga

Untuk cara penggunaan :
1. Letakkan kedua plugins tersebut dalam folder plugins
2. Letakkan kode blok ASCIINumber Killer

ASCIInumberKiller {
lengthCharNumber 8
BgColor ^[D-Fd-f][A-Fa-f0-9][D-Fd-f][A-Fa-f0-9]{3}
}

lengthCharNumber 8 
Panjang baris setiap garis pesan NPC
BgColor ^[D-Fd-f][A-Fa-f0-9][D-Fd-f][A-Fa-f0-9]{3}
Untuk triggers Regular Experssion (Sesuaikan server biasanya sudah benar seperti diatas )

Jika sudah selesai menambahkan kode blok ASCIInumberKiller Kita gabungkan dengan plugin reactOnNPC 
Untuk penggunaan seperti ini :

#Gunakan ini untuk jenis talk num
reactOnNPC ASCIInumberKiller num {
   type number
      msg_0 /.*/
      msg_1 /.*/
      msg_2 /.*/
      msg_3 /.*/
}

#Gunakan ini untuk menjawab jenis text
reactOnNPC ASCIInumberKiller text {
   type text
      msg_0 /.*/
      msg_1 /.*/
      msg_2 /.*/
      msg_3 /.*/
}

biasanya paling sering digunakan ada talk num dan baris berjumlah 8 maka akan menjadi :
reactOnNPC ASCIInumberKiller num {
   type number
      msg_0 /.*/
      msg_1 /.*/
      msg_2 /.*/
      msg_3 /.*/
      msg_4 /.*/
      msg_5 /.*/
      msg_6 /.*/
      msg_7 /.*/
      msg_8 /.*/
}

Config Paket Jika Ada Guild Disekitar Karakter

partySkill Blessing {
 lvl 10
 sp > 20%

 target_isGuild Nama Target Guild,Nama kedua
 target_whenStatusInactive Blessing
 target_timeout 240
}

partySkill Increase Agility {
 lvl 10
 sp > 20%

 target_isGuild Nama Target Guild,Nama kedua
 target_whenStatusInactive Increase Agility
 target_timeout 240
}

partySkill Kyrie Eleison {
 lvl 10
 sp > 20%
 timeout 3

 target_isGuild Nama Target Guild,Nama kedua
 target_whenStatusInactive Kyrie Eleison
 target_timeout 240
}

partySkill Impositio Manus {
 lvl 10
 sp > 20%

 target_isGuild Nama Target Guild,Nama kedua
 target_whenStatusInactive Impositio Manus
 target_timeout 60
}

Macro Paket Heal Menggunakan Flag | Bendera

automacro heal {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (.*)Flag 1(.*)$/
exclusive 1
call {
do sp 28 $.lastMatch4
}
}

automacro pkt {
console /\[(jarak|dist)=(.*)\] (.*) \((\d+)\): (.*)Flag 2(.*)$/
exclusive 1
call {
do sp 34 $.lastMatch4
do sp 29 $.lastMatch4
}
}

Daftar Blog Updated 3 Juli 2012

Ayo daftar blog di update monggo dibaca baca

cek DISINI

Macro Paket Setelah Trans Zeny

automacro a {
console /(.*) \(level (\d+)\) Requests a Deal/i
call {
$nama = $.lastMatch1
do conf dealAuto 3
}
}

automacro b {
console /You gained 10,000 zeny./i
call {
do sp 29 $nama
do sp 34 $nama
}
}

Macro Change Material Genetic

automacro cm {
weight < 99%
inventory "Steel" < 669
inventory "Tsurugi [1]" > 0
priority 4
run-once 1
delay 1
call cm
}

macro cm {
$steel = @invamount (Steel)
$tsu = @eval(@invamount (Tsurugi [1]))

$steelamount = @eval(@eval(@invamount (steel)) / 10)
$i = @eval($tsu + $steelamount)

$cweight = $.weight
$mweight = @eval($.maxweight)
$avweight = @eval($mweight - $cweight)
$rmndr = @eval ($avweight % 120)
$buy = @eval(@eval (@eval (@eval($avweight - $rmndr) / 120) - 1 + $i) * 10)


if (($steel < $buy) && (@invamount (Tsurugi [1]) > 0)) goto cm
goto end
:cm
$si = 55
$upbound = @eval($si + $tsu)
log $upbound
do stand
pause 1
log upper bound is $upbound
while ($si <= $upbound) as cmloop
#log $si of $upbound
if ($si > 9) goto convertToHex
goto hex

:convertToHex
$deci = $si
$rmndr = @eval ($deci % 16)
$quo = @eval (@eval($deci - $rmndr) / 16)
if ($rmndr = 10) goto A
if ($rmndr = 11) goto B
if ($rmndr = 12) goto C
if ($rmndr = 13) goto D
if ($rmndr = 14) goto E
if ($rmndr = 15) goto F
goto hex
:A
$rmndr = A
goto hex
:B
$rmndr = B
goto hex
:C
$rmndr = C
goto hex
:D
$rmndr = D
goto hex
:E
$rmndr = E
goto hex
:F
$rmndr = F
goto hex

:hex
if ($quo > 0) goto hex1
if ($quo = 0) goto hex2
goto scm
:hex1
if (rmdnr = 0) goto norem
$hex = $quo$rmndr
goto scm
:norem
$norem = 0
$hex = $quo$norem
goto scm
:hex2
$hex = 0$rmndr
goto scm
:scm
#log $hex
if (@invamount (Tsurugi [1]) < 1) goto end
#do send 13 01 01 00 BE 09 D8 7F 50 00
do send E4 07 10 00 00 00 00 00 01 00 00 00 $hex 00 01 00
$si++
end cmloop

:end
release all
}
automacro buyT {
weight <= 87%
inventory "Tsurugi [1]" < 1
priority 1
location prt_in 168 128
run-once 1
exclusive 1
delay 3
call buy
}
macro buy {
$weight = $.weight
#lock loweight
$steel = @eval(@eval(@invamount (steel)) / 10)
$tsu = @invamount (Tsurugi [1])
$i = @eval($tsu + $steel)
$cweight = $.weight
$mweight = @eval($.maxweight * .89)
$avweight = @eval($mweight - $cweight)
$rmndr = @eval ($avweight % 120)
$buy = @eval (@eval (@eval($avweight - $rmndr) / 120) - 1 + $i)

log $i < $buy

#while ($i <= 29) as loop

do talk 0
pause 1
do store
pause 2
#pause 0.5
while ($i <= $buy) as buyloop
do buy 13
#log $i of $buy
$i++
$cweight = $.weight
end buyloop
#do north
pause 1
do charselect
if ($weight > 86%) goto buy
goto cm
:buy
release all
:cm
lock buyT
call cm
stop
#release buyT
}

Macro Do Command Lewat Chat

Letakkan di folder control/macros.txt
Untuk menggunakan gunakan do_perintah openkore

automacro asdasd {
console /\[dist=(.*)\] (.*) \(\d+\): do_(.*)/
call {
do $.lastMatch3
}
}

Contoh :
do_c hello word
Maka akan bot akan menggunakan perintah "c hello word"