Winamp'ta N'dinliyorum.. - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

bøCek · 06 Eylül 2008, 09:48

/*
================================================== =================
Winamp'da Ne Dinliyorum?(Güncellendi.)

WinSong.DLL written BY SeRDaR406

mIRCdb.com

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu kodun çalışması için "WinSong.DLL" dosyasına ihtiyacınız olacaktır.

DLL'yi eklentiden indirdikten sonra zipli dosyasının içerisinde "WinSong.DLL" dosyasını

mIRC.exe'nin bulunduğu klasöre çıkartın.

Kullanımı:

/ndinliorum on
(Her şarkı değişmesinde otomatik olarak bulunduğunuz bütün kanallara dinlediğiniz şarkı yansıtılır.)

/ndinliorum off
(Ne dinliyor özelliği kapalı)

Bu kod "Winamp v5.541" üzerinde denenmiş ve çalışmaktadır.
================================================== ==================
*/

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

alias -l getsong return $dll(winsong.dll,GetSongName,) alias -l kontrol->et { if (!%wnd.s) set %wnd.s on if (%song != $getsong) { var %i $comchan($me,0) if (%i > 0) && (%wnd.s == on) && ($getsong != $false) { set %song $getsong while (%i) { msg $comchan($me,%i) Dinlediğim şarkı: %song dec %i } } } } alias ndinliorum { var %s $getsong , %song if ($1 == on) { set %wnd.s on if (!%song) set %song %s .timerwnd 0 0 kontrol->et } elseif ($1 == off) { set %wnd.s off | .timerwnd off } }

Daha önceki SeRDaR406 tarafından yazılan bu kod çalışmamaktaydı.Kendisi

ufak bir güncelleme ile çalışır hale getirmiş.Sizlerle paylaşmak istedim...

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] katkılarıyla..

Gangsta · 06 Eylül 2008, 11:00

Şİmdi Sonuçta bi emek bunada saygı duyuyorum,Lakin kafama takılan bırsey var.

Millete ne bizim dinledigimiz şarkıdan,Yada millet acaba x nickli şahıs ne dinliyor bi kanala mesaj atsadı ogrenseydik diye bi merak içindemi acaba.

K.bakma dusunduklerimi söyledim. ( zaten sen yazmamış sadece paylaşmışsın lafım sana degıl )

bøCek · 06 Eylül 2008, 11:08

Cok Insan bu kodu Istıyordu Sen Güncel takip etmiyorsun sanırsam. hala bazı forumlarda görüyorum ve hala istenilen bir kod. bende serdar'a rıca ettım güncellemesini yapti derledi topladı ve yeniden hayata gecirdi. ve zamaninda cok ama cok ıstelınen bir koddu. umarım anlamıssındır. koLay gelsın.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Gangsta · 06 Eylül 2008, 11:18

goKhaN` Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Cok Insan bu kodu Istıyordu Sen Güncel takip etmiyorsun sanırsam. hala bazı forumlarda görüyorum ve hala istenilen bir kod. bende serdar'a rıca ettım güncellemesini yapti derledi topladı ve yeniden hayata gecirdi. ve zamaninda cok ama cok ıstelınen bir koddu. umarım anlamıssındır. koLay gelsın.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Anladım dostum. istek varsa kod var diyorsun. Saol bılgılendırme ıcın ;oki

ShaoLin · 07 Eylül 2008, 19:45

sadece belirledigim kanallara mesaj göndermesi için ne yapmam gerekiyor?

Editor · 07 Eylül 2008, 20:56

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

alias -l getsong return $dll(winsong.dll,GetSongName,)
alias -l kontrol->et {
  if (!%wnd.s) set %wnd.s on
  if (%song != $getsong) { 
    var %i $comchan($me,0)
    if (%i > 0) && (%wnd.s == on) && ($getsong != $false) {
      set %song $getsong 
      while (%i) {
        msg #kanal $comchan($me,%i) Dinlediğim şarkı: %song
        dec %i
      }
    } 
  }
}
alias ndinliorum {
  var %s $getsong , %song
  if ($1 == on) {  
    set %wnd.s on 
    if (!%song) set %song %s
    .timerwnd 0 0 kontrol->et
  }
  elseif ($1 == off) { set %wnd.s off | .timerwnd off }
}

#kanal yazan yere kanalını yaz Dene BakaLım Kolay Gelsin.

Duffy`DuCk · 08 Eylül 2008, 00:40

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

alias -l getsong return $dll(Awatar\winsong.dll,GetSongName,)
alias -l kontrol->et {
  if (%song != $getsong) { 
    var %i $comchan($me,0)
    if (%wnd == on) && ($getsong != $false) {
      set %song $getsong 
      msg #Kanal Dinlediğim şarkı: %song
    } 
  }
}
alias ndinlior {
  var %s $getsong , %song
  if ($1 == on) {  
    set %wnd on 
    if (!%song) set %song %s
    .timerwnd 0 0 kontrol->et
  }
  elseif ($1 == off) { set %wnd off | .timerwnd off }
}

ShaoLin · 08 Eylül 2008, 16:22

kodları denedim ama çalışmadı

Duffy`DuCk · 08 Eylül 2008, 17:53

ShaoLin Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

kodları denedim ama çalışmadı

Foruma atarken kodu dll yolunu silmeyi unutmu$um (:

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

alias -l getsong return $dll(winsong.dll,GetSongName,)
alias -l kontrol->et {
  if (%song != $getsong) { 
    if (%wnd == on) && ($getsong != $false) {
      set %song $getsong 
      msg #Kanal Dinlediğim şarkı: %song
    } 
  }
}
alias ndinlior {
  var %s $getsong , %song
  if ($1 == on) {  
    set %wnd on 
    if (!%song) set %song %s
    .timerwnd 0 0 kontrol->et
  }
  elseif ($1 == off) { set %wnd off | .timerwnd off }
}

winsong.dll'i mIRC'in ana klasör'üne at öle dene.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

XPhytoN · 14 Eylül 2008, 14:32

Hadi gelin, bu kodu biraz daha geliştirelim ;oki

orjinal olan kodumuz;

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

alias -l getsong return $dll(winsong.dll,GetSongName,)
alias -l kontrol->et {
  if (%song != $getsong) { 
    if (%wnd == on) && ($getsong != $false) {
      set %song $getsong 
      msg #Kanal Dinlediğim şarkı: %song
    } 
  }
}
alias ndinlior {
  var %s $getsong , %song
  if ($1 == on) {  
    set %wnd on 
    if (!%song) set %song %s
    .timerwnd 0 0 kontrol->et
  }
  elseif ($1 == off) { set %wnd off | .timerwnd off }
}

Winamp'te MSN'de ne dinliyorum yerinde çıkmasını istediğimiz parçaları mIRC yoluyla, MSN'imize aktarımını yapalım ;oki

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

alias msnsong {
  var %dll MsnSong.dll
  .comreg %dll
  .comopen msn Msn.Write
  var %i $com(msn,WriteToMsn,1,bstr,$1-,bstr,$null,bstr,$null)
  .comreg -u %dll
  .comclose msn
}

Bu kodu orjinal kodumuzun, altına ekleyelim ve Orjinal kodumuz da ki şu satırları

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

      msg #Kanal Dinlediğim şarkı: %song

altta ki kod ile değiştirelim;

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

     msg #Kanal Dinlediğim şarkı: %song
     msnsong %song

ekte vermiş olacağım, MsnSong.dll adlı "DLL" uzantılı dosyamızı da, mIRC'imizin bulunduğu ana klasöre atalım "//run $mircdir ".

Şimdi, arkadaşımızın söylemiş olduğu " Aa bu adam ne dinliyor girelim kanala bakalım isimli " ;noki cevabına, MSN'e koymakla bi tez yazmış olduk sanıyorum.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Türk coder'larda çareler, fikirler tükenmez ;oki

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Winamp Ne Dinliyorum Özelliği	neobre	mIRC Scripting Sorunları	11	30 Ekim 2019 22:47
Ankara'yı Dinliyorum.	Satuk	Şiir, Hikaye ve Güzel Sözler	1	15 Mayıs 2010 13:02
Ne dinliyorum	tam1deLi	mIRC Scripting Sorunları	1	21 Ekim 2009 01:50

Konuyu Toplam 3 Üye okuyor. (0 Kayıtlı üye ve 3 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.