on *:INPUT:*: { if ($mid($1,1,1) == /) { goto doit } :doit if ($1- == efem) { say Efendim? | halt } if ($1- == h.g) { say Hoş Geldin | halt } if ($1- == h.b) { say Hoş Bulduk | halt } if ($1- == slm) { say Selam | halt } if ($1- == mrb) { say Merhaba | halt } if ($1- == nbr) { say Naber? | halt } if ($1- == rica) { say Rica Ederim. | halt } if ($1- == :D) { say :D:D:D:D:D | halt } if ($1- == S.a) { say SeLamın aLeyküm. | halt } if ($1- == a.s) { say aLeyküm SeLam Hoş Geldiniz | halt } if ($1- == haha) { say 7Ha10ha7ha10ha7ha10ha7ha | halt } if ($1- == :P) { say :Pp :Pp :Pp | halt } }