Radyo Yayını Kick Ister bota entegre edin ister addon olarak kullanın. - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

SonRuyam · 21 Aralık 2010, 12:35

radyo kıck tCL

##Buraya Radyonun İp Adresini Yazın..
set ip "ip adreS"
##Buraya Radyonun Portunu Yazın..
set port "port"
##Buraya Radyonun Şifresini Yazın..
set pass "radyosıfre"
##Buraya Radyonun Admin Şifresini Yazın..
set adminpass "admınpas"
## Buraya Komutun Geçerli Olacağı Kanalı Yazın..
set kickkanal "#Dj"
## Başkada Birşeye Dokunmuyoruz. Gerisini Ben Hallederim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

bind pub - !kickradyo kickradyo
proc kickradyo {nick host handle chan arg} {
global ip port pass adminpass kickkanal
if {$chan != $kickkanal} {return 0}
set sock [socket [duzelt $ip] [duzelt $port]]
puts $sock "GET /admin.cgi?pass=[duzelt $pass]&mode=kicksrc&pass=[duzelt $adminpass] HTTP/1.0"
puts $sock "User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:0.9.9)"
puts $sock "Host: $ip"
puts $sock "Connection: close"
puts $sock ""
flush $sock
close $sock
putserv "PRIVMSG #Dj :12Radyo Yayını Düşürülmüştür.. Lütfen Yayını Alınız.."
}

proc duzelt { a } {
regsub -all {\}} $a "" a
regsub -all {\{} $a "" a
regsub -all {\;} $a "" a
regsub -all {\*} $a "" a
regsub -all " " $a "" a
return $a
}

######kickradyo.tcl#########
## Coded By LyK`a #
############################

ecoll · 21 Ocak 2011, 14:13

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

radyo kıck tCL

##Buraya Radyonun İp Adresini Yazın..
set ip "ip adreS"
##Buraya Radyonun Portunu Yazın..
set port "port"
##Buraya Radyonun Şifresini Yazın..
set pass "radyosıfre"
##Buraya Radyonun Admin Şifresini Yazın..
set adminpass "admınpas"
## Buraya Komutun Geçerli Olacağı Kanalı Yazın..
set kickkanal "#Dj"
## Başkada Birşeye Dokunmuyoruz. Gerisini Ben Hallederim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

bind pub - !kickradyo kickradyo
proc kickradyo {nick host handle chan arg} {
global ip port pass adminpass kickkanal
if {$chan != $kickkanal} {return 0}
set sock [socket [duzelt $ip] [duzelt $port]]
puts $sock "GET /admin.cgi?pass=[duzelt $pass]&mode=kicksrc&pass=[duzelt $adminpass] HTTP/1.0"
puts $sock "User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:0.9.9)"
puts $sock "Host: $ip"
puts $sock "Connection: close"
puts $sock ""
flush $sock
close $sock
putserv "PRIVMSG #Dj :12Radyo Yayını Düşürülmüştür.. Lütfen Yayını Alınız.."
}

proc duzelt { a } {
regsub -all {\}} $a "" a
regsub -all {\{} $a "" a
regsub -all {\;} $a "" a
regsub -all {\*} $a "" a
regsub -all " " $a "" a
return $a
}

######kickradyo.tcl#########
## Coded By LyK`a #
############################

Bu Kod Çalıştı Ama Dj Kanalındaki Herkes Kullanabiliyor Bunu Belirli Nickler iÇin Ayarlayamazmıyız?

helloweenfs · 16 Şubat 2021, 19:13

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

Merhaba arkadaşlar,
Soyle.net kullanıcıları varsa bilir boş kaldıkça birşeyler yazıyorum.
Forumlarda daha önce mirc botuna yayin kick falan yaptıran olmamış baktım bende paylaşmak istedim isterseniz bot a eklersiniz. #dj kanalında !kickyayins yazarsiniz yayin düser. Isterseniz de kendi mircinize eklersiniz. /sessiz yazdığınız da yayın yiner düşer.

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

alias .host {
  return IPADRESINIZ
}
alias .port {
  return PORTUNUZ
}
alias .adminpass {
  return RADYO ADMİN ŞİFRENİZ ( YAYIN DEĞIL ) 
}
alias .sock {
  return shoutcast
}
on 1:SOCKOPEN:$($.sock): {
  sockwrite -n $sockname GET $+(/admin.cgi?pass=,$.adminpass,&mode=kicksrc HTTP/1.1)
  sockwrite -n $sockname Host: $+($.host, :, $.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 Keep-Alive: 300
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname $crlf
}
alias sessiz {
  if $sock(shoutcast) {
    sockclose $ifmatch
  }
  sockopen $.sock $.host $.port
}
on 1:text:*:#dj:{
  if *!kickyayin* iswm $1- {
    sessiz
    msg #dj Oldu Oldu :) Yayındasın $nick
  }
}

Kırmızı ile belirttiğim yerleri değiştirmeniz yeterli olacaktır.
Iyi forumlar
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Eggdrop Bot için isterseniz onuda yayınlarım. TCL olarak.

Kolay gelsin iyi forumlar verdiğiniz kodu denedik ama çalıştıramadık malesef !kickyayin yapinca hiç tepki vermiyor komut olarak malesef

Subzero · 17 Şubat 2021, 01:19

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

Kolay gelsin iyi forumlar verdiğiniz kodu denedik ama çalıştıramadık malesef !kickyayin yapinca hiç tepki vermiyor komut olarak malesef

sessiz yazan yerleri kendini nickinizi yazıp denermisiniz. yada sessiz yazan yere $nick ekleyin.

Emrehan · 17 Şubat 2021, 02:29

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

sessiz yazan yerleri kendini nickinizi yazıp denermisiniz. yada sessiz yazan yere $nick ekleyin.

Onunla alakalı bir durum değil malesef.

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

Kolay gelsin iyi forumlar verdiğiniz kodu denedik ama çalıştıramadık malesef !kickyayin yapinca hiç tepki vermiyor komut olarak malesef

Bilgileri doğru girdiyseniz kod çalışıyor lakin ben yine de toparlama değil de fikir yürütmeye yatkınlık adına 1-2 oynadım, isterseniz ilk hali veya bu halini kullanabilirsiniz. Socket yapı olmayan botunuzda (mircbot) kullanabilirsiniz.

NOT: Aşağıdaki kod sadece Shoutcast v1 sürümünde çalışır.

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

alias radyoip return 11.22.33.44
alias radyoport return 9300
alias radyoadminpass return ADMINSIFRESI

on *:SOCKOPEN:shoutcast: {
  sockwrite -n $sockname GET $+(/admin.cgi?pass=,$radyoadminpass,&mode=kicksrc) HTTP/1.1
  sockwrite -n $sockname Host: $+($radyoip, :, $radyoport)
  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 Keep-Alive: 300
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname $crlf
}
alias sessiz {
  if $sock(shoutcast) { sockclose $ifmatch }
  sockopen shoutcast $radyoip $radyoport
}
on *:text:*:#DJ:{
  if $regex($1,/^([!.]k[ıiİ]ckyay[ıiİ]n)$/Si) {
    sessiz
    msg # Yayın kicklendi, yayına girebilirsiniz $nick
  }
}

İyi forumlar.

helloweenfs · 17 Şubat 2021, 23:25

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

Onunla alakalı bir durum değil malesef.

Bilgileri doğru girdiyseniz kod çalışıyor lakin ben yine de toparlama değil de fikir yürütmeye yatkınlık adına 1-2 oynadım, isterseniz ilk hali veya bu halini kullanabilirsiniz. Socket yapı olmayan botunuzda (mircbot) kullanabilirsiniz.

NOT: Aşağıdaki kod sadece Shoutcast v1 sürümünde çalışır.

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

alias radyoip return 11.22.33.44
alias radyoport return 9300
alias radyoadminpass return ADMINSIFRESI

on *:SOCKOPEN:shoutcast: {
  sockwrite -n $sockname GET $+(/admin.cgi?pass=,$radyoadminpass,&mode=kicksrc) HTTP/1.1
  sockwrite -n $sockname Host: $+($radyoip, :, $radyoport)
  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 Keep-Alive: 300
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname $crlf
}
alias sessiz {
  if $sock(shoutcast) { sockclose $ifmatch }
  sockopen shoutcast $radyoip $radyoport
}
on *:text:*:#DJ:{
  if $regex($1,/^([!.]k[ıiİ]ckyay[ıiİ]n)$/Si) {
    sessiz
    msg # Yayın kicklendi, yayına girebilirsiniz $nick
  }
}

İyi forumlar.

Emrehan öncelikle yardımların için çok teşekkür ederim

[23:05] <helloween> !kickyayın
[23:05] <Radyo> Yayın kicklendi, yayına girebilirsiniz helloween

kod calısıyor tepki var fakat yayından atmıyor

Shoutcast version dan dolayi tahminim

SHOUTcast Server Version 1.9.8/Linux

NOT: Aşağıdaki kod sadece Shoutcast v1 sürümünde çalışır.

dolayısıyla 1.9.8 ve üzeri shoutcast versionlarda calısan bu kod un günceli lazım gibi görünüyor

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Kadınlar ne ister? Erkekler ne ister?	Deep	Diğer Sosyal Ağlardan Haberler	1	15 Mart 2012 17:32

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

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.