alias kick_ban { if ($me !isop $chan) { msg x ban $chan $address($nick,2) 1200s 100 $1- } | else { ban -u2000 $chan $address($nick,2) | kick $chan $nick $1- } }
;if ($nick isop $chan) { halt }
#badnick on
on *:join:#windows95,#windowsxp,#windows7,#windows,#photoshop :{

  ; whois $nick
  ; dns $nick
  ; userip $nick
  ; /echo -s $chan $asctime(h:mm:ss)
  ;$asctime(hh:n:ss)
  if (nigger isin $nick) { kick_ban We do not do racism here | return }
  if (NutBuster isin $nick) { kick_ban We do not do racism here | return }
  if ($regex($nick,/^(?:F3calSpam|meconium|heces|BloodyTampon|fecal|mierda|lavabo|toilet|crap|number_2|Ass2mouth|poobot|bathroom|the_runs|enema|laxative|lavatory|DogCockLvr|suppository|TakeADump|number_2|excrement|take_a_dump|stool_sample|laxatives|defecation|manure|turd|shit|diarrhea|scatological|ploppies|bowel|excrete|scat)$/ig)) { kick_ban we do not need your sick humour here | return }
  if ($regex($nick,/^(?:fuck|ineedtoshit|cunt|bitch|winblows|pissypants|win5hit|fookme|exlax|KrustyKunt|nigger|HUGECOCK|Dad4KidDicks|Niggor|bal1sac|splitcock|deepinmyass|Dirty_Nigger|suck_my_shit|fukstick|hangniggers|hateyou|nigga|Tampon)$/ig)) { kick_ban Please change your nick | return }
  ;if ($regex($nick,/^(?:creuzeta|alternanta4)$/ig)) { ban -u2000 $chan $nick $+ !*@* | kick $chan $nick Flooding isn't allowed  }
  ;if ($regex($nick,/(?:fuck|meeki|cunt|ccdump)/ig)) { ban -u2000 $chan no thank you | return }
  if ($regex($nick,/(?:fuck|meeki|scout|cunt|ccumps|ccdump)/ig)) { kick_ban no thank you | return }
  if ($regex($nick,/(?:Mr-Jaky|Jaky|Mr-|Mr_|kidd0|TheKid)/ig)) { kick_ban You have become too annoying - learn to do it yourself | return }
  if ($regex($nick,/(?:windoze)/ig)) { kick_ban anyone got a needle and thread my sides are splitting | return }
  if ($regex($address($nick,1),/(?:fuck|fuking|CumOnHerFace|12incher|tits|sexually|suck.my.d1ck|cunt)/ig)) { kick_ban your address is unsuitable for this channel | return }
  ;if ($regex($address($nick,1),/(?:hmm|aaaa)/ig)) { kick_ban we can not help you any more than we already have | return }
  if ($regex($address($nick,1),/\*!\*(LasaK|crap|fuck|turd|cunt|heces|faeces|lavabo|ccdump|mierda|meconium|poot|scat)@/)) { kick_ban no thankyou, not today | return }
  if $regex($fulladdress, /!(?:okcyok|ident2|ident3)@/i ) { ban -k $chan $nick 20 You have become too annoying - learn to do it yourself | return }
  if $regex($fulladdress, /!(?:pwned|androirc|OpiumNet|ident3)@/i ) { ban -k $chan $nick 20 removed for channel harmony | return }
  ; if ($regex($nick,/^(?:soriel)$/ig)) { ban -u2000 $chan $nick $+ !*@* | kick $chan $nick Not welcome here, but you have a nice day now }
  ; if ($istok(ident1 ident2 ident3, $gettok($replace($fulladdress, !, @), 2, 64), 32))
}
ELSE { halt }
#badnick end