.

Ketika anda bermain dota seperti nusa, coba anda menulis kata kata yang berbau sara, porno dan promo server, pasti akan langsung di kick otomatis, nah tanpa banyak bacot, simak cara pembuatannya, asumsikan anda telah mengintall Mirc di komputer anda, copy scrips di bawah ini

on 1:join:#channel anda: {
/msg $nick Untuk melihat command bot user anda, ketik /w GHOST !help
/writeini -n login.ini ID: $nick - Status: login }

on 1:text:*!help*:?: {
/msg $nick Command bot user yang anda miliki adalah
/msg $nick Untuk melihat list admin GHOST, ketik /w GHOST !admin
/msg $nick Untuk melihat list operator GHOST, ketik /w GHOST !op
/msg $nick Untuk melihat list voice operator GHOST, ketik /w GHOST !vop
/msg $nick untuk melihat forum GHOST, ketik /w GHOST !forum
/msg $nick Untuk reload dari GHOST, ketik -relog }

on 1:text:*!admin*:?: {
/msg $nick List administrator GHOST adalah
/msg $nick marijan, sendal }

on 1:text:*!op*:?: {
/msg $nick List operator GHOST adalah
/msg $nick bawuk, bawik }

on 1:text:*!vop*:?: {
/msg $nick List voice operator GHOST adalah
/msg $nick Hitman, [Freak]-cLose }

on 1:text:*!forum*:?: {
/msg $nick Forum GHOST adalah
/msg $nick Masih dalam tahap proses }

on 1:text:*-relog*:#: {
/kill $nick }

on 2:join:#GHOSTWorld: {
/raw voice $nick
/msg $nick Untuk melihat command bot vop anda, ketik /w GHOST !cmd-vop }

on 2:text:*!cmd-vop*:?: {
/msg $nick Command bot vop yang anda miliki adalah
/msg $nick Untuk Announcement, ketik /w GHOST !ann (Info)
/msg $nick Untuk mengenai war, ketik /w GHOST !war (Versus) (Info) (Contact)
/msg $nick Untuk Info say dichannel, ketik /w GHOST !say (Info)
/msg $nick Untuk Kick ID dari channel, ketik /w GHOST !kick (ID) }

on 3:join:#GHOSTWorld: {
/msg $nick Untuk melihat command bot op anda, ketik /w GHOST !cmd-op }

on 3:text:*!cmd-op*:?: {
/msg $nick Command bot op yang anda miliki adalah
/msg $nick Untuk Announcement, ketik /w GHOST !ann (Info)
/msg $nick Untuk mengenai war, ketik /w GHOST !war (Versus) (Info) (Contact)
/msg $nick Untuk Info say dichannel, ketik /w GHOST !say (Info)
/msg $nick Untuk Kick ID dari channel, ketik /w GHOST !kick (ID)
/msg $nick untuk Ban id, ketik /w GHOST !ban (iD) (Lama) (Alasan)
/msg $nick untuk Unban id, ketik /w GHOST !unban (ID) }

on 4:join:#GHOSTWorld: {
/msg $nick Untuk melihat command bot admin anda, ketik /w GHOST !cmd-adm }

on 4:text:*!cmd-adm*:?: {
/msg $nick Command bot admin yang anda miliki adalah
/msg $nick Untuk Announcement, ketik /w GHOST !ann (Info)
/msg $nick Untuk mengenai war, ketik /w GHOST !war (Versus) (Info) (Contact)
/msg $nick Untuk Info say dichannel, ketik /w GHOST !say (Info)
/msg $nick Untuk Kick ID dari channel, ketik /w GHOST !kick (ID)
/msg $nick untuk Ban id, ketik /w GHOST !ban (iD) (Lama) (Alasan)
/msg $nick untuk Unban id, ketik /w GHOST !unban (ID) }

on 2:text:*!war*:?: {
/raw ann Butuh lawan : $2 vs $2 . Info : $3 . Hubungi $4 ( From VOP : $nick ) }
on 3:text:*!war*:?: {
/raw ann Butuh lawan : $2 vs $2 . Info : $3 . Hubungi $4 ( From OP : $nick ) }
on 4:text:!war*:?: {
/raw ann Butuh lawan : $2 vs $2 . Info : $3 . Hubungi $4 ( From Admin : $nick ) }

on 2:text:!ann*:?: {
/raw ann $2- ( From VOP : $nick ) }
on 3:text:!ann*:?: {
/raw ann $2- ( From OP : $nick ) }
on 4:text:!ann*:?: {
/raw ann $2- ( From Admin : $nick ) }

on 2:text:!kick*:?: {
/raw kick $2 Alasan : $3- ( From VOP : $nick ) }
on 3:text:!kick*:?: {
/raw kick $2 Alasan : $3- ( From OP : $nick ) }
on 4:text:!kick*:?: {
/raw kick $2 Alasan : $3- ( From Admin : $nick ) }

on 2:text:!say*:?: {
/raw me $2- ( From VOP : $nick ) }
on 2:text:!say*:?: {
/raw me $2- ( From OP : $nick ) }
on 3:text:!say*:?: {
/raw me $2- ( From Admin : $nick ) }

on 3:text:!ban*:?: {
/raw ban $2 (Lama : $3 ) ( Alasan : $4 ) ( Tgl: $date(dd/mm/yy)) ( From OP: $nick )
/raw lockacct $2
/raw kill $2
/msg $nick ID Telah Di banned
/writeini -n mIRC\data\lockunlock.txt ID: $2 Status: Banned Tgl: $date(dd/mm/yy) From Operator: $nick Keterangan: ID Anda telah diBan (Alasan : $3 ) ( Lama : $4 ) }

on 3:text:!unban*:?: {
/raw unban $2
/raw unlockacct $2
/writeini -n mIRC\lockunlock.txt ID: $2 Status: Unbaned Tgl: $date(dd/mm/yy) From Operator: $nick Keterangan: Masa Ban Sudah Lewat (Alasan : $3 )
/msg $nick ID Telah Di Unbaned }

on 4:text:!ban*:?: {
/raw ban $2 (Lama : $3 ) ( Alasan : $4 ) ( Tgl: $date(dd/mm/yy)) ( From Admin: $nick )
/raw lockacct $2
/raw kill $2
/msg $nick ID Telah Di banned
/writeini -n mIRC\data\lockunlock.txt ID: $2 Status: Banned Tgl: $date(dd/mm/yy) From Admin: $nick Keterangan: ID Anda telah diBan (Alasan : $3 ) ( Lama : $4 ) }

on 4:text:!unban*:?: {
/raw unban $2
/raw unlockacct $2
/writeini -n mIRC\lockunlock.txt ID: $2 Status: Unbaned Tgl: $date(dd/mm/yy) From Admin: $nick Keterangan: Masa Ban Sudah Lewat (Alasan : $3 )
/msg $nick ID Telah Di Unbaned }

on 1:TEXT:*maklo*:#: {
/raw kick $nick jangan bawa bawa ortu disini inget bos. !!!! }
on 1:TEXT:*mak lo*:#: {
/raw kick $nick jangan bawa bawa ortu disini inget bos. !!!! }
on 1:TEXT:*bangke*:#: {
/raw kick $nick Ihhh ni anak mulutnya gw cabein nanti. !!!! }
on 1:TEXT:*bapaklo*:#: {
/raw kick $nick jangan bawa bawa ortu disini inget bos. !!!! }
on 1:TEXT:*biji*:#: {
/raw kick $nick Ihhh ni anak mulutnya gw cabein nanti. !!!! }
on 1:TEXT:*peler*:#: {
/raw kick $nick Ihhh ni anak mulutnya gw cabein nanti. !!!! }
on 1:TEXT:*kroco*:#: {
/raw kick $nick yang kroco jangan disini ah. !!!! }
on 1:TEXT:*sampah*:#: {
/raw kick $nick Ehhh berani beraninya ngomong sampah disini, Kick dolo ah }
on 1:TEXT:*bangsat*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*asu*:#: {
/raw kick $nick Muka lo tuh yang kaya asu, ngomong gak jelas }
on 1:TEXT:*susu*:#: {
/raw kick $nick Muka lo tuh yang kaya susu kali? }
on 1:TEXT:*bangsad*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*kontol*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*jancok*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*jancok*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*ngentot*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*sundal*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*memek*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*memeq*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*anjing*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*anjink*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*anjink*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*suek*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*cibai*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*pler*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*bijiQ*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:ewe*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*suw*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*ngentot*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*ngentod*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*bacok*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*aso*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*kanjud*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*kanjut*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*babi*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*monyet*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*lonte*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*anjing*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*anjeng*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:tai*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:tae*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:itil*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:perek*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:fuck*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*tot*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*titit*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*lonthe*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*tod*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*jembut*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*kontol*:#: {
/raw kick $nick Kaga perlu pake Badword disini . inget ya !!!! }
on 1:TEXT:*melsa*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*mgi*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:indogamers*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*nusa*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*m1cq*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*skyzone*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*indoplaygame*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*indoplaygame*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*free*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*public*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*evolution*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*junior*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*idgs*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }
on 1:TEXT:*nsr*:#: {
/raw kick $nick Jangan bahas Server Lain disini!!! }

on 1:TEXT:!status*:?: {

if ( $nick != %mrp.nick ) { set -u15 %mrp.nick $nick }

if ( $2 == $null ) { set %mrp.status $readini mIRC\lockunlock.txt ID: %mrp.nick }

if ( %mrp.status == $null ) {

/msg $nick %mrp.nick $+ , }
else {

/msg $nick %mrp.nick $+ , %mrp.status }

else { set %mrp.status $readini mIRC\lockunlock.txt ID: $2 }

if ( %mrp.status == $null ) {

/msg $nick %mrp.nick $+ , $2 }

else {
/msg $nick %mrp.nick $+ , $2 %mrp.status } }
}

on *:TEXT:*:#GhostWorld:{
if (%protections == on) {
if ($nick isop $chan) { halt }
if (%flood2. [ $+ [ $wildsite ] ] == $null) {
set -u2 %flood2. [ $+ [ $wildsite ] ] 2
}
elseif (%flood2. [ $+ [ $wildsite ] ] >= 2) {
/raw kick $chan $nick Do Not Flood In $chan Again, $nick .
unset %flood2. [ $+ [ $wildsite ] ]
}
else { inc -u2 %flood2. [ $+ [ $wildsite ] ] }
}
}
on *:text:*:#GhostWorld:{
if (%protections == on) {

if ($nick isop $chan) { halt }
if ( $len($1-) >= 3 ) {
if ( $calc($regex($1-,/[A-Z]/g) / $regex($1-,/[A-Z]/gi) * 100) >= 70 ) /raw kick # $nick $v1 $+ % Caps $nick . Lower them please! | //write KickLogs.txt ( $+ $date $+ - $+ $time $+ ) $nick $address $chan $+ , Kicked for Caps. [Caps]: $1- }
}
}
alias Protections {
if ($2 == on) { set %protections on | echo -a Protection is now on }
if ($2 == off) { set %protections off | echo -a Protection is now off. }
}

on 4:text:!ping:?: {
/whois $nick }

#caps On
on @*:TEXT:*:#:{
var %n 4
if ($nick isreg $chan) {
var %percentage 60
if ($calc($regex($1-,/[A-Z]/g) / $len($1-) * 100) > %percentage) {
if (%n < 3) {
inc $+(%,caps,.,$nick,.,$wildsite)
var %i $($+(%,caps,.,$nick,.,$wildsite),2)
if (%i < %n) {
msg $chan You are currently using too many captial letters. This is the $ord(%i) time that you have broken this rule. Please stop this conduct or immidiate action will be taken against you.
}
if (%i = 3) {
/raw kick -ku120 # $nick You are using $calc($regex($1-,/[A-Z]/g) / $len($1-) * 100) percent caps. You have been warned before, you will now be banned.
unset $+(%caps,.,$nick,.,$wildsite)
}
}
}
}
}

on @*:ACTION:*:#:{
var %n 4
if ($nick isreg $chan) {
var %percentage 60
if ($calc($regex($1-,/[A-Z]/g) / $len($1-) * 100) > %percentage) {
if (%n < 3) {
inc $+(%,caps,.,$nick,.,$wildsite)
var %i $($+(%,caps,.,$nick,.,$wildsite),2)
if (%i < %n) {
/msg msg $chan You are currently using too many captial letters. This is the $ord(%i) time that you have broken this rule. Please stop this conduct or immidiate action will be taken against you.
}
if (%i = 3) {
/raw kick -ku120 # $nick You are using $calc($regex($1-,/[A-Z]/g) / $len($1-) * 100) percent caps. You have been warned before, you will now be banned.
unset $+(%caps,.,$nick,.,$wildsite)
}
}
}
}
}
#caps end

menu channel {
caps kicker $group(#caps).status:
.On/off:$iif($group(#caps).status = off, enable #caps, disable #caps)
}

cara memakainya copy scrips di atas dan paste di notepad simpan dengan nama terserah kalian, untuk contoh saya save as bot.txt . selanjutnya buka mirc anda ketik /load -rs bot.txt . bisa juga dengan paste langsung , caranya, buka mirc anda klik scrips editor --pilih tab remote paste scrip di sana , pilih OK

nah sekarang bot anda sudah jadi, turorial di atas masih sangat sederhana, karena saya membuat tutorial ini dengan terburu buru jadi ala kadarnya aja, sebetulnya masih banyak scips yang belum saya bahas disini seperti capslock, flood status banner user auto unbaned autobanned dll, selamay mencoba

oh nya .. sekalian Promo Nih mampir dong ke server saya di ghostworld. ip.dota.ghostworld.us TZ 7 forumnya http://www.ghostworld.us OK saya tungu

Lebih lanjut......

Bila anda seorang pemain game online tentu tidak akan asing lagi dengan istilah yang disebut dengan Battle.net, apalagi bagi anda yang suka bermain DoTA (singkatan dari Defense of The Ancients), yang merupakan sebuah map di game warcraft 3 : The Frozen Throne. Dan kepopuleran DoTA melebihi game asli, warcraft 3.

Lansung saja, pada dasarnya Server Battle.net merupakan sebuah komputer yang dijadikan sebagai jembatan penghubung antara pemain dalam sebuah jaringan atau internet. Pembuatan server Battle.net kali ini, saya menggunakan software PvPGN ( Player vs Player Game Network) pada platform Windows. Sebenarnya, softwarenya juga tersedia dalam paket source yang dapat di-compile di Linux dan di Mac, tapi kali ini saya hanya akan menjelaskan tentang penginstallannya di Windows.

PvPGN adalah sebuah BNETD yang bertujuan untuk menyediakan dukungan untuk semua client Blizzard, berlisensi GPL, open source dan free. Jadi bisa didistribusikan dengan bebas tanpa takut masalah legalisasinya… ^_^

Daftar client yang support dan versi minimum yang dibutuhkan :

* Battle.Net games:
- Diablo 1 v1.09
- Starcraft v1.08
- BroodWar v1.08
- Warcraft II Battle.Net Edition v2.02
- Diablo 2 v1.10
- Diablo 2 LOD v1.10
- Warcraft III Reign Of Chaos v1.13
- Warcraft III Frozen Throne v1.13

* Westwood Online games:
- Dune 2000 v1.06
- Tiberian Sun v2.03 ST-10
- Red Alert 2 v1.006
- Yuri’s Revenge v1.001

PvPGN dapat di download di

Sources:

http://pvpgn.imigi.ro/hosted/stable/pvpgn-1.8.4.tar.gz
http://pvpgn.imigi.ro/hosted/stable/pvpgn-1.8.4.tar.bz2

Windows 32 binaries:

http://harpywar.com/files/items/pvpgn/PvPGN-1.8.4-0-Win32-MySQL-5.0.51b-BIN.zip
http://pvpgn.imigi.ro/hosted/stable/PvPGN-1.8.4-0-Win32-MySQL-5.0.51b-BIN.zip
http://pvpgn.imigi.ro/hosted/stable/PvPGN-1.8.4-0-Win32-odbc-BIN.zip
http://pvpgn.imigi.ro/hosted/stable/PvPGN-1.8.4-0-Win32-SQLite-3.6.0-BIN.zip

Needed support files:

http://pvpgn.imigi.ro/hosted/support_files/pvpgn-support-1.2.tar.gz
http://pvpgn.imigi.ro/hosted/support_files/pvpgn-support-1.2.zip

UPDATE Terbaru Cek DISINI : http://pvpgn.imigi.ro

Silahkan gunakan link di sumbernya jika link di atas gagal. Diatas dapat dilihat bahwa tersedia paket Source sampai paket W32, silahkan download PvPGN dan support files-nya.

Masalah Storage (penyimpanan) :
“storage” adalah penyimpanan data account user (username, password, dan lain2). Ini adalah bagian yang sangat penting dalam PvPGN karena berpengaruh pada kecepatan sevre tergatung dari metode penyimpanan yang digunakan, berikut pertimbangannya,..

Users	Storage Mode
<>	Files
> 100 and <>	CDB
> 1000	SQL

Jika anda berrencana untuk mengunakan server battle.Net untuk kurang dari 100 orang silahkan gunakan metode peyimpanan file, untuk lebih dari 100 dan kurang dari 1000 gunakan metode penyimpanan CDB, dan untuk lebih dari 1000 gunakan metode SQL. Saya menggunakan metode CDB, sehingga ketika men-download saya pilih yang PvPGN ocdb.

Install PvPGN
Penginstallan dengan Installer Windows adalah penginstallan yang termudah jika dibandingkan dengan platform yang lain, dan di dalam penginstallannya dibutuhkan suppport file agar servernya berjalan dengan baik. Berikut ini Ilustrasi Installasi PvPGN,.. ^_^

Download file PvPGN dan PvPGN-support di http://pvpgn.imigi.ro atau http://pvpgn.berlios.de.

Extract file PvPGN , dan pindahkan folder hasil extract ke dalam c:\program files

Extract file PvPGN-support , dan pindahkan semua file di dalamnya ke dalam folder “files” di dalam folder PvPGN yang sudah dipindahkan ke c:\program files

Untuk menjalankan servernya double click file PvPGNConsole.exe atau jika ingin menjalankan interface GUI Windows double click file PvPGN.exe

Jika ingin menjalankan Server di Service Windows, double click file install.bat dan restart restart komputer anda.

-Setelah restart, untuk mengecek apakah servernya sudah jalan maka buka command prompt. Start -> Run -> “cmd”, ketikkan perintah “netstat -a“, lihat apakah port 6112 dalam kondisi Listening.Dan buka task manager. Start -> Run -> “taskmgr” , Lihat apakah programnya sudah jalan.