Cara Buat Bot IRC

Ini untuk membuat irc bot secara simple…

Buat para master… gak usah baca…

Pertama-tama siapin dulu putty.exe dan cuteFTP atau kalau gak ada pakai Filezilla aja untuk mempermudah edit nya dan sebungkus rokok biar lebih santai.

Dan sudah pasti harus punya shells nya. ok…

ikutin tahapan di bawah ini setelah anda masuk ke dalam shells.

====================================================

wget http://adiy.sitesled.com/1.3.tar

tar -xf 1.3.tar

cd bot

pico bot

Edit sesuai keinginan anda untuk nick bot channel ip dan lain² nya. kalau mau tambah tcl tinggal tambahin di bagian paling bawah source scripts/namatcl.tcl , dan taro tcl nya di folder scripts (mendingan edit/pico pakai cuteFTP).

./eggdrop -m bot

kalau belum jalan, ini ada juga :

Sudah banyak nih member di #jagoan yang bilang. Koq cara buat bot nya gak bisa? Bukan nya gak bisa. para member #jagoan beli shells nya value, star, lite dan lain² nya. Shells mereka gak terima Eggdrop precompile dan juga tak bisa command “make”. cape deh..

kalau kalian sudah terlanjur pasang 1.3.tar di shells mu. jangan di delete dulu. kita pakai command yg tersedia di shells tersebut.

command nya adalah “getegg”

ketik deh

getegg

lalu nanti akan muncul pertanya untuk mengisi nickbot nya.

kita tekan aja “enter”.

setiap dia tanya apapun. ketik aja “enter” sampai selesai.

ketik deh..

cd eggdrop

wget http://adiy.sitesled.com/bot.zip

mv bot.zip bot

cd scripts

wget http://adiy.sitesled.com/1.2.tcl.zip

mv 1.2.tcl.zip 1.2.tcl.zip

cd ..

pico bot

(edit nick bot sesuai yg anda ingin kan dan lain² nya. dibaca dengan teliti apa yg saja yg mau anda rubah)

untuk keluar dari pico (edit) bot tadi. tekan tombol “ctrl+x” “Y(yes)” ” enter”

lalu ketik

./eggdrop -m bot

Posting ini aslinya di www.indo-hack.co.cc By : ADIY, dan di publikasikan juga disini.

salam dari LUC1FER dan ADIY Jagoan@DalNet Crew

Jangan Lupa join #Indogame, #jagoan dan #sidempuan kalo main mIRC@DalNet yach

Script Autovoice

Bagi teman² yang suka main mIRC. ini ada Script Autovoice kalau ada orang join ke channel.

alias avl {
var %number = 0
:begin
if $readini(Control.ini, Voice, n $+ %number) == $null { halt }
else {
did -a AutoVoice 3 $replace($remove($readini(Control.ini, Voice, n $+ %number),!*@*),$chr(44),$chr(32))
inc %number
goto begin
halt
}
}
alias av { dialog -m AutoVoice AutoVoice }
dialog AutoVoice {
Title “AutoVoice List By TrusTkill”
size -1 -1 150 150
option dbu
button “Ok”,1,1 140 73 10,Ok
button “Cancel”,2, 76 140 73 10,Cancel
list 3,1 1 147 132,extsel
button “Autovoice On”,4, 1 129 73 10
button “Autovoice Off”,5, 76 129 73 10
}
on *:dialog:AutoVoice:init:0:{
if $avoice == $true { did -b Autovoice 4 | avl }
else { did -b Autovoice 5 | avl }
}
on *:dialog:AutoVoice:sclick:5:{ .avoice off | did -b AutoVoice 5 | did -e AutoVoice 4 }
on *:dialog:AutoVoice:sclick:4:{ .avoice on | did -b Autovoice 4 | did -e AutoVoice 5 }
menu nicklist {
-
Autovoice
.Add:.avoice $$1 # $network | echo -a 7,1*** 14Added00 $$1 14To The Auto-Voice List For00 #
.Del:.avoice -r $$1 # $network | echo -a 7,1*** 14Removed00 $$1 14From The Auto-Voice List For00 #
.Setup:/av
}

atau ada juga script yang very very simple ini :

on *:JOIN:*: { /mode $chan +v $nick }

Simple bukan???

Selamat Mencoba..

Script Seen

cara untuk menjalankan Script ini :

1. Pastekan Script ini ke Remote kamu (Alt + R)
2. kemuadian Ketik “/hmake seen 100″ di windows kamu
3. Command untuk menjalankannya : /seen nick atau !seen nick
============================

>>Start Seen Script IRC By Mr_Armen<<

============================

ON *:START: {
hmake seen 100
if ($isfile(seen.dat)) { hload seen seen.dat }
}
ON *:EXIT: {
if ($hget(seen)) { hsave -o seen seen.dat }
}
ON *:TEXT:*:#: {
hadd seen $nick text $chan $ctime $1-
if ($1 = !seen) {
if ($2 ison $chan) { msg $chan $2 is right here. }
else { msg $chan $nick $+ : $seenparse($2) }
}
}
alias seen {
echo $colour(info) -a *** $seenparse($1)
}
ON *:ACTION:*:#: {
hadd seen $nick act $chan $ctime $1-
}
ON *:QUIT: {
hadd seen $nick quit $ctime $1-
}
on *:PART:#: {
hadd seen $nick part $chan $ctime $1-
}
on *:JOIN:#: {
hadd seen $nick join $chan $ctime $1-
}
ON *:NICK: {
hadd seen $nick nick $newnick $ctime
}
ON *:KICK:#: {
hadd seen $nick kicking $chan $ctime $knick $1-
hadd seen $knick kick $chan $ctime $nick $1-
}
alias -l seenparse {
var %x = $hget(seen,$1)
if (!%x) { return I have not seen $1 }
var %n = $1
tokenize 32 %x
if ($1 = text) { return I last saw %n in $2 $duration($calc($ctime - $3)) ago saying $4- }
if ($1 = act) { return I last saw %n in $2 $duration($calc($ctime - $3)) ago acting $4- }
if ($1 = quit) { return I last saw %n quiting $duration($calc($ctime - $2)) ago $iif($3,with the message $3-) }
if ($1 = part) { return I last saw %n leaving $2 $duration($calc($ctime - $3)) ago with the message $4- }
if ($1 = join) { return I last saw %n joining $2 $duration($calc($ctime - $3)) ago. }
if ($1 = nick) { return I last saw %n changing their nickname to $2 $duration($calc($ctime - $3)) ago. }
if ($1 = kicking) { return I last saw %n kicking $4 from $2 $duration($calc($ctime - $3)) ago with the reason $5- }
if ($1 = kick) { return I last saw %n being kicked from $2 by $4 $duration($calc($ctime - $3)) with the reason $5- }
}

============================

>>End Seen Script IRC By Mr_Armen<<

============================

Semoga berhasil…