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

1Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 24 Ocak 2010, 16:52   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
mIRC Script Log sistem.




Script icin güzel bi log'lama
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Farklı pencerede tıklayıp aktif görebiliyorsunuz "kanal & nick " logları script üzerinde.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias kayitgosterici.mo { var %s = $$input($nopath($longfn($1-) dosyasi icinde aramak istediginizi yaziniz: ),eq,Arama) if ($window(@LogArama)) { clear @LogArama } window -k0z @LogArama var %t = $ticks kte_echo @LogArama $parantez($nopath($longfn($1-))) dosyasinda $parantez(%s) icin arama yapildi $+ ... echo @LogArama  filter -fwbp $1- @LogArama $+(*,%s,*) echo @LogArama  kte_echo @LogArama $nopath($longfn($1-)) dosyasinda arnan $+(',%s,',) ile ilgili $parantez($filtered) sonuc $round($calc(($ticks - %t) / 1000),2) saniyede bulundu. } alias kayitgosterici { if ($window(@LogGosterici)) { close -@ @LogGosterici } window -k0l16zS @LogGosterici echo @LogGosterici $logdir icinde $parantez($nopath($findfile($logdir,*.log,0,kayit.yukle $1-))) log dosyasi bulundu. if ($isfile($1-)) { if ($lines($1-) > 64000) { if ($input(Bu log mIRC $+ $chr(44) ile gosterilebilmesi icin fazla buyuk. Bu logu not defteri ile birlikte acmak ister misiniz?,wy)) { run $1- } halt } set %kayitgosterici.aktifkayit $shortfn($1-) loadbuf -pr @LogGosterici $1- titlebar @LogGosterici - $nopath($mid($left($1-,-1),2)) } } alias kayitgosterici.yenile { if ($window(@LogGosterici)) { clear -l @LogGosterici clear @LogGosterici .echo -q $nopath($findfile($logdir,*.log,0,kayit.yukle $1-)) if ($1 != -c) { if (%kayitgosterici.aktifkayit) { loadbuf -pr @LogGosterici %kayitgosterici.aktifkayit } else { echo @LogGosterici Loglar yenilendi... } } } } alias kayitfilter { filter -fwbp $1 @LogArama $+(*,$2-,*) inc %kayitaaranan2 if ($filtered) { echo @LogArama $filtered sonuc $parantez($longfn($1)) dosyasinda bulundu... echo @LogArama  inc %kayitabulunan $filtered } rline @LogArama 1 $deltok($line(@LogArama,1),-1,32) $int($calc(%kayitaaranan2 / %kayitaaranan *100)) $+ % } alias kayitmod.aktif { if ($dialog(lsetmode)) { did -e $ifmatch 21 } } alias kayit.yukle { if (#* iswm $nopath($1-)) { aline -l @LogGosterici  $+ $remove($1-,$logdir) } else { aline -l @LogGosterici $remove($1-,$logdir) } } menu @LogArama { $style(2) $+([,$active,]):x - Sonuclari Kaydet { var %x = $$sfile(c:\*.log,Bu arama sonuclarini nereye kaydetmek istersiniz?,Kaydet) write -c %x savebuf $active %x } - Kapat:close -@ $active } menu @LogGosterici { dclick { var %f = $shortfn($+($logdir,$strip($line(@LogGosterici,$1-,1)))) if ($lines(%f) > 64000) { if ($input(Bu log mIRC $+ $chr(44) ile gosterilebilmesi icin fazla buyuk. Bu logu not defteri ile birlikte acmak ister misiniz?,wy,Log Fazla Buyuk)) { run %f } halt } set %kayitgosterici.aktifkayit %f loadbuf -pr @LogGosterici %f titlebar @LogGosterici - $strip($line(@LogGosterici,$1-,1)) } - Ara .Tum Loglarda { set %kayitabulunan 0 set %kayitaaranan $findfile($logdir,*.log,0) set %kayitaaranan2 0 var %s = $$input(Eger buyuk log dosyalarina sahipseniz arama islemi uzun zaman alacaktir. Devam etmek istiyorsaniz $+ $chr(44) aramak istediginizi kutuya yazin.,eq,Arama) if ($window(@LogArama)) { clear @LogArama } window -k0z @LogArama var %t = $ticks echo @LogArama $+(',%s,' icin arama yapiliyor...) 0% echo @LogArama $findfile($logdir,*.log,0,kayitfilter $1 %s).shortfn log dosyasinda $+(',%s,' arandi.) Toplam $parantez(%kayitabulunan) sonuc $round($calc(($ticks - %t) / 1000),2) saniyede bulundu. unset %kayitabulunan %kayitaaranan %kayitaaranan2 } .$iif($mouse.lb,$strip($1)):kayitgosterici.mo $shortfn($+($logdir,$strip($1))) .$iif(!$mouse.lb,$nopath(%kayitgosterici.aktifkayit)):kayitgosterici.mo %kayitgosterici.aktifkayit $iif($mouse.lb,HTML Olustur):crlog $shortfn($+($logdir,$strip($1))) $iif(!$mouse.lb,HTML Olustur):crlog %kayitgosterici.aktifkayit $iif($mouse.lb,Logu Goster) { var %f = $shortfn($+($logdir,$strip($1))) if ($lines(%f) > 64000) { if ($input(Bu log mIRC $+ $chr(44) ile gosterilebilmesi icin fazla buyuk. Bu logu not defteri ile birlikte acmak ister misiniz?,wy,Log Fazla Buyuk)) { run %f halt } else { halt } } set %kayitgosterici.aktifkayit %f loadbuf -pr @LogGosterici %f titlebar @LogGosterici - $strip($1-) } $iif(!$mouse.lb && %kayitgosterici.aktifkayit,Not Defteriyle Ac):run %kayitgosterici.aktifkayit Log Dizinini Ac:run $+(",$logdir,") - Sil .Tum Loglari { if ($input(Butun loglarinizi silmek istediginizden emin misiniz?,wy)) { clear @LogGosterici clear -l @LogGosterici echo @LogGosterici Loglar siliniyor... .echo -q $findfile($logdir,*.log,0,.remove $1-).shortfn clear @LogGosterici echo @LogGosterici Butun log dosyalariniz basariyla silindi. titlebar @LogGosterici - acik log yok } } .Aktif logu { if ($1 == $null) { clear @LogGosterici echo @LogGosterici Lutfen ilk once silmek istediginiz logu listeden secin. halt } var %t = $sline(@LogGosterici,0) if ($input( $+ $$1 loguni silmek istediginizden emin misiniz? Not: Log su anda kullanimdaysa silinmeyebilir.,wy)) { unset %kayitgosterici.aktifkayit var %i = $sline(@LogGosterici,0) while (%i >= 1) { if ($isfile($logdir $+ $strip($sline(@LogGosterici,%i)))) { .remove $+(",$logdir,$strip($sline(@LogGosterici,%i)),") } dline -l @LogGosterici $sline(@LogGosterici,%i).ln dec %i } clear @LogGosterici echo @LogGosterici $parantez(%t) log dosyas(lar)i basariyla silindi. } titlebar @LogGosterici - acik log yok } - Yenile:kayitgosterici.yenile Kapat:close -@ @LogGosterici } alias crlog { var %f = $shortfn($iif($1,$1-,$$sfile($logdir $+ *.log,Hangi log dosyasindan HTML dosyasi olusturmak istiyorsunuz?,Tamam))),%o = $shortfn($$sfile($+(c:\,$deltok($nopath(%f),-1,46),.htm),Bir cikis dosyasi secin,Olustur!)),%p = $ticks if ($isfile(%f)) { write -c %o dialog -m htmlolustur htmlolustur did -a htmlolustur 1 1 0 999 did -ra htmlolustur 2 Olusturuluyor... did -ra htmlolustur 3 Kaynak: did -ra htmlolustur 4 Satir: did -ra htmlolustur 5 Biten: did -ra htmlolustur 6 Kalan Sure: did -ra htmlolustur 7 $nopath($longfn(%f)) did -ra htmlolustur 8,9,10 ? window -h @htmlolustur var %i = 4,%b = 0,%tt = $lines(%f),%u = 0 aline @htmlolustur $+(<html><head><title>,$nopath($longfn(%f)),</title></head><style type="text/css"><!--) aline @htmlolustur body $chr(123) $+(background-color=",$hexcolor(back),"; font-family:",$window($active).font,"; font-size:",$window($active).fontsize,"; color=",$hexcolor(normal),") $chr(125) aline @htmlolustur - loadbuf 1-2001 @htmlolustur %f while (%u <= %tt) { rline @htmlolustur %i $+($replace($strip($line(@htmlolustur,%i)),<,&lt;,>,&gt;),<br>) if (%i == 2001) { var %i = 1 inc %b 2001 savebuf -a @htmlolustur %o loadbuf $+($calc(%b +1),-,$calc(%b +2001)) -r @htmlolustur %f continue } if (!$calc(%i % 100)) { did -a htmlolustur 1 %u 0 %tt did -ra htmlolustur 8 $+(%u,/,%tt) did -ra htmlolustur 9 $+($int($calc(%u / %tt *100)),%) if (%u > 5000) { did -ra htmlolustur 10 $duration($int($calc(($ticks - %p) / 1000 / %u * %tt - (($ticks - %p) / 1000)))) } } inc %i inc %u } aline @htmlolustur </html> savebuf -a @htmlolustur $+(",%o,") close -@ @htmlolustur dialog -c htmlolustur write -l3 $+(",%o,") --></style>• HTML log dosyasi tarafindan $tarih tarihinde $round($calc(($ticks - %p) / 1000),2) saniyede,<br>• $nopath($longfn(%f)) dosyasindan olusturuldu $parantez(Orijinal dosya %tt satir $+ $chr(44) $bytes($file(%f).size).suf),<br><br>) if ($input(HTML log dosyasi $round($calc(($ticks - %p) / 1000),2) $+(saniye icinde basariyla olusturuldu.,$crlf,$crlf,Dosya: ,$nopath(%o) $parantez($bytes($file(%o).size).suf),$crlf,Kaynak: ,$nopath(%f) $parantez($bytes($file(%f).size).suf),$crlf,Satir: ,%tt,$crlf,$crlf,Log dizini ',$longfn(%o),'.,$crlf,Simdi calistirmak ister misiniz?),iy,HTML logu)) { url -an %o } } else { errdialog Dosya cikis hatasi %f $+ ! } } dialog htmlolustur { size -1 -1 120 49 option dbu text "?",2,2 3 116 8,center text "",1,2 12 116 10 text "?",3,2 24 50 8,right text "?",4,2 32 50 8,right text "?",5,2 40 50 8,right text "?",6,2 48 50 8,right text "?",7,55 24 60 8 text "?",8,55 32 60 8 text "?",9,55 40 60 8 text "?",10,55 48 60 8 } on *:dialog:htmlolustur:init:0:{ mdx SetMircVersion $version mdx MarkDialog $dname $dialog($dname).hwnd mdx SetControlMDX $dname 1 ProgressBar smooth > script\mdx\ctl_gen.mdx mdx SetDialog $dname style dlgmodal did -i $dname 1 1 bgcolor $rgb(hilight) did -i $dname 1 1 barcolor $rgb(text) } on *:close:@LogGosterici:{ unset %kayitgosterici.aktifkayit } alias parantez { return ( $+ $1- $+ ) } menu channel,status { Ne dinliyorum?:song # - Log Gosterici:.kayitgosterici }


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 25 Ocak 2010, 11:24   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




Rica ederim , ekle bakalım.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

 
Alıntı ile Cevapla

Alt 26 Ocak 2010, 18:55   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




burdaki ne dinliyorumun bununla ne alakası var ve calışmıyor ne dinliyorum > SONG Yalnış komut.

 
Alıntı ile Cevapla

Alt 28 Ocak 2010, 11:02   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




Ne dinliyorum da birlikte calıstırabilir uyarlamak lazım. ama boşverin siz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Scriptinize ekleyin kanalda yada status te sağ tuş yaptıgınızda "Log gösterici" tıklamanız yeterlidir. Kanal ve Nick logları tam olarak görebilirsiniz. Iyi forumlar...

 
Alıntı ile Cevapla

Alt 09 Nisan 2010, 18:38   #5
Çevrimdışı
Cod
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




Bunu nereye kopyalayacaz
mdx SetControlMDX $dname 1 ProgressBar smooth > script\mdx\ctl_gen.mdx
Mdx dosyasimi gerekiyor ?

 
Alıntı ile Cevapla

Alt 09 Nisan 2010, 18:57   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




Kodları mIRC Script Editor'ünün Remote bölümüne atacaksın.

Ayrıca mDX.DLL ve ctl_gen.mdx dosyaları gerekmektedir.mDX.DLL ve Ctl_gen.mdx

dosyalarını mIRC.exe'nin bulunduğu klasörün script\mdx\ klasörüne atman gerekiyor.

Ayrıca şu alias'ı da bu kodların içine eklemen gerekiyor.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias mdx dll script\mdx\mdx.dll $1-


 
Alıntı ile Cevapla

Alt 27 Nisan 2010, 20:21   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




SaLTaNaT Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Script icin güzel bi log'lama
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Farklı pencerede tıklayıp aktif görebiliyorsunuz "kanal & nick " logları script üzerinde.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias kayitgosterici.mo { var %s = $$input($nopath($longfn($1-) dosyasi icinde aramak istediginizi yaziniz: ),eq,Arama) if ($window(@LogArama)) { clear @LogArama } window -k0z @LogArama var %t = $ticks kte_echo @LogArama $parantez($nopath($longfn($1-))) dosyasinda $parantez(%s) icin arama yapildi $+ ... echo @LogArama  filter -fwbp $1- @LogArama $+(*,%s,*) echo @LogArama  kte_echo @LogArama $nopath($longfn($1-)) dosyasinda arnan $+(',%s,',) ile ilgili $parantez($filtered) sonuc $round($calc(($ticks - %t) / 1000),2) saniyede bulundu. } alias kayitgosterici { if ($window(@LogGosterici)) { close -@ @LogGosterici } window -k0l16zS @LogGosterici echo @LogGosterici $logdir icinde $parantez($nopath($findfile($logdir,*.log,0,kayit.yukle $1-))) log dosyasi bulundu. if ($isfile($1-)) { if ($lines($1-) > 64000) { if ($input(Bu log mIRC $+ $chr(44) ile gosterilebilmesi icin fazla buyuk. Bu logu not defteri ile birlikte acmak ister misiniz?,wy)) { run $1- } halt } set %kayitgosterici.aktifkayit $shortfn($1-) loadbuf -pr @LogGosterici $1- titlebar @LogGosterici - $nopath($mid($left($1-,-1),2)) } } alias kayitgosterici.yenile { if ($window(@LogGosterici)) { clear -l @LogGosterici clear @LogGosterici .echo -q $nopath($findfile($logdir,*.log,0,kayit.yukle $1-)) if ($1 != -c) { if (%kayitgosterici.aktifkayit) { loadbuf -pr @LogGosterici %kayitgosterici.aktifkayit } else { echo @LogGosterici Loglar yenilendi... } } } } alias kayitfilter { filter -fwbp $1 @LogArama $+(*,$2-,*) inc %kayitaaranan2 if ($filtered) { echo @LogArama $filtered sonuc $parantez($longfn($1)) dosyasinda bulundu... echo @LogArama  inc %kayitabulunan $filtered } rline @LogArama 1 $deltok($line(@LogArama,1),-1,32) $int($calc(%kayitaaranan2 / %kayitaaranan *100)) $+ % } alias kayitmod.aktif { if ($dialog(lsetmode)) { did -e $ifmatch 21 } } alias kayit.yukle { if (#* iswm $nopath($1-)) { aline -l @LogGosterici  $+ $remove($1-,$logdir) } else { aline -l @LogGosterici $remove($1-,$logdir) } } menu @LogArama { $style(2) $+([,$active,]):x - Sonuclari Kaydet { var %x = $$sfile(c:\*.log,Bu arama sonuclarini nereye kaydetmek istersiniz?,Kaydet) write -c %x savebuf $active %x } - Kapat:close -@ $active } menu @LogGosterici { dclick { var %f = $shortfn($+($logdir,$strip($line(@LogGosterici,$1-,1)))) if ($lines(%f) > 64000) { if ($input(Bu log mIRC $+ $chr(44) ile gosterilebilmesi icin fazla buyuk. Bu logu not defteri ile birlikte acmak ister misiniz?,wy,Log Fazla Buyuk)) { run %f } halt } set %kayitgosterici.aktifkayit %f loadbuf -pr @LogGosterici %f titlebar @LogGosterici - $strip($line(@LogGosterici,$1-,1)) } - Ara .Tum Loglarda { set %kayitabulunan 0 set %kayitaaranan $findfile($logdir,*.log,0) set %kayitaaranan2 0 var %s = $$input(Eger buyuk log dosyalarina sahipseniz arama islemi uzun zaman alacaktir. Devam etmek istiyorsaniz $+ $chr(44) aramak istediginizi kutuya yazin.,eq,Arama) if ($window(@LogArama)) { clear @LogArama } window -k0z @LogArama var %t = $ticks echo @LogArama $+(',%s,' icin arama yapiliyor...) 0% echo @LogArama $findfile($logdir,*.log,0,kayitfilter $1 %s).shortfn log dosyasinda $+(',%s,' arandi.) Toplam $parantez(%kayitabulunan) sonuc $round($calc(($ticks - %t) / 1000),2) saniyede bulundu. unset %kayitabulunan %kayitaaranan %kayitaaranan2 } .$iif($mouse.lb,$strip($1)):kayitgosterici.mo $shortfn($+($logdir,$strip($1))) .$iif(!$mouse.lb,$nopath(%kayitgosterici.aktifkayit)):kayitgosterici.mo %kayitgosterici.aktifkayit $iif($mouse.lb,HTML Olustur):crlog $shortfn($+($logdir,$strip($1))) $iif(!$mouse.lb,HTML Olustur):crlog %kayitgosterici.aktifkayit $iif($mouse.lb,Logu Goster) { var %f = $shortfn($+($logdir,$strip($1))) if ($lines(%f) > 64000) { if ($input(Bu log mIRC $+ $chr(44) ile gosterilebilmesi icin fazla buyuk. Bu logu not defteri ile birlikte acmak ister misiniz?,wy,Log Fazla Buyuk)) { run %f halt } else { halt } } set %kayitgosterici.aktifkayit %f loadbuf -pr @LogGosterici %f titlebar @LogGosterici - $strip($1-) } $iif(!$mouse.lb && %kayitgosterici.aktifkayit,Not Defteriyle Ac):run %kayitgosterici.aktifkayit Log Dizinini Ac:run $+(",$logdir,") - Sil .Tum Loglari { if ($input(Butun loglarinizi silmek istediginizden emin misiniz?,wy)) { clear @LogGosterici clear -l @LogGosterici echo @LogGosterici Loglar siliniyor... .echo -q $findfile($logdir,*.log,0,.remove $1-).shortfn clear @LogGosterici echo @LogGosterici Butun log dosyalariniz basariyla silindi. titlebar @LogGosterici - acik log yok } } .Aktif logu { if ($1 == $null) { clear @LogGosterici echo @LogGosterici Lutfen ilk once silmek istediginiz logu listeden secin. halt } var %t = $sline(@LogGosterici,0) if ($input( $+ $$1 loguni silmek istediginizden emin misiniz? Not: Log su anda kullanimdaysa silinmeyebilir.,wy)) { unset %kayitgosterici.aktifkayit var %i = $sline(@LogGosterici,0) while (%i >= 1) { if ($isfile($logdir $+ $strip($sline(@LogGosterici,%i)))) { .remove $+(",$logdir,$strip($sline(@LogGosterici,%i)),") } dline -l @LogGosterici $sline(@LogGosterici,%i).ln dec %i } clear @LogGosterici echo @LogGosterici $parantez(%t) log dosyas(lar)i basariyla silindi. } titlebar @LogGosterici - acik log yok } - Yenile:kayitgosterici.yenile Kapat:close -@ @LogGosterici } alias crlog { var %f = $shortfn($iif($1,$1-,$$sfile($logdir $+ *.log,Hangi log dosyasindan HTML dosyasi olusturmak istiyorsunuz?,Tamam))),%o = $shortfn($$sfile($+(c:\,$deltok($nopath(%f),-1,46),.htm),Bir cikis dosyasi secin,Olustur!)),%p = $ticks if ($isfile(%f)) { write -c %o dialog -m htmlolustur htmlolustur did -a htmlolustur 1 1 0 999 did -ra htmlolustur 2 Olusturuluyor... did -ra htmlolustur 3 Kaynak: did -ra htmlolustur 4 Satir: did -ra htmlolustur 5 Biten: did -ra htmlolustur 6 Kalan Sure: did -ra htmlolustur 7 $nopath($longfn(%f)) did -ra htmlolustur 8,9,10 ? window -h @htmlolustur var %i = 4,%b = 0,%tt = $lines(%f),%u = 0 aline @htmlolustur $+(<html><head><title>,$nopath($longfn(%f)),</title></head><style type="text/css"><!--) aline @htmlolustur body $chr(123) $+(background-color=",$hexcolor(back),"; font-family:",$window($active).font,"; font-size:",$window($active).fontsize,"; color=",$hexcolor(normal),") $chr(125) aline @htmlolustur - loadbuf 1-2001 @htmlolustur %f while (%u <= %tt) { rline @htmlolustur %i $+($replace($strip($line(@htmlolustur,%i)),<,&lt;,>,&gt;),<br>) if (%i == 2001) { var %i = 1 inc %b 2001 savebuf -a @htmlolustur %o loadbuf $+($calc(%b +1),-,$calc(%b +2001)) -r @htmlolustur %f continue } if (!$calc(%i % 100)) { did -a htmlolustur 1 %u 0 %tt did -ra htmlolustur 8 $+(%u,/,%tt) did -ra htmlolustur 9 $+($int($calc(%u / %tt *100)),%) if (%u > 5000) { did -ra htmlolustur 10 $duration($int($calc(($ticks - %p) / 1000 / %u * %tt - (($ticks - %p) / 1000)))) } } inc %i inc %u } aline @htmlolustur </html> savebuf -a @htmlolustur $+(",%o,") close -@ @htmlolustur dialog -c htmlolustur write -l3 $+(",%o,") --></style>• HTML log dosyasi tarafindan $tarih tarihinde $round($calc(($ticks - %p) / 1000),2) saniyede,<br>• $nopath($longfn(%f)) dosyasindan olusturuldu $parantez(Orijinal dosya %tt satir $+ $chr(44) $bytes($file(%f).size).suf),<br><br>) if ($input(HTML log dosyasi $round($calc(($ticks - %p) / 1000),2) $+(saniye icinde basariyla olusturuldu.,$crlf,$crlf,Dosya: ,$nopath(%o) $parantez($bytes($file(%o).size).suf),$crlf,Kaynak: ,$nopath(%f) $parantez($bytes($file(%f).size).suf),$crlf,Satir: ,%tt,$crlf,$crlf,Log dizini ',$longfn(%o),'.,$crlf,Simdi calistirmak ister misiniz?),iy,HTML logu)) { url -an %o } } else { errdialog Dosya cikis hatasi %f $+ ! } } dialog htmlolustur { size -1 -1 120 49 option dbu text "?",2,2 3 116 8,center text "",1,2 12 116 10 text "?",3,2 24 50 8,right text "?",4,2 32 50 8,right text "?",5,2 40 50 8,right text "?",6,2 48 50 8,right text "?",7,55 24 60 8 text "?",8,55 32 60 8 text "?",9,55 40 60 8 text "?",10,55 48 60 8 } on *:dialog:htmlolustur:init:0:{ mdx SetMircVersion $version mdx MarkDialog $dname $dialog($dname).hwnd mdx SetControlMDX $dname 1 ProgressBar smooth > script\mdx\ctl_gen.mdx mdx SetDialog $dname style dlgmodal did -i $dname 1 1 bgcolor $rgb(hilight) did -i $dname 1 1 barcolor $rgb(text) } on *:close:@LogGosterici:{ unset %kayitgosterici.aktifkayit } alias parantez { return ( $+ $1- $+ ) } menu channel,status { Ne dinliyorum?:song # - Log Gosterici:.kayitgosterici }



Tam Aradigim Sey .. Ama Benim Scripte Olmiooo ..

Real Script 3.1
Version: 5.81


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 28 Nisan 2010, 15:25   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




arkadaşlar sürekli mircte log kaydı nası yapılıyo ya neyin acık olması saglanıyo söylermisiniz bunun için konu açmak istemedim devamında yazayım dedim bunu ekledim ama mircimin baglandıgımdan itibaren herşeyi loglamasını istiyorum nasıl olcak

 
Alıntı ile Cevapla

Alt 28 Nisan 2010, 22:14   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




script ingilizceyse alt+e yapıp IRC => LOGGİNG orda yukarda automatically log var ordan "BOTH" seceneğini seçip tamam diyosun eğer türkçe ise;
alt+e IRC=> LOG TUTUCU orda otomatik loglama var ordan "İKİSİDE" seçeneğini seçiyosun

 
Alıntı ile Cevapla

Alt 13 Ocak 2011, 10:05   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC Script Log sistem.




Güzel Bir Çalışma Olmuş Elinize Sağlık.

__________________
Bir ışık süzüldü Tanrı dağından,Tanrı dedi ki; Sana TÜRK dedim.. Git intikamanı al yarından..
 
Alıntı ile Cevapla

Cevapla

Etiketler
log, mirc, mirc download, mirc indir, script, sistem


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
mIRCim Script - Mirc, Mirc Sohbet, Mirc Yükle Kafkas_Kartali mIRC Scripting Tanıtımları 0 20 Mayıs 2009 23:08