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

sondemdeyim · 28 Nisan 2008, 07:37

alias kntrl { if $count($nick($1,$2).pnick,@,&,~,.,%) == 0 { msg $1 $2 hos geldiniz. } }
on !*:join:#sohbet: { .timer 1 1 kntrl # $nick }

bu kod kanala girenlere hos geldin diye mesaj atiyor.kanala cok sayida user girip ciktigi icin hos bir goruntu olmuyor herkese hos geldin demek.istedigim sey kanala ucuncu kisi girdiginde toplu olarak ucunede hos geldin desin.ornegin:ahmet girdi hos geldin demesin,mehmet girdi demesin,hasan girdiginde ahmet mehmet hasan hos geldiniz desin..yani hos geldiniz demek icin kanala ucuncu userin girmesini beklesin kod.diyelimki ahmet girdi hos geldin yok.ikinci user girdi mehmet hos geldin yok.kod hos geldin demek icin ucuncu useri bekliyor bu arada ahmet yada mehmet kanaldan cikti ucuncu user kanala girdi.kanaldan cikan usere de hos geldin demesi abes olur.bu yuzden birinci yada ikinci user kanaldan cikarsa onlara hos geldin demesin..simdiden tesekkur ederim

MaviLee · 28 Nisan 2008, 10:17

alias kntrl { if $count($nick($1,$2).pnick,@,&,~,.,%) == 0 { msg $1 $2 hos geldiniz. } }
on !*:join:#sohbet: { .timer 1 1 kntrl # $nick }

msg yerine notice kullan göruntu kirliligini önlemiş olursun..
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

alias kntrl { if $count($nick($1,$2).pnick,@,&,~,.,%) == 0 { notice $nick hos geldiniz. } }
on !*:join:#sohbet: { .timer 1 1 kntrl # $nick }

Dependent · 28 Nisan 2008, 12:00

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on !*:join:#sohbet: { kntrl $nick }
alias kntrl {
  if $1 == -t {
    if $me !ison #sohbet { halt }
    var %i = 1, %end = $hget(greedhsh,0).item, %nicktemp = $null, %nick == $null
    while %i <= %end {
      if $len(%nicktemp) <= 400 { 
        %nick = $hget(greedhsh,%i).item
        if %nick ison #sohbet && $count($nick(%nick,#sohbet).pnick,@,&,~,.,%) == 0 {
          %nicktemp = $addtok(%nicktemp,%nick,44) 
        }
        if %nick  { hdel greedhsh %nick }
      }
      else { msg #sohbet %nickemp hoş geldiniz | %nicktemp = $null }
      inc %i 1
    }
    if %nicktemp { msg #sohbet %nicktemp hoş geldiniz }
  }
  else {
    if $timer(greeddelay) {
      if !$hget(greedhsh,$1) { hadd -m greedhsh $1 $ctime }
    }
    else {  
      ;belki timer dış güçler tarafından kapatılmıştır :D, hash kontrolü
      if !$hget(greedhsh,$1) { hadd -m greedhsh $1 $ctime }
      .timergreeddelay 1 3 /axf -t 
    }
  }
}

kanala 3 sn içinde girenleri hafızada tutup geçen süre içinde hala kanalda iseler hoşgeldiniz mesajını yazar.
eğer 3sn bekleme sürenisi değiştirmek istersen kırmızı ile yazılan yerdeki 3 ü değiştir.

sondemdeyim · 02 Mayıs 2008, 07:24

MaviLee

sondemdeyim · 02 Mayıs 2008, 07:26

MaviLee kardesin verdigi kod herkese hos geldin diyor benim istedigim kanala birinci girene ikinci girene degil ucuncu kisi girdiginde birinci ikinci ve ucuncuye hep beraber nick1,nick2, nick3 hos geldiniz diyecek bir kod ariyorum.Dependent kardese gelince onun koduda hata verdi malesefki hatada su AXF Yalnýþ komut. yinede hersey icin ALLAH razi olsun hayirli forumlar

Dependent · 02 Mayıs 2008, 11:26

evet kodu yazarken adını axf yapmıştım sonra değiştirdim

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on !*:join:#sohbet: { kntrl $nick }
alias kntrl {
  if $1 == -t {
    if $me !ison #sohbet { halt }
    var %i = 1, %end = $hget(greedhsh,0).item, %nicktemp = $null, %nick == $null
    while %i <= %end {
      if $len(%nicktemp) <= 400 { 
        %nick = $hget(greedhsh,%i).item
        if %nick ison #sohbet && $count($nick(%nick,#sohbet).pnick,@,&,~,.,%) == 0 {
          %nicktemp = $addtok(%nicktemp,%nick,44) 
        }
        if %nick  { hdel greedhsh %nick }
      }
      else { msg #sohbet %nickemp hoş geldiniz | %nicktemp = $null }
      inc %i 1
    }
    if %nicktemp { msg #sohbet %nicktemp hoş geldiniz }
  }
  else {
    if $timer(greeddelay) {
      if !$hget(greedhsh,$1) { hadd -m greedhsh $1 $ctime }
    }
    else {  
      ;belki timer dış güçler tarafından kapatılmıştır :D, hash kontrolü
      if !$hget(greedhsh,$1) { hadd -m greedhsh $1 $ctime }
      .timergreeddelay 1 3 /kntrl -t 
    }
  }

şimdi dene birde

RapStar · 25 Temmuz 2008, 09:35

Tüm Kanallara Nasıl Uygularız?

CesuryureK · 25 Temmuz 2008, 10:07

RapStar Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Tüm Kanallara Nasıl Uygularız?

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


on !*:join:#: { kntrl $nick }
alias kntrl {
if $1 == -t {
if $me !ison # { halt }
var %i = 1, %end = $hget(greedhsh,0).item, %nicktemp = $null, %nick == $null
while %i <= %end {
if $len(%nicktemp) <= 400 { 
%nick = $hget(greedhsh,%i).item
if %nick ison # && $count($nick(%nick,#).pnick,@,&,~,.,%) == 0 {
%nicktemp = $addtok(%nicktemp,%nick,44) 
}
if %nick { hdel greedhsh %nick }
}
else { msg # %nickemp hoş geldiniz | %nicktemp = $null }
inc %i 1
}
if %nicktemp { msg # %nicktemp hoş geldiniz }
}
else {
if $timer(greeddelay) {
if !$hget(greedhsh,$1) { hadd -m greedhsh $1 $ctime }
}
else { 
;belki timer dış güçler tarafından kapatılmıştır :D, hash kontrolü
if !$hget(greedhsh,$1) { hadd -m greedhsh $1 $ctime }
.timergreeddelay 1 3 /kntrl -t 
}
}

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Ask Mesaji YakaLatti	Angel	Haber Arşivi	0	17 Mart 2009 13:57
op mesaji	sondemdeyim	mIRC Scripting Sorunları	3	28 Nisan 2008 09:12
Op Mesaji	MoRtaL_	mIRC Scripting Sorunları	8	24 Ağustos 2007 17:36
SonDakika Mesaji	BunaLim	mIRC Scripting Sorunları	8	29 Nisan 2006 01:39

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.