ForumTEK.Net - IRC Forumu - Radyo Botu (Socketed)

ForumTEK.Net - IRC Forumu (http://www.forumtek.net/index.php)

- Hazır Kodlar (http://www.forumtek.net/forumdisplay.php?f=51)

- - Radyo Botu (Socketed) (http://www.forumtek.net/showthread.php?t=2835)

Radyo Botu (Socketed)

Kod:

alias radyo.kanal {

  return #radyo

}

alias radyo.host {

  return 64.56.66.142

}

alias radyo.port {

  return 8886

}

alias radyo.adminpass {

  return benimradyom

}

alias radyo.sock {

  return shoutcast

}

alias getxmltext {

  var %tag.open = $+(<, $1, >)

  var %tag.close = $+(</, $1, >)

  if $pos($2-,%tag.open) {

    var %start = $ifmatch + $len(%tag.open)

    var %length  = $calc($pos($2-, %tag.close) - %start)

    return $mid($2-, %start, %length)

  }

  return $null

}

on 1:SOCKOPEN:$($radyo.sock): {

  sockwrite -n $sockname GET $+(/admin.cgi?pass=,$radyo.adminpass,&mode=viewxml HTTP/1.1)

  sockwrite -n $sockname Host: $+($radyo.host, :, $radyo.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 *.*, */*

  ; sockwrite -n $sockname Accept-Language: en-us,en;q=0.5

  sockwrite -n $sockname Accept-Language: tr,tr;q=0.5

  sockwrite -n $sockname Accept-Encoding: gzip,deflate

  sockwrite -n $sockname Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7

  sockwrite -n $sockname Keep-Alive: 300

  sockwrite -n $sockname Connection: keep-alive

  sockwrite -n $sockname $crlf

}

on 1:SOCKREAD:$($radyo.sock): {

  var %data

  sockread -f %data

  while $sockbr > 0 && $sockerr == 0 {

    if $getxmltext(SERVERTITLE, %data) != $null {

      set %servertitle $remove($ifmatch,&#xFF;,&#x26;)

    }

    if $getxmltext(CURRENTLISTENERS, %data) != $null {

      set %currentlisteners $ifmatch

    }

    if $getxmltext(SONGTITLE, %data) != $null {

      set %songtitle $remove($ifmatch,&#xFF;,&#x26;)

    }

    if $getxmltext(BITRATE, %data) != $null {

      set %bitrate $ifmatch

    }

    if $getxmltext(PEAKLISTENERS, %data) != $null {

      set %peaklisteners $ifmatch

    }

    if $getxmltext(SERVERGENRE, %data) != $null {

      set %genre $remove($ifmatch,&#xFF;,&#x26;)

    }

    sockread -f %data

  }

}

on 1:SOCKCLOSE:$($radyo.sock): {

  if %songtitle != %lastsong {

    set %lastsong %songtitle

    var %msg = 0,4 %genre su anda online 0,2 Siradaki parca: %songtitle 0,6 Su anda %currentlisteners kisi dinliyor (rekor: %peaklisteners $+ ) 

    set %msg2 0,4 %genre su anda online 0,2 Siradaki parca: %songtitle 0,4<< 0,5 Radyomuzu dinlemek icin tiklayin 0,4 >>  http://208.98.57.80:4444/listen.pls

    msg $radyo.kanal Yayinda su an << $+ %genre $+ >> bulunmakta. * Yayin turu: %servertitle * Calan parca: >>>>> %songtitle <<<<<

    msg $radyo.kanal %msg

  }

}

alias shout {

  if $sock(shoutcast) {

    sockclose $ifmatch

  }

  sockopen $radyo.sock $radyo.host $radyo.port

}

on 1:text:*:#radyo:{

  if *!durum* iswm $1- {

    set -u10 %durum 1

    unset %lastsong

    .timershout 0 5 shout

  }

}

mIRC'inizin içerisinde ki o nacizane, Remote bölümüne eğer koyarsanız, ayarladığınız kanal içerisinden, sadece 1 kereye mahsus " !durum " yazdıktan sonra, radyonuz otomatik olarak çalışmaya başlayacaktır.

Not: Kalın olarak işaretlediğim yerleri, kendi bilgileriniz adına değiştirmelisiniz.

Yapımcı: WingmaN

fast indexing of linksoul

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

Additionally, quick website link indexing companies are built to scale effortlessly While using the ever-expanding sizing and complexity of the online market place. No matter whether indexing particular person Web content, multimedia information, or total websites, these companies are Outfitted to handle the huge volume of knowledge created on-line every day. As a result of a mix of dispersed computing, equipment Finding out, and also other slicing-edge technologies, quick website link indexing products and services will be able to manage ideal functionality and reliability even from the deal with of unprecedented growth and demand. [Ü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...] [Ü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...] e68fdf1
@index_systum77=

speed index google docs

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

On the list of essential options of rapidly url indexing companies is their capacity to prioritize and index material depending on relevance and importance. By examining several indicators, for example social websites exercise, consumer engagement metrics, and material freshness, these solutions can intelligently prioritize the indexing of content that is most probably to resonate with customers. This dynamic method of indexing makes certain that people are offered with written content that is not only timely but in addition highly applicable for their pursuits and Tastes. [Ü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...] [Ü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...] e68fdf1
@index_systum77=

speed index how to fix in hindi

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

Among the key features of quick backlink indexing services is their capability to prioritize and index articles depending on relevance and importance. By examining various signals, such as social networking exercise, person engagement metrics, and content freshness, these services can intelligently prioritize the indexing of written content which is most likely to resonate with buyers. This dynamic approach to indexing ensures that end users are offered with articles that isn't only timely but in addition hugely pertinent to their passions and preferences. [Ü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...] [Ü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...] e68fdf1
@index_systum77=

fast google indexing

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

Also, rapid connection indexing providers empower material creators and website house owners by making certain that their latest offerings are immediately indexed and surfaced in search results. This may Have got a profound impact on visibility, targeted visitors, and engagement, in the end driving development and good results within an progressively aggressive electronic landscape. [Ü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...] [Ü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...] e68fdf1
@index_systum77=