tag:blogger.com,1999:blog-90678185631554499242024-02-08T11:13:11.384-08:00Ragnarok Dan Openkoreopenkore-N-macroshttp://www.blogger.com/profile/08081840909435500968noreply@blogger.comBlogger7125tag:blogger.com,1999:blog-9067818563155449924.post-65477666054898505432009-02-10T14:57:00.000-08:002009-02-10T15:05:44.798-08:00Jasa warp macroautomacro one {<br />location Payon<br />run-once 1<br />call ones<br />}<br />macro ones {<br />do sit<br />pause 2<br />do chat create "Geo 800 | Ho ct 801 | Magma 802" 2 0 1111<br />release one<br />}<br /><br />automacro two {<br />console /to start dealing, or 'deal no' to deny the deal./i<br />run-once 1<br />call {<br />do deal<br />}<br />}<br /><br />automacro three {<br />console /finalized the Deal/i<br />call {<br />do deal<br />}<br />}<br /><br />automacro four {<br />location Payon<br />run-once 1<br />exclusive 1<br />call fours<br />}<br />macro fours {<br />$.caller = automacro ones<br />$i = @player ($.lastrequest deal)<br />$.status = You gained 800 zeny.<br />$.status1 = You gained 801 zeny.<br />$.status2 = You gained 802 zeny.<br />$.zeny = 800<br />$.zeny1 = 801<br />$.zeny2 = 802<br />$posx = @rand (1,7)<br />$posy = @rand (1,7)<br />$cellIsFull = 0<br />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;}<br />$mex = @arg ("$.pos", 1)<br />$mey = @arg ("$.pos", 2)<br />$herex = @eval ($mex + $posx)<br />$herey = @eval ($mey + $posy)<br />if (@invamount(Blue Gemstone) == 0) goto nogem<br />if ($.status == $zeny ) goto Geo<br />if ($.status1 == $zeny1 ) goto HO<br />if ($.status2 == $zeny2 ) goto Magma<br />:nogem<br />do c no gem<br />pause 0.2<br />do c sebentar y saya ambil gem dulu<br />pause 0.2<br />do chat leave<br />pause 0.1<br />do autostorage<br />:Geo<br />do chat leave<br />pause 0.3<br />do e thx<br />pause 0.4<br />do sp 34 $i 10<br />pause 0.2<br />do sp 29 $i 10<br />pause 0.5<br />do sl 27 $herex $herey<br />pause 2<br />do warp 2<br />pause 1<br />log You gained 800 zeny.<br />goto end<br />:HO<br />do chat leave<br />pause 0.3<br />do e thx<br />pause 0.4<br />do sp 34 $i 10<br />pause 0.2<br />do sp 29 $i 10<br />pause 0.5<br />do sl 27 $herex $herey<br />pause 2<br />do warp 1<br />pause 1<br />log You gained 801 zeny.<br />goto end<br />:Magma<br />do chat leave<br />pause 0.3<br />do e thx<br />pause 0.4<br />do sp 34 $i 10<br />pause 0.2<br />do sp 29 $i 10<br />pause 0.5<br />do sl 27 $herex $herey<br />pause 2<br />do warp 3<br />pause 1<br />log You gained 802 zeny.<br />goto end<br />:end<br />do c Thx sudah memakai Jasa Warp dari Kami....<br />pause 0.2<br />do sit<br />pause 0.6<br />do chat create "Geo 800 | Ho ct 801 | Magma 802" 2 0 1111<br />log You are sitting.<br />release all<br />}<br /><br /><br />###########################################<br />Nama pub, harga dan warpnya di sesuiaikan <br />dengan anda<br />From: skynozz/Norman<br />###########################################openkore-N-macroshttp://www.blogger.com/profile/08081840909435500968noreply@blogger.com1tag:blogger.com,1999:blog-9067818563155449924.post-87601782043955226782009-02-10T08:49:00.000-08:002009-02-10T09:02:07.575-08:00Belajar membuat macro v.1Pertama tama yang harus anda lakukan adalah kemampuan membaca dan mengekit ( ya iyalah)<br /><br />Saya akan mengajrkan bagaimana cara membuat macro paket lewat console atau pubm<br /><br />First.. dasarnya adalah tulisan ini " automacro bla bla bla { "<br /><br />Yap.. tulis tulisan automacro di macros text , beri nama macro tersebut. contohnya saya akan memberi nama fajarpaket<br /><br />Ex:<br />automacro fajarpaket {<br /><br /><br />Lalu beri tulisan pubm(spasi)/"nama yang kamu inginkan"/<br />misalknya pubm /paket/ .. artinya bot kamu akan melakukan paket bila di console ada yg berbicara paket<br /><br />lalu taro tulisan tersebut di bawah automacro<br /><br />Ex:<br />automacro fajarpaket {<br />pubm /paket/<br /><br />Lalu tulis kata " call " di bawah kata pubm sebagai penghubung macro. dan kasih nama macro penghubung tersebut misalhnya call packet<br /><br />Ex:<br /><br />automacro fajarpaket {<br />pubm /paket/<br />call packet<br />}<br /><br />Nah skarang tinggal membuat macro penghubung.. buat seperti membuat auto macro tetapi nama macronya di sesuaikan dengan yg di tulis di call<br /><br />Ex:<br /><br />automacro fajarpaket {<br />pubm /paket/<br />call packet<br />}<br /><br />automacro packet {<br /><br /><br />NAH..!! sekarang tinggal set paketnya<br />Misal kamu mau kalau orang ketik paket bot kamu akan memberi agi,heal dan bless<br />sebelumnya saya akan memberitahu urutannya<br /><br /><span style="font-weight:bold;">do(spasi)sp(spasi)namaskil(spasi)orangygdituju(spasi)lvlskilss</span><br /><br />Ex:<br /><br />automacro fajarpaket {<br />pubm /paket/<br />call packet<br />}<br /><br />automacro packet {<br />do sp Blessing $.lastpub<br />do sp "Increase AGI" $.lastpub<br />do sp Blessing $.lastpub<br />do sp "Impositio Manus" $.lastpub<br />do sit<br />} <br /><br />--------------------------<br />Lastpub artinya yang terakhir bilang paket.. <br />sp : artinya skillss yg akan di gunakan<br />do: artinya melakukan<br />Bila ada skils yang mengandung spasi harus di kasih tanda petik seperti "Increase AGI" ..<br /><br /><br />^^ semoga berhasi.. Happy botopenkore-N-macroshttp://www.blogger.com/profile/08081840909435500968noreply@blogger.com2tag:blogger.com,1999:blog-9067818563155449924.post-75651200408447590712009-02-10T08:44:00.000-08:002009-02-10T08:48:17.299-08:00Download macro dan instalDownload file macro di link di bawah ini:<br /><br />http://downloads.sourceforge.net/openkore/macro-2.0.2.zip<br /><br />1.Lalu buat Folder di openkore kamu yang bernama :"plugins" <-- tanpa tanda "<br /><br />2.Buat text document di Folder control. <br /><br />3.Text document tersebut di beri nama:"MACROS" < tanpa tanda "<br /><br />4.Lalu extrac macro ke folder plugins <br /><br />5.Lalu anda Suda langsung bisa menggunakan Macrosopenkore-N-macroshttp://www.blogger.com/profile/08081840909435500968noreply@blogger.com0tag:blogger.com,1999:blog-9067818563155449924.post-3045641529380025172009-02-10T08:38:00.000-08:002009-02-10T08:41:52.713-08:00Paket guild macroautomacro coating {
<br />console /\[dist=(.*)\] (.*) \((\d+)\): (\*Flag\s\d\*|fcp|paket|)$/
<br />run-once 1
<br />call {
<br />$distance = $.lastMatch1
<br />$namaPlayer = $.lastMatch2
<br />$playerID = $.lastMatch3
<br />$playerguild = @eval (exists $::players{$::playersID[$playerID]}->{guild} ? $::players{$::playersID[$playerID]}->{guild}{name} : 'null')
<br />
<br />#Nama guild yg mau di FCP
<br />$guild1 = <span style="color: rgb(255, 102, 102);">Tulis nama guid di sini contohnya seperti di bawah ini</span>
<br />$guild2 = <span style="color: rgb(255, 102, 102);">¤ S u S t e r š ¤</span>
<br />$guild3 = <span style="color: rgb(255, 102, 102);">Namaguildyang di inginkan</span>
<br />
<br />if ($playerguild == $guild1) goto oke
<br />if ($playerguild == $guild2) goto oke
<br />if ($playerguild == $guild3) goto oke
<br />goto lain
<br />
<br />:oke
<br />if ($distance > 6) goto jauh
<br />do c Bentar2 lagi FCP $namaPlayer
<br />
<br />do sp "Heal" $playerID 10
<br />
<br />goto end
<br />
<br />:jauh
<br />do c ui $namaPlayer jgn jauh2 klo minta FCP >.<a
<br />goto end
<br />:lain
<br />do c sorry FCP cuman buat $guild
<br />:end
<br />
<br />release coating
<br />}
<br />}
<br />
<br />
<br /><span style="font-weight:bold;">baca dulu yg di merah merahin</span>
<br />
<br />openkore-N-macroshttp://www.blogger.com/profile/08081840909435500968noreply@blogger.com2tag:blogger.com,1999:blog-9067818563155449924.post-15365271439470669602009-02-10T08:35:00.000-08:002009-02-10T08:37:44.190-08:00Pake di console macro##################################<br />pake di console by fajar<br />#################################<br /><br />automacro givepacket {<br />pubm /paket|PAKET|Paket/, 5<br />call packet<br />}<br /><br />macro packet {<br />$player = $.lastpub<br />do sp Blessing $player<br />do sp "Increase AGI" $player<br />do sp Blessing $player<br />do sp "Impositio Manus" $player<br />do sit<br />}<br /><br /><br />#######################################<br />Caranya: ketik paket/PAKET/Paket di console dan bot<br />priest kamu akan mempaket kamu<br />######################################openkore-N-macroshttp://www.blogger.com/profile/08081840909435500968noreply@blogger.com0tag:blogger.com,1999:blog-9067818563155449924.post-72144925966772197792009-02-10T08:31:00.000-08:002009-02-10T08:34:48.486-08:00Paket whisp macro#################################<br /> paket whisp by fajar<br />#################################<br /><br /><br /><br />automacro buff {<br />pm /paket|PAKET|Paket/<br />run-once 1<br />delay 1<br />call playerbuff<br />}<br /><br />macro playerbuff {<br />$player = $.lastpm<br />do sp Blessing $player 10<br />pause 1<br />do sp "Increase AGI" $player 10<br />pause 1.5<br />do sp "Impositio Manus" $player<br />release buff<br /><br />}<br /><br />####################################<br />pake whisp : caranya whisp karakter yg di macro<br />ini dengan ketik : paket/PAKET/Paket<br />###################################openkore-N-macroshttp://www.blogger.com/profile/08081840909435500968noreply@blogger.com0tag:blogger.com,1999:blog-9067818563155449924.post-76919107680035155702009-02-10T08:26:00.000-08:002009-02-10T08:30:03.419-08:00Auto dc macro#######################################<br /> auto dc by fajar<br />#######################################<br /><br />automacro autodc {<br />hp <= 35%<br />delay 60<br />run-once 1<br />call autodc2<br />}<br /><br />macro autodc2 {<br />do relog 10<br />release autodc<br />}<br /><br />automacro aggressives {<br />aggressives >= 5<br />run-once 1<br />call disconnect<br />}<br /><br />macro disconnect {<br />do relog 20<br />pause 30<br />release aggressives<br />}<br /><br /><br /><br />####################################<br />##Letakan di bagia teks documen macros.txt####<br />####################################openkore-N-macroshttp://www.blogger.com/profile/08081840909435500968noreply@blogger.com1