- alias preklam { if (%ipban == on) { //Ban -u $+ 900 # $nick 2 } | .samode # +b $wildsite | .zline $nick REKLAM! | .temizle | kick $chan $1 0,6|0,7|0,130,40,2 Reklam YASAK! 0,6|0,7| | halt } #kReklampro on ON *:TEXT:*:#:{ if $nick isop $chan || $nick isvoice $chan || $nick == “Arkadasca-Fm” { goto adviserend } if ($_reklam(#,$nick,$1-)) { preklam $nick } :adviserend } ON *:NOTICE:*:#:{ if $nick isop $chan || $nick isvoice $chan { goto adviserend } if ($_reklam(#,$nick,$1-)) { preklam $nick } :adviserend } ON *:ACTION:*:#:{ if $nick isop $chan || $nick isvoice $chan { goto adviserend } if ($_reklam(#,$nick,$1-)) { preklam $nick } :adviserend } #kReklampro end ; $_reklam(kanal,nick,yazi) alias _reklam { if ($2 isop $1) || ($2 isvoice $1) || ($istok(#yönetim #help #op...
- on *:text:*:#:{ if $chan == #radyo { if !istek* iswm $1- { if $2 == $null { msg $chan 1Lütfen Bir İstek Parça Belirtin $nick Örnegin: .istek şeklinde istekte bulunabilirsiniz. } else { inc -u180 $+(%,istek.,$nick) 1 if ($($+(%,istek.,$nick),2) >= 2) { .msg $chan 4,4 0,1 Lütfen Ard Arda Istek Istemeyin $nick ßir Kişi 15 Dakikada ßir Istek Isteyebilir..4,4 | return } else { inc %isayi msg #dj 4,4 0,1 Yeni Bir Sarkı Istegi Geldi isteyen Kişi $nick 9,1 İstedigi Sarkı ==> $+ $2- $+ 4,4 msg #dj 4,4 0,1 Yayındakı Djyın Dıkkatıne ıstenılen Sarkı Arsıvınızde Varsa !var nick yoksa !yok nick yazınız #dj Kanalına Sarkı Isteyen Kısıye Bıldırmıs Olursunuz msg $chan 4,4 1,8 İsteginiz DJ’lerimize iletilmistir msg $chan 4,4 0,1 İstenilen İstek Sayısı: %isayi msg $chan...
- alias radyom { sockclose radyo*S sockclose radyo*J if (: !isin $1) && (!$2) { echo -a 8244 radyo.Arkadasca-Fm.net | return } if ($1 == $null) { echo -a 72.20.58.220 radyo.Arkadasca-Fm.net | return } if (: isin $1) { echo -a Lütfen Bekleyin.. tokenize 58 $remove($1,http://,/) sockopen $+(radyo,$r(1,9999),S) $1 $2 set %site $1 $2 } else { sockopen $+(radyo,$r(1,999),!) $remove($1-,http://,/) | set %site $remove($1-,http://,/) | echo -a Lütfen Bekleyin.. } } on *:SockOpen:radyo*S:{ if ($sockerr) { echo -a Siteye BağLanmada Hata! | return } sockwrite -tn $sockname GET / HTTP/1.1 sockwrite -tn $sockname $crlf } on *:Sockread:radyo*S:{ sockread %radyo if (icy-name isin %radyo) { set %radyo2 %radyo2 ¿ $remove($gettok(%radyo,2,58),|) } if (icy-genre isin %radyo) { set %radyo2 %radyo2 ¿ $remove($gettok(%radyo,2,58),|) } if (icy-url isin %radyo) { set %radyo2 %radyo2 ¿...
- on *:connect: { .join #help .ns identify HelpBotSifresi .remote on .ignore $me } on *:text:*:?: { if .n?ck iswm $1- { /timer 1 0 msg $nick .:: Nickserv Hakkında Komutlar Sıralanıyor ::. /timer 1 1 msg $nick /timer 1 2 msg $nick 0,1 1- Nick Kaydetmek icin 4.nreg0,1 yazarak komutu öğrenebilirsiniz.. /timer 1 3 msg $nick 0,1 2- Nick Droplamak icin 4.drop 0,1yazarak komutu öğrenebilirsiniz.. /timer 1 4 msg $nick 0,1 3- Nick E-mail Değişmek icin 4.nmail0,1 yazarak komutu öğrenebilirsiniz.. /timer 1 5 msg $nick 0,1 4- Nick UrL Değişmek icin 4.nurl 0,1yazarak komutu öğrenebilirsiniz… /timer 1 6 msg $nick 0,1 5- Nick İnfosunu Görmek icin 4.ninfo 0,1yazarak komutu öğrenebilirsiniz.. /timer 1 7 msg $nick 0,1 6- Nick Sifrenizi E-mail’e Yollamak icin 4.nsend...
- alias gurkan { if !$istok(isimsiz ,$1,32) { return $false } goto $1 :isimsiz var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false) } on @*:join:#:{ if $gurkan(isimsiz,$nick,badnick.txt) { .mode $chan +b $wildsite | .kick $chan $nick BadNick! } } on @*:text:*:#:if $gurkan(isimsiz,$1-,kufur.txt) { .mode $chan +b $wildsite | kick # $nick Yasak Kelime Kullanımı! } alias antipity { dialog -m antipity antipity } dialog antipity { title “BadNick & Kufur Koruma Sistemi ßy AntiPity” size -1 -1 226 102 option dbu list 2, 38 22 70 58, size list 5, 118 22 70 58, size edit “”, 10, 38 12 70 10 edit “”, 11, 118 12 70 10 box “BAD NICK”, 6, 5 3...
alias kötürumuz { if (!$dialog(kötürumuz)) dialog -m kötürumuz kötürumuz } dialog kötürumuz { title “Kötü Rumuz Koruması” size -1 -1 200 180 option dbu text “..:: Rumuz Listesi ::..”, 999, 20 10 60 10 combo 1, 5 20 90 130 button “Ekle (+)”, 2, 4 146 27 13 button “Çıkar (-)”, 3, 32 146 27 13 button “Temizle (!)”, 4, 60 146 35 13 box “Seçenekler”, 5, 101 17 93 40 check “OP olduğumda tarama yap!”, 6, 106 28 73 10 check “Yeni rumuz kötüyse at!”, 7, 106 40 70 10 button “?”, 8, 182 28 9 9 button “?”, 9, 182 40 9 9 box “Kick Mesajınız”, 10, 101 60 93 40 edit “”, 11, 106 76 83 10, autohs box “Açıklamalar”, 12, 101 103 93 55 text “Kötü...









