aaa

on *:join:#kanal:{ who +I $nick }
raw 352:*:{ 
  if $istok(ident iden1 ident2 ident3,$3,32) { return } 
  if $read(fullname.txt,w,$strip($9-)) { var %t = 1 | while %t <= $comchan($6,0) { if $me ishop $comchan($6,%t) || $me isop $comchan($6,%t) { mode $comchan($6,%t) +b $6 | kick $comchan($6,%t) $6 Yasak Fullname. } | inc %t } }
}