Tekil Mesaj gösterimi
Alt 18 Mart 2015, 21:30   #1
No_FeaR
 
No_FeaR - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 27 Ocak 2015
Bulunduğu yer: Denizli
Mesajlar: 136
WEB Sitesi: www.AlemTR.com
IRC Sunucusu: www.AlemTR.com
İlgi Alanı:
Alınan Beğeni: 69
Standart Karşılama Tcl

Tek Kısılık Karşılama TCL'sı ;

Kod:
set sahip Casper
bind join - * karsilama
proc karsilama { nick uhost hand chan } {
  global sahip
  if ($nick==$sahip) {
  putserv "PRIVMSG $nick Hoşgeldin."
  }
  return 0
}

Çoklu Karşılama TCL's ;

Kod:
set sahip Casper
set sahip2 Ben
set sahip3 Baskasi

bind join - * karsilama
proc karsilama { nick uhost hand chan } {
  global sahip sahip2 sahip3
  if {$nick==$sahip} { putserv "PRIVMSG $nick Hoşgeldin." }
  if {$nick==$sahip2} { putserv "PRIVMSG $nick Niye Geldin." }
  if {$nick==$sahip3} { putserv "PRIVMSG $nick Gözlerimiz Yollarda kaldı" }
}
Örnek 2 ;

Kod:
set sahip Casper
set sahip2 Ben
set sahip3 Baskasi

bind join - * karsilama
proc karsilama { nick uhost hand chan } {
  global sahip sahip2 sahip3
  if {$nick==$sahip} { 
     putserv "PRIVMSG $nick :Hoşgeldin." 

  } elseif {$nick==$sahip2} { 
    putserv "PRIVMSG $nick :Niye Geldin." 

  } elseif {$nick==$sahip3} { 
    putserv "PRIVMSG $nick :Gözlerimiz Yollarda kaldı" 

  ;bu mesaj listede ismi olamayn kullanicilara gonderilecektir..
  } else {
    putserv "PRIVMSG $nick :$nick Hos geldiniz"
  }

}






Aynı Dünyada Yaşamamalı Cellatlar Ve Çocuklar .
Ya Ölmeli Cellatlar,Yada Hiç Doğmamalı Çocuklar...!
 No_FeaR isimli Üye şimdilik offline konumundadır   Alıntı