Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba
 

on *:text:*:#Mizah@: {
if !$istok(nick nick nick,$nick,32) { return }
if ($1 == !ekle) { if (!$2) { return }
if ($2 == $me) { msg # Beni takip listesine alamazsın $nick $+ | return }
if ($ini(takip.ini,$replace($2,[,~,],~))) { msg # $+ $2 nicki zaten listede ekli durumda. | return }
else {
writeini -n takip.ini $replace($2,[,~,],~) Pazartesi 0
writeini -n takip.ini $replace($2,[,~,],~) Salı 0
writeini -n takip.ini $replace($2,[,~,],~) Çarşamba 0
writeini -n takip.ini $replace($2,[,~,],~) Perşembe 0
writeini -n takip.ini $replace($2,[,~,],~) Cuma 0
writeini -n takip.ini $replace($2,[,~,],~) Cumartesi 0
writeini -n takip.ini $replace($2,[,~,],~) Pazar 0
.auser takip $2
msg # $+ $2 nicki online listesine eklenmiştir.
if ($2 ison #Mizah) { $+(.timertakip,$2) 0 1 inc -e $+(%,$replace($2,[,~,],~)) }
}
}
if ($1 == !sil) {
if (!$2) { return }
if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg # $2 Listede ekli değil | return }
else { .remini takip.ini $replace($2,[,~,],~) | .ruser takip $2 | msg # $2 Listeden silindi.
if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$replace($2,[,~,],~)) }
}
}
if ($1 == !online) {
if (!$2) { return }
if !$var($+(%,$replace($2,[,~,],~)),0) { msg # $2 'nin henüz online süresi yok. | return }
if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg # $2 Listede ekli değil | return }
kayit $replace($2,[,~,],~)
msg # 4 $str(-,10) $2 nicki için takip listesi $str(-,10)
.play $+(-t,$replace($2,[,~,],~)) # takip.ini 300
$+(.timerlist,$2) 1 3 msg # 4 $str(-,10) Listenin sonu $str(-,10)
}
if ($1 == !sıfırla) {
var %\ = $ulist(*,takip,0)
while %\ {
$+(.timertakip,$ulist(*,takip,%\)) off
set $+(%,$replace($ulist(*,takip,%\),[,~,],~)) 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazartesi 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Salı 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Çarşamba 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Perşembe 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cuma 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cumartesi 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazar 0
if ($ulist(*,takip,%\) ison #Mizah) { $+(.timertakip,$ulist(*,takip,%\)) 0 1 inc -e $+(%,$replace($ulist(*,takip,%\),[,~,],~)) }
dec %\
}
msg # Tüm online süreleri sıfırlanıp yeniden başlatılmıştır.
}
if ($1 == !temizle) {
write -c takip.ini
var %\ = $ulist(*,takip,0)
while %\ {
$+(.timertakip,$ulist(*,takip,%\)) off
.timer 1 1 unset $+(%,$replace($ulist(*,takip,%\),[,~,],~))
.ruser takip $ulist(*,takip,%\)
dec %\
}
msg # Tüm online takip listesi içeriğiyle beraber tamamen temizlenmiştir.
}
}
on takip:join:#Mizah: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) }
on takip:part:#Mizah:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }
on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }
alias kayit { .remini takip.ini $1 $gün | writeini -n takip.ini $1 $gün $replace($duration($($+(%,$1),2)),mins,Dakika,hrs, Saat,secs,Saniye,min,Dakika,hr,Saat,sec,Saniye,day ,Gün,days,Gün) }
alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,su nday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday ,Cumartesi,tuesday,Salı,thursday,Perşembe) }


Hocam Bu kodu Radyo Kanalında Sadece Yayın Alan Djlerin Günlük Kac Saat Yayın Almış Şeklinde Düzenleyebilirmiyiz

Cevap: Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba
 

mIRC Scripting Sorunları Kurallar : [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba
 

Galiba ilgilenen Cıkmayacak Moderatör Arkadaşlar paylaşamı silebilir

Cevap: Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba
 

Kod #dj@ kanalında çalışır
sendeki silmen gereken yerleri kırmızıya boyadım. Kırmızı bölgeleri silip aşağıdaki kodu eklersen dilediğin olur.
aşağıdaki kodun çalışma mantığı; kullanıcı nick değiştirdiğinde #radyo kanalında op ise ve(&&) yeni nickinde Dj takısı var ise ve(&&) takip.ini dosyasında nicki var ise adına timer açıp değerini her saniye yükseltir,
dj yayın alırken Dj takısını aldığını varsayarak yazdım kodu. Aynı şekilde her hangi bir nick değişiminde eğer yeni nickte dj takısı yoksa ve nick adına açılmış bir timer(zamanlayıcı) varsa timer durdurulur.
En azından kodu yazarken bu mantıkla yazdım çalışıp çalışmadığını deneme imkanım olmadı. umarım çalışır ve işine yarar.

Cevap: Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba
 

Peki ilave !list yapıp Takip Listesini Alsak ?

Cevap: Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba
 

if !$istok(nick nick nick,$nick,32) { return }

aşağıdaki kodu yukarıdaki satırın hemen altına yapıştırırsan;
!list komutu ile takip listesinde olan bütün Djleri, !info nick komutu ile bilgisini almak istediğin Dj'in bilgilerine ulaşabilirsin.