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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - online takip (https://www.ircforumlari.net/mirc-scripting-sorunlari/166017-online-takip.html)

Cevap: online takip

Alıntı:

Difuzyon Nickli Üyeden Alıntı (Mesaj 605558)

Kod:

on *:text:*:#zurna@: {

  if ($1 == !ekle) { if (!$2) { return } 

    if ($2 == $me) { .msg # Beni takip listesine alamazsın $nick $+ :) | return } 

    if ($ini(takip.ini,$2)) { .msg #  $+ $2  nicki zaten listede ekli durumda. | return }

    else { 

      writeini -n takip.ini $2 Pazartesi 0

      writeini -n takip.ini $2 Salı 0 

      writeini -n takip.ini $2 Çarşamba 0 

      writeini -n takip.ini $2 Perşembe 0

      writeini -n takip.ini $2 Cuma 0

      writeini -n takip.ini $2 Cumartesi 0

      writeini -n takip.ini $2 Pazar 0

      .auser takip $2 

      .msg #  $+ $2  nicki online listesine eklenmiştir.

      if ($2 ison #zurna) { $+(.timertakip,$2) 0 1 inc -e $+(%,$2) }

    }

  }

  if ($1 == !sil) {

    if (!$2) { return } 

    if (!$ini(takip.ini,$2)) { .msg # $2 Listede ekli değil | return } 

    else { .remini takip.ini $2 | .ruser takip $2 | .msg # $2 Listeden silindi.

      if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$2) }

    }

  }

  if ($1 == !onlines) {

    if (!$2) { return } 

    if (!$ini(takip.ini,$2)) { .msg # $2 Listede ekli değil | return } 

    kayit $2 

    .msg # 4 $str(-,10) $2 nicki için takip listesi $str(-,10) 

    .play $+(-t,$2) # takip.ini 100 

    $+(.timerlist,$2) 1 1 .msg # 4 $str(-,10) Listenin sonu $str(-,10)

  }

}

on takip:join:#zurna: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$nick) }

on takip:part:#zurna:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $nick } }

on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $nick } }

alias kayit { .remini takip.ini $1 $gün | writeini -n takip.ini $1 $gün $replace($duration($($+(%,$1),2)),mins,Dakika,hrs,Saat,secs,Saniye,min,Dakika,hr,Saat,sec,Saniye,day,Gün,days,Gün) }

alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,sunday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday,Cumartesi,tuesday,Salı,thursday,Perşembe) }

#zurna@ kanalında yapılacak olan işlemler.

!ekle Nick
Nick'i takip listesine ekler(takip:Nick)
mIRC ana klasöründe takip.ini isimli dosyada Nick'e ait haftalık şablon açar.
O anda #zurna kanalında ise takip işlemini hemen başlatır,değilse artık #zurna kanalına girdiği anda başlayacaktır.#zurna kanalında Part yaptığı zaman veya sunucudan çıktığı anda zamanlayıcı duracaktır.

!sil Nick
Nicki takip listesinden siler(takip:Nick)
takip.ini dosyasından kaydını siler.

!onlines Nick

<Bot> ---------- Difuzyon nicki için takip listesi ----------
<Bot> Pazartesi=0
<Bot> Salı=2saat 13Dakika
<Bot> Çarşamba=6saat 21Dakika
<Bot> Perşembe=38Dakika
<Bot> Cuma=1Dakika
<Bot> Cumartesi=41Saniye
<Bot> Pazar=0
<Bot> ---------- Listenin sonu ----------

Elimde var olan kodu belirttiğin kanallara göre yazdım.
İşine yaraması dileğiyle.

İyi forumlar...

bu kod u sadece sniper ahmet ve mehmet nickleri kullana bilsin ona bi baka bilirmiyiz :)

Cevap: online takip

on *:text:*:#zurna@: {
if !$istok(sniper ahmet mehmet,$nick,32) { return }
kodun devamı....

Cevap: online takip

Difuzyon üstat dediğin şekilde çalışmıyor

on *:text:*:#zurna@: {
if !$istok(sniper ahmet mehmet,$nick,32) {
if ($1 == !ekle) { if (!$2) { return }

kod

ve en sonuna bir
}

daha koyup mu olcaktı bi bakarmısın
________________________________
mckuruger e triva botunu kullandığım için tşk ederim emeğine sağlık hiç tanımasamda kendisini :D emeğine sağlık ;araba

Cevap: online takip

Kod:

 

on *:text:*:#zurna@: { 

if !$istok(sniper ahmet mehmet,$nick,32) { return }

  if ($1 == !ekle) { if (!$2) { return } 

    if ($2 == $me) { .msg # Beni takip listesine alamazsın $nick $+ :) | return } 

    if ($ini(takip.ini,$2)) { .msg #  $+ $2  nicki zaten listede ekli durumda. | return }

    else { 

      writeini -n takip.ini $2 Pazartesi 0

      writeini -n takip.ini $2 Salı 0 

      writeini -n takip.ini $2 Çarşamba 0 

      writeini -n takip.ini $2 Perşembe 0

      writeini -n takip.ini $2 Cuma 0

      writeini -n takip.ini $2 Cumartesi 0

      writeini -n takip.ini $2 Pazar 0

      .auser takip $2 

      .msg #  $+ $2  nicki online listesine eklenmiştir.

      if ($2 ison #zurna) { $+(.timertakip,$2) 0 1 inc -e $+(%,$2) }

    }

  }

  if ($1 == !sil) {

    if (!$2) { return } 

    if (!$ini(takip.ini,$2)) { .msg # $2 Listede ekli değil | return } 

    else { .remini takip.ini $2 | .ruser takip $2 | .msg # $2 Listeden silindi.

      if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$2) }

    }

  }

  if ($1 == !onlines) {

    if (!$2) { return } 

    if (!$ini(takip.ini,$2)) { .msg # $2 Listede ekli değil | return } 

    kayit $2 

    .msg # 4 $str(-,10) $2 nicki için takip listesi $str(-,10) 

    .play $+(-t,$2) # takip.ini 100 

    $+(.timerlist,$2) 1 1 .msg # 4 $str(-,10) Listenin sonu $str(-,10)

  }

}

on takip:join:#zurna: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$nick) }

on takip:part:#zurna:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $nick } }

on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $nick } }

alias kayit { .remini takip.ini $1 $gün | writeini -n takip.ini $1 $gün $replace($duration($($+(%,$1),2)),mins,Dakika,hrs,Saat,secs,Saniye,min,Dakika,hr,Saat,sec,Saniye,day,Gün,days,Gün) }

alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,sunday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday,Cumartesi,tuesday,Salı,thursday,Perşembe) }

Cevap: online takip

valla denedim bu kod çalışıyor fakat böyle hata veriyor

* /writeini: Yetersiz veya eksik parametre (Satır 38, script.ini)

ve [ nickli kişileri eklemiyor tkaip listesine sanırım bir kontrol ederseniz minnattar olurum.

Cevap: online takip

* /writeini: Yetersiz veya eksik parametre (Satır 38, script.ini)

takip.ini dosyasını mIRC ana klasöründe açmalı.Sanırım senin scriptin .ini uzantılı dosyayı mIRC ana klasöründe açmıyor veya başka bir klasörün içinde açıyor?
mIRC ana klasöründe takip.ini isimli dosya açıp tüm verileri yeniden girmeyi dene bakalım,sonuç vercekmi..
Kullandığım script mIRC 6,33 herhangi bir sorun yaşamıyorum bu kodda.

Cevap: online takip

[~~~sakar~~~]
Pazartesi=0
Salı=0
Çarşamba=0
Perşembe=0
Cuma=0
Cumartesi=0
Pazar=3Dakika 48Saniye
[Constantin]
Pazartesi=0
Salı=0
Çarşamba=0
Perşembe=0
Cuma=0
Cumartesi=0
Pazar=7Dakika 9Saniye
[~~samsunlu~~]
Pazartesi=0
Salı=0
Çarşamba=0
Perşembe=0
Cuma=0
Cumartesi=0

[[[sakar]]]
ve
[[samsunlu]]

eklediğim nickler takip ini açılıyor içeriisnde bunlar yazıyor fakat !onlines nick diyorum vermiyor [[[ lardan dolayı olabilirmi normal nicklerde o hata çıkıyor ama kod yine çalışıyor kullandığım 6.17 düz mirc

Cevap: online takip

Evet sniper [[nick]] karakterlerini ~~nick~~ olarak algılıyor.Başlığın içerisine bu şekilde kayıt yaptığı için,son online zamanını "kayit $nick" kısmından yazdıramıyor.Sorunu iyi yakalamışsın :)
Bak öylesi bir karakterin .ini dosyasına takılacağı hiç aklıma gelmemişti.

Kod:

on *:text:*:#zurna@: { 

if !$istok(sniper ahmet mehmet,$nick,32) { return }

if ($1 == !ekle) { if (!$2) { return } 

if ($2 == $me) { .msg # Beni takip listesine alamazsın $nick $+ :) | return } 

if ($ini(takip.ini,$replace($2,[,~,],~))) { .msg #  $+ $2  nicki zaten listede ekli durumda. | return }

else { 

writeini -n takip.ini $replace($2,[,~,],~) Pazartesi 0

writeini -n takip.ini $replace($2,[,~,],~) Salı 0 

writeini -n takip.ini $replace($2,[,~,],~) Çarşamba 0 

writeini -n takip.ini $replace($2,[,~,],~) Perşembe 0

writeini -n takip.ini $replace($2,[,~,],~) Cuma 0

writeini -n takip.ini $replace($2,[,~,],~) Cumartesi 0

writeini -n takip.ini $replace($2,[,~,],~) Pazar 0

.auser takip $2 

.msg #  $+ $2  nicki online listesine eklenmiştir.

if ($2 ison #zurna) { $+(.timertakip,$2) 0 1 inc -e $+(%,$replace($2,[,~,],~)) }

}

}

if ($1 == !sil) {

if (!$2) { return } 

if (!$ini(takip.ini,$replace($2,[,~,],~))) { .msg # $2 Listede ekli değil | return } 

else { .remini takip.ini $replace($2,[,~,],~) | .ruser takip $2 | .msg # $2 Listeden silindi.

if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$replace($2,[,~,],~)) }

}

}

if ($1 == !onlines) {

if (!$2) { return } 

if (!$ini(takip.ini,$replace($2,[,~,],~))) { .msg # $2 Listede ekli değil | return } 

kayit $replace($2,[,~,],~) 

.msg # 4 $str(-,10) $2 nicki için takip listesi $str(-,10) 

.play $+(-t,$replace($2,[,~,],~)) # takip.ini 100 

$+(.timerlist,$2) 1 1 .msg # 4 $str(-,10) Listenin sonu $str(-,10)

}

}

on takip:join:#zurna: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) }

on takip:part:#zurna:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }

on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }

alias kayit { .remini takip.ini $1 $gün | writeini -n takip.ini $1 $gün $replace($duration($($+(%,$1),2)),mins,Dakika,hrs,Saat,secs,Saniye,min,Dakika,hr,Saat,sec,Saniye,day,Gün,days,Gün) }

alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,sunday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday,Cumartesi,tuesday,Salı,thursday,Perşembe) }

Nickinin içinde [ , ] karakterlerinin yerine ~ karakterini $replace etmiş olduk.Bu haliyle hata vermiyor,yine sorun çıkarsa bilgilendirmenizi rica ederim.

İyi forumlar...

Cevap: online takip

ben tşk Difuzyon [ } gibi nickleri ekliyo listeye bakılıyo ve herhangi bir sorun yok fakat şu uyarıyı hala veriyor önemli değil ama not geçmek istedim.

* /writeini: Yetersiz veya eksik parametre (Satır 38, script.ini)

Cevap: online takip

Takip.ini dosyasını komple sil.
takip:Nick 'leride kullanıcı listesinden sil.
%Nick 124 ,işleyen verileri de sil.
/timers off , zamanların hepsini kapayıp en son verdiğim kodu ekleyip sıfırdan bi başlatırmısın,rica etsem.Sanırım halen çalışan bir %[[nick]] var...Haber bekliyorum