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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   /* NoMercy Hataları ve Eksikleri */ (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/161173-nomercy-hatalari-ve-eksikleri.html)

xfactor 30 Kasım 2008 16:39

Cevap: /* NoMercy Hataları ve Eksikleri */
 
ellerine sağlıK

RaRaeL 30 Kasım 2008 17:36

Cevap: /* NoMercy Hataları ve Eksikleri */
 
eLine koLuna sağLık winq..

WingmaN 02 Aralık 2008 04:55

Cevap: /* NoMercy Hataları ve Eksikleri */
 
/* Radyo Durum Sistemi */

Radyo'muzu baştan aşşağı değiştirmek zorunda kaldım, uygun ve düzenli çalışabilmesi için. Her ne kadar baştan aşşağı değiştirmek zorunda kalmışta olsam, bu gerçekten radyo için çok önemli birşeydir. Bu yuzden, hiç üşenmedim açıkçası.

Başlıyoruz; Öncelikle alttaki bölümü bulun;
Kod:

    if $getxmltext(SERVERGENRE, %data) != $null {
      set %genre $remove($ifmatch,ÿ,&)
    }

Hemen altına, göstereceğim kodu ekleyin.
Kod:

    if $getxmltext(STREAMSTATUS, %data) != $null {
      set %radyodurum $remove($ifmatch,ÿ,&)
    }

Bu kodu ekledikten sonra; alttaki bölümü bulun;
Kod:

on 1:SOCKCLOSE:$($shoutcast.socket): {
  if %songtitle != %lastsong {
    set %lastsong %songtitle

Bu gösterdiğim satırın altında ki herşeyi ( } ) bu işarete kadar olan ki kısımları, kesin (ctrl + x) ve bir not defterine yapıştırın. Başka bir yere aktaracağız, bu değiştirdiğimiz bölümü ise, şu şekilde değiştireceksiniz.
Kod:

on 1:SOCKCLOSE:$($shoutcast.socket): {
  if %songtitle != %lastsong {
    set %lastsong %songtitle
    radyodurum %radyodurum
  }
}

Şimdi, hemen bu kodun altına, aşşağıda vereceğim kodu ekleyeceksiniz;
Kod:

alias radyodurum {
  if $1 = 0 {
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 5Radyomuz şuan da kapalı durumdadır, bizi tercih ettiğiniz için, teşekkür ederiz.
    sw NoMercy TOPIC $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 5Radyomuz şuan da kapalı durumdadır, bizi tercih ettiğiniz için, teşekkür ederiz.
    .halt
  }
  if $1 = 1 {
    .timer 1 20 sw NoMercy PRIVMSG $shoutcast.channel : $+ $djnick(%genre)
    var %msg = 0,4 $fants(%genre) su anda online 0,2 Siradaki parca: $turkceh(%songtitle) 0,6 Su anda %currentlisteners kisi dinliyor (rekor: %peaklisteners $+ ) 

    sw NoMercy topic $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - $+ %msg
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 0,012Şuan da DJ Olarak ( $+ 4 %genre 12 $+ ) yayındadır!
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 0,06Bakalım kaç kişi dinliyor ? ;) 2 %currentlisteners  6kişi dinliyor!
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 0,02Hmm hangi şarkı caliyo ki? 13 $turkceh(%songtitle)  2 parcasi caliyomus hehe!
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 0,05Rekor'a baksana sen ya! 12 %peaklisteners  5kişi dinlemiş bizi!
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] 0,0-----------------------------------------------------------------------------------------------
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 0,04Sende Dinlemek istiyorsan eğer, hemen tıkla! 6> 12http:// $+ $shoutcast.host $+ : $shoutcast.port $+ /listen.pls
  }
}

Ben size bu kodu tam olarak veriyorum ki bazı yapamayan ya da yanlış anlayabilicek olan arkadaşlarımız da, iyice anlayabilsinler.

/* Bu kısımdan sonra ki bölüm, q0kh4n01 nick'li arkadaşımız için hazırlanmıştır. */

Gökhan, senin için özel olarak kodun şu kısmını değiştirmelisin, söylediğin mesajı arada bir kanala attırmak istediğinden bahsetmişsin, bu yuzden senin için bu kodu değiştirip veriyorum.

Kod:

alias radyodurum {
  timerRADYOX 0 300 sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 5Radyomuz şuan da kapalı durumdadır, bizi tercih ettiğiniz için, teşekkür ederiz.
  if $1 = 0 {
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 5Radyomuz şuan da kapalı durumdadır, bizi tercih ettiğiniz için, teşekkür ederiz.
    sw NoMercy TOPIC $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 5Radyomuz şuan da kapalı durumdadır, bizi tercih ettiğiniz için, teşekkür ederiz.
    .halt
  }

Bu şekilde değiştirdiğin zaman, her !durum çekildiğinde 5 dakikada bir belirlediğin mesajı kanala yazacaktır. Mesajı değiştirebilirsin, ben örnek olarak kendi kullandığımı veriyorum.

Saygılarımla, Scripting'li Günler dilerim ..

aSpeRa 02 Aralık 2008 20:30

Cevap: /* NoMercy Hataları ve Eksikleri */
 
abi bu Nomercy Botu editlemeyi YazarsanÇok SeViniRim

q0kh4n01 03 Aralık 2008 15:35

Cevap: /* NoMercy Hataları ve Eksikleri */
 
ee tşk butonu kalkmış ne ayaq :)
çok tşk ettim winq emeqine saqlık

WingmaN 04 Aralık 2008 03:14

Cevap: /* NoMercy Hataları ve Eksikleri */
 
aSpeRa;
Bunun için, başka bir konu açarım, forumu takip edersen, bulabilirsin.

q0kh4n01;
Rica ederim, işine yaradıysa sevindim :-) Eksik gördükleriniz, ya da güzel olmasını düşündüğünüz fikirleriniz varsa, paylaşın. Geliştirelim, Güzelleştirelim.

q0kh4n01 05 Aralık 2008 22:35

Cevap: /* NoMercy Hataları ve Eksikleri */
 
şimdi burda 2 tane aynı alias var çakışmıcaklar mı :S
hem kafam karıştı ya
Kod:

on 1:SOCKREAD:$($shoutcast.socket): {
  var %data
  sockread -f %data
  while $sockbr > 0 && $sockerr == 0 {
    if $getxmltext(SERVERTITLE, %data) != $null {
      set %servertitle $remove($ifmatch,ÿ,&)
    }
    if $getxmltext(CURRENTLISTENERS, %data) != $null {
      set %currentlisteners $ifmatch
    }
    if $getxmltext(SONGTITLE, %data) != $null {
      set %songtitle $remove($ifmatch,ÿ,&)
    }
    if $getxmltext(BITRATE, %data) != $null {
      set %bitrate $ifmatch
    }
    if $getxmltext(PEAKLISTENERS, %data) != $null {
      set %peaklisteners $ifmatch
    }
    if $getxmltext(STREAMSTATUS, %data) != $null {
      set %radyodurum $remove($ifmatch,ÿ,&)
    }
    sockread -f %data
  }
}

on 1:SOCKCLOSE:$($shoutcast.socket): {
  if %songtitle != %lastsong {
    set %lastsong $turkceh(%songtitle)
    .timer 1 7 sw nomercy PRIVMSG $shoutcast.channel : $djnick(%genre)
    .timer 1 20 sw nomercy PRIVMSG $shoutcast.channel : $djnick(%genre)
    var %msg = 0,4 $fants(%genre) su anda online 0,2 Siradaki parca: $turkceh(%songtitle) 0,6 Su anda $+ %currentlisteners kisi dinliyor (rekor: %peaklisteners $+ ) 
    sw nomercy topic $shoutcast.channel : 0,4 ** 0,2 Yayinda su an » 0,4 $fants(%genre) 0,2 « bulunmakta 0,4 ** 0,2 Yayin turu: 0,14 %servertitle 0,2 0,4 ** 0,2 Calan parca: 0,14 $turkceh(%songtitle)  0,2 0,4 ** 
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 0,2 DJ`lerimizden 0,4 $fants(%genre) 0,2 su anda online 
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 0,2 Calan parca : 0,4 $turkceh(%songtitle) 
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 0,2 Dinlenme Oranı : 0,14  %currentlisteners $+   kisi dinliyor 0,4 (rekor: %peaklisteners $+ ) 
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 9,1 Radyomuzu winamp'dan dinlemek icin tiklayin 0,4 >>  12http://212.175.158.58:2222/listen.pls
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 9,1 Radyomuzu web'den dinlemek icin tiklayin 0,4 >>  12
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $chr(36) $+ *.mIRCDark.Com :0,4 < ** > 0,0 0,2 DJ`lerimizden 0,4 $fants(%genre) 0,2 su anda online 0,4 ** 0,20,2 Calan parca:0,4 $turkceh(%songtitle) 
    sw nomercy privmsg $chr(36) $+ *.mIRCDark.Com :0,4 < ** > 0,0 9,1 Radyomuzu winamp'dan dinlemek icin tiklayin 0,4 >>  12http://212.175.158.58:2222/listen.pls
  }
}

kısmını tam olarak nasıl değiştirmem lazım :S
kusra bakma fazla soru sordumda . . .

WingmaN 06 Aralık 2008 16:41

Cevap: /* NoMercy Hataları ve Eksikleri */
 
Üst taraf böyle kalıcak;
Kod:

on 1:SOCKCLOSE:$($shoutcast.socket): {
  if %songtitle != %lastsong {
    set %lastsong %songtitle
    radyodurum %radyodurum
  }
}

alt tarafa ise bu eklenicek;

Kod:

alias radyodurum {
  if $1 = 0 {
    sw NoMercy privmsg $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 5Radyomuz şuan da kapalı durumdadır, bizi tercih ettiğiniz için, teşekkür ederiz.
    sw NoMercy TOPIC $shoutcast.channel :9,1[7 Bilgilendirme - 0Radyo9 ] - 5Radyomuz şuan da kapalı durumdadır, bizi tercih ettiğiniz için, teşekkür ederiz.
    .halt
  }
  if $1 = 1 {
    .timer 1 20 sw NoMercy PRIVMSG $shoutcast.channel : $+ $djnick(%genre)
  var %msg = 0,4 $fants(%genre) su anda online 0,2 Siradaki parca: $turkceh(%songtitle) 0,6 Su anda $+ %currentlisteners kisi dinliyor (rekor: %peaklisteners $+ ) 
    sw nomercy topic $shoutcast.channel : 0,4 ** 0,2 Yayinda su an » 0,4 $fants(%genre) 0,2 « bulunmakta 0,4 ** 0,2 Yayin turu: 0,14 %servertitle 0,2 0,4 ** 0,2 Calan parca: 0,14 $turkceh(%songtitle)  0,2 0,4 ** 
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 0,2 DJ`lerimizden 0,4 $fants(%genre) 0,2 su anda online 
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 0,2 Calan parca : 0,4 $turkceh(%songtitle) 
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 0,2 Dinlenme Oranı : 0,14  %currentlisteners $+   kisi dinliyor 0,4 (rekor: %peaklisteners $+ ) 
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 9,1 Radyomuzu winamp'dan dinlemek icin tiklayin 0,4 >>  12http://212.175.158.58:2222/listen.pls
    sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $shoutcast.channel : 0,4 < ** > 0,0 9,1 Radyomuzu web'den dinlemek icin tiklayin 0,4 >>  12
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sw nomercy privmsg $shoutcast.channel : 2~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
    sw nomercy privmsg $chr(36) $+ *.mIRCDark.Com :0,4 < ** > 0,0 0,2 DJ`lerimizden 0,4 $fants(%genre) 0,2 su anda online 0,4 ** 0,20,2 Calan parca:0,4 $turkceh(%songtitle) 
    sw nomercy privmsg $chr(36) $+ *.mIRCDark.Com :0,4 < ** > 0,0 9,1 Radyomuzu winamp'dan dinlemek icin tiklayin 0,4 >>  12http://212.175.158.58:2222/listen.pls
  }
}


q0kh4n01 02 Ocak 2009 01:41

Cevap: /* NoMercy Hataları ve Eksikleri */
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
bu radyo botu olan kısmını ayrı sockette çalıştırmak istiyorum denedim ama olmadı sen yapabilirmisin böle bişe ?

Seven_46 02 Ocak 2009 12:27

Cevap: /* NoMercy Hataları ve Eksikleri */
 
Yanlış Post Buğra Basarılarının Devamını dilerim..


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 06:43.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk