- Konum
- ىαкαяyλ
-
- Üyelik Tarihi
- 27 Kas 2009
-
- Mesajlar
- 24,083
-
- MFC Puanı
- 339
Nick ileti Geçmisi kodu
bu hazır kodumuzda bir nickin herhangi bir kanalda ne yazdıgını görebilirsiniz.
Örnek olarak mesela bir hatunun neler yazdıgını merak ediyorsunuz onu farketmeden önce uzun uzun ugraşmak yerine çok basit bir komut kullanarak görebiliyorsunuz.
Komut: /userh #kanal Ayşe
Kod:
alias userh {
if (!$regex($1,^#+) || !$2) { echo $color(info text) -e * /userh: Hatal? kullan?m: /userh <#channel> | returnex }
var %1 = 1,%2 = $line($1,0), $&
%n = $regsubex($2,/(\\\\\\\\[|\\\\\\\\]|\\\\\\\\^|\\\\\\\\||\\\\\\\\\\\\\\\\)/g,$+(\\\\\\\\,\\\\\\\\1)\\\\\\\\s) | while (%1 <= %2) {
if ($regex($gettok($line($1,%1),1,32),$+()) || $regex($gettok($line($1,%1),2,32),$+())) {
inc %c $len($line($1,%1)) | inc %cc | win $1 $2 $line($1,%1)
}
inc %1
}
if ($window(@-)) { aline @- | aline @- Toplam gönderdi?i sat?r: %cc Toplam karakter: %c | unset %c %cc | return }
echo $color(info text) -ate $1 kanal?nda, $2 rumuzu için konu?ma kayd? bulunamad?.
}
alias -l win if (!$window(@-)) { window -aCdlk0 +l @- | aline @- $2 rumuzunun $1 kanal?ndaki konu?ma kayd?: | aline @- | titlebar @- $2 konu?ma kayd?. } | aline -p @- $3-
bu hazır kodumuzda bir nickin herhangi bir kanalda ne yazdıgını görebilirsiniz.
Örnek olarak mesela bir hatunun neler yazdıgını merak ediyorsunuz onu farketmeden önce uzun uzun ugraşmak yerine çok basit bir komut kullanarak görebiliyorsunuz.
Komut: /userh #kanal Ayşe
Kod:
alias userh {
if (!$regex($1,^#+) || !$2) { echo $color(info text) -e * /userh: Hatal? kullan?m: /userh <#channel> | returnex }
var %1 = 1,%2 = $line($1,0), $&
%n = $regsubex($2,/(\\\\\\\\[|\\\\\\\\]|\\\\\\\\^|\\\\\\\\||\\\\\\\\\\\\\\\\)/g,$+(\\\\\\\\,\\\\\\\\1)\\\\\\\\s) | while (%1 <= %2) {
if ($regex($gettok($line($1,%1),1,32),$+()) || $regex($gettok($line($1,%1),2,32),$+())) {
inc %c $len($line($1,%1)) | inc %cc | win $1 $2 $line($1,%1)
}
inc %1
}
if ($window(@-)) { aline @- | aline @- Toplam gönderdi?i sat?r: %cc Toplam karakter: %c | unset %c %cc | return }
echo $color(info text) -ate $1 kanal?nda, $2 rumuzu için konu?ma kayd? bulunamad?.
}
alias -l win if (!$window(@-)) { window -aCdlk0 +l @- | aline @- $2 rumuzunun $1 kanal?ndaki konu?ma kayd?: | aline @- | titlebar @- $2 konu?ma kayd?. } | aline -p @- $3-