#gerekli bindler
bind pub - !reklam No_FeaR
bind evnt - init-server baglan_yap

proc baglan_yap {type} {
global inick ipass

  putserv "OPER $inick $ipass"
  putserv "WALLOPS :Basari ile Login Oldum"
}

proc No_FeaR {n u h c a} {
  global gnick
    set gnick $n
        set kanal [lindex $a ]
    putserv "allsend all private global Reklamcı 13,1 Müzigin Kalbi 0,1Reklamcı FM'13,1de ATiyor Dinlemek Icin => 9,1 http://Radyo.Reklamcı.Com:PORT/listen.pls 13,1 Adresini TikLayabiLirsiniz....0,1 Reklamcı Fm'e13,1 Hos Geldiniz Suanda Yayinda Olan 9,1 DJ' 13,1Miz 0,1 ($kanal)13,1 Isteklerinizi Radyo Kanalina 0,1!istek13,1 <istediginiz Sarki Mesajiniz> Seklinde Yazabilirsiniz. 0,1Ornek:13,1 Gece Yolculari - Unut Beni Tum0,1 Reklamcı13,1 Ailesine Gelsin..."
}

Olmazsa Bi Alttakini de

proc No_FeaR {n u h c a} {
  global gnick
    set gnick $n
        set kanal [lindex $a ]
    putserv "PRIVMSG global Reklamcı 13,1 Müzigin Kalbi 0,1Reklamcı FM'13,1de ATiyor Dinlemek Icin => 9,1 http://Radyo.Reklamcı.Com:PORT/listen.pls 13,1 Adresini TikLayabiLirsiniz....0,1 Reklamcı Fm'e13,1 Hos Geldiniz Suanda Yayinda Olan 9,1 DJ' 13,1Miz 0,1 ($kanal)13,1 Isteklerinizi Radyo Kanalina 0,1!istek13,1 <istediginiz Sarki Mesajiniz> Seklinde Yazabilirsiniz. 0,1Ornek:13,1 Gece Yolculari - Unut Beni Tum0,1 Reklamcı13,1 Ailesine Gelsin..."
}