if $istok(nick1 nick2 nick3,$nick,32) { return }

if $read(muafnick.txt,w,$nick) { return }

if $regex($nick,/^(nick1|nick2|nick3|nick4)$/i) { return }

on *:text:*:#:{
if $regex($1-,/(selam|s\.a|sa|merhaba)/i) {
if $istok(nick1 nick2 nick3,$nick,32) { return }
msg # a.selam $nick
}
}

menu ,menubar {
.-
. ® ÖZELBOT 
..Açık:.enable #otobot | .echo -a 0,4 ÖzeL Bot Açıldı
..Kapalı:.disable #otobot | .echo -a 0,4 ÖzeL Bot Kapatıldı 
.-
}

#otobot on
on *:text:*:?:{
if $read(muafnick.txt,w,$nick) { return }
if $regex($1-,/(nas[ıiİ]ls[ıiİ]n)/i) { .timer 1 5 /msg $nick iyiym sen nasılsın }
if $regex($1-,/(nerdens[ıiİ]n)/i) { .timer 1 5 /msg $nick sağdan soldan }
if $regex($1-,/(del[ıiİ]m[ıiİ]s[ıiİ]n)/i) { .timer 1 5 /msg $nick sende çok akıllı sayılmazsın }
}
#otobot end