IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 14 Temmuz 2006, 20:22   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Kanal Kapatma...




Arkadaşlar Anopede biliyorsunuz kanalı geçici olarak kapatma yok forbidleme var.. Yardımcı olabilirseniz şöyle bi code istiyorum.. #Yönetim Kanalında !kapat #kanal Yazdığımızda Bot o kanala girsin 7 Gün boyunca o kanala başka kimseyi almasın kanala girenleri Ceza Bitim Süresi 6 Gün 15 Saat Gibi Bir Sebeble Kanaldan Atsın...Mantıki Olarak bi txt dosyasına kanalın adını yazdırabiliriz ama Saat olayını çözemiyorum.. Şimdiden yorumlarınız ve paylaşımlarınız için Tşkler...
Arkadaşlar Anopede biliyorsunuz kanalı geçici olarak kapatma yok forbidleme var.. Yardımcı olabilirseniz şöyle bi code istiyorum.. #Yönetim Kanalında !kapat #kanal Yazdığımızda Bot o kanala girsin 7 Gün boyunca o kanala başka kimseyi almasın kanala girenleri Ceza Bitim Süresi 6 Gün 15 Saat Gibi Bir Sebeble Kanaldan Atsın...Mantıki Olarak bi txt dosyasına kanalın adını yazdırabiliriz ama Saat olayını çözemiyorum.. Şimdiden yorumlarınız ve paylaşımlarınız için Tşkler...
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Sohbet
Alt 14 Temmuz 2006, 22:22   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:!& #&:#yönetim:{ var %* = $+(%,kapali.,$2) if $1 == !kapat { if $(%*,2) { msg # $2 kanalı $asctime($gettok($v1,1,32),dd/mm/yy hh:nn.ss) tarihinde zaten $+(,$gettok($v1,2,32),) tarafından kapatılmıştı. Açılması için kalan süre: $durx($calc($gettok($v1,1,32) +604800 - $ctime)) } else { msg # $2 kanalını $asctime(dd/mm/yy hh:nn.ss) tarihi itibariyle 7 gün süreyle kapatılmıştır. | set $(%*,1) $ctime $nick | join $2 | .timer 1 2 cs akick $2 add *!*@* $2 kanalı $asctime(dd/mm/yy hh:nn.ss) tarihi itibariyle 7 gün süreyle kapatılmıştır. $(|) cs akick $2 enforce | $+(.timer,$2) 1 604800 kanalac $2 } } elseif $1 == !aç { if !$(%*,2) { msg # $+(,$2,) kanalı zaten kapalı değil! } else { msg # $+(,$gettok($(%*,2),2,32),) tarafından $asctime($gettok($(%*,2),1,32),dd/mm/yy hh:nn.ss) tarihinde kapatılan $+(,$2,) kanalı şu an itibariyle açıldı. | part $2 | unset $(%*,1) | $+(.timer,$2) off } } elseif $1 == !durum { if !$(%*,2) { msg # $+(,$2,) kanalı kapalı değil! } else { msg # $2 kanalı $asctime($gettok($(%*,2),1,32),dd/mm/yy hh:nn.ss) tarihinde $+(,$gettok($(%*,2),2,32),) tarafından kapatılmıştı. Açılması için kalan süre: $durx($calc($gettok($(%*,2),1,32) +604800 - $ctime)) } } } alias kanalac { var %& = $+(%,kapali.,$1) | if $me ison $1 && $me ison #yönetim && $(%&,2) { msg #yönetim $asctime($gettok($(%&,2),1,32),dd/mm/yy hh:nn.ss) tarihinde $gettok($(%&,2),2,32) tarafından kapatılan $1 kanalı süre dolduğundan kullanıma açıldı! | cs akick $1 del *!*@* | unset $(%&,1) } } alias -l durx { return $replace($duration($1),days,gün,hrs,saat,mins,dakika,secs,saniye,sec,saniye,day,gün,hr,saat,min,dakika) }



Konu el33t tarafından (15 Temmuz 2006 Saat 00:01 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 15 Temmuz 2006, 01:07   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




Eline koluna sağlık komut çok güzel.. ancak bizim Türk milleti herşeyin bi açığını bulucak ya botun attığı akicki siliyor kanal normale dönüyor kanalda oplar vs.. durabiliyor... Akick yerine bot o kanalda dursun geleni atsın founderde gelse kullanamaz atılır kanaldan.. Birde script kapanıp açılınca geri kapalı kanallara nasıl girebilir... Yardımların için Çok teşekkürler.

 
Alıntı ile Cevapla

Alt 15 Temmuz 2006, 12:44   #4
NaTSuKa
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#yönetim: { if !kapat == $1 { if ($istok(%kkanal,$2,32) == $true) { msg #yönetim Bu kanal zaten kapalı... Daha nasıl kapatmayı düşünüyorsun ! } else { set %kkanal $addtok(%kkanal,$2,32) sajoin $2 mode $2 +o $me .timer 1 $calc(7 * 86400) $remtok(%kkanal,$2,32) .timer 1 $calc(7 * 86400) part $2 } } } on *:text:*:#yönetim: { if !kanalac == $1 { if ($istok(%kkanal,$2,32) == $true) { .set %kkanal $remtok(%kkanal,$2,32) .part $2 } else { msg #yönetim Bu kanal Zaten Açık , amacın nedir !! } } } on *:join:#: { if $chan == #yönetim { halt } kick # $nick bu kanal yönetim tarafından kapatılmıstır. } on *:kick:#: { if $knick == $me { sajoin $chan mode $chan +o $me } } on *:deop:#: { if $opnick == $me { mode $chan +o $me } }

bunu dene
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
belki çalışır... Ben denemedim...

#yöetim kanalına;

!kapat #kanaladı << kanalı 7 g&#252;n kapatyır ve kanala giren herkezi atar
!kanalac #kanaladı << kapalı kanalı a&#231;ar

Ben anope services'i hi&#231; kullanmadım o y&#252;zden tarih ve saati kick sebebi yapamadım...


Konu NaTSuKa tarafından (15 Temmuz 2006 Saat 15:16 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 15 Temmuz 2006, 21:18   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




natsuka kodu denedim çok güzel çalışıyor ama bu genel bi bot global odalarda opta duruyordu o odalarıda kapattı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 15 Temmuz 2006, 23:09   #6
NaTSuKa
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




haa o zaman şu kodu degiştir...

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#: { if $chan == #yönetim { halt } kick # $nick bu kanal yönetim tarafından kapatılmıstır. }

bu kodu bunun ile degiştir...

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#: { if $chan == #yönetim { halt } if $chan == #globalkanal1 { halt } if $chan == #globalkanal2 { halt } kick # $nick bu kanal yönetim tarafından kapatılmıstır. }

şeklinde çogaltabilirsin...

kolay gelsin
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 16 Temmuz 2006, 00:43   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




Yada;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on !@*:join:#: { if !$istok(#kanal1 #kanal2 #kanal3 #kanal4 #kanal5,#,32) { ban -k # $nick 2 kapali kanal } }

Yapabilirsin
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

yada
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on !@*:join:#: { if $istok(%kkanal,#,32) { ban -k # $nick 2 yasak kanal } }

Umarım işine yarar.

__________________
TurkSohbet.NET | #XPass
 
Alıntı ile Cevapla

Alt 16 Temmuz 2006, 15:59   #8
NaTSuKa
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




Ben bu kodun mantıgında biraz oynama yaptım ve şu şekilde oldu...
!kapat #kanaladı SEBEB

fakat kod da k&#252;&#231;&#252;k bir hata var &#252;statlar onada bir el atsın kodun tamamını en sona yazıyorum hataları yazayım...

şimdi y&#246;netim kanalına !kapat #sohbet Clone yazıldıgında kanal adını
%kkanal degişkenine setliyor sebebinide %#sohbet adında her kanal i&#231;in bir degişken olup sebebi ve kapatanı o degişkene setliyor kanala kim gelirsede o degişkende yazanlar ile atıyor....

fakat hata şurda
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


ben sohbet kanalını kapattıgımda beni şu sebeb ile atıyor...

#Sohbet kanalından atıldınız atan kişi BOT sebeb (kapalı: %#sohbet)


degişkenin i&#231;indeki bilgilerde aşagıda;

%#sohbet Clone Kapatan: NaTSuKa

yani sohbet kanalının kick sebebiClone Kapatan: NaTSuKa olması gerekirken %#sohbet oluyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


hata şurada;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#: { if ($istok(%kkanal,$chan,32) == $true) { kick # $nick Kapalı: % $+ $chan << BURADA set degerinin i&#231;indeki bilgileri yazmıyor ismini veriyor... } else { halt } }

Yani degişkendeki bilgileri yazmıyor direk degişkenin adını yazıyor.... buradaki hatayı d&#252;zeltirseniz sevinirim ben &#231;&#246;zemedim valla &#231;okta merak ediyorum nasıl olacagını...

tam kod;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#y&#246;netim: { if !kapar == $1 { if ($istok(%kkanal,$2,32) == $true) { msg #y&#246;netim Bu kanal zaten kapalı... } else { set %kkanal $addtok(%kkanal,$2,32) set % $+ $2 $3- 4Kapatan: 12$nick sajoin $2 mode +o $me .timer 1 $calc(7 * 86400) $remtok(%kkanal,$2,32) .timer 1 $calc(7 * 86400) part $2 .timer 1 $calc(7 * 86400) unset % $+ $2 } } } on *:text:*:#y&#246;netim: { if !kanalac == $1 { if ($istok(%kkanal,$2,32) == $true) { unset % $+ $2 .set %kkanal $remtok(%kkanal,$2,32) .part $2 } else { msg #y&#246;netim Bu kanal Zaten A&#231;ık , amacın nedir !! } } } on *:join:#: { if ($istok(%kkanal,$chan,32) == $true) { kick # $nick Kapalı: % $+ $chan } else { halt } } on *:kick:#: { if $knick == $me { sajoin $chan mode $chan +o $me } } on *:deop:#: { if $opnick == $me { mode $chan +o $me } }


 
Alıntı ile Cevapla

Alt 09 Ağustos 2006, 19:03   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




Suan Bu komutu denedım ancak butun kanalları kapattı...!kanalac #kanaladı olarak kanalları acmayı denıyorum acmıyor yardımcı olurmusunuz acıl olarak acaba
???

 
Alıntı ile Cevapla

Alt 09 Ağustos 2006, 19:46   #10
NaTSuKa
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
Yanıt: Kanal Kapatma...




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#y&#246;netim: { if !kapat == $1 { if $istok(%kkanal,$2,32) == $true) { msg #y&#246;netim Kardeşim bu kanal zaten kapalı ;) halt } else { set %kkanal $addtok(%kkanal,$2,32) write kkanal.txt $2 $4- 4Kaptan:12 $nick write timechan.txt $2 $3 sajoin $2 samode $2 +o $me } } } on *:join:#: { if ($istok(%kkanal,$chan,32) == $true) { if $nick != $me { if $read(kkanal.txt,s,#) { ban -k # $nick $v1 } } } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#y&#246;netim: { if !kanalac == $1 { if ($istok(%kkanal,$2,32) == $true) { .set %kkanal $remtok(%kkanal,$2,32) .part $2 ksil $2 $+ * kssil $2 $+ * } else { msg #y&#246;netim Bu kanal zaten a&#231;ık... } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias xyzchan { var %p 1 var %k $lines(timechan.txt) while %p <= %k { if * $+ $date $+ * iswm $read(timechan.txt,%p) { part $gettok($read(timechan.txt,%p),1,32) ksil $gettok($read(timechan.txt,%p),1,32) $+ * kssil $gettok($read(timechan.txt,%p),1,32) $+ * set %kkanal $remtok(%kkanal,$gettok($read(timechan.txt,%p),1,32),32) inc %p } else { inc %p } } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias ksil { while $read(timechan.txt,w,$$1) { write $+(-dw,$1) timechan.txt } } alias kssil { while $read(kkanal.txt,w,$$1) { write $+(-dw,$1) kkanal.txt } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:connect: { .timer 0 3600 xyzchan .timer 1 5 girkanal } alias girkanal { var %^ 1 var %&#163; $numtok(%kkanal,32) while %^ <= %&#163; { sajoin $gettok(%kkanal,%^,32) samode $gettok(%kkanal,%^,32) +o $me inc %^ } }


&#199;alışma şekli:
#y&#246;netim kanalı geneline

!kapat A&#199;ILMAS&#220;RESİ sebeb
!kapat 15/09/2006 Reklam yapmak yasak << bu kanal 15/09/2006 tarihinde a&#231;ılacak otamatik

!kanalac #kanaladi << buda kapalı kanalı a&#231;ar...


al sana kodları... Bu kod &#231;alışıyor... bunları ayrı ayrı remotelere koy sorunsuz bir şekilde &#231;alışacaktır.. b1 , b2 ,b3 , b4 ,b5 diye remotelere koy soursnsuz &#231;alışıyor...

Kapatılan kanalları hafısasına alıp hangi sebebten ve kim tarafından kapatıldıysa o sebeb ile kanala girenleri kickliyor...

Mirc kapatıp a&#231;san bile kapalı kanallara otamatik giriyor ve zamanı geldiginde kanalalı a&#231;ıyor....


Konu NaTSuKa tarafından (09 Ağustos 2006 Saat 19:53 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Cevapla

Etiketler
kanal, kapatma, mirc, mirc download, mirc indir


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Muaf Kanal/Nick Giriş Çıkış Bilgisi Kanal ve Özelde Komut Yardımı Goemon Conference Room (CR) 4 01 Şubat 2016 02:03
Bu kodu kanaL Kick+ban kanal opLarı icin nasıl düzenleriz Tinba mIRC Scripting Sorunları 4 12 Mart 2013 07:19
!kanalekle global #kanal-adı yazınca ßot Kanal.txt'ye kaydetsin Smith mIRC Scripting Sorunları 10 20 Mart 2009 13:14
kanal a /cs access #kanal list çekinde services gidiyor neden ola bilir :( EEkreMM Servisler 3 07 Ocak 2008 17:39