# Cкрипт, который выполнится во время подключения к серверу.
set init-server {
putquick "MODE $botnick +B"
}

# Cкрипт, который выполнится во время подключения к серверу.
set init-server {
putquick "OPER логин пасс"
utimer 10 {putquick "SAMODE #канал +o $botnick"}
}

# Получаем IrcOp.
set ircop_login "логин"     
set ircop_password "пароль"     

bind evnt - init-server ircop_ident     
proc ircop_ident {type} {     
global ircop_login ircop_password botnick     
putquick "OPER $ircop_login $ircop_password"     
putquick "MODE $botnick +a"     
}

# Получаем OP на канале.
# Выборочные каналы:
#bind join - "#канал1 *@*" joinsamode
#bind join - "#канал2 *@*" joinsamode
# На всех каналах:
bind join - * joinsamode

proc joinsamode {nick uhost hand chan} {     
global botnick     
if {$nick == $botnick} {     
putquick "SAMODE $chan +o $botnick"     
}     
}