on *:join:*: {
  %clones = $ialchan($wildsite,#,0)
  if ( %clones > 1 ) {
	var %count = 1
	set %clone.nicks -->
	while (%count <= %clones) {
	  %clone.nicks = %clone.nicks $ial($wildsite,%count).nick
	  inc %count 
	}
  c.yaz 4Clone Tesbit Edildi %clones tane: Kanal: # Nickler: 3 $remove(%clone.nicks,-->) 4Ceza: K-Ban Kline }
  set %change $read -s %4$s $address($nick,4) notes.ini
  if (%change == $null) {
	haltdef
	write notes.ini $address($nick,4) $nick
	halt 
  }
}
alias C.yaz { if !$window(@clone) { window @clone } | aline @clone $1- }
on ^*:HOTLINK:*KLine*:@clone: return
on ^*:HOTLINK:*K-Ban*:@clone: return
on *:HOTLINK:*:@clone: {
  if ($1 == K-Ban) {
	tokenize 32 $hotline
	var %~ = $4
	ban $7 $gettok($gettok($10-,1,67),1,32) 2
	while %~ { kick $7 $gettok($gettok($10-,1,67),%~,32) Clone %~ | dec %~ }
  }
  if ($1 == Kline) { kline $gettok($gettok($10-,1,67),1,32) Clone tespit edildi!!! }
}