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

Sayfa 2 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- Eggdrop, NeoStats, BNC (https://www.ircforumlari.net/eggdrop-neostats-bnc/)

- - Radyo kick tcl (https://www.ircforumlari.net/eggdrop-neostats-bnc/325255-radyo-kick-tcl.html)

qusursuz

23 Ağustos 2010 17:56

Cevap: Radyo kick tcl

eggdrop1.6.19 Şuda eggdrop versiyonum unutmuşum pardon.

hmm şimdi güzel abicim ;

set ip "Ip"
set port "Port"
set adminpass "Adminpass"
su satırları kendime gore ayarladim İ

sunucu ip aynı zamanda radyo ip : 94.x.x.97 vari..
port : 8.x.x.x

ve sc_serv.conf a ekledigim admin pass i ekledim ..

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] seklinde girip site uzerinden kickleye biliyorum yayını..

ama bu sekilde çalışmıyor ..

------------

+ bi konu şu , aşağıdaki yayındasınız vs hic bi sekilde mesaj vermiyor dj kanalına..

Radyo.tcl Radyo nickinde giris yapior Radyo nickine root yazdim services.conf a ekledimde raw da felan bi sıkıntı yoq .

Ekstram bi, olay varsa oda sc_trans_linux linux icin oto dj ki sanırsam hic bi alakası yok onla amac kimse yokken onun yayın alıp millet gelince !kick vs diip yayıan gecmesi zaten hepimizin istedigi bu sanırsam

putserv "PRIVMSG #Dj :2 Yayındasınız. "

qusursuz

23 Ağustos 2010 21:32

Cevap: Radyo kick tcl

Nerde var yanlışım _?

hmz1925

28 Ocak 2011 11:55

Cevap: Radyo kick tcl

Bu tcl çalışmıor arkadaşlar.

Joop	27 Kasım 2012 00:28

Cevap: Radyo kick tcl

Çalışmıyor, Herhangi Bir Tepkide Vermiyor.
Kullanılan Versiyon eggdrop1.6.17 bununla alakalı mı acaba? 21 dede dendim ondada çalışmadı

Joop	27 Kasım 2012 15:10

Cevap: Radyo kick tcl

Arkadaşlar, sorunu Çözebilen, Veya Elinde Çalışanı olan varmı?

PRaNGaLaR

28 Kasım 2012 08:41

Cevap: Radyo kick tcl

Birde Bunu Deneyin

Alıntı:

## Buraya radyonun kurulu olduğu dizinde "sc_serv.conf" un yerini belirtiyoruz.
set dosya_adresi "../radyo/sc_serv.conf"

## Buraya komutun geçerli olacağı kanalı yazıyoruz.
set kickkanal "#dj"

## Başkada birşeye dokunmuyoruz. Gerisini ben hallederim

bind pub - !kickradyo kickradyo

proc kickradyo {nick host handle chan arg} {
global dosya_adresi kickkanal

if {$chan != $kickkanal} {return 0}

set dosya [open $dosya_adresi r]
set liste [split [subst -nocommands [read $dosya]] "\n"]
regexp -- {DestIP=(.+?) Yport, port to connect to} $liste - ip
regexp -- {PortBase=(.+?) Optional Parameters} $liste - port
regexp -- {Password=(.+?) PortBase. This is} $liste - pass
regexp -- {AdminPassword=(.+?) AutoDumpUsers controls whether} $liste - adminpass
close $dosya

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
}

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 BuCaLI #
############################

Was	28 Kasım 2012 23:17

Cevap: Radyo kick tcl

Güzelmiş. Ama admin pass yoksa bu da atmicaktır çoğu kişi adminpass ayarlamayıp yayın şifresiyle attırıyor. Kendi kullandığım şu var çalışan;

PHP- Kodu:

   set kickkanal "#DJ"

bind pub - !djat kick

proc kick {nick host handle chan arg} {
global ip port adminpass kickkanal
if {$chan != $kickkanal} {return 0}

# asagisi radyo IP 'si olcak.
set ip "33.33.22.22"
# simdi de portunu yaz.
set port "8080"
# admin pass veya kullanmiyosan yayin sifren
set adminpass "sifrem33"

set sock [socket [duzelt $ip] [duzelt $port]]
puts $sock "GET /admin.cgi?pass=[duzelt $adminpass]&mode=kicksrc 
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 :Yayindaki DJ dusuruldu, lutfen yayini aliniz. Komutu gereksiz kullanmanizin tespit edilmesi halinde yetkilerinizin alinabilecegini unutmayiniz..."
}

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
}

Bunu aynı bota koycaksanız ek bir tcl ile source edin, başka tcl içine koyunca çalışmayabilir. Komut: !djat

KeremHasan

21 Ocak 2013 20:12

Cevap: Radyo kick tcl

Arkadaşlar Genel Olarak Rica Ediyorum Herkesden Aldıgınız Tcllerin Yazılımların isimlerini Degiştirmeyin deiştirmeden Kullanın Genel bir ricadir Emek hırsızlıgına Gerek yok hiç bir manasıda Yok..

epicemic

02 Haziran 2013 13:46

Cevap: Radyo kick tcl

Evt bende de çalışmadı

SeckiN

02 Haziran 2013 20:30

Cevap: Radyo kick tcl

Alıntı:

epicemic Nickli Üyeden Alıntı (Mesaj 1041306567)

Evt bende de çalışmadı

Kod:

##Buraya Radyonun İp Adresini Yazın..

set ip "94.242.238.61"

##Buraya Radyonun Portunu Yazın..

set port "8888"

##Buraya Radyonun Şifresini Yazın..

set pass "asdasdasd"

##Buraya Radyonun Admin Şifresini Yazın..

set adminpass "asdasdasd"

## Buraya Komutun Geçerli Olacağı Kanalı Yazın..

set kickkanal "#Dj"

## Başkada Birşeye Dokunmuyoruz. Gerisini Ben Hallederim ;)
 

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                    #

############################

Bide bunu dene.

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

Sayfa 2 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster