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

 Kayıt ol  Topluluk
1Beğeni(ler)
  • 1 Post By diEfoRyoU

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 18 Kasım 2018, 19:53   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 18 Kasım 2018, 21:04   #2
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba



Tinba Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Hocam Bu kodu Radyo Kanalında Sadece Yayın Alan Djlerin Günlük Kac Saat Yayın Almış Şeklinde Düzenleyebilirmiyiz


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

__________________
The Ghost of Christmas Past...

i'm here sometimes
 
Alıntı ile Cevapla

Alt 19 Kasım 2018, 13:41   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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

 
Alıntı ile Cevapla

Alt 19 Kasım 2018, 23:28   #4
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba



Tinba Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on *:text:*:#dj@: {
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 #radyo) { $+(.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,[,~,],~) } }
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

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.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:nick: { 
if $nick isop #radyo && dj* iswm $newnick && $ini(takip.ini,$replace($nick,[,~,],~)) { 
 $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) | return }
if dj* !iswm $newnick &&  $timer($+(timertakip,$newnick)) { $+(.timertakip,$newnick) off | kayit $replace($newnick,[,~,],~) } } 
on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }

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.

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

Alt 20 Kasım 2018, 12:25   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Merhaba Coder Arkadaşlar Bu Koda Yardımcı olacak Arkadaşlar varmı Acaba



diEfoRyoU Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:nick: { 
if $nick isop #radyo && dj* iswm $newnick && $ini(takip.ini,$replace($nick,[,~,],~)) { 
 $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) | return }
if dj* !iswm $newnick &&  $timer($+(timertakip,$newnick)) { $+(.timertakip,$newnick) off | kayit $replace($newnick,[,~,],~) } } 
on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }

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.

Peki ilave !list yapıp Takip Listesini Alsak ?

 
Alıntı ile Cevapla

Alt 20 Kasım 2018, 20:32   #6
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $regex($1,/^((!|\.)l[ıi]st)$/i) { play # takip.ini 100 | return }
if $regex($1,/^((!|\.)[iı]nfo)$/i) { play $+(-t,$2) # takip.ini 10 | return }


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

Cevapla

Etiketler
coder ler, yardım edin lütfen

« önceki Konu | sonraki Konu »

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

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
Merhaba Coder Arkadaşlar 2 Sorunum olacak Yardımcı olurmusunuz Tinba mIRC Scripting Sorunları 21 13 Mayıs 2018 14:53
Coder Arkadaşlar S.a Tinba mIRC Scripting Sorunları 7 26 Ağustos 2013 00:41
Coder Arkadaşlar Bu kodu düzeltebilirmisiniz? sohbetsevgi mIRC Scripting Sorunları 10 10 Haziran 2008 21:51
arkadaşlar yardımcı olurmusunuz GaziosmanpasaLi Unreal IRCd 5 14 Mart 2007 15:00




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
yavru köpek sohbet sohbet teması yetişkin sohbet
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net

mimarsinanokullari.com mjsanaokulu.com eburke.org