Mirc Oper/Admin Menü kodu oper ve adminler içindir.
; Aliases alias IRCop { dialog -mo IRCoper IRCoper } ; Ana Menu dialog IRCoper { title "IRCop Oper Paneli" size -1 -1 155 242 option dbu box "Komutlar", 1, 1 2 69 163 button "Kill", 2, 10 10 51 10 button "kLine", 3, 10 22 51 10 button "UnkLine", 4, 10 34 51 10 button "aKiLL", 5, 10 46 51 10 button "rAkiLL", 6, 10 58 51 10 button "zLine", 7, 10 69 51 10 button "UnzLine", 8, 10 80 51 10 button "qLine", 9, 10 92 51 10 button "UnqLine", 10, 10 103 51 10 button "Shun", 12, 10 115 51 10 button "UnShun", 13, 10 127 51 10 button "Fjoin", 14, 10 138 51 10 button "SaJoin", 15, 10 150 51 10 box "Stats", 16, 1 167 69 51 button "Stats o", 17, 10 178 51 10 button "Stats k", 18, 10 190 51 10 button "Stats q", 19, 10 201 51 10 box "Komutlar", 20, 78 2 76 67 button "Rehash", 21, 85 10 59 10 button "Global MesaJ", 22, 85 21 59 10 button "NewsFlash", 23, 85 32 59 10 button "Online oPeRs", 24, 85 43 59 10 button "Online Users", 25, 85 54 59 10 box "Samodes", 26, 78 72 75 146 button "+o nick", 27, 88 80 51 10 button "-o nick", 28, 88 91 51 10 button "+v nick", 29, 88 102 51 10 button "-v nick", 30, 88 113 51 10 button "+/-diğer Nick", 31, 88 124 51 10 button "+m #kanal", 32, 88 135 51 10 button "-m #kanal", 33, 88 146 51 10 button "+i #kanal", 34, 88 157 51 10 button "-i #kanal", 35, 88 168 51 10 button "+R #kanal", 36, 88 179 51 10 button "-R #kanal", 37, 88 190 51 10 button "+/-diğer #Kanal", 38, 88 201 51 10 button "Kapat", 39, 25 223 105 10, cancel } on *:dialog:IRCoper:sclick:*:{ if ($did == 2) { /echo -a 5[2 Kill Komutunun Görevi5]2: in serverla olan baglantisini keser. | /kill $$?="Killenecek kişi:" $$?="Kill Sebebi:" } if ($did == 3) { /echo -a 5[2 kLine Komutunun Görevi5]2: in serverla olan baglantisini keser ve nick ayni hostla servera baglanamaz. | /kline $$?="kLine atılacak kişi:" $$?="kLine Sebebi:" } if ($did == 4) { /echo -a 5[2 UnkLine Komutunun Görevi5]2: Var olan kline i listeden kaldirir. Listeden kalkmayan hostlarla servera kimse baglanamaz. | /unkline $$?="Listeden kaldırmak istediğiniz kline hostunu giriniz. (Örnek: user@host.domain.com)" } if ($did == 5) { /echo -a 5[2 AkiLL Komutunun Görevi5]2: le birlikte kendisiyle ayni ip ye sahip olanlarin serverla baglantisini keser ve ayni ip ile kimse akill kaldirilmadan servera giremez. | /akill $$?="akill atılacak kişi:" $$?="Akill sebebi:" } if ($did == 6) { /echo -a 5[2 RakiLL Komutunun Görevi5]2: Var olan akill i listeden kaldirir. Listeden kalkmayan iplerle servera kimse baglanamaz. | /rakill $$?="Listeden kaldırmak istediğiniz akill hostunu giriniz. (Örnek: *@host.domain.com)" } if ($did == 7) { /echo -a 5[2 zLine Komutunun Görevi5]2: le birlikte kendisiyle ayni ip ye sahip olanlarin serverla baglantisini keser ve ayni ip ile kimse zline kaldirilmadan networke baglanamaz. | /zline $$?="Zline atılacak kişi:" } if ($did == 8) { /echo -a 5[2 UnzLine Komutunun Görevi5]2: Var olan zline i listeden kaldirir. Listeden kalkmayan iplerle networke kimse baglanamaz. | /unzline $$?="zline kaldırılacak ip (Örnek: 212.35.47.165)" } if ($did == 9) { /echo -a 5[2 qLine Komutunun Görevi5]2: i yasaklar. Operler disinda o nicki kimse kullanamaz. | /qline $$?="qline atılacak nick:" $$?="qline sebebi:" } if ($did == 10) { /echo -a 5[2 UnqLine Komutunun Görevi5]2: Var olan qline i kaldirir. Qline kalkmadan operler disinda kimse o nicki kullanamaz. | /unqline $$?="qline ı kalkacak nick:" } if ($did == 12) { /echo -a 5[2 sHun Komutunun Görevi5]2: O anda online bulunan kullanicinin konusmasini yasaklar. Kullanici serverdan çikip ayni nickle geri gelirse konusma yasagi otomatikman kalkmis olur. | /shun $$?="Konuşması yasaklanacak nick:" $$?="Yasaklanma sebebi:" } if ($did == 13) { /echo -a 5[2 UnsHun Komutunun Görevi5]2: Konusma yasagi olan birinin yasagini kaldirir. | /unshun $$?="Konuşma yasağı kalkacak nick:" } if ($did == 14) { /echo -a 5[2 fJoin Komutunun Görevi5]2: Bir kullaniciyi zorla bir kanala almaya yarar. Eger kanalda kullanicinin akicki varsa veya kanal restricted modundaysa yine chanserv tarafindan atilir. | /fjoin #$$?="Kullanıcının sokulacağı kanal:" $$?="Kanala sokulacak kullanıcının nicki:" } if ($did == 15) { /echo -a 5[2 SaJoin Komutunun Görevi5]2: Sizin bir kanala girmenizi saglar. Mesela +i olan veya Restricted modunda olan kanala bu komutla girersiniz. Bu komutu baskalarini kanala sokmak için kullanamazsiniz. | /sajoin #$$?="Girmek istediğiniz kanal adı:" } if ($did == 17) { /echo -a 5[2 sTatS o Komutunun Görevi5]2: Servera kayitli bulunan operlerin o-line larini görmenizi saglar. | /stats o } if ($did == 18) { /echo -a 5[2 sTatS k Komutunun Görevi5]2: Tüm kline, akill ve zline listelerini görmenizi saglar. Listede basinda k harfi bulunanlar kline, A harfi bulunanlar akill, z harfi bulunanlar da zline dir. Basinda t harfi bulunanlarsa zamanli atilmis akill/kline/zline lardir. | /stats k } if ($did == 19) { /echo -a 5[2 sTatS q Komutunun Görevi5]2: Tüm qilne li nickleri görmenizi saglar. Basinda q (küçük harfle) yazanlar normal qline dir ve her operin ekleyip kaldirabilecegi qlinelardir. Diger qlinelar SQline olup sadece Server Administrator seklinde adminliste kayitli olan nickler tarafindan eklenip kaldirilabilir. | /stats q } if ($did == 21) { /echo -a 5[2 ReHash Komutunun Görevi5]2: Servera bir takim ayarlar yaptiginizda bu ayarlarin serverda kalici olmasi için uygulamaniz gereken komuttur. Bu komutu kullandiginizda tüm akiller/klinelar/zlinelar/qlinelar otomatik olarak açilacaktir. | /rehash } if ($did == 22) { /echo -a 5[2 gLobaL meSaj Komutunun Görevi5]2: Tüm servera kendi nickinizle global mesaj atmanizi saglar. | /notice $$?="Oper olduğunuz serverı giriniz (Örnek: $iRc.CeneBaz.com)" $$?="Yollamak istediğiniz mesajı giriniz." } if ($did == 23) { /echo -a 5[2 nfLash Komutunun Görevi5]2: Statuste durup bekleyen kullanicilara mesaj yollamanizi saglar. | /nflash $$?="Göndermek istediğiniz mesaj:" } if ($did == 24) { /echo -a 5[2 wHo 0 o Komutunun Görevi5]2: Serverda online olarak bulunan operleri görmenizi saglar. | /who 0 o } if ($did == 25) { /echo -a 5[2 wHo Komutunun Görevi5]2: Serverda online olarak bulunan tüm kullanicilari görmenizi saglar | /who } if ($did == 27) { /echo -a 5[2 saMode #kanal +o nick Komutunun Görevi5]2: Op degilken e belirli bir kanalda op vermenizi saglar. | /samode #$$?="Nicke hangi kanalda op vermek istiyorsunuz?" +o $$?="op vermek istediğiniz kişi kim?" } if ($did == 28) { /echo -a 5[2 saMode #kanal -o nick Komutunun Görevi5]2: Op degilken in belirli bir kanalda opunu almanizi saglar. | /samode #$$?="Nickin hangi kanalda opunu almak istiyorsunuz?" -o $$?="opunu almak istediğiniz kişi kim?" } if ($did == 29) { /echo -a 5[2 saMode #kanal +v nick Komutunun Görevi5]2: Op degilken e belirli bir kanalda voice vermenizi saglar. | /samode #$$?="Nicke hangi kanalda voice vermek istiyorsunuz?" +v $$?="Voice vermek istediğiniz kişi kim?" } if ($did == 30) { /echo -a 5[2 saMode #kanal -v nick Komutunun Görevi5]2: Op degilken in belirli bir kanalda voiceini almanizi saglar. | /samode #$$?="Nicke hangi kanalda op vermek istiyorsunuz?" -o $$?="Voiceini almak istediğiniz kişi kim?" } if ($did == 31) { /echo -a 5[2 saMode #kanal +/-(mod) nick Komutunun Görevi5]2: Op degilken e belirli bir kanalda belirli modlar vermenizi saglar. | /samode #$$?="Nicke hangi kanalda bazı modlar vermek istiyorsunuz?" $$?="Nicke vermek istediğiniz modlar nelerdir? (Örnek: -u)" $$?="Bu modları vermek istediğiniz kişi kim?" } if ($did == 32) { /echo -a 5[2 saMode #kanal +m Komutunun Görevi5]2: Op degilken kanali +m moduna almanizi saglar. Saldiri aninda ise yarar. Kanalda +/op/oper lerin disinda kimse konusamaz. | /samode #$$?="+m moduna almak istediğiniz kanal:" +m } if ($did == 33) { /echo -a 5[2 saMode #kanal -m Komutunun Görevi5]2: Op degilken kanali -m moduna almanizi saglar. Kanal -m olmadan userlar kanalda konusamaz. | /samode #$$?="-m moduna almak istediğiniz kanal:" -m } if ($did == 34) { /echo -a 5[2 saMode #kanal +i Komutunun Görevi5]2: Op degilken kanali +i moduna almanizi saglar. Saldiri aninda ise yarar. Kanala davet edilmeyen kimse kanala giremez. | /samode #$$?="+i moduna almak istediğiniz kanal:" +i } if ($did == 35) { /echo -a 5[2 saMode #kanal -i Komutunun Görevi5]2: Op degilken kanali -i moduna almanizi saglar. Kanal -i olmadan kanala davet edilmeyen kisiler kanala giremez. | /samode #$$?="-i moduna almak istediğiniz kanal:" -i } if ($did == 36) { /echo -a 5[2 saMode #kanal +R Komutunun Görevi5]2: Op degilken kanali +R moduna almanizi saglar. Saldiri aninda işe yarar. Sifresiz nickler kanala giremez. | /samode #$$?="+R moduna almak istediğiniz kanal:" +R } if ($did == 37) { /echo -a 5[2 saMode #kanal -R Komutunun Görevi5]2: Op degilken kanali -R moduna almanizi saglar. Kanal -R olmadan sifresiz nickler kanala giremez. | /samode #$$?="-R moduna almak istediğiniz kanal:" -R } if ($did == 38) { /echo -a 5[2 saMode #kanal +/-(mod) Komutunun Görevi5]2: Op degilken kanala belirli modlar vermenizi saglar. | /samode #$$?="Hangi kanala belirli modlar vermek istiyorsunz?" $$?="Kanalı ne moduna almak istiyorsunuz? (Örnek: +ep)" } if ($did == 39) { /dialog -x IRCoper } } on *:dialog:IRCoper:*:*:{ dll dll/mdx.dll SetMircVersion $version | dll dll/mdx.dll MarkDialog $dname dll dll/mdx.dll SetFont 1,2,3,4,5,6,7,8,9,10,12,13,14,15,16,17,18,19,20,21 ,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,3 8,39, 12 700 Tahoma dll dll/mdx.dll SetFont +b 3,26,27 700 Tahoma }