Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: {
var %i = 1, %ara
while ($read(dosya.txt,%i)) {
%ara = $v1
var %bak = $regsubex(%ara,/([\\\^\$\.\|\?\*\+\(\)\[\]\{\}])/g,\\\1)
if ($regex($1-,/\b $+ %bak $+ \b/i)) {
echo -caet # $nick kanalında belirlediğiniz $+(ifade,$chr(40),%ara,$chr(41)) ifadesini kullandı.
break
}
inc %i
}
}
dene bakalım .. umarım isine yarar ..