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 Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Radyo Addonu LAzım ? (https://www.ircforumlari.net/mirc-scripting-sorunlari/56495-radyo-addonu-lazim.html)

bøCek

03 Mayıs 2008 12:49

Radyo Addonu LAzım ?

Arkadaşlar ben şöyle birşey düşündüm. genelde herkez baglantı menusu - koruma - dialog - tolbar - awayset vs. vs. Seyler Cıkartıor. Baktımda hIC Radyo Addonu Yok Olsa biLe Link'leri uCmus. SoyLe jAnjanLı bir Radyo Addonu Yapsa UstadLarimiz Iyı oLmazmi ? Yani Herkez Su zamanda mIRC'e Radyo Addonu Araniyor. Hem bizlerde yararlanalim ? benim dusuncem bu Ama elınde olan varsa paylasırsada sevınırım koLay gelsin.

ByDeniS

03 Mayıs 2008 13:13

Cevap: Radyo Addonu LAzım ?

Kod:

alias radyo { 

sockclose radyo  

if ($1 == $null) { echo -a Radyo Adı Yazın (Örn : radyo.deneme.com:2525) | halt }  

if (: isin $1) { 

  echo -a Lütfen Bekleyin..    

  tokenize 58 $1  

  sockopen radyo $1 $2 

  set %site $1 $2 

} 

else { sockopen radyo $1- | set %site $1- | echo -a Lütfen Bekleyin.. } 

} 

on *:SockOpen:radyo:{ 

if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }   

sockwrite -tn $sockname GET / HTTP/1.1 

sockwrite -tn $sockname $crlf 

} 

on *:Sockread:radyo:{    

sockread %radyo 

if (icy-name isin %radyo) { set %radyo2 %radyo2 ¿ $gettok(%radyo,2,58) } 

if (icy-genre isin %radyo) { set %radyo2 %radyo2 ¿ $gettok(%radyo,2,58) }  

if (icy-url isin %radyo) {  set %radyo2 %radyo2 ¿ $remove(%radyo,icy-url:) | sockclose radyo | radyo2 } 

} 

on *:Sockclose:radyo:radyo2 

alias radyo2 { sockopen radyo2 %site | unset %site } 

on *:SockOpen:radyo2:{ 

if ($sockerr > 0) return    

sockwrite -tn $sockname GET /7.html HTTP/1.0 

sockwrite -tn $sockname User-Agent: Mozilla 

sockwrite -tn $sockname 

} 

on *:Sockread:radyo2:{ 

if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }   

var %z 

sockread %z 

} 

on *:SockClose:radyo2:{  

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 ¿ $gettok(%z,%i,44) 

  dec %i 

} 

gostert 

unset %radyo2 

unset %radyo 

} 

alias -l gostert { 

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 

; $10 = Ne oLduunu biLmiOm :) 

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 

}

Bak böyle birşey var kullanımı

/radyo ipadresi:port
örnek :
/radyo 84.64.43.132:4532

Kod yazarı scoundreal

bøCek

03 Mayıs 2008 13:21

Cevap: Radyo Addonu LAzım ?

Abi misal dll'lerle Yapilanlar Varya Onlardan Olsa ODa GuzeL oLur ßuda /radyo yazıon ip'ıni fLan Sadece dınleyıcıyı gosterıor :D CAlmior birsey ama dll'lerle YazıLan SoyLe Anlamlı bi GuzeL gosterişli Radyo Kodu olsa Off Off diom :D Ama Calişan birsey :D

ByDeniS

03 Mayıs 2008 13:25

Cevap: Radyo Addonu LAzım ?

Alıntı:

Abi misal dll'lerle Yapilanlar Varya Onlardan Olsa ODa GuzeL oLur buda guzeL dll'lerle YazıLan SoyLe Anlamlı bi GuzeL gosterişli Radyo Kodu olsa

Demissin madem öyle kodları vermeye gerek yok vakit bulur bulmaz yazıp paylaşırım. ;)

bøCek

03 Mayıs 2008 13:29

Cevap: Radyo Addonu LAzım ?

Ya Valla hem ben Hemde Script Yapanlar Icın GuzeL olur SoyLe gosterıslı birsey Millet bulamiyor OyLe Olsa guzeL oLur SaoLasin :)

BLaCK_and_WHiTe

03 Mayıs 2008 15:15

Cevap: Radyo Addonu LAzım ?

/*
======================================
mIRC Radio vBeta BY SeRDaR406

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Bu addon mIRC üzerinden radyo dinleminizi sağlar.

Hazır radyo listesinde "70" adet radyo bulunmaktadır.

Hazır listeden radyo araması yapabilirsiniz.

Bu listedeki radyo sayısı arttırılacaktır...

Radyo arama 2 çeşittir.1.ci olanı yukarda bahsettiğim hazır

listede arama,2. olanı ise shoutcast radyoları aratabilirsiniz...

Özel Teşekkür: SCounDReL
=========================================

==================
Yenilikler nelerdir?
==================
- Hazır radyo listesine; radyo ekleme,silme ve düzeltme özelliği eklendi.

- Dinlenen radyonun Msn'de,ne dinliyorum bölümünde görüntülenmesi özelliği eklendi.

- Radyoyu transparan olarak gösterme olayı eklendi.

-Hazır radyo listene kolay yoldan bir komutla radyo ekleme olayı eklendi.

- Radyodaki button'larda biraz değişiklik yapıldı.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

bøCek

03 Mayıs 2008 18:15

Cevap: Radyo Addonu LAzım ?

Ahmet saolsin. Ama Kendı Yerımızın Radyosunu koymamiz daha ıyı olur bunu denedim ama cok karısık beceremedim :) denis yapcak birtane bakalım beklioz :D

MoRtaL_

26 Haziran 2008 11:04

Cevap: Radyo Addonu LAzım ?

Alıntı:

ByDeniS Nickli Üyeden Alıntı (Mesaj 392452)

Kod:

alias radyo { 

sockclose radyo  

if ($1 == $null) { echo -a Radyo Adı Yazın (Örn : radyo.deneme.com:2525) | halt }  

if (: isin $1) { 

 echo -a Lütfen Bekleyin..    

 tokenize 58 $1  

 sockopen radyo $1 $2 

 set %site $1 $2 

} 

else { sockopen radyo $1- | set %site $1- | echo -a Lütfen Bekleyin.. } 

} 

on *:SockOpen:radyo:{ 

if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }   

sockwrite -tn $sockname GET / HTTP/1.1 

sockwrite -tn $sockname $crlf 

} 

on *:Sockread:radyo:{    

sockread %radyo 

if (icy-name isin %radyo) { set %radyo2 %radyo2 ¿ $gettok(%radyo,2,58) } 

if (icy-genre isin %radyo) { set %radyo2 %radyo2 ¿ $gettok(%radyo,2,58) }  

if (icy-url isin %radyo) {  set %radyo2 %radyo2 ¿ $remove(%radyo,icy-url:) | sockclose radyo | radyo2 } 

} 

on *:Sockclose:radyo:radyo2 

alias radyo2 { sockopen radyo2 %site | unset %site } 

on *:SockOpen:radyo2:{ 

if ($sockerr > 0) return    

sockwrite -tn $sockname GET /7.html HTTP/1.0 

sockwrite -tn $sockname User-Agent: Mozilla 

sockwrite -tn $sockname 

} 

on *:Sockread:radyo2:{ 

if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }   

var %z 

sockread %z 

} 

on *:SockClose:radyo2:{  

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 ¿ $gettok(%z,%i,44) 

 dec %i 

} 

gostert 

unset %radyo2 

unset %radyo 

} 

alias -l gostert { 

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 

; $10 = Ne oLduunu biLmiOm :) 

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 

}

Bak böyle birşey var kullanımı

/radyo ipadresi:port
örnek :
/radyo 84.64.43.132:4532

Kod yazarı scoundreal

Kod:

Lütfen Bekleyin..

İsim : Cÿneyt Tek - Yalan Mÿydÿ

Genre : 24

URL : 1

ÇaLan Parça : 64

Şarkı KaLiteSi : 6

DinLeyici Sayısı : 0

Max. Dinleyici Sayısı : 1

DinLeyici Rekoru : &

Radyo Yazdıqımda ßoyle Cıkıyo ßunları Otomatik Olarak Radyo Kanalına Kendi Kendine yazamazmi ? 1-2 Dakikada ßir Falan

sevenler12

26 Haziran 2008 14:06

Cevap: Radyo Addonu LAzım ?

Buyur sana istediğin gibi radyo addonu
radiosys.mrc i not defteriyle felan aç orada kendi radyo adresini yazman için yer var değiştir kaydet daha sonra mirc e load yap..
Not: dlls dosyası scriptin ana klasöründe olmalı...

Link :
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

djiNn

27 Haziran 2008 06:50

Cevap: Radyo Addonu LAzım ?

Alıntı:

goKhaN` Nickli Üyeden Alıntı (Mesaj 392714)

Ahmet saolsin. Ama Kendı Yerımızın Radyosunu koymamiz daha ıyı olur bunu denedim ama cok karısık beceremedim :) denis yapcak birtane bakalım beklioz :D

Sc Shoot larda gördüğüm kadarıyla yeni ekle butonu var sanırım ordanda radyo ekleniyor yanlışmıyım. bence serdar görüntüsünü harika yapmış . e bu araba motoru da deil sadece görüntüye bakmamak lazımda denilmez. serdar ın yaptığını kullan derim. iyi çalışmalar.

SCouNDReL

27 Haziran 2008 18:46

Cevap: Radyo Addonu LAzım ?

Alıntı:

MoRtaL_ Nickli Üyeden Alıntı (Mesaj 494479)

Kod:

Lütfen Bekleyin..

İsim : Cÿneyt Tek - Yalan Mÿydÿ

Genre : 24

URL : 1

ÇaLan Parça : 64

Şarkı KaLiteSi : 6

DinLeyici Sayısı : 0

Max. Dinleyici Sayısı : 1

DinLeyici Rekoru : &

Radyo Yazdıqımda ßoyle Cıkıyo ßunları Otomatik Olarak Radyo Kanalına Kendi Kendine yazamazmi ? 1-2 Dakikada ßir Falan

echo komutlarını msg yapıcaksın. sonra bir de /timer 0 120 /radyo dersen 2 dk'da bir yollar.

Cybersoft

11 Temmuz 2008 15:05

Cevap: Radyo Addonu LAzım ?

Alıntı:

sevenler12 Nickli Üyeden Alıntı (Mesaj 494566)

Link calismiyor yenileyebilirmisin?

JackaL

11 Temmuz 2008 15:27

Cevap: Radyo Addonu LAzım ?

Kod:

 

alias radyo { 

  sockclose radyo  

  if ($1 == $null) { echo -a Radyo Adı Yazın (Örn : radyo.deneme.com:2525) | halt }  

  if (: isin $1) { 

    echo -a Lütfen Bekleyin..    

    tokenize 58 $1  

    sockopen radyo $1 $2 

    set %site $1 $2 

  } 

  else { sockopen radyo $1- | set %site $1- | echo -a Lütfen Bekleyin.. } 

} 

on *:SockOpen:radyo:{ 

  if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }   

  sockwrite -tn $sockname GET / HTTP/1.1 

  sockwrite -tn $sockname $crlf 

} 

on *:Sockread:radyo:{    

  sockread %radyo 

  if (icy-name isin %radyo) { set %radyo2 %radyo2 ¿ $gettok(%radyo,2,58) } 

  if (icy-genre isin %radyo) { set %radyo2 %radyo2 ¿ $gettok(%radyo,2,58) }  

  if (icy-url isin %radyo) {  set %radyo2 %radyo2 ¿ $remove(%radyo,icy-url:) | sockclose radyo | radyo2 } 

} 

on *:Sockclose:radyo:radyo2 

alias radyo2 { sockopen radyo2 %site | unset %site } 

on *:SockOpen:radyo2:{ 

  if ($sockerr > 0) return    

  sockwrite -tn $sockname GET /7.html HTTP/1.0 

  sockwrite -tn $sockname User-Agent: Mozilla 

  sockwrite -tn $sockname 

} 

on *:Sockread:radyo2:{ 

  if ($sockerr) { echo -a Siteye BağLanmada Hata! | return }   

  var %z 

  sockread %z 

} 

on *:SockClose:radyo2:{  

  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 ¿ $gettok(%z,%i,44) 

    dec %i 

  } 

  gostert 

  unset %radyo2 

  unset %radyo 

} 

alias -l gostert { 

  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 

  ; $10 = Ne oLduunu biLmiOm :) 

  .msg radyo 2İsim :4 $1 

  .msg radyo 2Genre :4 $2 

  .msg radyo 2URL :4 $3 

  .msg radyo 2ÇaLan Parça :4 $4 

  .msg radyo 2Şarkı KaLiteSi :4 $5 

  .msg radyo 2DinLeyici Sayısı :4 $6 

  .msg radyo 2Max. Dinleyici Sayısı :4 $7 

  .msg radyo 2DinLeyici Rekoru :4 $8 & $9 
 

  .msg #radyo 2Alemin En KraL 4Radyo2'Su DuygusehriFm'e Hoş Geldiniz. Yayınımızı Winamp Uzerinden Dinlemek Icin 7http://85.105.10.100:8032/listen.pls 2Tıklamanız Yeterli Olacaktır. Yayında Çalan Parça4 $1 2Dinleyici Sayısı4 $6 2DuygusehriFm 

}

NOT: ALINTIDIR.

Cybersoft

24 Ağustos 2008 22:08

Cevap: Radyo Addonu LAzım ?

Lütfen Bekleyin..
-
* /sockread: soket kullanılamaz (line 37, whoisa~1.ini)

arkadaslar bende neden böyle diyor?

winstroy

18 Eylül 2008 15:11

Cevap: Radyo Addonu LAzım ?

link calısıyor teşekkürler

woody

18 Eylül 2008 16:36

Cevap: Radyo Addonu LAzım ?

alias cal {
if ($1 != Dur) {
set %caldir $+(sjn.,$ticks)
.comopen %caldir wmplayer.ocx
var %z $com(%caldir,Url,4,bstr,$1-)
%z = $com(%caldir,Controls,3,dispatch* $+(%caldir,wmp))
%z = $com($+(%caldir,wmp),Play,3)
}
if ($1 == Dur) && ($com(%caldir)) {
%z = $com($+(%caldir,wmp),Stop,3)
unset %z
}
}
dialog nmkradio {
title "Radio"
size -1 -1 132 57
option dbu
edit "", 1, 32 12 98 10, autohs
text "Adres :", 2, 3 13 25 8
button "Çal", 3, 4 28 37 12
button "Dur", 4, 46 28 37 12
button "Gizle", 5, 89 28 37 12
text "Örnek : [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]", 6, 28 2 101 8
button "Ses ver (+)", 7, 5 43 52 12
button "Ses kıs (-)", 8, 70 43 52 12
}
on 1:dialog:nmkradio:*:*:{
if ($devent == init) {
did -a nmkradio 1 %radioadres
}
if ($devent == sclick) {
if ($did == 3) { .cal $did(1) | .set %radioadres $did(1) }
if ($did == 4) { .cal dur }
if ($did == 5) { .dialog -x nmkradio nmkradio }
if ( $did == 7 ) { set %vol $vol(master) | set %vol %vol + 2500 | vol -v %vol }
if ( $did == 8 ) { set %vol $vol(master) | set %vol %vol - 2500 | vol -v %vol }
}
}
menu * {
-
Radio aç:.dialog -m nmkradio nmkradio
-
}

LordAres

18 Eylül 2010 01:11

Cevap: Radyo Addonu LAzım ?

Alıntı:

sevenler12 Nickli Üyeden Alıntı (Mesaj 494566)

link kırılmış elinde olan arkadaşlar yenileyebilirmi

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