Oto selam Sorunu.
Sa.
alias re_selam {
var %regex = /(s.a(.?)$)|(selam$)|(selam(lar)?$)|(slm$)|(mrb)|(S elam.)|(selam(..)?(s)?aleyk.m$)|(sa$)|(sa(.+)$)/gi
if ($regex($1-, %regex)) {
if (!$hget(isnick, $nick)) {
msg $chan 1,0 $nick 4,0Aleyküm Selam 1,0Hoş Geldiniz Efendim }
hadd -mu60 isnick $nick $true
}
}
on *:TEXT:*:#: {
re_selam $1-
}
on *:ACTION:*:#: {
re_selam $1-
}
arkadaşlar böyle bir kod var elimde ama alakasız şeylerede a.selam diyor.
misal: euheuehSLM kelimenin sonunda basında neresinde selam geçerse aleyküm selam diyor.
hatta aleyküm selam diyenlere bile aleyküm selam diyor Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bunu şu şekilde yapabilirmiyiz.
Sadece: selam / s.a / mrb /merhaba /selamlar / selamun aleyküm / slm
yardımlarınızı bekliyorum. |