#help kanalimizi buraya yazalim
set help(kanal) "#help"
#helpop kanalimiz buraya
set help(opkanal) "#helpop"

#Bundan sonrasina karismasakta olur :)

channel add $::help(kanal)
channel add $::help(opkanal)

bind mode - "*+o*" op:yonlendir

#kanalda op oldugunda islem yap
proc op:yonlendir {nick uhost hand chan mc kimdir} {
  if {$chan != $::help(kanal) { return }
  putquick "sajoin $kimdir $::help(opkanal)"
  putquick "PRIVMSG $kimdir :$chan Kanalında Op Sop ve Founder ( @ & ~ ) Yetkisinde Olan Kullanıcıların $::help(opkanal) Kanalina Girmesi Zorunludur."
}

#op kanalinda olmadigini denetle
bind time - "* * * * *" time:optara

proc time:optara {min hour day month year} {
	global botnick
	if {$kanallar == $::help(opkanal)} { continue }
	foreach opcuk [chanlist $::help(kanal)] { 
		if {[onchan $opcuk $::help(opkanal)]} { continue }
		if {[isop $opcuk $::help(kanal)] && $opcuk != $botnick} {
			putquick "sajoin $opcuk $::help(opkanal)"
			putquick "PRIVMSG $opcuk $::help(opkanal) kanalinda $::help(kanal) kanalinda op oldugunuz surece bulunmak zorundasiniz!"
		}
	}
}