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 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ö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önetim Bu kanal zaten açı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 %£ $numtok(%kkanal,32)
while %^ <= %£ {
sajoin $gettok(%kkanal,%^,32)
samode $gettok(%kkanal,%^,32) +o $me
inc %^
}
}
Çalışma şekli:
#yönetim kanalı geneline
!kapat AÇILMASÜRESİ sebeb !kapat 15/09/2006 Reklam yapmak yasak << bu kanal 15/09/2006 tarihinde açılacak otamatik !kanalac #kanaladi << buda kapalı kanalı açar...
al sana kodları... Bu kod çalışıyor... bunları ayrı ayrı remotelere koy sorunsuz bir şekilde çalışacaktır.. b1 , b2 ,b3 , b4 ,b5 diye remotelere koy soursnsuz ç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çsan bile kapalı kanallara otamatik giriyor ve zamanı geldiginde kanalalı açıyor....