IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Onlîne Kánal/Ozel log'u? (https://www.ircforumlari.net/mirc-scripting-sorunlari/39950-online-kanal-ozel-logu.html)

SuNSeT 25 Ekim 2007 13:48
Onlîne Kánal/Ozel log'u?
 
Merabalar, Ben şöyle bir code yapicaktim ama yapamadim.

Sorunum şu; mesela #a kanalındayız yada farketmez herhangi bir kanal o kanalda sag click yaptigimizda log Popups'u olucak buna tıkladigimizda kanal ve özel olmak üzeri 2 kutu acilcak yani;


Loglar:-> #a kanal logu
..........-> Ozel log

Şu şekilde , yani hangi kanalda olursam olayim sag tıklayıp loglar dedigimde oradan o anki kanal logu dedigimde o kanal log'unu görmeyi istiyorum.
Mutlaka o kanal log'undan bir tane olmicaktir, bütün log'lari bir dosyada toplanabilirse iyi olur diye düşündüm.
--
Ozel log, click yaptıgımda ise Log'unu okumak istediginiz Nick'i belirtiniz diyerek pencere acmak ve o pencereye log'unu okuamak istedigim nick'i yazarak dosya icinde log'larini okumak, Vede Diyelim b3ytullah nickini girdi elseif kullanarak galiba "b3ytullah" nicki bulunamadi;
"B ile başlayan loglar;"
Bariş
bensu
birden
boşluk

Diye online pencereye echo atmasini istiyorum. Acaba bu söylediklerimi yapmak mümkünmüdür..

Benim yaptigim code;

Kod:
Loglar
.kanal log: /Run C:\b3ytullah mIRC\logs\ $+ $actife $+ \ | /play $active
.Ozel log: $$?="Log'unu okumak istediginiz Nick'i belirtiniz:" %nick | /Run C:\b3ytullah mIRC\logs\ $+ %nick
yardımlarinizi bekliyorum kolay gelsin..

L4roXyL 25 Ekim 2007 20:08
Cevap: Onlîne Kánal/Ozel log'u?
 
Bunun için bayağı bir işlev yapmalısın.
Temel olarak, $findfile identifier'ını kullanıcaksın.
Yani şöyle oluyor;

Kod:
menu channel {
  Loglar menüsü
  .# logu:kanal #
  .Özel logları:falan $$?="Log'unu okumak istediginiz nick'i giriniz:"
}
alias falan {
  if $findfile($logdir,$+($1,*),0) >= 1 {
    var %1 = $v1
    $iif($input(Aradığınız nick için %1 adet veri bulundu açmak istiyormusunuz?,w) == $false,halt)
    var %2 = 1,%3 = $findfile($logdir,$+($1,*),0)
    while %2 <= %3 { run $findfile($logdir,$+($1,*),%2) | inc %2 }
  }
  else {
    var %/ = $1,%½ = $left($1,1)
    $iif($input(Aradığınız %/ nick'i için uygun kayıt bulunamadı. %½ harfi ile başlıyan loglar listelensinmi?,w) == $false,halt)
    echo -at $left($1,1) ile başlıyan loglar sıralanıyor.
    echo -at $findfile($logdir,$+($left($1,1),*),0,echo -at $gettok($1-,$numtok($1-,92),92))
  }
}
alias kanal {
  if $findfile($logdir,$+($1,*),0) >= 1 {
    var %1 = $v1, %% = $1
    $iif($input(Aradığınız %% kanal'ı için %1 adet veri bulundu açmak istiyormusunuz?,w) == $false,halt)
    var %2 = 1,%3 = $findfile($logdir,$+($1,*),0)
    while %2 <= %3 { run $findfile($logdir,$+($1,*),%2) |  inc %2 }
  }
  else {  var %& = $1 | $input(%& kanal'ı için herhangi bir kayıt bulunamadı,ohud,UYARI,) }
}
Buradaki $logdir identifier'ı, logların depolandığı klasör ismini verir.
Yani yazdığın nick'i o klasör'de arıyacaktır.
İşini görür.

SuNSeT 25 Ekim 2007 20:34
Cevap: Onlîne Kánal/Ozel log'u?
 
Tşkler L4roXyL. Ama codeyi caliştiramadım mIRC'ime ekledim sag click Log okuyucu dedim kasti, hata verip kapandi mIRC. Bu loglarin cok olmasindan olabilirmi?

L4roXyL 25 Ekim 2007 21:09
Cevap: Onlîne Kánal/Ozel log'u?
 
Kod sorunsuz çalışmakta.
Logların çok olması derken 1000'i aşkın bir log var ise, evet biraz kasabilir.

SuNSeT 26 Ekim 2007 14:03
Cevap: Onlîne Kánal/Ozel log'u?
 
Hımm anladım, Loglarimda fazla değilmiş sadece "5391" ;)

SuNSeT 06 Ocak 2008 20:45
Cevap: Onlîne Kánal/Ozel log'u?
 
selamlar, Ayri bir konu acmak istemedim , burdaki code ile farkli bir sorun; Şimdi burda L4roXyL'nin verdigi code güzel calişiyor yalniz şunâ şöyle bir eklenti yapabilirmiyiz;

Kod:
dialog Logs {
  title "Logs."
  size -1 -1 156 134
  option dbu
  box "Loglar menüsü", 1, 6 14 147 117
  list 2, 14 34 74 88, size
  text "Loglar;", 3, 15 24 73 8
  button "Ac", 4, 99 34 51 12
  button "Sil", 5, 100 52 50 12
  button "TAMAM", 6, 99 87 51 12
}
Sadece Diaglog'u yaptım kendi capimda(: kodlari yapamadim pek bilgim yok, o list bôlumune loglar gelicek(sıralanıcak) yandaki butonlarla ac & sil işlemleriyle log'u oradan acip silebilecek tamam ilede kapaticak dialog'u -c xD, birde buna mesela; xXx.net serverindeyim o server'deki mirc kanalindayim, -> #mirc logu dedigimde sadece xXx.net serverine ayit #mirc kanal loglarını listelemesini istiyorum, Diger serverler'e ayit #mirc kanal loglarini vermesini istemiyorum, Bunu yapabilirmiyiz Acaba?

Birde Cok kasiyor, mesela ilk defa girdigim bir kanal /join #hubbele , o kanal'in logunu isterken cok kasiyor, bunada bir carê varmidir acabà..

yardimlarinizi bekliyorum, kolay gelsin..

L4roXyL 06 Ocak 2008 21:58
Cevap: Onlîne Kánal/Ozel log'u?
 
Dialog için;

Kod:

on *:dialog:logs:init:*: { return $findfile($logdir,*,0,did -a $dname 2 $nopath($1-)) }
on *:dialog:logs:sclick:*: {
  if $did == 4 { kntrl | run $findfile($logdir,$+(*,$did($dname,2).seltext),1) }
  if $did == 5 { kntrl | remove -b $shortfn($findfile($logdir,$+(*,$did($dname,2).seltext),1)) | did -d $dname 2 $did($dname,2).sel }
  if $did == 6 { dialog -x logs logs }
}
alias kntrl if !$did(logs,2).sel { $iif($input(listeden veri seçmedin.,ohud,Uyarı) == $true,halt,halt) | halt | else return $true }
Da diğer dediklerini anlamadım, dialog'da senin dediğin gibi özellikler yok.
Yani #mIRC kanalı nereye diyeceksin?
Bunları açıkla.

SuNSeT 06 Ocak 2008 22:26
Cevap: Onlîne Kánal/Ozel log'u?
 
ôrnegin; irc.ircforumlari.net / #Help kanalindayim.
ben ircforumlari.net serverinde / #Help kanalinda sag click yapip #Help kanali log'unu göster dedim'mi sadecè ircforumlari.net / #Help kanalinà ozel loglari göstersin, yani buna , irc.if.net'in / #Help kanali loglari cıkmasin list'de anlatabildim umarim.

L4roXyL 06 Ocak 2008 23:13
Cevap: Onlîne Kánal/Ozel log'u?
 
menu channel {
# kanal log'u:bak # $gettok($server,2-,46)
}
alias bak { if ($findfile($logdir,$+($1,.,$2,*),0) == 0) $iif($input($1 kanal' için log bulunamadı.,ohud,uyarı) == $true,halt,halt) | run $findfile($logdir,$+($1,.,$2,*),1) }

Şeklinde yapabilirsin.

SuNSeT 07 Ocak 2008 02:21
Cevap: Onlîne Kánal/Ozel log'u?
 
Şimdi bu kod ile, yukardaki kod'u birleştiricemde nasil olucak, + bu cıkan loglar diaglod'daki boşlukda cıkıcak o dialog'u onun icin istedim yapabilirmiyiz.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 06:32.
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net