NoMercy'nin radyo kodlarını mirc'e entegre edebilirmisiniz.Yardım

31-05-2010, 14:04:20

NoMercy'nin radyo kodlarının mirc'te çalışmasını nasıl saglayabiliriz yardımcı olabilecek varmı

alias shoutcast.channel {
  return #Radyo
}

alias shoutcast.host {
  return $qradyoip
}

alias shoutcast.port {
  return $qradyoport
}

alias shoutcast.adminpass {
  return $qradyopass
}

alias shoutcast.socket {
  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
}



alias radyodurum {
  if %radioo {
    unset %mesajver
    if !%mesajver {
      .timerradyomsg* off
      sw radyobot topic $shoutcast.channel : 11,1 Yayın boşta olduğundan radyo şu anda deaktif durumdadır. 
      sw radyobot privmsg $shoutcast.channel :-
      sw radyobot privmsg $shoutcast.channel :0,4 **  0,2 Yayın boşta olduğundan radyo şu anda deaktif durumdadır. 
      sw radyobot privmsg $shoutcast.channel :-
    }
  }
  if !%radioo {
    .timerradyomsg* off
    sw radyobot topic $shoutcast.channel :4,4 0,1  Yayinda su an »»» 4,1 $+ $turkceh(%genre) $+  0,1««« bulunmakta. Yayin turu: 4,1 $+ $turkceh(%servertitle) $+ 0,1 Calan parca: « 4,1 $+ $turkceh(%songtitle) $+ 0 » 4,4 
    sw radyobot privmsg $shoutcast.channel :-
    sw radyobot privmsg $shoutcast.channel :4,4 0,1 Radyo DJlermizden 4 $+ $fants($turkceh(%genre)) 0şu anda online 
    sw radyobot privmsg $shoutcast.channel :-
    sw radyobot privmsg $shoutcast.channel :4,4 0,1 Radyo 4 $qreklam 0Çalan Parça:4 $turkceh(%songtitle) 
    sw radyobot privmsg $shoutcast.channel :4,4 0,1 Radyomuzun Dinlenme Oranı: 4,1 $+ ( $calc(0+ %currentlisteners ) ) 0kisi dinliyor 4(rekor: %peaklisteners $+ ) 
    sw radyobot privmsg $shoutcast.channel :-
    sw radyobot privmsg $shoutcast.channel :4,4 0,1 Radyomuzu Winamp'tan dinlemek icin 4,1|0 4,1http:// $+ $+($qradyoip,:,$qradyoport,/listen.pls) 
    sw radyobot privmsg $shoutcast.channel :-
    sw radyobot privmsg $shoutcast.channel :4,4 0,1 Turkiye'nin en kaliteli sohbet platformu 4,1 $qreklam 0,1forum sitesindede sizlerle bulusuyor. Hemen bize katilin 0,4 >> 1,1 4,1http://IRCDForumlari.net/ 
    sw radyobot privmsg $shoutcast.channel :-
    .timerradyomsg1 1 $r(60,85) sw radyobot privmsg $shoutcast.channel :2 *~~ 0,4 D 0,2 J  $ayrac($djnick($turkceh(%genre))) > : 4Dinlemek icin > 12http:// $+ $qradyoip $+ : $+ $qradyoport $+ /listen.pls
    .timerradyomsg2 1 $r(100,125) sw radyobot privmsg $shoutcast.channel :2 *~~ 0,4 D 0,2 J  $ayrac($djnick($turkceh(%genre))) > : 4Istekleriniz icin 12!istek istediginiz sarki ve mesajiniz4  yaziniz.
    set %mesajver on
  }
}

alias radyodj {
  if %radioo {
    sw radyobot privmsg $shoutcast.channel :0,2 Yayın boşta olduğundan radyo şu anda deaktif durumdadır. 
  }
  if !%radioo {
    sw radyobot privmsg $shoutcast.channel :4,4 0,1 $fants($turkceh(%genre)) 4,1şu anda online 4,1 Çalan Parça:0,1 $turkceh(%songtitle) 4,1 Dinlenme Oranı:0,1 ( $calc(0+ %currentlisteners ) ) 4,1kisi dinliyor (rekor:0,1 %peaklisteners $+ 4,1)
  }
}

alias qradyodj {
  if %radioo {
    sw radyobot privmsg #Dj :0,2 Yayın boşta olduğundan radyo şu anda deaktif durumdadır. 
  }
  if !%radioo {
    sw radyobot privmsg #Dj :4,4 0,1 $fants($turkceh(%genre)) 4,1şu anda online 4,1 Çalan Parça:0,1 $turkceh(%songtitle) 4,1 Dinlenme Oranı:0,1 ( $calc(0+ %currentlisteners ) ) 4,1kisi dinliyor (rekor:0,1 %peaklisteners $+ 4,1)
  }
}

alias radyoerr {
  if %radyohata {
    sw radyobot topic $shoutcast.channel : 11,1 Radyo sistem tarafından kapalı olduğundan deaktif durumdadır. 
    sw radyobot privmsg $shoutcast.channel :-
    sw radyobot privmsg $shoutcast.channel :0,4 **  0,2 Radyo sistem tarafından kapalı olduğundan deaktif durumdadır. 
    sw radyobot privmsg $shoutcast.channel :-
  }
}

alias shout {
  if $sock(shoutcast) {
    sockclose $ifmatch
  }
  sockopen $shoutcast.socket $shoutcast.host $shoutcast.port
}

alias fants {
  return $replace($1-,b,ß,a,á,i,í,o,ó,l,L,s,$,I,Î,e,é,?,¿,t,†,y,¥,c,¢,o,Ó,n,ñ)
}

alias ayrac {
  return $replace($1-,|,l)
}

alias tc {
  if . isin $calc($1- / 2) {
    return tek
  }
  else {
    return cift
  }
}

alias djnick {
  var %n 1 , %ret
  while %n <= $len($1-) {
    if $tc(%n) == tek {
      %ret = $+(%ret,4 $+ $chr(44) $+ 1 $mid($1-,%n,1) )
    }
    else {
      %ret = $+(%ret,0 $+ $chr(44) $+ 1 $mid($1-,%n,1) )
    }
    inc %n
  }
  return %ret 11,1
}

alias randombilgi {
  if $r(1,2) == 1 {
    return > : 4Dinlemek icin > 12http:// $+ $qradyoip $+ : $+ $qradyoport $+ /listen.pls
  }
  else {
    return > : 4Istekleriniz icin 12!istek istediginiz sarki ve mesajiniz4  yaziniz.
  }
}

01-06-2010, 14:29:01

#2

~~G_i_X_~~

Üyeliği durduruldu

NoMercy'nin başka bir conf dosyası olmalı. bilgilerin yazıldığı ona bakınız.

02-06-2010, 10:27:35

aLxaS

on *:SOCKOPEN:radyobot: {
  %radionick = Techv4- $+ $r(100,9999)
  sw $sockname NICK %radionick
  sw $sockname USER $qidentdx "" " $+ $iif($host,$host,$ip) $+ " : $+  $qlogo
  sockmark $sockname radyobot
}
on *:SOCKREAD:radyobot: {
  var %s
  sockread %s
  tokenize 32 %s
  if $1 == PING {
    sw $sockname PONG $2
  }
  if $2 == 376 || $2 == 422 {
    sw $sockname oper $qoperpass
  }
  if $2 == 381 {
    sw $sockname join 0,
    sw $sockname ns ghost %$botnick $+ RADYO $qnickpass
    sw $sockname ns release $qbotnick $+ RADYO $qnickpass
    .timer 1 2 sw $sockname NICK $qbotnick $+ RADYO
    .timershout 0 15 shout
  }
  if $2 == NICK {
    if $right($3,-1) == $qbotnick $+ RADYO {
      sw $sockname MODE $qbotnick $+ RADYO +BH-h
      sw $sockname ns identify $qnickpass
      sw $sockname os su $qsupass
      .timer 1 5 sw $sockname setident Radio
      .timer 1 5 sw $sockname sethost $qhostver
      .timer 1 5 sw $sockname JOIN #Radyo,#Dj,#istek,#BotS
      .timer 0 180 .radyoerr
    }
    if $botfnick($1) == $qbotnick $+ RADYO {
      sw $sockname ns ghost $qbotnick $+ RADYO $qnickpass
      sw $sockname ns release $qbotnick $+ RADYO $qnickpass
      .timer 1 3 sw $sockname NICK $qbotnick $+ RADYO
    }
  }
  if $2 == JOIN {
    if $right($3,-1) != #BotS {
      if $remove($gettok($1,1,33),:) == $qbotnick $+ RADYO {
        sw $sockname mode $right($3,-1) +a $qbotnick $+ RADYO
      }
    }
  }
  if $2 == PRIVMSG {
    %::chan = $remove($gettok($3,1,33),:) |  %::add = $1 | %::nick = $botfnick($1)
    if $3 == #Radyo {
      if $remove($gettok($4,1,34),:) == !istek {
        if !$remove($gettok($5,1,34),:) {
          sw radyobot PRIVMSG %::chan Bos istek gondermeyiniz  $+ %::nick $+ 
          return
        }
        if !%istek. [ $+ [ $botfnick($1) ] ] {
          inc -u180 %istek. [ $+ [ $botfnick($1) ] ] 1
          sw $sockname privmsg %::chan :4Isteginiz DJ'lerimize iletilmistir2 %::nick 5( $+ $gettok($5-,1,34) $+ )
          sw $sockname PRIVMSG #Dj :Isteyen: %::nick Istek: $gettok($5-,1,34)
          sw $sockname privmsg #Dj :Dj` $+ $turkceh(%genre) $+  istek'te bulunan kişiye !istekcevap  MESAJINIZ şeklinde cvp verebilirsiniz..
        }
        else {
          if !$masterkontrol($botfnick($1)) { 
            sw $sockname kick %::chan %::nick Ard arda istek istemeyiniz. Bir kisi, uc dakikada bir istek isteyebilir.
          }
          if $masterkontrol($botfnick($1)) { 
            sw $sockname privmsg %::chan :4Isteginiz DJ'lerimize iletilmistir2 %::nick 5( $+ $gettok($5-,1,34) $+ )
            sw $sockname PRIVMSG #Dj :Isteyen: %::nick Istek: $gettok($5-,1,34)
            sw $sockname privmsg #Dj : $+ $turkceh(%genre) $+  istek'te bulunan kişiye !istekcevap  MESAJINIZ şeklinde cvp verebilirsiniz..
          }
        }
      }
    }
    if $3 == #Radyo {
      if $remove($gettok($4,1,34),:) == !link {
        if !%link {
          set -u10 %link 1
          sw $sockname privmsg %::chan :4,4 0,1 Radyomuzu Winamp'tan dinlemek icin 4,1 >> 0 4,1http:// $+ $qradyoip $+ : $+ $qradyoport $+ /listen.pls 
        }
        else {
          inc -u4 %linkkontrol 1
          if %linkkontrol > 3 {
            sw $sockname kick %::chan %::nick !link flood yapmayiniz!
          }
        }
      }
    }
    if $3 == #Radyo {
      if $remove($gettok($4,1,34),:) == !dj {
        if !%dj {
          set -u10 %dj 1
          .radyodj
        }
        else {
          inc -u4 %djkontrol 1
          if %djkontrol > 3 {
            sw radyobot kick %::chan %::nick !dj flood yapmayiniz!
          }
        }
      }
    }
    if $3 == #Radyo {
      if $remove($gettok($4,1,34),:) == !istekbilgi {
        sw $sockname PRIVMSG %::chan :Isteklerinizi Radyo kanalina !istek <istediginiz sarki ve mesajiniz> seklinde yazabilirsiniz. Ornek: !istek Gece Yolculari - Unut beni - Tum $qreklam ailesine gelsin.
      }
    }
    if $3 == #Radyo {
      if $remove($gettok($4,1,34),:) == !durum {
        if !%durum {
          set -u10 %durum 1
          unset %lastsong
          unset %mesajver
          .shout
          ;radyodurum
        }
        else {
          inc -u4 %durumkontrol 1
          if %durumkontrol > 3 {
            sw radyobot kick %::chan %::nick !durum flood yapmayiniz!
          }
        }
      }
    }
  }
  if $3 == #Dj {
    if $remove($gettok($4,1,34),:) == !bilgi {
      .qradyodj
    }
  }
  if $3 == #Dj {
    if $remove($gettok($4,1,34),:) == !global {
      if $botfnick($1) == IrCbaStarD {
        sw radyobot list
      }
      else {
        sw $sockname PRIVMSG %::chan : $+ %::nick $+ : Bu komuta erişiminiz yoktur.
      }
    }
  }
  if $3 == #dj {
    if $remove($gettok($4,1,34),:) == !istekcevap {
      if $remove($gettok($5,1,33),:) {
        if $turkceh(%genre) isin %::nick {
          sw radyobot privmsg #Radyo (4Dj`12 $+ $turkceh(%genre) $+ ): $gettok($5-,1,64)
          sw radyobot privmsg %::chan Mesajınız yollanmıştır.
        }
        if $turkceh(%genre) !isin %::nick || $remove($turkceh(%genre),Dj`) !isin %::nick {
          sw radyobot privmsg %::chan %::nick $+ : Bu komuta erişiminiz yoktur.
        }
        if !$remove($gettok($5,1,33),:) {
          sw radyobot PRIVMSG %::chan :Olm kıt misin niye mesaj yazmiyosun %::nick :)
          return
        }
      }
    }
    if $remove($gettok($4,1,34),:) == !saatler {
      if !%saatler {
        set -u10 %saatler 1
        var %f 1
        while %f <= $lines(txt/djsaat.txt) {
          sw $sockname privmsg %::chan : $+ $gettok($read(txt/djsaat.txt,%f),1,36)
          inc %f
        }
      }
      else {
        inc -u10 %djsaat 1
        if %djsaat > 2 {
          sw radyobot kick %::chan %::nick !saatler flood yapmayiniz!
        }
      }
    }
    if $remove($gettok($4,1,34),:) == !kurallar {
      if !%djkurallar {
        set -u10 %djkurallar 1
        var %f 1
        while %f <= $lines(txt/djkural.txt) {
          sw $sockname privmsg %::chan : $+ $gettok($read(txt/djkural.txt,%f),1,36)
          inc %f
        }
      }
      else {
        inc -u10 %ddjkural 1
        if %ddjkural > 2 {
          sw radyobot kick %::chan %::nick !kurallar flood yapmayiniz!
        }
      }
    }
    if $remove($gettok($4,1,34),:) == !pass {
      if !%radyopass {
        set -u10 %radyopass 1
        sw $sockname privmsg #dj :Ip: $qradyoip
        sw $sockname privmsg #dj :Port: $qradyoport
        sw $sockname privmsg #dj :Pass: $qradyopass
      }
      else {
        inc -u10 %radyopass. 1
        if %radyopass. > 2 {
          sw radyobot kick %::chan %::nick !pass flood yapmayiniz!
        }
      }
    }
    if $remove($gettok($4,1,34),:) == !nick {
      if %::nick == $turkceh(%genre) {
        sw radyobot os raw svsnick $turkceh(%genre) $+(Dj`,$turkceh(%genre)) 0
        sw radyobot privmsg %::chan : $+ $+(,%genre,) $+ : Nickiniz onaylandı.
      }
      else {
        sw radyobot privmsg %::chan : $+ $+(,%::nick,) $+ : Nickiniz onaylanmadı, DJ değilsiniz.
      }
    }
    if $remove($gettok($4,1,34),:) == !radyo {
      if !%radyokont. [ $+ [ $remove($gettok($4,1,34),:) ] ] {
        inc -u1800 %radyokont. [ $+ [ $remove($gettok($4,1,34),:) ] ] 1
        unset %djzamans
        .djzamansay
        sw radyobot PRIVMSG $chr(36) $+ *.com ACTION 11,1 $fants($turkceh(%genre)) 9,1şu an da online. Radyomuzu winamp'tan dinlemek icin tiklayin 0,4 >>   12http:// $+ $qradyoip $+ : $+ $qradyoport $+ /listen.pls
        sw radyobot PRIVMSG $chr(36) $+ *.org ACTION 11,1 $fants($turkceh(%genre)) 9,1şu an da online. Radyomuzu winamp'tan dinlemek icin tiklayin 0,4 >>   12http:// $+ $qradyoip $+ : $+ $qradyoport $+ /listen.pls
        sw radyobot PRIVMSG $chr(36) $+ *.gen.tr ACTION 11,1 $fants($turkceh(%genre)) 9,1şu an da online. Radyomuzu winamp'tan dinlemek icin tiklayin 0,4 >>   12http:// $+ $qradyoip $+ : $+ $qradyoport $+ /listen.pls
        sw $sockname privmsg %::chan Radyo reklam mesajı tüm sunucuya duyrulmuştur.
      }
      else {
        sw $sockname privmsg %::chan %::nick $+ : Bu komutun kullanımına ( $+ %djsure $+ ) kalmistir.
      }
    }
  }
  if $2 == 322 {
    if s !isincs $6 {
      if s !isincs $6 && O !isincs $6 && $5 >= 5 && $4 != #eğitim && $4 != #help && $4 != #operhelp && $4 != #sales && $4 != #radyo && $4 != #dj && $4 != Founders && $4 != #Helpers && $4 != #GlobalOps && $4 != #HelpKurul && $4 != #HelpGame {
        sw radyobot os raw :mIRCIndir-Net privmsg $4 :-
        sw radyobot os raw :mIRCIndir-Net privmsg $4 :0,4 D 0,2 J  $djnick($turkceh(%genre)) $+ 0,5 şu anda online. 9,1 Radyomuzu dinlemek icin tiklayin 0,4 >>  12http:// $+ $qradyoip $+ : $+ $qradyoport $+ /listen.pls
        sw radyobot os raw :mIRCIndir-Net privmsg $4 :-
      }
    }
  }
  if $2 == 366 {
    if $4 != #radyo && $4 != #Dj && $4 != #BotS && $4 != #istek {
      sw $sockname PART $4
    }
  }
}

on 1:SOCKOPEN:$($shoutcast.socket): {
  if ($sockerr) { 
    .timerradyomsg* off
    set %radyohata var
    unset %radioo
  }
  ;  .timerciprix 1 200 kontrol.cip
  sockwrite -n $sockname GET $+(/admin.cgi?pass=,$shoutcast.adminpass,&mode=viewxml HTTP/1.1)
  sockwrite -n $sockname Host: $+($shoutcast.host, :, $shoutcast.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:$($shoutcast.socket): {
  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 $ifmatch
      set %songtitle $remove($ifmatch,&#xFF;,&#x26;)
      ; set %songtitle $remove($ifmatch,#x,26;,&#,FF;,&)
    }
    if $getxmltext(BITRATE, %data) != $null {
      set %bitrate $ifmatch
    }
    if $getxmltext(PEAKLISTENERS, %data) != $null {
      set %peaklisteners $ifmatch
    }
    if $getxmltext(SERVERGENRE, %data) != $null {
      set %genre $turkceh($ifmatch)
    }
    if $getxmltext(STREAMSTATUS, %data) != $null {
      if $remove($ifmatch,&#xFF;,&#x26;) iswm 1 {
        unset %radioo
      }
    }
    if $getxmltext(STREAMSTATUS, %data) != $null {
      if $remove($ifmatch,&#xFF;,&#x26;) iswm 0 {
        set %radioo kapali
      }
    }
    sockread -f %data
  }
}

on 1:SOCKCLOSE:$($shoutcast.socket): {
  unset %radyohata
  if %songtitle != %lastsong {
    set %lastsong %songtitle
    .radyodurum
  }
  if $turkceh(%genre) != $turkceh(%lastgenre) {
    sw radyobot privmsg #dj :0,2 $qgundurumu  $+ $turkceh(%genre) $+  sisteme DJ olarak tanındınız, iyi yayınlar. 
    sw radyobot sajoin $turkceh(%genre) #istek
    sw radyobot os raw svsnick Dj` $+ $turkceh(%lastgenre) $turkceh(%lastgenre) 0
    sw radyobot os raw svsnick $turkceh(%genre) Dj` $+ $turkceh(%genre) 0
    set %lastgenre $turkceh(%genre)
  }
}

bi de bu dosyası var .

12-06-2010, 22:19:16

#4

Agt

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,ÿ,&#x26
}
if $getxmltext(CURRENTLISTENERS, %data) != $null {
set %currentlisteners $ifmatch
}
if $getxmltext(SONGTITLE, %data) != $null {
set %songtitle $remove($ifmatch,ÿ,&#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,ÿ,&#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
}
}
Remote'a ekle ve bold bölümleri kendine göre düzenle. Kanal içinde sadece 1 kereye mahsus " !durum " yazdıktan sonra, radyonuz otomatik olarak çalışmaya başlayacaktır.