ShoutCast (Radyo) BilgiLeri Gösterici - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

SCouNDReL · 07 Temmuz 2006, 03:27

bağlandığın sunucuyu versene bir de ben denim ?

SCouNDReL · 08 Temmuz 2006, 16:52

Addon Güncellenmiştir ;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

;Radyo Bilgileri G&#246;sterici By SCouNDReL
;Kullanim /radyo Server(ip) Port

alias radyo { 
  sockclose radyo*S
  sockclose radyo*J    
  if (: !isin $1) && (!$2) { echo -a Port Yazın (&#214;rn : radyo.deneme.com:2525) | return }
  if ($1 == $null) { echo -a Radyo Adı Yazın (&#214;rn : radyo.deneme.com:2525) | return }  
  if (: isin $1) { 
    echo -a L&#252;tfen Bekleyin..    
    tokenize 58 $remove($1,http://,/) 
    sockopen $+(radyo,$r(1,9999),S) $1 $2 
    set %site $1 $2 
  } 
  else { sockopen $+(radyo,$r(1,999),!) $remove($1-,http://,/) | set %site $remove($1-,http://,/) | echo -a L&#252;tfen Bekleyin.. } 
} 
on *:SockOpen:radyo*S:{ 
  if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }   
  sockwrite -tn $sockname GET / HTTP/1.1 
  sockwrite -tn $sockname $crlf 
} 
on *:Sockread:radyo*S:{    
  sockread %radyo 
  if (icy-name isin %radyo) { set %radyo2 %radyo2 &#191; $remove($gettok(%radyo,2,58),|) } 
  if (icy-genre isin %radyo) { set %radyo2 %radyo2 &#191; $remove($gettok(%radyo,2,58),|) }  
  if (icy-url isin %radyo) {  set %radyo2 %radyo2 &#191; $remove(%radyo,icy-url:) | sockclose radyo | radyo2 } 
} 
on *:Sockclose:radyo*S:radyo2 
alias radyo2 { sockopen $+(radyo,$r(1,9999),J) %site | unset %site } 
on *:SockOpen:radyo*J:{ 
  if ($sockerr) { echo -a Siteye BağLanmada Hata! }    
  sockwrite -tn $sockname GET /7.html HTTP/1.0 
  sockwrite -tn $sockname User-Agent: Mozilla 
  sockwrite -tn $sockname 
} 
on *:Sockread:radyo*J:{ 
  if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }   
  var %z 
  sockread %z
} 
on *:SockClose:radyo*J:{  
  sockread -f %radyo  
  var %z $remove(%radyo,<HTML><meta http-equiv="Pragma" content="no-cache"></head><body>,</body></html>) 
  var %i $numtok(%z,44) 
  while %i { 
    set %radyo2 %radyo2 &#191; $remove($gettok(%z,%i,44),|) 
    dec %i 
  } 
  gostert 
  unset %radyo2 
  unset %radyo 
} 
alias -l gostert { 
  sockclose radyo*S
  sockclose radyo*J 
  tokenize 191 %radyo2 
  ; $1 = Dj in Yazdığı İsim 
  ; $2 = Genre 
  ; $3 = URL 
  ; $4 = &#199;aLan Par&#231;a 
  ; $5 = Şarkı Kalitesi 
  ; $6 = Dinleyici Sayısı 
  ; $7 = Max. Dinleyici Sayısı 
  ; $8 & $9 = DinLeyici Rekoru 
  echo -a İsim : $1 
  echo -a Genre : $2 
  echo -a URL : $3 
  echo -a &#199;aLan Par&#231;a : $4 
  echo -a Şarkı KaLiteSi : $5 
  echo -a DinLeyici Sayısı : $6 
  echo -a Max. Dinleyici Sayısı : $7 
  echo -a DinLeyici Rekoru : $8 & $9 
}

Hasnicktir · 07 Ağustos 2007, 19:06

Kanala nasıl yansıtırız ?

SaintCty · 07 Ağustos 2007, 19:27

radyo kanalına diyorsan şöle yapılırsa radyo kanalına mesaj atar

kod:
;Radyo Bilgileri Gösterici By SCouNDReL
;Kullanim /radyo Server(ip) Port
alias radyo {
sockclose radyo*S
sockclose radyo*J
if (: !isin $1) && (!$2) { echo -a Port Yazın (Örn : radyo.deneme.com:2525) | return }
if ($1 == $null) { echo -a Radyo Adı Yazın (Örn : radyo.deneme.com:2525) | return }
if (: isin $1) {
echo -a Lütfen Bekleyin..
tokenize 58 $remove($1,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
sockopen $+(radyo,$r(1,9999),S) $1 $2
set %site $1 $2
}
else { sockopen $+(radyo,$r(1,999),!) $remove($1-,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) | set %site $remove($1-,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) | echo -a Lütfen Bekleyin.. }
}
on *:SockOpen:radyo*S:{
if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }
sockwrite -tn $sockname GET / HTTP/1.1
sockwrite -tn $sockname $crlf
}
on *:Sockread:radyo*S:{
sockread %radyo
if (icy-name isin %radyo) { set %radyo2 %radyo2 ¿ $remove($gettok(%radyo,2,58),|) }
if (icy-genre isin %radyo) { set %radyo2 %radyo2 ¿ $remove($gettok(%radyo,2,58),|) }
if (icy-url isin %radyo) { set %radyo2 %radyo2 ¿ $remove(%radyo,icy-url
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
| sockclose radyo | radyo2 }
}
on *:Sockclose:radyo*S:radyo2
alias radyo2 { sockopen $+(radyo,$r(1,9999),J) %site | unset %site }
on *:SockOpen:radyo*J:{
if ($sockerr) { echo -a Siteye BağLanmada Hata! }
sockwrite -tn $sockname GET /7.html HTTP/1.0
sockwrite -tn $sockname User-Agent: Mozilla
sockwrite -tn $sockname
}
on *:Sockread:radyo*J:{
if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }
var %z
sockread %z
}
on *:SockClose:radyo*J:{
sockread -f %radyo
var %z $remove(%radyo,<HTML><meta http-equiv="Pragma" content="no-cache"></head><body>,</body></html>)
var %i $numtok(%z,44)
while %i {
set %radyo2 %radyo2 ¿ $remove($gettok(%z,%i,44),|)
dec %i
}
gostert
unset %radyo2
unset %radyo
}
alias -l gostert {
sockclose radyo*S
sockclose radyo*J
tokenize 191 %radyo2
; $1 = Dj in Yazdığı İsim
; $2 = Genre
; $3 = URL
; $4 = ÇaLan Parça
; $5 = Şarkı Kalitesi
; $6 = Dinleyici Sayısı
; $7 = Max. Dinleyici Sayısı
; $8 & $9 = DinLeyici Rekoru
echo -a İsim : $1
echo -a Genre : $2
echo -a URL : $3
echo -a ÇaLan Parça : $4
echo -a Şarkı KaLiteSi : $5
echo -a DinLeyici Sayısı : $6
echo -a Max. Dinleyici Sayısı : $7
echo -a DinLeyici Rekoru : $8 & $9
msg #radyo İsim : $1
msg #radyoGenre : $2
msg #radyo URL : $3
msg #radyo ÇaLan Parça : $4
msg #radyo Şarkı KaLiteSi : $5
msg #radyo DinLeyici Sayısı : $6
msg #radyo Max. Dinleyici Sayısı : $7
msg #radyo DinLeyici Rekoru : $8 & $9
}

08 Ağustos 2007, 02:14

iyi bende istek olayını vereyim bi arkadaş başka bi forumda istemişti onun için yazmıştım sizde yararlanın;

on *:text:*:#KANAL:{
if !istek* iswm $1- {
if $($+(%,.,istek,.,$nick),2) >= 1 {
.msg $chan 3 Dakika İçinde Sadece 1 İstek Yapabilirsiniz
}
else {
.inc $+(%,.,istek,.,$nick)
msg #dj ISTEK ! Isteyen Nick: $nick , Isteği: $2-
.msg $chan Isteğiniz DJ'imize Ulaşmıştır: $2-
.timer 1 $calc(3*60) .unset $+(%,.,istek,.,$nick)
}
}
if !durum isin $1- {
radyo RADOYO-IP PORT
}
if !link isin $1- {
msg $chan Radiomuzu Dinlemek İçin Tıklayın: RADIO-URL
}
}

kalın olan yerlere dikkat edelim lütfen..

============

<Deneme> !istek Orontez - Tek Yumuruk GFB
<CipriX> Isteğiniz DJ'imize Ulaşmıştır: Orontez - Tek Yumuruk GFB

============

DJ KANALINA GİDEN;

<CipriX> ISTEK ! Isteyen Nick: Deneme , Isteği: Orontez - Tek Yumuruk GFB

============

Istek Floodda;

<Deneme> !istek Orontez - Tek Yumuruk GFB
<CipriX> 3 Dakika İçinde Sadece 1 İstek Yapabilirsiniz

============

Hasnicktir · 08 Ağustos 2007, 18:36

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...], kod çok iyi çalışıyor.

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 
on *:text:*:#Radyo:{
  if !link* iswm $1- {
    if $($+(%,.,link,.,$nick),2) >= 1 {
      .msg $chan 5  2 dakika içinde sadece 1 link isteği yapabilirsiniz.
    }
    else {
      .inc $+(%,.,link,.,$nick)
      cs topic $chan 0,4 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 0,1Radyomuzu dinlemek için tıklayınız. 4,1 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
      .timer 1 $calc(2*60) .unset $+(%,.,link,.,$nick)
    }
  }

Bu şekilde yaptım. "!link" yapıldığında topic atıyor. "2 dakika içinde sadece 1 link isteği yapabilirsiniz." mesajı yolluyor. Bunu "!durum" için yaptığımda olmuyor ? "!durum" yaptıklarında ;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

 
; $1 = Dj in Yazdığı İsim 
  ; $2 = Genre 
  ; $3 = URL 
  ; $4 = Çalan Parça 
  ; $5 = Şarkı Kalitesi 
  ; $6 = Dinleyici Sayısı 
  ; $7 = Max. Dinleyici Sayısı 
  ; $8 & $9 = DinLeyici Rekoru 
  .msg #Radyo 4 İsim : $1 
  .msg #Radyo 4Genre : $2 
  .msg #Radyo 4URL : $3 
  .msg #Radyo 12Çalan Parça : $4 
  .msg #Radyo 12Şarkı KaliteSi : $5 
  .msg #Radyo 12Dinleyici Sayısı : $6 
  .msg #Radyo 4Max. Dinleyici Sayısı : $7

Bu kısmı #Radyo kanalına göstersin istiyorum. Ama 2 dakika içinde bir defa "!durum" komutunu uygulasın, "!link" "!istek" komutlarında ki gibi msg atsın ¿

09 Ağustos 2007, 11:04

if !durum isin $1- {
if %durum !== 1 {
.radyo
.set -u120 %durum 1
}
else {
msg $chan 2 Dk içinde yanlızca 1 kere durum'a bakabilirsiniz
}
}

denemedim ama çalışmalı

SaintCty · 11 Ağustos 2007, 18:48

yavu arkadaşlar calan parcayı niye güncellemiyor yani 2 gün önceki parcayı hala veriyor nedendir acabe ilgi ve alaknıza tşkler

SCouNDReL · 11 Ağustos 2007, 19:46

addon sadece sunucuda olan bilgileri çekiyor ek olarak birşey yapmıyor. Problem sunucundan olmalı..

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Radyo bot TCL (Shoutcast v2)	ByOzCaN	TCL Scriptler	4	10 Ağustos 2020 13:24
Shoutcast radyo recoder/player	IrCbaStarD	mIRC Scripting Hazır Kodlar	10	18 Ağustos 2017 02:23
ShoutCast Radyo yayını hakkında	h4run	Servisler	4	08 Haziran 2008 23:48
Radyo Bilgi Gösterici..	JaMMaH	mIRC Scripting Hazır Kodlar	11	07 Aralık 2007 00:23
ShoutCast Radyo Yardım(bot)	By_ReBeL	mIRC Scripting Sorunları	0	24 Eylül 2007 20:51

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

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.