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

Etiketlenen Kullanıcılar

1Beğeni(ler)
  • 1 Post By ¿

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 09 Haziran 2010, 21:31   #1
Çevrimdışı
¿
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Radyo Botu Sorunu (Socket)




Merhaba arkadaslar socket radyo botu yaptim fakat sarki ismi degisince kanal'a yansitmiyor.
/radyodurum yapinca yansitiyor.
%songtitle degisince otomatik kanal'a yansitmasini istiyorum beceremedim yardim ederseniz cok sevindirik olacam.
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 1:SOCKOPEN:$($scast.socket): { if ($sockerr) { unset %durum } sockwrite -n $sockname GET $+(/admin.cgi?pass=,$radio.pass,&mode=viewxml HTTP/1.1) sockwrite -n $sockname Host: $+($radio.link, :, $radio.port) sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8 sockwrite -n $sockname *.*, */* sockwrite -n $sockname Accept-Language: en-us,en;q=0.5 sockwrite -n $sockname Accept-Language: tr,tr;q=0.5 sockwrite -n $sockname Accept-Encoding: gzip,deflate sockwrite -n $sockname Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7 sockwrite -n $sockname Keep-Alive: 300 sockwrite -n $sockname Connection: keep-alive sockwrite -n $sockname $crlf } on 1:SOCKREAD:$($scast.socket): { var %data sockread -f %data while $sockbr > 0 && $sockerr == 0 { if ($getxmltext(SERVERTITLE, %data) != $null) { set %servertitle $replace($ifmatch,&#x27;,',&#x26;,&,&#xE7;,ç,&#xF0;,ğ,&#xFD;,ı,&#xDD;,İ,&#xF6;,ö,&#xFE;,ş,&#xC7;,Ç,&#xD0;,Ğ,&#xD6;,Ö,&#xDE;,Ş) } if ($getxmltext(SONGTITLE, %data) != $null) { set %songtitle $replace($ifmatch,&#x27;,',&#x26;,&,&#xE7;,ç,&#xF0;,ğ,&#xFD;,ı,&#xDD;,İ,&#xF6;,ö,&#xFE;,ş,&#xC7;,Ç,&#xD0;,Ğ,&#xD6;,Ö,&#xDE;,Ş) } if ($getxmltext(CURRENTLISTENERS, %data) != $null) { set %currentlisteners $ifmatch } if ($getxmltext(STREAMHITS, %data) != $null) { set %streamhits $ifmatch } if ($getxmltext(STREAMSTATUS, %data) != $null) { if ($remove($ifmatch,&#xFF;,&#x26;) iswm 1) { unset %durum } } if ($getxmltext(STREAMSTATUS, %data) != $null) { if ($remove($ifmatch,&#xFF;,&#x26;) iswm 0) { set %durum Kapali } } sockread -f %data } } off 1:SOCKCLOSE:$($scast.socket): { . } alias radyo.durum { .timerreplaydurum 0 30 .radyo.durum if $sock($scast.socket) { sockclose $ifmatch } sockopen $scast.socket $radio.link $radio.port } alias scast.socket { return radyokontrol } alias getxmltext { var %tag.open = $+(<, $1, >) var %tag.close = $+(</, $1, >) if $pos($2-,%tag.open) { var %start = $ifmatch + $len(%tag.open) var %length = $calc($pos($2-, %tag.close) - %start) return $mid($2-, %start, %length) } return $null } alias radyodurum { if (%durum) { sw radyobot notice $radio.chan :0,10 $radio.name $+ 'de su anda yayinda kimse bulunmamaktadir.  sw radyobot privmsg ChanServ :topic $radio.chan 0,10 $radio.name $+ 'de su anda yayinda kimse bulunmamaktadir.  } if (!%durum) { sw radyobot notice $radio.chan : sw radyobot notice $radio.chan :1,10 $radio.name $+ 0,10'de su anda yayinda1,10 %servertitle 0,10bulunmaktadir.  ;sw radyobot notice $radio.chan : sw radyobot notice $radio.chan :0,10 Calan parca:1,10 %songtitle  ;sw radyobot notice $radio.chan : sw radyobot notice $radio.chan :1,10 $radio.name $+ 0,10'i su anda1,10 %currentlisteners 0,10kisi dinliyor. 1,10(Dinlenme rekoru: %streamhits $+ )  ;sw radyobot notice $radio.chan : sw radyobot notice $radio.chan :0,10 Radyo yayinimizi winamp ile dinlemek icin:1,10 http:// $+ $radio.link $+ : $+ $radio.port $+ /listen.pls 0,10adresine tiklayiniz...  sw radyobot notice $radio.chan : sw radyobot privmsg ChanServ :topic $radio.chan 1,10 $radio.name $+ 0,10'de su anda yayinda1,10 %servertitle 0,10bulunmaktadir. Siradaki parca:1,10 %songtitle  } }


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet sohbet
Alt 09 Haziran 2010, 22:54   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo Botu Sorunu (Socket)




Öncelikle şunu belirtmeliyim :

ShoutCast programı ile DJ'lik yayını yapanlar bilir.ShoutCast winamp panelinde, listeden çaldığınız şarkının bilgilerini(Şarkıcı,Şarkı Adı vsvs) göstermek istemiyorsanız orda küçük bir buton vardır(butonun ismi maalesef aklıma gelmiyor), o butondaki işareti kaldırdığınızda en son çaldığınız şarkı bilgisini web sayfasına sabitler.Yani o işareti kaldırdığınızda peşine çalacağınız tüm şarkılarda bilgi yine aynı sabit kalacaktır ve yeni çaldığınız şarkı bilgileri gösterilmeyecektir.

Küçük bir ayrıntıda olsa,işinize yarayabilir.

 
Alıntı ile Cevapla

Alt 09 Haziran 2010, 23:36   #3
Çevrimdışı
¿
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Radyo Botu Sorunu (Socket)




Hay ben bu mIRC'i...
Olmuyor 30 saniyede 1 yaziyor kanal'a...
Neise eggdrop'a devam.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


 
Alıntı ile Cevapla

Cevapla

Etiketler
botu, mirc, mirc download, mirc indir, radyo, socket, sorunu


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
Radyo Botu [mIRC/Socket] CesuryureK Projeler 12 03 Ekim 2022 17:04
Radyo Botu v1 Socket Toprak Projeler 2 06 Temmuz 2021 19:13
cycle socket bot v2 Aeg üstad ın botu log sorunu tanerler IRCd Botlar 1 09 Aralık 2014 04:32
Check socket botu sorunu Xpyhre mIRC Scripting Sorunları 2 12 Ocak 2013 22:31