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

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/)
-   -   mirc versiyonundan kaynaklanan kodlama hatasi (https://www.ircforumlari.net/mirc-scripting-sorunlari/1443-mirc-versiyonundan-kaynaklanan-kodlama-hatasi.html)

Flyman 26 Şubat 2005 03:25

mirc versiyonundan kaynaklanan kodlama hatasi
 
su asagidaki kodu mirc versiyon 6.01 e kurulu bir scripten almaya calistim fakat 6.16 mircte sadece pencere aciliyor fakat yapmasi gereken islevi gormuyor bu kodda 6.16 versiyona uymayan bir seymi var anliyamadim bunu 6.16 versiyoan uyarliyabilirmiyiz bu kodlamanin yaptigi islem bir nickin kanaldaki yazdigi tum text mesajlarini bir oencerede toplamasi nickin ustune tiklayip goster deyince uyguluyor ama 6.16 da calistiramadim ilgilenen olursa sevinirim


history {
if ($3 != 0) { var %c = 0 } | else { var %c = -123456 }
window -alC +n @History 200 200 315 150 Ms sans serif 10
aline @History 1-----------------------------14-15-0-[ 15History: $+ $2 0 ]-15-14-1-----------
var %i = $line($1,0)
var %hist = $2
while (%i > 0) {
var %t = $strip($line($1,[ %i ]))
var %n1 = $strip(%theme.msg.nick %hist %theme.2)
var %s = $strip(%hist $+ %theme.txt.2)
var %slen = $len($strip(%theme.txt.1 $+ %hist $+ %theme.txt.2))
if (%s isin $left(%t,%slen)) { aline -p @History $replace(%theme.txt.1,$chr(255),$chr(32)) $+  $+ %theme.couleur.autres $+ %hist $+ %theme.txt.2 %theme.couleur.say $+ $mid(%t,$calc(%slen + 2)) | inc %c }
if (($right(%t,$len($strip(%n1))) = $strip(%n1)) && ($left(%t,$len($strip(%theme.1))) = $strip(%theme.1))) { aline -p @History %theme.1  $+ %theme.couleur.cowboy $+ $gettok($mid(%t,$calc($len($strip(%theme.1)) + 2)),1,32) $+  $+ %theme.couleur.actions %theme.msg.nick  $+ %theme.couleur.cowboy $+ %hist $+  %theme.1 | var %hist = $gettok($mid(%t,$calc($len($strip(%theme.1)) + 2)),1,32) }
dec %i
if (%c >= $int($3)) { return }
}
}

Alience 26 Şubat 2005 09:22

nickin yazdıgı textleri tutması icin on *:text eventsi olması gerekli onu kopyalamamışsın, logdan okumadığına göre :)

Flyman 27 Şubat 2005 01:53

ya ben butun dosyalara baktim ama oyle bir text e rastlamadim sadece alltakiler vardi bu kodla ilgili olarak eger benim gozumden kacti ise nasil bir sey olmali o kod veya benim bu yukardaki ve su anda kopyaladigim kodu calistircak on text eventsi yazilamazmi?
menu nicklist {
.-
$chr(32) $chr(32) $chr(32) $chr(32) $chr(32) $chr(32) History
.show all msgs of $$1 in #:/history # $$1
.-
.set...:/history $$?="for which channel...? (you must be in)" $$?="Show History of ...?" $$?="How many sentences? (0=all)"
}
menu @History {
close:/window -c @History
}

Alience 27 Şubat 2005 03:09

Alıntı:

Alience Nickli Üyeden Alıntı
on *:text eventsi

daha önce yazdığım gibi :). on text lere bakıcaksın ama scriptse başka bir remoteye yazmışta olabilir veya on texte dğer komutların arasına sıkıştırmıştır.!

UOnur 27 Şubat 2005 12:50

Bencede bir yere Sıkıştırmıştır.
Bu Gevurlar iyice karman çorman yapıyolar kodları.

WhaLberg 27 Şubat 2005 13:05

hem de ne karman çorman. konuyla alâkasız olacak biraz ama, mircscripts.org sitesini takip edenler bilir. "cps (channel protection system)" diye bir add-on var "amit^" diye bir eleman yazmış. adam bir kod yazmış abi ben koda bakıyorum, kod bana bakıyor, bu derece karışık :)

Alience 27 Şubat 2005 13:50

değildir komutu en iyi karıştırmanın yolu başka bir aliases tanımlayıp cağırmaktır eğer birden cok yerde örn: writeini bilmemne.ini bolum içerik değişken yazmaktansa alias komutu tanımlayıp
alias ^_ { writeini bilmemne.ini bolum $1 }
yaptıgında komut olarak sadece ^_ içerik değişken diye yazması yeterli niye ^_ kullandın komut adı olarak dersen kısaltmaya çalışıyoruz genelde oyle absurt adlar konuyor :~ gibisinden :).
aslında herkezin bir stili vardır ve anlamak için bilen birisi dahi bir sure bakması gerekir nası yazım mantığı diye sonrarı kolay olur.

UOnur 27 Şubat 2005 14:21

aslında güzel mantık.i$i iice uzatcan.Her alias'ın sonuna 4,1,+,',! fLn koyacam ama uzatcan uzatcan uzatcan.Yaptıgı i$ aynı kapıya cıkcak.Çalacak adamda (hay be.ke$ke bula$masaydım) dicek biz buralarda bo$una emege saygı die baırıoz :) Ole bi yapalımki adam Çalamasın :)

Flyman 27 Şubat 2005 18:01

kafayi yedim zaten ben ara ara oyle bir seye rastlamadimillaki on text eventi olacak diyonuz oylemi o olmdana boyle bir kodlama islem yapmaz diyorsunuz hmm hakketten uonur un dedigi gibi nerden bulastim ya yaz biz yazamiyozmu o on text kodlamasini??

Alience 27 Şubat 2005 21:37

hım bu kod sanırım yazılanları değil o anki kanaldaki cacheleri tarayıp çıkarıyor buyur onun kodunu yazdım:
Kod:

alias history {
  if $window(@History) { clear @History | aline @History $+(1,$str(-,10),14-15-0-[ 15History:,$2, 0 ]-15-14-1,$str(-,5)) }
  var %i = 1, %nick = $+(<?,$2,>)
  while (%i <= $line($1,0)) {
    if $regex($strip($line($1,%i)),%nick) { phistory $2 $line($1,%i) } | inc %i 1
  }
  if $line(@History,0) == 1 { phistory $2 $2 : ye ağit $1 kanalında bir bilgi bulunamadı! }
}
alias phistory {
  if !$window(@History) { window -alCk0 @History | aline @History $+(1,$str(-,10),14-15-0-[ 15History:,$1, 0 ]-15-14-1,$str(-,5)) }
  aline @History $2-
}
menu nicklist {
  History: history $active $1
}

yukarıdaki kodu remoteye(alt +r) ye kopyala ğer mirc de nickin <nick> gibi cıkmayıp başka birşey cıkıyorsa örn: «nick» gibi cıkıyorsa %nick = $+(<?,$2,>) yi %nick = $+(«?,$2,») olarak değiştir. bunu kullanabilmen için mircnin $regex komutunu desteklemesi gerekli belirtiyim

Flyman 28 Şubat 2005 02:51

alience sana bir sey demek istiyorum yazdigin kodu aldim ve denedim ya arkadas hatbiden sen supersin allah razi olsun harbiden usta cirak ayrimi boyle belli oluyor demekki iyi guzelde niye beni 3 gundur bunalima soktun bu kadar kolay yazabiliyorken diger kodla :)))
eyvallah saol

Flyman 28 Şubat 2005 03:05

cok oluyorum ama bide bu koda o pencerede n kopya yapabilme ekliyebilirmiyiz? yani nickin yazdiklarini mausla kopyalama sansim olabilirmi?

Flyman 28 Şubat 2005 04:19

tabi kodu denedikce farkediyorum elini veren kolunu kurtaramaz diye bir deyim vardir ya benimki ona dondu simdi :)))

birde benim kopyaladigim koddda nick kanaldan cikmis olsa dai onun yazdiklarini gorebiliyordum nickin illlaki o anda kanalda olmasi gerekmiyordu alience senin yazdiginda gayet guzel calisiyor hem digerinden daha hizli fakat o anda kanalda bulunan nicklere bakilabiliyor eger nick o anda kanalda degilse gostermiyor ona cozum bulabilirmiyiz demek istedigimi anlatabildim sanirim
mesela hasan kanal geldi sohbet etti kanalda ve cikti siz o cikinca ya bu ne konusmus diye bakmak istediginde goremiyorsun amma uzattim :)) bunada cozum bulursan cok sevincem yararli bir kod olacak bu

Alience 28 Şubat 2005 08:10

kopyalamak için en basit yöntem penceresini değiştirmek aşağıdaki kodu kopyalarsan istediğin gibi kopyalayıp seçebilirsin:
Kod:

alias history {
  if $window(@History) { clear @History | echo -m @History $+(1,$str(-,10),14-15-0-[ 15History:,$2, 0 ]-15-14-1,$str(-,5)) }
  var %i = 1, %nick = $+(<?,$2,>)
  while (%i <= $line($1,0)) {
    if $regex($strip($line($1,%i)),%nick) { phistory $2 $line($1,%i) } | inc %i 1
  }
  if $line(@History,0) == 1 { phistory $2 $2 : ye ağit $1 kanalında bir bilgi bulunamadı! }
}
alias phistory {
  if !$window(@History) { window -aeCk0 @History | echo -m @History $+(1,$str(-,10),14-15-0-[ 15History:,$1, 0 ]-15-14-1,$str(-,5)) }
  echo -m @History $2-
}
menu nicklist {
  History: history $active $1
}
menu channel {
  History: history $active $$input(Lütfen aranacak nicki giriniz. Büyük küçük harf ayrımı vardır $crlf $+ Örn: Deneme yi aramak için deneme yazarsanız bulamaz,-e,History,$me)
}

kodun menü dışında kullanımı:
/history #kanal nick
yukarıdaki kodu istediğin yerde uygulayabilirsin, ayrıca kanalada menüsünü ekledim oradan nicki yazabilirsin.

Flyman 01 Mart 2005 02:56

alience saolasin hersey super eyvallah

Flyman 06 Mart 2005 23:20

alience history kodlamasi guzel calisyorda bugun bir sey farkettim nicklerin basinda veya sonunda || \\ gibi isaretler varsa ornek ||kadir|| gibi o zaman historu kodu onun yazdiklarini cikartmiyor tum kanalin konusmasini cikariyoz bugun dikkatimi cekti ilk kez

Alience 07 Mart 2005 01:21

ha evet :) $regex te o hata verir onu hallederim bir ara

Flyman 07 Mart 2005 02:49

ok saol
diger baloncuk isine de el at cok hos bisey nicklerin bilgisini gormek baskasinin addondan cikariver demistim ama kendin yaz alience imzalida bizde onu kullanacak ip gormek icin whois cekmek zorunda kalmiyack :))))

Alience 07 Mart 2005 13:54

otekini silip bunu kopyala. bak bakalım düzgünmü :)
Kod:

alias history {
  if $window(@History) { clear @History | echo -m @History $+(1,$str(-,10),14-15-0-[ 15History:,$2, 0 ]-15-14-1,$str(-,5)) }
  var %i = 1, %nick = $+(<?,$replace($2,|,\|,\,\\,^,\^,[,\[,],\]),>,$chr(32))
  while (%i <= $line($1,0)) {
    if $regex($strip($line($1,%i)),%nick) { phistory $2 $line($1,%i) } | inc %i 1
  }
  if $line(@History,0) == 1 { phistory $2 $2 : ye ağit $1 kanalında bir bilgi bulunamadı! }
}
alias phistory {
  if !$window(@History) { window -aeCk0 @History | echo -m @History $+(1,$str(-,10),14-15-0-[ 15History:,$1, 0 ]-15-14-1,$str(-,5)) }
  echo -m @History $2-
}
menu nicklist {
  History: history $active $1
}
menu channel {
  History: history $active $$input(Lütfen aranacak nicki giriniz. Büyük küçük harf ayrımı vardır $crlf $+ Örn: Deneme yi aramak için deneme yazarsanız bulamaz,-e,History,$me)
}


Alience 07 Mart 2005 19:58

Alıntı:

Flyman Nickli Üyeden Alıntı
ok saol
diger baloncuk isine de el at cok hos bisey nicklerin bilgisini gormek baskasinin addondan cikariver demistim ama kendin yaz alience imzalida bizde onu kullanacak ip gormek icin whois cekmek zorunda kalmiyack :))))

valla baloncuk işine pek el atasım yok :), maalesef.

Flyman 08 Mart 2005 00:38

alience evet su an icin || // gibi baslayan nicklerdede sorunsuz calisiyor saol
balaoncuk isine girmiyorsun demek analayan birileri yokmu baska kimse defaul un scriptinde vardi sanirim o ozellik oda hic el atmiyor cocuk gibi balon ister olduk iyimi :))) bi balon pls

CoMMaNDeR 08 Mart 2005 12:08

tooltips dll'nin helpi yokmu? example olması lazım içinde. örnek yani

goXXip 08 Mart 2005 12:33

Alıntı:

Flyman Nickli Üyeden Alıntı
alience evet su an icin || // gibi baslayan nicklerdede sorunsuz calisiyor saol
balaoncuk isine girmiyorsun demek analayan birileri yokmu baska kimse defaul un scriptinde vardi sanirim o ozellik oda hic el atmiyor cocuk gibi balon ister olduk iyimi :))) bi balon pls

goxxip.freecoolsite.com/balon.rar indir. Scriptinin ana dizinine kopyala daha sonra mIRC den /load -rs balloon.mrc yaz. Sonra Script Menüsünden
hangi durumlarda çalışacağını ayarla... İşte bu kadar. Yalnız tam anlamıyla addonu türkçeleştiremedim idare et artık...

Flyman 09 Mart 2005 01:06

goxxip verdigin adrese giremedim ama sanirim senin dedigin balloon bu ekranin sag altinda duren join part notice gibi kanalda olan olaylari balonla gosteren olay sanirim ben onu istemiyorum benim istedigim nickliste olan nickin uzerine mausunu goturunce o nickin ip adresini ve normal usermi yoksa operatormu oldugunu bir balon icin de goruyorsun ben o balonun pesindeyim bir kac scripte gordum ama addonuna ulasamadim varsa bilen rica edecegim baloon pls :))))


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:31.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk