Kod

alias _spamrx {
  return $replacex($1-,a,[aA@4æàáâãäåÀÁÂÃÄÅÆ],b,[bBß],c,[cçÇ],ç,[cçÇ],Ç,[cçÇ],e,[eE3ÆèéêëÈÉÊË€£],g,[gğĞqk],ğ,[gğĞqk],Ğ,[gğĞqk],ı,[ıIiİ1I!ÏïîÍíÌìÎî],i,[ıIiİ1I!ÏïîÍíÌìÎî],İ,[ıIiİ1I!ÏïîÍíÌìÎî],k,[kqğĞg],m,[mw].?,l,[Iıl1],o,[ÒóôõöÒÓÔÕÖoQ0øOöÖ],ö,[ÒóôõöÒÓÔÕÖoQ0øOöÖ],Ö,[ÒóôõöÒÓÔÕÖoQ0øOöÖ],u,[uüÜÙÚÛÜ],ü,[uüÜÙÚÛÜ],Ü,[uüÜÙÚÛÜ])
}
on *:INPUT:*: {
  if $1 == /spam {
    if !$2 { echo -a Lütfen /spam KELIME olarak belirtiniz. }
    else {
      echo -a 2Spam Regex Olurşturuldu; Spam'a Ekleme Şekli; 3> 5 (^|\s|\b) $+ $_spamrx($strip($2-)) $+ ($|\s|\b)
    }
  }
}