menu status,channel {
  Сервисы
  .Chanserv
  ..Регистрация канала:chanserv.register
  ..Отмена регистрации канала:chanserv.drop
  ..Идентификация основателя:chanserv.identify
  ..-
  ..Настройки канала
  ...Установить ник основателя канала:chanserv.set.founder
  ...Ник преемника канала
  ....Установить:chanserv.set.successor
  ....Убрать:chanserv.unset.successor
  ...Установить пароль основателя канала:chanserv.set.password
  ...Включить блокировку режимов канала:chanserv.set.mlock
  ...Изменить топик канала:chanserv.set.topic
  ...Блокировка топика
  ....Включить:chanserv.set.topiclock.on
  ....Выключить:chanserv.set.topiclock.off
  ...Приватность канала
  ....Включить:chanserv.set.private.on
  ....Выключить:chanserv.set.private.off
  ...Ужесточение контроля за статусом оператора
  ....Включить:chanserv.set.secureops.on
  ....Выключить:chanserv.set.secureops.off
  ...Ужесточение условий доступа к каналу
  ....Включить:chanserv.set.restricted.on
  ....Выключить:chanserv.set.restricted.off
  ...Настройки безопасности
  ....Включить:chanserv.set.secure.on
  ....Выключить:chanserv.set.secure.off
  ...Приветствие канала
  ....Установить:chanserv.set.entrymsg
  ....Убрать:chanserv.unset.entrymsg
  ...E-mail канала
  ....Установить:chanserv.set.email
  ....Убрать:chanserv.unset.email
  ...Адрес канала в интернете
  ....Установить:chanserv.set.url
  ....Убрать:chanserv.unset.url
  ...Запоминание топика
  ....Включить:chanserv.set.keeptopic.on
  ....Выключить:chanserv.set.keeptopic.off
  ...Получение опа после сплита
  ....Включить:chanserv.set.leaveops.on
  ....Выключить:chanserv.set.leaveops.off
  ...Нотис на канал при опе или деопе
  ....Включить:chanserv.set.opnotice.on
  ....Выключить:chanserv.set.opnotice.off
  ...Сохранение статуса
  ....Включить:chanserv.set.enforce.on
  ....Выключить:chanserv.set.enforce.off
  ...Не давать автоматически опа
  ....Включить:chanserv.set.noop.on
  ....Выключить:chanserv.set.noop.off
  ...Не давать автоматически опа основателю
  ....Включить:chanserv.set.noopfounder.on
  ....Выключить:chanserv.set.noopfounder.off
  ...Установка режима "устаревания банов"
  ....Включить:chanserv.set.expirebans.on
  ....Выключить:chanserv.set.expirebans.off
  ..-
  ..Список доступа
  ...Добавить пользователя:chanserv.access.add
  ...Удалить пользователя:chanserv.access.del
  ...Просмотреть список:chanserv.access.list
  ...Помощь...:chanserv.access.help
  ..Уровни доступа
  ...Установить уровень:chanserv.level.set
  ...Сбросить уровень:chanserv.level.reset
  ...Просмотреть список:chanserv.level.list
  ...Помощь...:chanserv.level.help
  ..-
  ..Супероп
  ...Дать супероп:chanserv.sop.add
  ...Забрать супероп:chanserv.sop.del
  ...Список СуперОп:chanserv.sop.list
  ...Всего ников в списке:chanserv.sop.count
  ..Автооп
  ...Дать автооп:chanserv.aop.add
  ...Забрать автооп:chanserv.aop.del
  ...Список АвтоОп:chanserv.aop.list
  ...Всего ников в списке:chanserv.aop.count
  ..Автовойс
  ...Дать автовойс:chanserv.vop.add
  ...Забрать автовойс:chanserv.vop.del
  ...Список ВойсОп:chanserv.vop.list
  ...Всего ников в списке:chanserv.vop.count
  ..Автокика
  ...Добавить пользователя:chanserv.akick.add
  ...Удалить пользователя:chanserv.akick.del
  ...Просмотреть список:chanserv.akick.list
  ...Помощь...:chanserv.akick.help
  ..-
  ..Список каналов:/msg ChanServ@*.RusNet LIST
  ..-  
  ..Информация о канале
  ...Основная:chanserv.info
  ...Вся:chanserv.info.all
  ..-
  ..Пригласить себя на канал:chanserv.invite
  ..-
  ..Статус оператора
  ...Получить статус оператора:chanserv.op
  ...Снять статус оператора:chanserv.deop
  ...Дать статус оператора нику(ам):chanserv.op.nick
  ...Отнять статус оператора у ника(ов):chanserv.deop.nick
  ...Получить статус оператора на всех каналах:/msg ChanServ@*.RusNet OP ALL
  ..Статус войс
  ...Получить статус войс:chanserv.voice
  ...Снять статус войс:chanserv.devoice
  ...Дать статус войс нику(ам):chanserv.voice.nick
  ...Отнять статус войс у ника(ов):chanserv.devoice.nick
  ..-
  ..Снятие банов
  ...Снять баны с себя:chanserv.unban
  ...Снять ВСЕ баны на канале:chanserv.unban.all
  ..Очистить режимы канала:chanserv.clear
  ..Очистить все настройки канала:chanserv.cycle
  .Nickserv
  ..Регистрация ника:nickserv.register
  ..Отмена регистрации ника:nickserv.drop
  ..Идентификация ника:nickserv.identify
  ..-
  ..Список авторизованных адресов
  ...Добавить маску:nickserv.access.add
  ...Удалить маску:nickserv.access.del
  ...Показать список:/msg NickServ@*.RusNet ACCESS LIST
  ...Помощь...:nickserv.access.help
  ..-
  ..Настройки ника
  ...Выбор языка
  ....Сообщения сервисов на русском:/msg NickServ@*.RusNet SET LANGUAGE 1
  ....Сообщения сервисов на английском:/msg NickServ@*.RusNet SET LANGUAGE 2
  ...Защита ника
  ....Включить:/msg NickServ@*.RusNet SET KILL ON
  ....Выключить:/msg NickServ@*.RusNet SET KILL OFF
  ....Помощь...:nickserv.set.kill.help
  ...Автодобавление маски
  ....Включить:/msg NickServ@*.RusNet SET AUTOMASK ON
  ....Выключить:/msg NickServ@*.RusNet SET AUTOMASK OFF
  ....Помощь...:nickserv.set.automask.help
  ...Изменить пароль:nickserv.set.password
  ...Безопасность
  ....Включить:/msg NickServ@*.RusNet SET SECURE ON
  ....Выключить:/msg NickServ@*.RusNet SET SECURE OFF
  ....Помощь...:nickserv.set.secure.help
  ...Приватность
  ....Включить:/msg NickServ@*.RusNet SET PRIVATE ON
  ....Выключить:/msg NickServ@*.RusNet SET PRIVATE OFF
  ....Помощь...:nickserv.set.private.help
  ...Настройка мемо
  ....Включить:/msg NickServ@*.RusNet SET MEMOS ON
  ....Выключить:/msg NickServ@*.RusNet SET MEMOS OFF
  ....Помощь...:nickserv.set.memos.help
  ...Уведомления
  ....Включить:/msg NickServ@*.RusNet SET NOTIFY ON
  ....Выключить:/msg NickServ@*.RusNet SET NOTIFY OFF
  ....Помощь...:nickserv.set.notify.help
  ...Извещения
  ....Включить:/msg NickServ@*.RusNet SET SIGNON ON
  ....Выключить:/msg NickServ@*.RusNet SET SIGNON OFF
  ....Помощь...:nickserv.set.signon.help
  ...Е-Маил
  ....Установить:nickserv.set.email
  ....Убрать:/msg NickServ@*.RusNet SET EMAIL -
  ...Адрес сайта
  ....Установить:nickserv.set.url
  ....Убрать:/msg NickServ@*.RusNet SET URL -
  ...Скрыть данные:nickserv.set.hide
  ...Сообщения в приват
  ....Включить:/msg NickServ@*.RusNet SET PRIVMSG ON
  ....Выключить:/msg NickServ@*.RusNet SET PRIVMSG OFF
  ....Помощь...:nickserv.set.privmsg.help
  ..-
  ..Список ников по шаблону:nickserv.list
  ..-
  ..Вернуть Ваш ник:nickserv.recover
  ..Получить контроль над Вашим ником:nickserv.release
  ..Убить "ник-призрак":nickserv.ghost
  ..-
  ..Информация о нике
  ...Основная:nickserv.info
  ...Вся:nickserv.info.all
  ..-
  ..Связать текущий ник с другим:nickserv.link
  ..Разорвать связи ника:nickserv.unlink
  ..Узнать статус ника:nickserv.status
  ..-
  ..Мои каналы:/msg NickServ@*.RusNet LISTCHANS
  .Memoserv
  ..Послать сообщение
  ...Нику:memoserv.send.nick
  ...На канал:memoserv.send.chan
  ..Показать список
  ...Свой:/msg MemoServ@*.RusNet LIST
  ...Канала:memoserv.list.chan
  ..Читать сообщения
  ...Свои:memoserv.read.me
  ...Канала:memoserv.read.chan
  ..Удалить сообщения
  ...Свои:memoserv.del.me
  ...Канала:memoserv.del.chan
  ..Уведомления о записках:memoserv.set.notify
  ..Лимит записок
  ...Своих:memoserv.set.limit.my
  ...Канала:memoserv.set.limit.chan
  ..Инофрмация о записках
  ...Своих:/msg MemoServ@*.RusNet INFO
  ...Канала:memoserv.info.chan
}

;++++++++++++++++++++ CHANSERV ++++++++++++++++++++

;===== chanserv.register =====

alias chanserv.register dialog -m chanserv.register chanserv.register
dialog chanserv.register {
  title "REGISTER chan"
  size -1 -1 180 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Пароль", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  text "Описание", 9,118 5 30 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  edit "", 10, 101 13 60 10, autohs
  button "?", 6, 165 13 12 10
  button "OK", 7, 55 30 30 10, ok
  button "Отмена", 8, 95 30 30 10, cancel
}
on *:dialog:chanserv.register:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.register.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet REGISTER $chr(35) $+ $did(4) $did(5) $did(10) }
  }
}

alias chanserv.register.help dialog -m chanserv.register.help chanserv.register.help
dialog chanserv.register.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Регистрирует канал в базе ChanServ. Пароль необходим, чтобы Вы смогли сделать идентификацию (IDENTIFY ) позднее для изменения настроек канала", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:chanserv.register.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.register chanserv.register | did -f chanserv.register 4 }
  }
}

;===== chanserv.drop =====

alias chanserv.drop dialog -m chanserv.drop chanserv.drop
dialog chanserv.drop {
  title "DROP chan"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Пароль", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.drop:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.drop.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet DROP $chr(35) $+ $did(4) $did(5) }
  }
}

alias chanserv.drop.help dialog -m chanserv.drop.help chanserv.drop.help
dialog chanserv.drop.help {
  title "Помощь..."
  size -1 -1 120 60
  option dbu
  text "Отменяет регистрацию канала. Только основатель канала может отменить регистрацию канала, при этом он должен выполнить IDENTIFY перед тем, как использовать эту команду, или просто указать верный пароль канала", 1, 5 5 110 50, center
  button "OK", 2, 45 46 30 10, ok
}
on *:dialog:chanserv.drop.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.drop chanserv.drop | did -f chanserv.drop 4 }
  }
}

;===== chanserv.identify =====

alias chanserv.identify dialog -m chanserv.identify chanserv.identify
dialog chanserv.identify {
  title "IDENTIFY chan"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Пароль", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.identify:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.identify.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet IDENTIFY $chr(35) $+ $did(4) $did(5) }
  }
}

alias chanserv.identify.help dialog -m chanserv.identify.help chanserv.identify.help
dialog chanserv.identify.help {
  title "Помощь..."
  size -1 -1 70 40
  option dbu
  text "Идентифицирует Вас как основателя канала", 1, 5 5 60 20, center
  button "OK", 2, 20 25 30 10, ok
}
on *:dialog:chanserv.identify.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.identify chanserv.identify | did -f chanserv.identify 4 }
  }
}

;===== chanserv.access.add =====

alias chanserv.access.add dialog -m chanserv.access.add chanserv.access.add
dialog chanserv.access.add {
  title "ACCESS ADD"
  size -1 -1 142 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник(маска)", 2, 60 5 30 10
  text "Уровень", 9, 100 5 25 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  edit "", 10, 105 13 11 10
  button "?", 6, 125 13 12 10
  button "OK", 7, 35 30 30 10, ok
  button "Отмена", 8, 75 30 30 10, cancel
}
on *:dialog:chanserv.access.add:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.access.add.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) && ($len($did(10)) != 0) { /msg ChanServ@*.RusNet ACCESS $chr(35) $+ $did(4) ADD $did(5) $did(10) }
  }
}

alias chanserv.access.add.help dialog -m chanserv.access.add.help chanserv.access.add.help
dialog chanserv.access.add.help {
  title "Помощь..."
  size -1 -1 80 45
  option dbu
  text "Добавляет ник или маску в список доступа канала с указанным уровнем", 1, 5 5 70 20, center
  button "OK", 2, 25 30 30 10, ok
}
on *:dialog:chanserv.access.add.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.access.add chanserv.access.add | did -f chanserv.access.add 4 }
  }
}

;===== chanserv.access.del =====

alias chanserv.access.del dialog -m chanserv.access.del chanserv.access.del
dialog chanserv.access.del {
  title "ACCESS DEL"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник(маска)", 2, 60 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.access.del:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.access.del.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet ACCESS $chr(35) $+ $did(4) DEL $did(5) }
  }
}

alias chanserv.access.del.help dialog -m chanserv.access.del.help chanserv.access.del.help
dialog chanserv.access.del.help {
  title "Помощь..."
  size -1 -1 80 45
  option dbu
  text "Удаляет ник или маску из списка доступа канала", 1, 5 5 70 20, center
  button "OK", 2, 25 30 30 10, ok
}
on *:dialog:chanserv.access.del.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.access.del chanserv.access.del | did -f chanserv.access.del 4 }
  }
}

;===== chanserv.access.list =====

alias chanserv.access.list dialog -m chanserv.access.list chanserv.access.list
dialog chanserv.access.list {
  title "ACCESS LIST"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 35 5 30 10
  text "#", 3, 20 15 10 10
  edit "", 4, 24 13  40 10, autohs
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.access.list:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet ACCESS $chr(35) $+ $did(4) LIST }
  }
}

;===== chanserv.access.help =====

alias chanserv.access.help dialog -m chanserv.access.help chanserv.access.help
dialog chanserv.access.help {
  title "Помощь..."
  size -1 -1 120 65
  option dbu
  text "Пользователи, содержащиеся в списке доступа, могут использовать различные  команды ChanServ, в зависимости от присвоенного уровня. Пользователь, не существующий в списке доступа канала, имеет по умолчанию уровень 0", 1, 5 5 110 50, center
  button "OK", 2, 45 50 30 10, ok
}

;===== chanserv.akick.add =====

alias chanserv.akick.add dialog -m chanserv.akick.add chanserv.akick.add
dialog chanserv.akick.add {
  title "AKICK ADD"
  size -1 -1 182 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник(маска)", 2, 60 5 30 10
  text "Причина", 9, 115 5 25 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  edit "", 10, 100 13 60 10, autohs
  button "?", 6, 165 13 12 10
  button "OK", 7, 55 30 30 10, ok
  button "Отмена", 8, 95 30 30 10, cancel
}
on *:dialog:chanserv.akick.add:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.akick.add.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) && ($len($did(10)) != 0) { /msg ChanServ@*.RusNet AKICK $chr(35) $+ $did(4) ADD $did(5) $did(10) }
  }
}

alias chanserv.akick.add.help dialog -m chanserv.akick.add.help chanserv.akick.add.help
dialog chanserv.akick.add.help {
  title "Помощь..."
  size -1 -1 80 45
  option dbu
  text "Добавляет ник или маску в список автокика канала с указанной причиной", 1, 5 5 70 20, center
  button "OK", 2, 25 30 30 10, ok
}
on *:dialog:chanserv.akick.add.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.akick.add chanserv.akick.add | did -f chanserv.akick.add 4 }
  }
}

;===== chanserv.akick.del =====

alias chanserv.akick.del dialog -m chanserv.akick.del chanserv.akick.del
dialog chanserv.akick.del {
  title "AKICK DEL"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник(маска)", 2, 60 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.akick.del:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.akick.del.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet AKICK $chr(35) $+ $did(4) DEL $did(5) }
  }
}

alias chanserv.akick.del.help dialog -m chanserv.akick.del.help chanserv.akick.del.help
dialog chanserv.akick.del.help {
  title "Помощь..."
  size -1 -1 80 45
  option dbu
  text "Удаляет ник или маску из списка автокика канала", 1, 5 5 70 20, center
  button "OK", 2, 25 30 30 10, ok
}
on *:dialog:chanserv.akick.del.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.akick.del chanserv.akick.del | did -f chanserv.akick.del 4 }
  }
}

;===== chanserv.akick.list =====

alias chanserv.akick.list dialog -m chanserv.akick.list chanserv.akick.list
dialog chanserv.akick.list {
  title "AKICK LIST"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 35 5 30 10
  text "#", 3, 20 15 10 10
  edit "", 4, 24 13  40 10, autohs
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.akick.list:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ AKICK $chr(35) $+ $did(4) LIST }
  }
}

;===== chanserv.akick.help =====

alias chanserv.akick.help dialog -m chanserv.akick.help chanserv.akick.help
dialog chanserv.akick.help {
  title "Помощь..."
  size -1 -1 120 45
  option dbu
  text "Если пользователь из списка автокика заходит на канал, то ChanServ делает бан+кик пользователя.", 1, 5 5 110 50, center
  button "OK", 2, 45 30 30 10, ok
}

;===== chanserv.level.set =====

alias chanserv.level.set dialog -m chanserv.level.set chanserv.level.set
dialog chanserv.level.set {
  title "LEVEL SET"
  size -1 -1 142 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Уровень", 9, 100 5 25 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  edit "", 10, 105 13 11 10
  button "?", 6, 125 13 12 10
  button "OK", 7, 35 30 30 10, ok
  button "Отмена", 8, 75 30 30 10, cancel
  button "тип", 11, 66 5 15 8
}
on *:dialog:chanserv.level.set:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.level.set.help }
    if ($did == 11) { chanserv.level.set.type.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) && ($len($did(10)) != 0) { /msg ChanServ@*.RusNet LEVELS $chr(35) $+ $did(4) SET $did(5) $did(10) }
  }
}

alias chanserv.level.set.help dialog -m chanserv.level.set.help chanserv.level.set.help
dialog chanserv.level.set.help {
  title "Помощь..."
  size -1 -1 80 55
  option dbu
  text "Устанавливает уровень определенному типу пользователей на канале", 1, 5 5 70 30, center
  button "OK", 2, 25 40 30 10, ok
}
on *:dialog:chanserv.level.set.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.level.set chanserv.level.set | did -f chanserv.level.set 4 }
  }
}

alias chanserv.level.set.type.help dialog -m chanserv.level.set.type.help chanserv.level.set.type.help
dialog chanserv.level.set.type.help {
  title "Помощь..."
  size -1 -1 180 160
  option dbu
  text "AUTOOP - Автоматический статус оператора", 1, 5 5 170 10, center
  text "AUTOVOICE - Автоматически дается войс", 2, 5 15 170 10, center
  text "AUTODEOP - Запрещено получение статуса оператора", 3, 5 25 170 10, center
  text "NOJOIN - Запрещено заходить на канал", 4, 5 35 170 10, center
  text "INVITE - Разрешено использовать команду INVITE", 5, 5 45 170 10, center
  text "AKICK - Разрешено использовать команду AKICK", 6, 5 55 170 10, center
  text "SET - Разрешено использовать команду SET", 7, 5 65 170 10, center
  text "CLEAR - Разрешено использовать команду CLEAR", 8, 5 75 170 10, center
  text " UNBAN - Разрешено использовать команду UNBAN", 9, 5 85 170 10, center
  text "OP-DEOP - Разрешено использовать команды OP/DEOP", 10, 5 95 170 10, center
  text "ACC-LIST - Разрешено смотреть список доступа", 11, 5 105 170 10, center
  text "ACC-CHANGE - Разрешено изменять список доступа", 12, 5 115 170 10, center
  text "MEMO - Разрешено смотреть список и читать записки канала", 13, 5 125 170 10, center
  text "VOICE - Разрешено использовать команды VOICE/DEVOICE", 14, 5 135 170 10, center
  button "OK", 15, 60 145 30 10, ok
}
on *:dialog:chanserv.level.set.type.help:*:*: {
  if ($devent == sclick) {
    if ($did == 15) { dialog -v chanserv.level.set chanserv.level.set | did -f chanserv.level.set 4 }
  }
}

;===== chanserv.level.reset =====

alias chanserv.level.reset dialog -m chanserv.level.reset chanserv.level.reset
dialog chanserv.level.reset {
  title "LEVEL DISABLE"
  size -1 -1 142 45
  option dbu
  text "Канал", 1, 20 5 30 10
  button "тип", 2, 66 5 15 8
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "ВСЕ", 10, 100 13 20 10
  button "?", 6, 125 13 12 10
  button "OK", 7, 35 30 30 10, ok
  button "Отмена", 8, 75 30 30 10, cancel
}
on *:dialog:chanserv.level.reset:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.level.reset.help }
    if ($did == 2) { chanserv.level.set.type.help }
    if ($did == 10) { did -ra $dname 5 RESET }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet LEVELS $chr(35) $+ $did(4) DISABLE $did(5) }
    if ($did == 7) && ($len($did(4)) != 0) && ($did(5).text == RESET) { /msg ChanServ@*.RusNet LEVELS $chr(35) $+ $did(4) $did(5) }
  }
}

alias chanserv.level.reset.help dialog -m chanserv.level.reset.help chanserv.level.reset.help
dialog chanserv.level.reset.help {
  title "Помощь..."
  size -1 -1 90 60
  option dbu
  text "Сбрасывает уровень для определенного типа или для всех пользователей находящихся в списке доступа канала", 1, 5 5 80 35, center
  button "OK", 2, 30 45 30 10, ok
}
on *:dialog:chanserv.level.reset.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.level.reset chanserv.level.reset | did -f chanserv.level.reset 4 }
  }
}

;===== chanserv.level.list =====

alias chanserv.level.list dialog -m chanserv.level.list chanserv.level.list
dialog chanserv.level.list {
  title "LEVEL LIST"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 35 5 30 10
  text "#", 3, 20 15 10 10
  edit "", 4, 24 13  40 10, autohs
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.level.list:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet LEVELS $chr(35) $+ $did(4) LIST }
  }
}

;===== chanserv.level.help =====

alias chanserv.level.help dialog -m chanserv.level.help chanserv.level.help
dialog chanserv.level.help {
  title "Помощь..."
  size -1 -1 120 65
  option dbu
  text "Изменения в уровне доступа требуются для выполнения определенных команд. Это позволяет основателю канала выборочно настроить список уровня доступа для нужд канала", 1, 5 5 110 50, center
  button "OK", 2, 45 50 30 10, ok
}

;===== chanserv.info =====

alias chanserv.info dialog -m chanserv.info chanserv.info
dialog chanserv.info {
  title "INFO"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.info:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.info.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet INFO $chr(35) $+ $did(4) }
  }
}

alias chanserv.info.help dialog -m chanserv.info.help chanserv.info.help
dialog chanserv.info.help {
  title "Помощь..."
  size -1 -1 90 65
  option dbu
  text "Показывает информацию о канале, включая основателя, время регистрации, топик, заблокированные режимы, если таковые есть. Скрытую информацию не показывает", 1, 5 5 80 45, center
  button "OK", 2, 30 50 30 10, ok
}
on *:dialog:chanserv.info.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.info chanserv.info | did -f chanserv.info 4 }
  }
}

;===== chanserv.info.all =====

alias chanserv.info.all dialog -m chanserv.info.all chanserv.info.all
dialog chanserv.info.all {
  title "INFO ALL"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.info.all:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.info.all.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet INFO $chr(35) $+ $did(4) ALL }
  }
}

alias chanserv.info.all.help dialog -m chanserv.info.all.help chanserv.info.all.help
dialog chanserv.info.all.help {
  title "Помощь..."
  size -1 -1 90 70
  option dbu
  text "Показывает информацию о канале, включая основателя, время регистрации, топик, заблокированные режимы, если таковые есть. Показывает скрытую информацию", 1, 5 5 80 45, center
  button "OK", 2, 30 55 30 10, ok
}
on *:dialog:chanserv.info.all.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.info.all chanserv.info.all | did -f chanserv.info.all 4 }
  }
}

;===== chanserv.invite =====

alias chanserv.invite dialog -m chanserv.invite chanserv.invite
dialog chanserv.invite {
  title "INVITE"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.invite:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.invite.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet INVITE $chr(35) $+ $did(4) }
  }
}

alias chanserv.invite.help dialog -m chanserv.invite.help chanserv.invite.help
dialog chanserv.invite.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Пригласить себя на канал.  Используется, если на канале установлен режим +i", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.invite.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.invite chanserv.invite | did -f chanserv.invite 4 }
  }
}

;===== chanserv.op =====

alias chanserv.op dialog -m chanserv.op chanserv.op
dialog chanserv.op {
  title "OP me"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.op:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.op.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet OP $chr(35) $+ $did(4) }
  }
}

alias chanserv.op.help dialog -m chanserv.op.help chanserv.op.help
dialog chanserv.op.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Получить статус оператора на канале, если вы имеете доступ к команде OP на этом канале", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.op.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.op chanserv.op | did -f chanserv.op 4 }
  }
}

;===== chanserv.deop =====

alias chanserv.deop dialog -m chanserv.deop chanserv.deop
dialog chanserv.deop {
  title "DEOP me"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.deop:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.deop.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet DEOP $chr(35) $+ $did(4) }
  }
}

alias chanserv.deop.help dialog -m chanserv.deop.help chanserv.deop.help
dialog chanserv.deop.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Снять с себя статус оператора на канале, если вы имеете доступ к команде DEOP на этом канале", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.deop.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.deop chanserv.deop | did -f chanserv.deop 4 }
  }
}

;===== chanserv.op.nick =====

alias chanserv.op.nick dialog -m chanserv.op.nick chanserv.op.nick
dialog chanserv.op.nick {
  title "OP to"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник(и)", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.op.nick:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.op.nick.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet OP $chr(35) $+ $did(4) $did(5) }
  }
}

alias chanserv.op.nick.help dialog -m chanserv.op.nick.help chanserv.op.nick.help
dialog chanserv.op.nick.help {
  title "Помощь..."
  size -1 -1 120 70
  option dbu
  text "Дает статус оператора канала никам из списка. Если вы хотите дать статус оператора не одному нику а нескольким, то пишите ники через пробел. Если режим SECUREOPS включен (ON), ChanServ не даст опа пользователям, не имеющим уровня доступа AutoOp или выше", 1, 5 5 110 70, center
  button "OK", 2, 45 57 30 10, ok
}
on *:dialog:chanserv.op.nick.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.op.nick chanserv.op.nick | did -f chanserv.op.nick 4 }
  }
}

;===== chanserv.deop.nick =====

alias chanserv.deop.nick dialog -m chanserv.deop.nick chanserv.deop.nick
dialog chanserv.deop.nick {
  title "DEOP to"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник(и)", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.deop.nick:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.deop.nick.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet DEOP $chr(35) $+ $did(4) $did(5) }
  }
}

alias chanserv.deop.nick.help dialog -m chanserv.deop.nick.help chanserv.deop.nick.help
dialog chanserv.deop.nick.help {
  title "Помощь..."
  size -1 -1 120 65
  option dbu
  text "Отнимает статус оператора канала у ников из списка. Если вы хотите отнять статус оператора не у одного ника а у нескольких, то пишите ники через пробел. По умолчанию у вас должен быть уровень доступа 5 или выше на этом канале", 1, 5 5 110 70, center
  button "OK", 2, 45 52 30 10, ok
}
on *:dialog:chanserv.deop.nick.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.deop.nick chanserv.deop.nick | did -f chanserv.deop.nick 4 }
  }
}

;===== chanserv.voice =====

alias chanserv.voice dialog -m chanserv.voice chanserv.voice
dialog chanserv.voice {
  title "VOICE me"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.voice:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.voice.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet VOICE $chr(35) $+ $did(4) }
  }
}
alias chanserv.voice.help dialog -m chanserv.voice.help chanserv.voice.help
dialog chanserv.voice.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Получить статус войс на канале, если вы имеете доступ к команде VOICE на этом канале", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.voice.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.voice chanserv.voice | did -f chanserv.voice 4 }
  }
}

;===== chanserv.devoice =====

alias chanserv.devoice dialog -m chanserv.devoice chanserv.devoice
dialog chanserv.devoice {
  title "DEVOICE me"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.devoice:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.devoice.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet DEVOICE $chr(35) $+ $did(4) }
  }
}

alias chanserv.devoice.help dialog -m chanserv.devoice.help chanserv.devoice.help
dialog chanserv.devoice.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Снять статус войс с себя на канале, если вы имеете доступ к команде DEVOICE на этом канале", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.devoice.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.devoice chanserv.devoice | did -f chanserv.devoice 4 }
  }
}

;===== chanserv.voice.nick =====

alias chanserv.voice.nick dialog -m chanserv.voice.nick chanserv.voice.nick
dialog chanserv.voice.nick {
  title "VOICE to"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник(и)", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.voice.nick:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.voice.nick.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet VOICE $chr(35) $+ $did(4) $did(5) }
  }
}

alias chanserv.voice.nick.help dialog -m chanserv.voice.nick.help chanserv.voice.nick.help
dialog chanserv.voice.nick.help {
  title "Помощь..."
  size -1 -1 120 65
  option dbu
  text "Дает статус войс на канале никам из списка. Если вы хотите дать войс не одному нику а нескольким, то пишите ники через пробел. Использование знака - (минус) перед ником отнимает войс у указанных ников", 1, 5 5 110 50, center
  button "OK", 2, 45 50 30 10, ok
}
on *:dialog:chanserv.voice.nick.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.voice.nick chanserv.voice.nick | did -f chanserv.voice.nick 4 }
  }
}

;===== chanserv.devoice.nick =====

alias chanserv.devoice.nick dialog -m chanserv.devoice.nick chanserv.devoice.nick
dialog chanserv.devoice.nick {
  title "DEVOICE to"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник(и)", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.devoice.nick:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.devoice.nick.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet DEVOICE $chr(35) $+ $did(4) $did(5) }
  }
}

alias chanserv.devoice.nick.help dialog -m chanserv.devoice.nick.help chanserv.devoice.nick.help
dialog chanserv.devoice.nick.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Отнимает статус войс на канале у ников из списка. Если вы хотите отнять войс не у одного ника а у нескольких, то пишите ники через пробел", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:chanserv.devoice.nick.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.devoice.nick chanserv.devoice.nick | did -f chanserv.devoice.nick 4 }
  }
}

;===== chanserv.unban =====

alias chanserv.unban dialog -m chanserv.unban chanserv.unban
dialog chanserv.unban {
  title "UNBAN"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.unban:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.unban.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet UNBAN $chr(35) $+ $did(4) }
  }
}

alias chanserv.unban.help dialog -m chanserv.unban.help chanserv.unban.help
dialog chanserv.unban.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Снимает на канале все баны, подходящие под маску Вашего хоста", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.unban.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.unban chanserv.unban | did -f chanserv.unban 4 }
  }
}

;===== chanserv.unban.all =====

alias chanserv.unban.all dialog -m chanserv.unban.all chanserv.unban.all
dialog chanserv.unban.all {
  title "UNBAN ALL"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.unban.all:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.unban.all.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet CLEAR $chr(35) $+ $did(4) BANS }
  }
}

alias chanserv.unban.all.help dialog -m chanserv.unban.all.help chanserv.unban.all.help
dialog chanserv.unban.all.help {
  title "Помощь..."
  size -1 -1 90 40
  option dbu
  text "Снимает все баны на канале", 1, 5 5 80 10, center
  button "OK", 2, 30 20 30 10, ok
}
on *:dialog:chanserv.unban.all.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.unban.all chanserv.unban.all | did -f chanserv.unban.all 4 }
  }
}

;===== chanserv.clear =====

alias chanserv.clear dialog -m chanserv.clear chanserv.clear
dialog chanserv.clear {
  title "CLEAR"
  size -1 -1 120 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Режим", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  combo 5, 55 13 45 65, drop
  button "?", 6, 105 13 12 10
  button "OK", 7, 25 30 30 10, ok
  button "Отмена", 8, 65 30 30 10, cancel
}
on *:dialog:chanserv.clear:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    didtok $dname 5 32 OPS VOICES MODES BANS EXCEPTIONS USERS
    did -c $dname 5 1
  }
  if ($devent == sclick) {
    if ($did == 6) && ($did(5).sel == 1) { set %chanserv.clear.mode 1 | chanserv.clear.help }
    if ($did == 6) && ($did(5).sel == 2) { set %chanserv.clear.mode 2 | chanserv.clear.help }
    if ($did == 6) && ($did(5).sel == 3) { set %chanserv.clear.mode 3 | chanserv.clear.help }
    if ($did == 6) && ($did(5).sel == 4) { set %chanserv.clear.mode 4 | chanserv.clear.help }
    if ($did == 6) && ($did(5).sel == 5) { set %chanserv.clear.mode 5 | chanserv.clear.help }
    if ($did == 6) && ($did(5).sel == 6) { set %chanserv.clear.mode 6 | chanserv.clear.help }
    if ($did == 6) && ($did(5).sel == 7) { set %chanserv.clear.mode 7 | chanserv.clear.help }
    if ($did == 6) && ($did(5).sel == 8) { set %chanserv.clear.mode 8 | chanserv.clear.help }
    if ($did == 7) && ($len($did(4).text) != 0) { /msg ChanServ@*.RusNet CLEAR $chr(35) $+ $did(4) $did(5) }
  }
}

alias chanserv.clear.help dialog -m chanserv.clear.help chanserv.clear.help
dialog chanserv.clear.help {
  title "Очистить режимы канала"
  size -1 -1 120 45
  option dbu
  text "Очищает список всех операторов канала", 1, 5 5 110 20, center
  text "Очищает список всех воисов канала", 2, 5 5 110 20, center
  text "Очищает все режимы канала", 3, 5 5 110 20, center
  text "Снимает все баны на канале", 4, 5 5 110 20, center
  text "Снимает все исключения из банов на канале", 5, 5 5 110 20, center
  text "Кикает всех пользователей на канале", 6, 5 5 110 20, center
  button "OK", 9, 45 30 30 10, ok
}
on *:dialog:chanserv.clear.help:*:*: {
  if ($devent == init) {
    if (%chanserv.clear.mode == 1) { did -v $dname 1 | did -h $dname 2 | did -h $dname 3 | did -h $dname 4 | did -h $dname 5 | did -h $dname 6 }
    if (%chanserv.clear.mode == 2) { did -h $dname 1 | did -v $dname 2 | did -h $dname 3 | did -h $dname 4 | did -h $dname 5 | did -h $dname 6 }
    if (%chanserv.clear.mode == 3) { did -h $dname 1 | did -h $dname 2 | did -v $dname 3 | did -h $dname 4 | did -h $dname 5 | did -h $dname 6 }
    if (%chanserv.clear.mode == 4) { did -h $dname 1 | did -h $dname 2 | did -h $dname 3 | did -v $dname 4 | did -h $dname 5 | did -h $dname 6 }
    if (%chanserv.clear.mode == 5) { did -h $dname 1 | did -h $dname 2 | did -h $dname 3 | did -h $dname 4 | did -v $dname 5 | did -h $dname 6 }
    if (%chanserv.clear.mode == 6) { did -h $dname 1 | did -h $dname 2 | did -h $dname 3 | did -h $dname 4 | did -h $dname 5 | did -v $dname 6 }
  }
  if ($devent == sclick) {
    if ($did == 9) { dialog -v chanserv.clear chanserv.clear | did -f chanserv.clear 4 }
  }
}

;===== chanserv.cycle =====

alias chanserv.cycle dialog -m chanserv.cycle chanserv.cycle
dialog chanserv.cycle {
  title "CYCLE"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.cycle:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.cycle.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet CYCLE $chr(35) $+ $did(4) }
  }
}

alias chanserv.cycle.help dialog -m chanserv.cycle.help chanserv.cycle.help
dialog chanserv.cycle.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Очищает режимы, ключи и многое другое", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.cycle.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.cycle chanserv.cycle | did -f chanserv.cycle 4 }
  }
}

;===== chanserv.set.founder =====

alias chanserv.set.founder dialog -m chanserv.set.founder chanserv.set.founder
dialog chanserv.set.founder {
  title "SET FOUNDER"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник", 2, 68 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.set.founder:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.founder.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) FOUNDER $did(5) }
  }
}

alias chanserv.set.founder.help dialog -m chanserv.set.founder.help chanserv.set.founder.help
dialog chanserv.set.founder.help {
  title "Помощь..."
  size -1 -1 120 45
  option dbu
  text "Устанавливает новый ник создателя канала. Необходимо иметь уровень доступа создателя канала", 1, 5 5 110 50, center
  button "OK", 2, 45 30 30 10, ok
}
on *:dialog:chanserv.set.founder.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.founder chanserv.set.founder | did -f chanserv.set.founder 4 }
  }
}

;===== chanserv.set.successor =====

alias chanserv.set.successor dialog -m chanserv.set.successor chanserv.set.successor
dialog chanserv.set.successor {
  title "SET SUCCESSOR"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник", 2, 68 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.set.successor:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.successor.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) SUCCESSOR $did(5) }
  }
}

alias chanserv.set.successor.help dialog -m chanserv.set.successor.help chanserv.set.successor.help
dialog chanserv.set.successor.help {
  title "Помощь..."
  size -1 -1 120 75
  option dbu
  text "Задает ник преемника основателя канала. Если ник основателя не использовался долгое время и/или был удален, сервисы делают преемника основателем канала. Если оба ника (основатель и преемник) не использовались и/или были удалены, канал также будет удален из базы ChanServ", 1, 5 5 110 55, center
  button "OK", 2, 45 60 30 10, ok
}
on *:dialog:chanserv.set.successor.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.successor chanserv.set.successor | did -f chanserv.set.successor 4 }
  }
}

;===== chanserv.unset.successor =====

alias chanserv.unset.successor dialog -m chanserv.unset.successor chanserv.unset.successor
dialog chanserv.unset.successor {
  title "UNSET SUCCESSOR"
  size -1 -1 89 45
  option dbu
  text "Канал", 1, 25 5 30 10
  text "#", 3, 10 15 10 10
  edit "", 4, 14 13  40 10, autohs
  button "?", 6, 60 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.unset.successor:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.unset.successor.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet UNSET $chr(35) $+ $did(4) SUCCESSOR }
  }
}

alias chanserv.unset.successor.help dialog -m chanserv.unset.successor.help chanserv.unset.successor.help
dialog chanserv.unset.successor.help {
  title "Помощь..."
  size -1 -1 120 75
  option dbu
  text "Очищает текущий ник преемника канала. Если ник основателя не использовался долгое время и/или был удален, сервисы делают преемника основателем канала. Если оба ника (основатель и преемник) не использовались и/или были удалены, канал также будет удален из базы ChanServ", 1, 5 5 110 55, center
  button "OK", 2, 45 60 30 10, ok
}
on *:dialog:chanserv.unset.successor.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.unset.successor chanserv.unset.successor | did -f chanserv.unset.successor 4 }
  }
}

;===== chanserv.set.password =====

alias chanserv.set.password dialog -m chanserv.set.password chanserv.set.password
dialog chanserv.set.password {
  title "SET PASSWORD"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Пароль", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.set.password:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.password.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) PASSWORD $did(5) }
  }
}

alias chanserv.set.password.help dialog -m chanserv.set.password.help chanserv.set.password.help
dialog chanserv.set.password.help {
  title "Помощь..."
  size -1 -1 120 45
  option dbu
  text "Устанавливает новый пароль основателя канала", 1, 5 5 110 50, center
  button "OK", 2, 45 30 30 10, ok
}
on *:dialog:chanserv.set.password.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.password chanserv.set.password | did -f chanserv.set.password 4 }
  }
}

;===== chanserv.set.mlock =====

alias chanserv.set.mlock dialog -m chanserv.set.mlock chanserv.set.mlock
dialog chanserv.set.mlock {
  title "SET MLOCK"
  size -1 -1 115 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Режим", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:chanserv.set.mlock:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.mlock.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) MLOCK $did(5) }
  }
}

alias chanserv.set.mlock.help dialog -m chanserv.set.mlock.help chanserv.set.mlock.help
dialog chanserv.set.mlock.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Устанавливает блокировку для отдельных режимов канала. Режимы, после которых стоит +, блокируются, если же ''-'', то разблокируются", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:chanserv.set.mlock.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.mlock chanserv.set.mlock | did -f chanserv.set.mlock 4 }
  }
}

;===== chanserv.set.topic =====

alias chanserv.set.topic dialog -m chanserv.set.topic chanserv.set.topic
dialog chanserv.set.topic {
  title "SET TOPIC"
  size -1 -1 145 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Топик", 2, 80 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 70 10, autohs
  button "?", 6, 130 13 12 10
  button "OK", 7, 35 30 30 10, ok
  button "Отмена", 8, 75 30 30 10, cancel
}
on *:dialog:chanserv.set.topic:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.topic.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) TOPIC $did(5) }
  }
}

alias chanserv.set.topic.help dialog -m chanserv.set.topic.help chanserv.set.topic.help
dialog chanserv.set.topic.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "ChanServ устанавливает на канале топик. Обычно используется вместе с опцией TOPICLOCK", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:chanserv.set.topic.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.topic chanserv.set.topic | did -f chanserv.set.topic 4 }
  }
}

;===== chanserv.set.topiclock.on =====

alias chanserv.set.topiclock.on dialog -m chanserv.set.topiclock.on chanserv.set.topiclock.on
dialog chanserv.set.topiclock.on {
  title "SET TOPICLOCK ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.topiclock.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.topiclock.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) TOPICLOCK ON }
  }
}

alias chanserv.set.topiclock.on.help dialog -m chanserv.set.topiclock.on.help chanserv.set.topiclock.on.help
dialog chanserv.set.topiclock.on.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Если TOPICLOCK включен, ChanServ не позволяет никому (за исключением основателя) изменять топик на канале", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.set.topiclock.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.topiclock.on chanserv.set.topiclock.on | did -f chanserv.set.topiclock.on 4 }
  }
}

;===== chanserv.set.topiclock.off =====

alias chanserv.set.topiclock.off dialog -m chanserv.set.topiclock.off chanserv.set.topiclock.off
dialog chanserv.set.topiclock.off {
  title "SET TOPICLOCK OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.topiclock.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.topiclock.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) TOPICLOCK OFF }
  }
}

alias chanserv.set.topiclock.off.help dialog -m chanserv.set.topiclock.off.help chanserv.set.topiclock.off.help
dialog chanserv.set.topiclock.off.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Если TOPICLOCK выключен, ChanServ позволяет всем кто имеет соответствующий доступ изменять топик на канале", 1, 5 5 80 25, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.set.topiclock.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.topiclock.off chanserv.set.topiclock.off | did -f chanserv.set.topiclock.off 4 }
  }
}

;===== chanserv.set.private.on =====

alias chanserv.set.private.on dialog -m chanserv.set.private.on chanserv.set.private.on
dialog chanserv.set.private.on {
  title "SET PRIVATE ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.private.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.private.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) PRIVATE ON }
  }
}

alias chanserv.set.private.on.help dialog -m chanserv.set.private.on.help chanserv.set.private.on.help
dialog chanserv.set.private.on.help {
  title "Помощь..."
  size -1 -1 90 60
  option dbu
  text "Когда опция PRIVATE включена, при просмотре списка каналов ChanServ с помощью команды LIST этот канал не показывается", 1, 5 5 80 35, center
  button "OK", 2, 30 45 30 10, ok
}
on *:dialog:chanserv.set.private.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.private.on chanserv.set.private.on | did -f chanserv.set.private.on 4 }
  }
}

;===== chanserv.set.private.off =====

alias chanserv.set.private.off dialog -m chanserv.set.private.off chanserv.set.private.off
dialog chanserv.set.private.off {
  title "SET PRIVATE OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.private.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.private.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) PRIVATE OFF }
  }
}

alias chanserv.set.private.off.help dialog -m chanserv.set.private.off.help chanserv.set.private.off.help
dialog chanserv.set.private.off.help {
  title "Помощь..."
  size -1 -1 90 60
  option dbu
  text "Когда опция PRIVATE выключена, при просмотре списка каналов ChanServ с помощью команды LIST этот канал будет показываться", 1, 5 5 80 35, center
  button "OK", 2, 30 45 30 10, ok
}
on *:dialog:chanserv.set.private.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.private.off chanserv.set.private.off | did -f chanserv.set.private.off 4 }
  }
}

;===== chanserv.set.secureops.on =====

alias chanserv.set.secureops.on dialog -m chanserv.set.secureops.on chanserv.set.secureops.on
dialog chanserv.set.secureops.on {
  title "SET SECUREOPS ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.secureops.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.secureops.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) SECUREOPS ON }
  }
}

alias chanserv.set.secureops.on.help dialog -m chanserv.set.secureops.on.help chanserv.set.secureops.on.help
dialog chanserv.set.secureops.on.help {
  title "Помощь..."
  size -1 -1 90 60
  option dbu
  text "Когда опция SECUREOPS включена, только пользователи с уровнем доступа AutoOp или выше могут получить опа на канале", 1, 5 5 80 35, center
  button "OK", 2, 30 45 30 10, ok
}
on *:dialog:chanserv.set.secureops.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.secureops.on chanserv.set.secureops.on | did -f chanserv.set.secureops.on 4 }
  }
}

;===== chanserv.set.secureops.off =====

alias chanserv.set.secureops.off dialog -m chanserv.set.secureops.off chanserv.set.secureops.off
dialog chanserv.set.secureops.off {
  title "SET SECUREOPS OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.secureops.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.secureops.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) SECUREOPS OFF }
  }
}

alias chanserv.set.secureops.off.help dialog -m chanserv.set.secureops.off.help chanserv.set.secureops.off.help
dialog chanserv.set.secureops.off.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Когда опция SECUREOPS выключена, все пользователи могут получить опа на канале", 1, 5 5 80 35, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.set.secureops.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.secureops.off chanserv.set.secureops.off | did -f chanserv.set.secureops.off 4 }
  }
}

;===== chanserv.set.restricted.on =====

alias chanserv.set.restricted.on dialog -m chanserv.set.restricted.on chanserv.set.restricted.on
dialog chanserv.set.restricted.on {
  title "SET RESTRICTED ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.restricted.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.restricted.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) RESTRICTED ON }
  }
}

alias chanserv.set.restricted.on.help dialog -m chanserv.set.restricted.on.help chanserv.set.restricted.on.help
dialog chanserv.set.restricted.on.help {
  title "Помощь..."
  size -1 -1 90 70
  option dbu
  text "Если опция RESTRICTED включена, любой пользователь, зашедший на канал, будет выброшен с него (бан+кик), если у него нет уровня AutoOp или выше для этого канала", 1, 5 5 80 45, center
  button "OK", 2, 30 55 30 10, ok
}
on *:dialog:chanserv.set.restricted.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.restricted.on chanserv.set.restricted.on | did -f chanserv.set.restricted.on 4 }
  }
}

;===== chanserv.set.restricted.off =====

alias chanserv.set.restricted.off dialog -m chanserv.set.restricted.off chanserv.set.restricted.off
dialog chanserv.set.restricted.off {
  title "SET RESTRICTED OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.restricted.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.restricted.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) RESTRICTED OFF }
  }
}

alias chanserv.set.restricted.off.help dialog -m chanserv.set.restricted.off.help chanserv.set.restricted.off.help
dialog chanserv.set.restricted.off.help {
  title "Помощь..."
  size -1 -1 90 50
  option dbu
  text "Отключение ужесточения условий доступа к каналу", 1, 5 5 80 35, center
  button "OK", 2, 30 35 30 10, ok
}
on *:dialog:chanserv.set.restricted.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.restricted.off chanserv.set.restricted.off | did -f chanserv.set.restricted.off 4 }
  }
}

;===== chanserv.set.secure.on =====

alias chanserv.set.secure.on dialog -m chanserv.set.secure.on chanserv.set.secure.on
dialog chanserv.set.secure.on {
  title "SET SECURE ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.secure.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.secure.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) SECURE ON }
  }
}

alias chanserv.set.secure.on.help dialog -m chanserv.set.secure.on.help chanserv.set.secure.on.help
dialog chanserv.set.secure.on.help {
  title "Помощь..."
  size -1 -1 90 70
  option dbu
  text "Если SECURE включено, доступ к каналу, согласно списку доступа ACCESS LIST, имеют только зарегистрированные и прошедшие идентификацию (на NickServ) пользователи", 1, 5 5 80 45, center
  button "OK", 2, 30 55 30 10, ok
}
on *:dialog:chanserv.set.secure.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.secure.on chanserv.set.secure.on | did -f chanserv.set.secure.on 4 }
  }
}

;===== chanserv.set.secure.off =====

alias chanserv.set.secure.off dialog -m chanserv.set.secure.off chanserv.set.secure.off
dialog chanserv.set.secure.off {
  title "SET SECURE OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.secure.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.secure.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) SECURE OFF }
  }
}

alias chanserv.set.secure.off.help dialog -m chanserv.set.secure.off.help chanserv.set.secure.off.help
dialog chanserv.set.secure.off.help {
  title "Помощь..."
  size -1 -1 90 60
  option dbu
  text "Если SECURE выключено, доступ к каналу имеют все пользователи, даже незарегистрированные и не прошедшие идентификацию (на NickServ)", 1, 5 5 80 45, center
  button "OK", 2, 30 47 30 10, ok
}
on *:dialog:chanserv.set.secure.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.secure.off chanserv.set.secure.off | did -f chanserv.set.secure.off 4 }
  }
}

;===== chanserv.set.desc =====

alias chanserv.set.desc dialog -m chanserv.set.desc chanserv.set.desc
dialog chanserv.set.desc {
  title "SET DESC"
  size -1 -1 153 45
  option dbu
  text "Канал", 1, 17 5 30 10
  text "Описание", 2, 77 5 30 10
  edit "", 4, 5 13  40 10, autohs
  edit "", 5, 51 13 80 10, autohs
  button "?", 6, 136 13 12 10
  button "OK", 7, 40 30 30 10, ok
  button "Отмена", 8, 80 30 30 10, cancel
}
on *:dialog:chanserv.set.desc:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.desc.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) DESC $did(5) }
  }
}

alias chanserv.set.desc.help dialog -m chanserv.set.desc.help chanserv.set.desc.help
dialog chanserv.set.desc.help {
  title "Помощь..."
  size -1 -1 120 45
  option dbu
  text "Устанавливает описание канала, которое будет отображаться при использовании команды LIST и INFO", 1, 5 5 110 75, center  
  button "OK", 2, 45 30 30 10, ok
}
on *:dialog:chanserv.set.desc.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.desc chanserv.set.desc | did -f chanserv.set.desc 4 }
  }
}

;===== chanserv.set.entrymsg =====

alias chanserv.set.entrymsg dialog -m chanserv.set.entrymsg chanserv.set.entrymsg
dialog chanserv.set.entrymsg {
  title "SET ENTRYMSG"
  size -1 -1 155 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Сообщение", 2, 65 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 80 10, autohs
  button "?", 6, 140 13 12 10
  button "OK", 7, 45 30 30 10, ok
  button "Отмена", 8, 85 30 30 10, cancel
}
on *:dialog:chanserv.set.entrymsg:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.entrymsg.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) ENTRYMSG $did(5) }
  }
}

alias chanserv.set.entrymsg.help dialog -m chanserv.set.entrymsg.help chanserv.set.entrymsg.help
dialog chanserv.set.entrymsg.help {
  title "Помощь..."
  size -1 -1 120 65
  option dbu
  text "Устанавливает сообщение (приветствие) при входе на канал. Когда пользователь входит на канал, ChanServ посылает ему сообщение. Чтобы сбросить сообщение, укажите знак - (минус) в качестве сообщения", 1, 5 5 110 50, center
  button "OK", 2, 45 50 30 10, ok
}
on *:dialog:chanserv.set.entrymsg.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.entrymsg chanserv.set.entrymsg | did -f chanserv.set.entrymsg 4 }
  }
}

;===== chanserv.unset.entrymsg =====

alias chanserv.unset.entrymsg dialog -m chanserv.unset.entrymsg chanserv.unset.entrymsg
dialog chanserv.unset.entrymsg {
  title "UNSET ENTRYMSG"
  size -1 -1 89 45
  option dbu
  text "Канал", 1, 25 5 30 10
  text "#", 3, 10 15 10 10
  edit "", 4, 14 13  40 10, autohs
  button "?", 6, 60 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.unset.entrymsg:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.unset.entrymsg.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet UNSET $chr(35) $+ $did(4) ENTRYMSG }
  }
}

alias chanserv.unset.entrymsg.help dialog -m chanserv.unset.entrymsg.help chanserv.unset.entrymsg.help
dialog chanserv.unset.entrymsg.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Очищает сообщение (приветствие) при входе на канал. Когда пользователь входит на канал, ChanServ посылает ему сообщение", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:chanserv.unset.entrymsg.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.unset.entrymsg chanserv.unset.entrymsg | did -f chanserv.unset.entrymsg 4 }
  }
}

;===== chanserv.set.email =====

alias chanserv.set.email dialog -m chanserv.set.email chanserv.set.email
dialog chanserv.set.email {
  title "SET EMAIL"
  size -1 -1 125 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ё-маил", 2, 70 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 50 10, autohs
  button "?", 6, 110 13 12 10
  button "OK", 7, 30 30 30 10, ok
  button "Отмена", 8, 70 30 30 10, cancel
}
on *:dialog:chanserv.set.email:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.email.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) EMAIL $did(5) }
  }
}

alias chanserv.set.email.help dialog -m chanserv.set.email.help chanserv.set.email.help
dialog chanserv.set.email.help {
  title "Помощь..."
  size -1 -1 120 60
  option dbu
  text "Устанавливает поле email (адрес электронной почты). Если пользователь выполнит команду INFO для канала, он получит информацию об адресе электронной почты канала", 1, 5 5 110 50, center
  button "OK", 2, 45 45 30 10, ok
}
on *:dialog:chanserv.set.email.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.email chanserv.set.email | did -f chanserv.set.email 4 }
  }
}

;===== chanserv.unset.email =====

alias chanserv.unset.email dialog -m chanserv.unset.email chanserv.unset.email
dialog chanserv.unset.email {
  title "UNSET EMAIL"
  size -1 -1 89 45
  option dbu
  text "Канал", 1, 25 5 30 10
  text "#", 3, 10 15 10 10
  edit "", 4, 14 13  40 10, autohs
  button "?", 6, 60 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.unset.email:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.unset.email.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet UNSET $chr(35) $+ $did(4) EMAIL }
  }
}

alias chanserv.unset.email.help dialog -m chanserv.unset.email.help chanserv.unset.email.help
dialog chanserv.unset.email.help {
  title "Помощь..."
  size -1 -1 120 60
  option dbu
  text "Очищает поле email (адрес электронной почты). Если пользователь выполнит команду INFO для канала, он получит информацию об адресе электронной почты канала", 1, 5 5 110 50, center
  button "OK", 2, 45 45 30 10, ok
}
on *:dialog:chanserv.unset.email.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.unset.email chanserv.unset.email | did -f chanserv.unset.email 4 }
  }
}

;===== chanserv.set.url =====

alias chanserv.set.url dialog -m chanserv.set.url chanserv.set.url
dialog chanserv.set.url {
  title "SET URL"
  size -1 -1 145 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Электронный адрес", 2, 65 5 60 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 70 10, autohs
  button "?", 6, 130 13 12 10
  button "OK", 7, 40 30 30 10, ok
  button "Отмена", 8, 80 30 30 10, cancel
}
on *:dialog:chanserv.set.url:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.url.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) URL $did(5) }
  }
}

alias chanserv.set.url.help dialog -m chanserv.set.url.help chanserv.set.url.help
dialog chanserv.set.url.help {
  title "Помощь..."
  size -1 -1 120 60
  option dbu
  text "Устанавливает электронный адрес канала в интернете. Когда пользователи просматривают информацию о канале (INFO), им покажут url канала. Для очистки поля адреса используйте знак - (минус) в качестве адреса", 1, 5 5 110 50, center
  button "OK", 2, 45 47 30 10, ok
}
on *:dialog:chanserv.set.url.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.url chanserv.set.url | did -f chanserv.set.url 4 }
  }
}

;===== chanserv.unset.url =====

alias chanserv.unset.url dialog -m chanserv.unset.url chanserv.unset.url
dialog chanserv.unset.url {
  title "UNSET URL"
  size -1 -1 89 45
  option dbu
  text "Канал", 1, 25 5 30 10
  text "#", 3, 10 15 10 10
  edit "", 4, 14 13  40 10, autohs
  button "?", 6, 60 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.unset.url:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.unset.url.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet UNSET $chr(35) $+ $did(4) URL }
  }
}

alias chanserv.unset.url.help dialog -m chanserv.unset.url.help chanserv.unset.url.help
dialog chanserv.unset.url.help {
  title "Помощь..."
  size -1 -1 120 45
  option dbu
  text "Очищает электронный адрес канала. Когда пользователи просматривают информацию о канале (INFO), им покажут url канала.", 1, 5 5 110 50, center
  button "OK", 2, 45 32 30 10, ok
}
on *:dialog:chanserv.unset.url.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.unset.url chanserv.unset.url | did -f chanserv.unset.url 4 }
  }
}

;===== chanserv.set.keeptopic.on =====

alias chanserv.set.keeptopic.on dialog -m chanserv.set.keeptopic.on chanserv.set.keeptopic.on
dialog chanserv.set.keeptopic.on {
  title "SET KEEPTOPIC ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.keeptopic.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.keeptopic.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) KEEPTOPIC ON }
  }
}

alias chanserv.set.keeptopic.on.help dialog -m chanserv.set.keeptopic.on.help chanserv.set.keeptopic.on.help
dialog chanserv.set.keeptopic.on.help {
  title "Помощь..."
  size -1 -1 90 70
  option dbu
  text "Если опция KEEPTOPIC включена, ChanServ запомнит топик канала после выхода последнего пользователя с канала, и восстановит его при повторном создании этого канала", 1, 5 5 80 45, center
  button "OK", 2, 30 55 30 10, ok
}
on *:dialog:chanserv.set.keeptopic.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.keeptopic.on chanserv.set.keeptopic.on | did -f chanserv.set.keeptopic.on 4 }
  }
}

;===== chanserv.set.keeptopic.off =====

alias chanserv.set.keeptopic.off dialog -m chanserv.set.keeptopic.off chanserv.set.keeptopic.off
dialog chanserv.set.keeptopic.off {
  title "SET KEEPTOPIC OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.keeptopic.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.keeptopic.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) KEEPTOPIC OFF }
  }
}

alias chanserv.set.keeptopic.off.help dialog -m chanserv.set.keeptopic.off.help chanserv.set.keeptopic.off.help
dialog chanserv.set.keeptopic.off.help {
  title "Помощь..."
  size -1 -1 90 45
  option dbu
  text "Если опция KEEPTOPIC выключена, ChanServ не будет помнить топик вашего канала", 1, 5 5 80 30, center
  button "OK", 2, 30 30 30 10, ok
}
on *:dialog:chanserv.set.keeptopic.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.keeptopic.off chanserv.set.keeptopic.off | did -f chanserv.set.keeptopic.off 4 }
  }
}

;===== chanserv.set.leaveops.on =====

alias chanserv.set.leaveops.on dialog -m chanserv.set.leaveops.on chanserv.set.leaveops.on
dialog chanserv.set.leaveops.on {
  title "SET LEAVEOPS ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.leaveops.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.leaveops.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) LEAVEOPS ON }
  }
}

alias chanserv.set.leaveops.on.help dialog -m chanserv.set.leaveops.on.help chanserv.set.leaveops.on.help
dialog chanserv.set.leaveops.on.help {
  title "Помощь..."
  size -1 -1 90 90
  option dbu
  text "Если опция LEAVEOPS включена, любой пользователь, получивший опа при разрыве связи между серверами (netsplit), сохраняет его. Это позволяет избежать ситуации массовой утраты опов в канале при потере и возобновлении связи с ChanServ", 1, 5 5 80 65, center
  button "OK", 2, 30 75 30 10, ok
}
on *:dialog:chanserv.set.leaveops.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.leaveops.on chanserv.set.leaveops.on | did -f chanserv.set.leaveops.on 4 }
  }
}

;===== chanserv.set.leaveops.off =====

alias chanserv.set.leaveops.off dialog -m chanserv.set.leaveops.off chanserv.set.leaveops.off
dialog chanserv.set.leaveops.off {
  title "SET LEAVEOPS OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.leaveops.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.leaveops.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) LEAVEOPS OFF }
  }
}

alias chanserv.set.leaveops.off.help dialog -m chanserv.set.leaveops.off.help chanserv.set.leaveops.off.help
dialog chanserv.set.leaveops.off.help {
  title "Помощь..."
  size -1 -1 90 55
  option dbu
  text "Если опция LEAVEOPS выключена, любой пользователь, получивший опа при разрыве связи между серверами (netsplit), теряет его", 1, 5 5 80 35, center
  button "OK", 2, 30 41 30 10, ok
}
on *:dialog:chanserv.set.leaveops.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.leaveops.off chanserv.set.leaveops.off | did -f chanserv.set.leaveops.off 4 }
  }
}

;===== chanserv.set.opnotice.on =====

alias chanserv.set.opnotice.on dialog -m chanserv.set.opnotice.on chanserv.set.opnotice.on
dialog chanserv.set.opnotice.on {
  title "SET OPNOTICE ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.opnotice.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.opnotice.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) OPNOTICE ON }
  }
}

alias chanserv.set.opnotice.on.help dialog -m chanserv.set.opnotice.on.help chanserv.set.opnotice.on.help
dialog chanserv.set.opnotice.on.help {
  title "Помощь..."
  size -1 -1 90 65
  option dbu
  text "Если опция OPNOTICE включена, то при использовании на канале комнды OP или DEOP, Chanserv отправит нотис на этот канал", 1, 5 5 80 65, center
  button "OK", 2, 30 50 30 10, ok
}
on *:dialog:chanserv.set.opnotice.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.opnotice.on chanserv.set.opnotice.on | did -f chanserv.set.opnotice.on 4 }
  }
}

;===== chanserv.set.opnotice.off =====

alias chanserv.set.opnotice.off dialog -m chanserv.set.opnotice.off chanserv.set.opnotice.off
dialog chanserv.set.opnotice.off {
  title "SET OPNOTICE OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.opnotice.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.opnotice.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) OPNOTICE OFF }
  }
}

alias chanserv.set.opnotice.off.help dialog -m chanserv.set.opnotice.off.help chanserv.set.opnotice.off.help
dialog chanserv.set.opnotice.off.help {
  title "Помощь..."
  size -1 -1 90 65
  option dbu
  text "Если опция OPNOTICE выключена, то при использовании на канале команды OP или DEOP, Chanserv не будет отправлять нотис на этот канал", 1, 5 5 80 45, center
  button "OK", 2, 30 51 30 10, ok
}
on *:dialog:chanserv.set.opnotice.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.opnotice.off chanserv.set.opnotice.off | did -f chanserv.set.opnotice.off 4 }
  }
}

;===== chanserv.set.enforce.on =====

alias chanserv.set.enforce.on dialog -m chanserv.set.enforce.on chanserv.set.enforce.on
dialog chanserv.set.enforce.on {
  title "SET ENFORCE ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.enforce.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.enforce.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) ENFORCE ON }
  }
}

alias chanserv.set.enforce.on.help dialog -m chanserv.set.enforce.on.help chanserv.set.enforce.on.help
dialog chanserv.set.enforce.on.help {
  title "Помощь..."
  size -1 -1 90 85
  option dbu
  text "Если опция ENFORCE включена, Chanserv сохраняет статусы пользователям с доступом автоопа или автовойса. К примеру, если у пользователя с доступом автоопа отнимают оп, то Chanserv автоматически возвращает статус оператора пользователю", 1, 5 5 80 65, center
  button "OK", 2, 30 72 30 10, ok
}
on *:dialog:chanserv.set.enforce.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.enforce.on chanserv.set.enforce.on | did -f chanserv.set.enforce.on 4 }
  }
}

;===== chanserv.set.enforce.off =====

alias chanserv.set.enforce.off dialog -m chanserv.set.enforce.off chanserv.set.enforce.off
dialog chanserv.set.enforce.off {
  title "SET ENFORCE OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.enforce.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.enforce.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) ENFORCE OFF }
  }
}

alias chanserv.set.enforce.off.help dialog -m chanserv.set.enforce.off.help chanserv.set.enforce.off.help
dialog chanserv.set.enforce.off.help {
  title "Помощь..."
  size -1 -1 90 55
  option dbu
  text "Если опция ENFORCE выключена, Chanserv не сохраняет статусы пользователям с доступом автоопа или автовойса", 1, 5 5 80 45, center
  button "OK", 2, 30 42 30 10, ok
}
on *:dialog:chanserv.set.enforce.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.enforce.off chanserv.set.enforce.off | did -f chanserv.set.enforce.off 4 }
  }
}

;===== chanserv.set.noop.on =====

alias chanserv.set.noop.on dialog -m chanserv.set.noop.on chanserv.set.noop.on
dialog chanserv.set.noop.on {
  title "SET NOOP ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.noop.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.noop.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) NOOP ON }
  }
}

alias chanserv.set.noop.on.help dialog -m chanserv.set.noop.on.help chanserv.set.noop.on.help
dialog chanserv.set.noop.on.help {
  title "Помощь..."
  size -1 -1 90 75
  option dbu
  text "Если опция NOOP включена, Chanserv не будет автоматически присваивать статус оператора пользователям, имеющим соответствующие привелегии в списке доступа канала, когда они заходят на канал", 1, 5 5 80 65, center
  button "OK", 2, 30 60 30 10, ok
}
on *:dialog:chanserv.set.noop.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.noop.on chanserv.set.noop.on | did -f chanserv.set.noop.on 4 }
  }
}

;===== chanserv.set.noop.off =====

alias chanserv.set.noop.off dialog -m chanserv.set.noop.off chanserv.set.noop.off
dialog chanserv.set.noop.off {
  title "SET NOOP OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.noop.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.noop.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) NOOP OFF }
  }
}

alias chanserv.set.noop.off.help dialog -m chanserv.set.noop.off.help chanserv.set.noop.off.help
dialog chanserv.set.noop.off.help {
  title "Помощь..."
  size -1 -1 90 75
  option dbu
  text "Если опция NOOP выключена, Chanserv будет автоматически присваивать статус оператора пользователям, имеющим соответствующие привелегии в списке доступа канала, когда они заходят на канал", 1, 5 5 80 65, center
  button "OK", 2, 30 60 30 10, ok
}
on *:dialog:chanserv.set.noop.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.noop.off chanserv.set.noop.off | did -f chanserv.set.noop.off 4 }
  }
}

;===== chanserv.set.noopfounder.on =====

alias chanserv.set.noopfounder.on dialog -m chanserv.set.noopfounder.on chanserv.set.noopfounder.on
dialog chanserv.set.noopfounder.on {
  title "SET NOOPFOUNDER ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.noopfounder.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.noopfounder.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) NOOPFOUNDER ON }
  }
}

alias chanserv.set.noopfounder.on.help dialog -m chanserv.set.noopfounder.on.help chanserv.set.noopfounder.on.help
dialog chanserv.set.noopfounder.on.help {
  title "Помощь..."
  size -1 -1 90 65
  option dbu
  text "Если опция NOOPFOUNDER включена, Chanserv не будет автоматически присваивать статус оператора основателю канала, когда он заходит на канал", 1, 5 5 80 65, center
  button "OK", 2, 30 50 30 10, ok
}
on *:dialog:chanserv.set.noopfounder.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.noopfounder.on chanserv.set.noopfounder.on | did -f chanserv.set.noopfounder.on 4 }
  }
}

;===== chanserv.set.noopfounder.off =====

alias chanserv.set.noopfounder.off dialog -m chanserv.set.noopfounder.off chanserv.set.noopfounder.off
dialog chanserv.set.noopfounder.off {
  title "SET NOOPFOUNDER OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.noopfounder.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.noopfounder.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) NOOPFOUNDER OFF }
  }
}

alias chanserv.set.noopfounder.off.help dialog -m chanserv.set.noopfounder.off.help chanserv.set.noopfounder.off.help
dialog chanserv.set.noopfounder.off.help {
  title "Помощь..."
  size -1 -1 90 65
  option dbu
  text "Если опция NOOPFOUNDER выключена, Chanserv будет автоматически присваивать статус оператора основателю канала, когда он заходит на канал", 1, 5 5 80 65, center
  button "OK", 2, 30 50 30 10, ok
}
on *:dialog:chanserv.set.noopfounder.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.noopfounder.off chanserv.set.noopfounder.off | did -f chanserv.set.noopfounder.off 4 }
  }
}

;===== chanserv.set.expirebans.on =====

alias chanserv.set.expirebans.on dialog -m chanserv.set.expirebans.on chanserv.set.expirebans.on
dialog chanserv.set.expirebans.on {
  title "SET EXPIREBANS ON"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.expirebans.on:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.expirebans.on.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) EXPIREBANS ON }
  }
}

alias chanserv.set.expirebans.on.help dialog -m chanserv.set.expirebans.on.help chanserv.set.expirebans.on.help
dialog chanserv.set.expirebans.on.help {
  title "Помощь..."
  size -1 -1 90 60
  option dbu
  text "Когда опция EXPIREBANS включена, баны на канале снимаются автоматически по истечении определенного промежутка времени", 1, 5 5 80 65, center
  button "OK", 2, 30 45 30 10, ok
}
on *:dialog:chanserv.set.expirebans.on.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.expirebans.on chanserv.set.expirebans.on | did -f chanserv.set.expirebans.on 4 }
  }
}

;===== chanserv.set.expirebans.off =====

alias chanserv.set.expirebans.off dialog -m chanserv.set.expirebans.off chanserv.set.expirebans.off
dialog chanserv.set.expirebans.off {
  title "SET EXPIREBANS OFF"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 30 5 30 10
  text "#", 3, 15 15 10 10
  edit "", 4, 19 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:chanserv.set.expirebans.off:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.set.expirebans.off.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SET $chr(35) $+ $did(4) EXPIREBANS OFF }
  }
}

alias chanserv.set.expirebans.off.help dialog -m chanserv.set.expirebans.off.help chanserv.set.expirebans.off.help
dialog chanserv.set.expirebans.off.help {
  title "Помощь..."
  size -1 -1 90 55
  option dbu
  text "Когда опция EXPIREBANS выключена, баны на канале снимаются только пользователями имеющими соответствующий доступ", 1, 5 5 80 35, center
  button "OK", 2, 30 41 30 10, ok
}
on *:dialog:chanserv.set.expirebans.off.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.set.expirebans.off chanserv.set.expirebans.off | did -f chanserv.set.expirebans.off 4 }
  }
}

;===== chanserv.vop.add =====

alias chanserv.vop.add dialog -m chanserv.vop.add chanserv.vop.add
dialog chanserv.vop.add {
  title "VOP ADD"
  size -1 -1 118 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник", 2, 70 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 23 30 30 10, ok
  button "Отмена", 8, 63 30 30 10, cancel
}
on *:dialog:chanserv.vop.add:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.vop.add.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet VOP $chr(35) $+ $did(4) ADD $did(5) }
  }
}

alias chanserv.vop.add.help dialog -m chanserv.vop.add.help chanserv.vop.add.help
dialog chanserv.vop.add.help {
  title "Помощь..."
  size -1 -1 80 65
  option dbu
  text "Добавляет ник в список войсоп канала. Пользователи со статусом войсоп автоматически получают войс при входе на канал", 1, 5 5 70 50, center
  button "OK", 2, 25 50 30 10, ok
}
on *:dialog:chanserv.vop.add.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.vop.add chanserv.vop.add | did -f chanserv.vop.add 4 }
  }
}

;===== chanserv.vop.del =====

alias chanserv.vop.del dialog -m chanserv.vop.del chanserv.vop.del
dialog chanserv.vop.del {
  title "VOP DEL"
  size -1 -1 118 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник", 2, 70 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 23 30 30 10, ok
  button "Отмена", 8, 63 30 30 10, cancel
}
on *:dialog:chanserv.vop.del:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.vop.del.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet VOP $chr(35) $+ $did(4) DEL $did(5) }
  }
}

alias chanserv.vop.del.help dialog -m chanserv.vop.del.help chanserv.vop.del.help
dialog chanserv.vop.del.help {
  title "Помощь..."
  size -1 -1 80 65
  option dbu
  text "Удаляет ник из списка войсоп канала. Пользователи со статусом войсоп автоматически получают войс при входе на канал", 1, 5 5 70 50, center
  button "OK", 2, 25 50 30 10, ok
}
on *:dialog:chanserv.vop.del.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.vop.del chanserv.vop.del | did -f chanserv.vop.del 4 }
  }
}

;===== chanserv.vop.list =====

alias chanserv.vop.list dialog -m chanserv.vop.list chanserv.vop.list
dialog chanserv.vop.list {
  title "VOP LIST"
  size -1 -1 75 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  button "?", 6, 55 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:chanserv.vop.list:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.vop.list.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet VOP $chr(35) $+ $did(4) LIST }
  }
}

alias chanserv.vop.list.help dialog -m chanserv.vop.list.help chanserv.vop.list.help
dialog chanserv.vop.list.help {
  title "Помощь..."
  size -1 -1 80 35
  option dbu
  text "Показывает весь список ВойсОп", 1, 5 5 70 50, center
  button "OK", 2, 25 20 30 10, ok
}
on *:dialog:chanserv.vop.list.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.vop.list chanserv.vop.list | did -f chanserv.vop.list 4 }
  }
}

;===== chanserv.vop.count =====

alias chanserv.vop.count dialog -m chanserv.vop.count chanserv.vop.count
dialog chanserv.vop.count {
  title "VOP COUNT"
  size -1 -1 75 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  button "?", 6, 55 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:chanserv.vop.count:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.vop.count.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet VOP $chr(35) $+ $did(4) COUNT }
  }
}

alias chanserv.vop.count.help dialog -m chanserv.vop.count.help chanserv.vop.count.help
dialog chanserv.vop.count.help {
  title "Помощь..."
  size -1 -1 80 35
  option dbu
  text "Показывает число ников в списке ВойсОп", 1, 5 5 70 50, center
  button "OK", 2, 25 20 30 10, ok
}
on *:dialog:chanserv.vop.count.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.vop.count chanserv.vop.count | did -f chanserv.vop.count 4 }
  }
}

;===== chanserv.aop.add =====

alias chanserv.aop.add dialog -m chanserv.aop.add chanserv.aop.add
dialog chanserv.aop.add {
  title "AOP ADD"
  size -1 -1 118 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник", 2, 70 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 23 30 30 10, ok
  button "Отмена", 8, 63 30 30 10, cancel
}
on *:dialog:chanserv.aop.add:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.aop.add.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet AOP $chr(35) $+ $did(4) ADD $did(5) }
  }
}

alias chanserv.aop.add.help dialog -m chanserv.aop.add.help chanserv.aop.add.help
dialog chanserv.aop.add.help {
  title "Помощь..."
  size -1 -1 80 65
  option dbu
  text "Добавляет ник в список автооп канала. Пользователи со статусом автооп автоматически получают оп при входе на канал", 1, 5 5 70 50, center
  button "OK", 2, 25 50 30 10, ok
}
on *:dialog:chanserv.aop.add.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.aop.add chanserv.aop.add | did -f chanserv.aop.add 4 }
  }
}

;===== chanserv.aop.del =====

alias chanserv.aop.del dialog -m chanserv.aop.del chanserv.aop.del
dialog chanserv.aop.del {
  title "AOP DEL"
  size -1 -1 118 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник", 2, 70 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 23 30 30 10, ok
  button "Отмена", 8, 63 30 30 10, cancel
}
on *:dialog:chanserv.aop.del:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.aop.del.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet AOP $chr(35) $+ $did(4) DEL $did(5) }
  }
}

alias chanserv.aop.del.help dialog -m chanserv.aop.del.help chanserv.aop.del.help
dialog chanserv.aop.del.help {
  title "Помощь..."
  size -1 -1 80 65
  option dbu
  text "Удаляет ник из списка автооп канала. Пользователи со статусом автооп автоматически получают оп при входе на канал", 1, 5 5 70 50, center
  button "OK", 2, 25 50 30 10, ok
}
on *:dialog:chanserv.aop.del.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.aop.del chanserv.aop.del | did -f chanserv.aop.del 4 }
  }
}

;===== chanserv.aop.list =====

alias chanserv.aop.list dialog -m chanserv.aop.list chanserv.aop.list
dialog chanserv.aop.list {
  title "AOP LIST"
  size -1 -1 75 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  button "?", 6, 55 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:chanserv.aop.list:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.aop.list.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet AOP $chr(35) $+ $did(4) LIST }
  }
}

alias chanserv.aop.list.help dialog -m chanserv.aop.list.help chanserv.aop.list.help
dialog chanserv.aop.list.help {
  title "Помощь..."
  size -1 -1 80 35
  option dbu
  text "Показывает весь список АвтоОп", 1, 5 5 70 50, center
  button "OK", 2, 25 20 30 10, ok
}
on *:dialog:chanserv.aop.list.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.aop.list chanserv.aop.list | did -f chanserv.aop.list 4 }
  }
}

;===== chanserv.aop.count =====

alias chanserv.aop.count dialog -m chanserv.aop.count chanserv.aop.count
dialog chanserv.aop.count {
  title "AOP COUNT"
  size -1 -1 75 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  button "?", 6, 55 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:chanserv.aop.count:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.aop.count.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet AOP $chr(35) $+ $did(4) COUNT }
  }
}

alias chanserv.aop.count.help dialog -m chanserv.aop.count.help chanserv.aop.count.help
dialog chanserv.aop.count.help {
  title "Помощь..."
  size -1 -1 80 35
  option dbu
  text "Показывает число ников в списке АвтоОп", 1, 5 5 70 50, center
  button "OK", 2, 25 20 30 10, ok
}
on *:dialog:chanserv.aop.count.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.aop.count chanserv.aop.count | did -f chanserv.aop.count 4 }
  }
}

;===== chanserv.sop.add =====

alias chanserv.sop.add dialog -m chanserv.sop.add chanserv.sop.add
dialog chanserv.sop.add {
  title "SOP ADD"
  size -1 -1 118 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник", 2, 70 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 23 30 30 10, ok
  button "Отмена", 8, 63 30 30 10, cancel
}
on *:dialog:chanserv.sop.add:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.sop.add.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SOP $chr(35) $+ $did(4) ADD $did(5) }
  }
}

alias chanserv.sop.add.help dialog -m chanserv.sop.add.help chanserv.sop.add.help
dialog chanserv.sop.add.help {
  title "Помощь..."
  size -1 -1 80 65
  option dbu
  text "Добавляет ник в список супероп канала. Пользователи со статусом супероп автоматически получают оп при входе на канал", 1, 5 5 70 50, center
  button "OK", 2, 25 50 30 10, ok
}
on *:dialog:chanserv.sop.add.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.sop.add chanserv.sop.add | did -f chanserv.sop.add 4 }
  }
}

;===== chanserv.sop.del =====

alias chanserv.sop.del dialog -m chanserv.sop.del chanserv.sop.del
dialog chanserv.sop.del {
  title "SOP DEL"
  size -1 -1 118 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Ник", 2, 70 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 55 13 40 10, autohs
  button "?", 6, 100 13 12 10
  button "OK", 7, 23 30 30 10, ok
  button "Отмена", 8, 63 30 30 10, cancel
}
on *:dialog:chanserv.sop.del:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.sop.del.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg ChanServ@*.RusNet SOP $chr(35) $+ $did(4) DEL $did(5) }
  }
}

alias chanserv.sop.del.help dialog -m chanserv.sop.del.help chanserv.sop.del.help
dialog chanserv.sop.del.help {
  title "Помощь..."
  size -1 -1 80 65
  option dbu
  text "Удаляет ник из списка супероп канала. Пользователи со статусом супероп автоматически получают оп при входе на канал", 1, 5 5 70 50, center
  button "OK", 2, 25 50 30 10, ok
}
on *:dialog:chanserv.sop.del.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.sop.del chanserv.sop.del | did -f chanserv.sop.del 4 }
  }
}

;===== chanserv.sop.list =====

alias chanserv.sop.list dialog -m chanserv.sop.list chanserv.sop.list
dialog chanserv.sop.list {
  title "AOP LIST"
  size -1 -1 75 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  button "?", 6, 55 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:chanserv.sop.list:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.sop.list.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SOP $chr(35) $+ $did(4) LIST }
  }
}

alias chanserv.sop.list.help dialog -m chanserv.sop.list.help chanserv.sop.list.help
dialog chanserv.sop.list.help {
  title "Помощь..."
  size -1 -1 80 35
  option dbu
  text "Показывает весь список СуперОп", 1, 5 5 70 50, center
  button "OK", 2, 25 20 30 10, ok
}
on *:dialog:chanserv.sop.list.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.sop.list chanserv.sop.list | did -f chanserv.sop.list 4 }
  }
}

;===== chanserv.sop.count =====

alias chanserv.sop.count dialog -m chanserv.sop.count chanserv.sop.count
dialog chanserv.sop.count {
  title "SOP COUNT"
  size -1 -1 75 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  button "?", 6, 55 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:chanserv.sop.count:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { chanserv.sop.count.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg ChanServ@*.RusNet SOP $chr(35) $+ $did(4) COUNT }
  }
}

alias chanserv.sop.count.help dialog -m chanserv.sop.count.help chanserv.sop.count.help
dialog chanserv.sop.count.help {
  title "Помощь..."
  size -1 -1 80 35
  option dbu
  text "Показывает число ников в списке СуперОп", 1, 5 5 70 50, center
  button "OK", 2, 25 20 30 10, ok
}
on *:dialog:chanserv.sop.count.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v chanserv.sop.count chanserv.sop.count | did -f chanserv.sop.count 4 }
  }
}

;++++++++++++++++++++ NICKSERV ++++++++++++++++++++

;===== nickserv.register =====

alias nickserv.register dialog -m nickserv.register nickserv.register
dialog nickserv.register {
  title "REGISTER nick"
  size -1 -1 115 45
  option dbu
  text "Пароль", 1, 18 5 30 10
  text "E-mail", 2, 63 5 30 10
  edit "", 4, 5 13  40 10, autohs
  edit "", 5, 51 13 40 10, autohs
  button "?", 6, 98 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:nickserv.register:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { nickserv.register.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg NickServ@*.RusNet REGISTER $did(4) $did(5) }
  }
}

alias nickserv.register.help dialog -m nickserv.register.help nickserv.register.help
dialog nickserv.register.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Регистрирует текущий ник в базе NickServ. Пароль необходим, чтобы Вы смогли сделать идентификацию (IDENTIFY) ника", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.register.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.register nickserv.register | did -f nickserv.register 4 }
  }
}

;===== nickserv.drop =====

alias nickserv.drop dialog -m nickserv.drop nickserv.drop
dialog nickserv.drop {
  title "DROP nick"
  size -1 -1 80 45
  option dbu
  text "Пароль", 1, 19 5 30 10
  edit "", 4, 15 13  40 10, autohs
  button "?", 6, 60 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:nickserv.drop:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { nickserv.drop.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet DROP $did(4) }
  }
}

alias nickserv.drop.help dialog -m nickserv.drop.help nickserv.drop.help
dialog nickserv.drop.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Отменяет регистрацию текущего ника", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.drop.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.drop nickserv.drop | did -f nickserv.drop 4 }
  }
}

;===== nickserv.identify =====

alias nickserv.identify dialog -m nickserv.identify nickserv.identify
dialog nickserv.identify {
  title "IDENTIFY nick"
  size -1 -1 90 45
  option dbu
  text "Пароль", 1, 24 5 30 10
  edit "", 4, 15 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:nickserv.identify:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { nickserv.identify.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet IDENTIFY $did(4) }
  }
}

alias nickserv.identify.help dialog -m nickserv.identify.help nickserv.identify.help
dialog nickserv.identify.help {
  title "Помощь..."
  size -1 -1 120 60
  option dbu
  text "Для выполнения большинства команд вам необходимо пройти идентификацию. Также, пользователи, использующие ники, которые имеют kill protection, будут отсоединены, если они не пройдут идентификацию в течение 1-й минуты", 1, 5 5 110 50, center
  button "OK", 2, 45 47 30 10, ok
}
on *:dialog:nickserv.identify.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.identify nickserv.identify | did -f nickserv.identify 4 }
  }
}

;===== nickserv.access.add =====

alias nickserv.access.add dialog -m nickserv.access.add nickserv.access.add
dialog nickserv.access.add {
  title "ACCESS ADD"
  size -1 -1 87 45
  option dbu
  text "Маска", 1, 25 5 30 10
  edit "", 4, 5 13  60 10, autohs
  button "?", 6, 70 13 12 10
  button "OK", 7, 9 30 30 10, ok
  button "Отмена", 8, 49 30 30 10, cancel
}
on *:dialog:nickserv.access.add:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $address($me,0)
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.access.add.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet ACCESS ADD $did(4) }
  }
}

alias nickserv.access.add.help dialog -m nickserv.access.add.help nickserv.access.add.help
dialog nickserv.access.add.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Дает возможность пользователям, подходящим по данной сетевой маске, использовать Ваш ник", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.access.add.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.access.add nickserv.access.add | did -f nickserv.access.add 4 }
  }
}

;===== nickserv.access.del =====

alias nickserv.access.del dialog -m nickserv.access.del nickserv.access.del
dialog nickserv.access.del {
  title "ACCESS DEL"
  size -1 -1 87 45
  option dbu
  text "Маска", 1, 25 5 30 10
  edit "", 4, 5 13  60 10, autohs
  button "?", 6, 70 13 12 10
  button "OK", 7, 9 30 30 10, ok
  button "Отмена", 8, 49 30 30 10, cancel
}
on *:dialog:nickserv.access.del:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $address($me,0)
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.access.del.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet ACCESS DEL $did(4) }
  }
}

alias nickserv.access.del.help dialog -m nickserv.access.del.help nickserv.access.del.help
dialog nickserv.access.del.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Удаляет из списка авторизованных адресов данную маску адреса", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.access.del.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.access.del nickserv.access.del | did -f nickserv.access.del 4 }
  }
}

;===== nickserv.access.help =====

alias nickserv.access.help dialog -m nickserv.access.help nickserv.access.help
dialog nickserv.access.help {
  title "Помощь..."
  size -1 -1 120 70
  option dbu
  text "Команда ACCESS позволяет Вам изменять список авторизованных адресов для Вашего ника. Если Вы используете маску, которая не принадлежит Вашему ACCESS листу, Вы должны пройти идентификацию, используя команду IDENTIFY для NickServ.", 1, 5 5 110 50, center
  button "OK", 2, 45 55 30 10, ok
}

;===== nickserv.list =====

alias nickserv.list dialog -m nickserv.list nickserv.list
dialog nickserv.list {
  title "LIST nick"
  size -1 -1 87 45
  option dbu
  text "Шаблон", 1, 25 5 30 10
  edit "", 4, 5 13  60 10, autohs
  button "?", 6, 70 13 12 10
  button "OK", 7, 9 30 30 10, ok
  button "Отмена", 8, 49 30 30 10, cancel
}
on *:dialog:nickserv.list:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { nickserv.list.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet LIST $did(4) }
  }
}

alias nickserv.list.help dialog -m nickserv.list.help nickserv.list.help
dialog nickserv.list.help {
  title "Помощь..."
  size -1 -1 120 55
  option dbu
  text "Показывает список всех зарегистрированных ников, удовлетворяющих шаблону-маске. Ники, имеющие SET PRIVATE ON, не будут отображены", 1, 5 5 110 50, center
  button "OK", 2, 45 40 30 10, ok
}
on *:dialog:nickserv.list.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.list nickserv.list | did -f nickserv.list 4 }
  }
}

;===== nickserv.recover =====

alias nickserv.recover dialog -m nickserv.recover nickserv.recover
dialog nickserv.recover {
  title "RECOVER"
  size -1 -1 113 45
  option dbu
  text "Ник", 1, 19 5 30 10
  text "Пароль", 2, 62 5 30 10
  edit "", 4, 5 13  40 10, autohs
  edit "", 5, 51 13 40 10, autohs
  button "?", 6, 96 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:nickserv.recover:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $me
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.recover.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg NickServ@*.RusNet RECOVER $did(4) $did(5) }
  }
}

alias nickserv.recover.help dialog -m nickserv.recover.help nickserv.recover.help
dialog nickserv.recover.help {
  title "Помощь..."
  size -1 -1 120 60
  option dbu
  text "Если кто-либо использует Ваш ник, Вы можете вернуть его командой RECOVER. Команда RECOVER запрещает использование ника до использования команды RELEASE или до истечения некоторого времени", 1, 5 5 110 50, center
  button "OK", 2, 45 47 30 10, ok
}
on *:dialog:nickserv.recover.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.recover nickserv.recover | did -f nickserv.recover 4 }
  }
}

;===== nickserv.release =====

alias nickserv.release dialog -m nickserv.release nickserv.release
dialog nickserv.release {
  title "RELEASE"
  size -1 -1 113 45
  option dbu
  text "Ник", 1, 19 5 30 10
  text "Пароль", 2, 62 5 30 10
  edit "", 4, 5 13  40 10, autohs
  edit "", 5, 51 13 40 10, autohs
  button "?", 6, 96 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:nickserv.release:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $me
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.release.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg NickServ@*.RusNet RELEASE $did(4) $did(5) }
  }
}

alias nickserv.release.help dialog -m nickserv.release.help nickserv.release.help
dialog nickserv.release.help {
  title "Помощь..."
  size -1 -1 120 70
  option dbu
  text "Если NickServ запретил использование вашего ника (после команды RECOVER или если Вы вовремя не прошли идентификацию командой IDENTIFY), Вы можете использовать команду RELEASE для возобновления контроля над своим ником", 1, 5 5 110 50, center
  button "OK", 2, 45 55 30 10, ok
}
on *:dialog:nickserv.release.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.release nickserv.release | did -f nickserv.release 4 }
  }
}

;===== nickserv.ghost =====

alias nickserv.ghost dialog -m nickserv.ghost nickserv.ghost
dialog nickserv.ghost {
  title "GHOST"
  size -1 -1 113 45
  option dbu
  text "Ник", 1, 19 5 30 10
  text "Пароль", 2, 62 5 30 10
  edit "", 4, 5 13  40 10, autohs
  edit "", 5, 51 13 40 10, autohs
  button "?", 6, 96 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:nickserv.ghost:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $me
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.ghost.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg NickServ@*.RusNet GHOST $did(4) $did(5) }
  }
}

alias nickserv.ghost.help dialog -m nickserv.ghost.help nickserv.ghost.help
dialog nickserv.ghost.help {
  title "Помощь..."
  size -1 -1 120 70
  option dbu
  text "Если Вы внезапно отсоединились от IRC сервера, бывают случаи, когда ''клиент-призрак'' остается на сервере. Эта команда позволит отсоединить такого клиента и Вы сможете снова использовать свой ник", 1, 5 5 110 50, center
  button "OK", 2, 45 55 30 10, ok
}
on *:dialog:nickserv.ghost.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.ghost nickserv.ghost | did -f nickserv.ghost 4 }
  }
}

;===== nickserv.info =====

alias nickserv.info dialog -m nickserv.info nickserv.info
dialog nickserv.info {
  title "INFO"
  size -1 -1 90 45
  option dbu
  text "Ник", 1, 24 5 30 10
  edit "", 4, 15 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:nickserv.info:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.info.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet INFO $did(4) }
  }
}

alias nickserv.info.help dialog -m nickserv.info.help nickserv.info.help
dialog nickserv.info.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Показывает информацию о нике, такую как время регистрации, опции, e-mail, и т.д., кроме скрытой", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.info.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.info nickserv.info | did -f nickserv.info 4 }
  }
}

;===== nickserv.info.all =====

alias nickserv.info.all dialog -m nickserv.info.all nickserv.info.all
dialog nickserv.info.all {
  title "INFO ALL"
  size -1 -1 90 45
  option dbu
  text "Ник", 1, 24 5 30 10
  edit "", 4, 15 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:nickserv.info.all:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $snick($active,1) 
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.info.all.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet INFO $did(4) ALL }
  }
}

alias nickserv.info.all.help dialog -m nickserv.info.all.help nickserv.info.all.help
dialog nickserv.info.all.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Показывает информацию о нике, такую как время регистрации, опции, e-mail, и т.д., даже если она скрыта", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.info.all.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.info.all nickserv.info.all | did -f nickserv.info.all 4 }
  }
}


;===== nickserv.link =====

alias nickserv.link dialog -m nickserv.link nickserv.link
dialog nickserv.link {
  title "LINK"
  size -1 -1 113 45
  option dbu
  text "Ник", 1, 19 5 30 10
  text "Пароль", 2, 62 5 30 10
  edit "", 4, 5 13  40 10, autohs
  edit "", 5, 51 13 40 10, autohs
  button "?", 6, 96 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:nickserv.link:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $me
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.link.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg NickServ@*.RusNet LINK $did(4) $did(5) }
  }
}

alias nickserv.link.help dialog -m nickserv.link.help nickserv.link.help
dialog nickserv.link.help {
  title "Помощь..."
  size -1 -1 120 75
  option dbu
  text "Эта команда свяжет ваш текущий ник с указанным ником, если вы укажете правильный пароль для его. Преимущество связи ников заключается в том, что если Вы прошли идентификацию для одного ника, Вы автоматически идентифицируетесь для каждого ника в связке", 1, 5 5 110 55, center
  button "OK", 2, 45 60 30 10, ok
}
on *:dialog:nickserv.link.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.link nickserv.link | did -f nickserv.link 4 }
  }
}

;===== nickserv.unlink =====

alias nickserv.unlink dialog -m nickserv.unlink nickserv.unlink
dialog nickserv.unlink {
  title "UNLINK"
  size -1 -1 113 45
  option dbu
  text "Ник", 1, 19 5 30 10
  text "Пароль", 2, 62 5 30 10
  edit "", 4, 5 13  40 10, autohs
  edit "", 5, 51 13 40 10, autohs
  button "?", 6, 96 13 12 10
  button "OK", 7, 20 30 30 10, ok
  button "Отмена", 8, 60 30 30 10, cancel
}
on *:dialog:nickserv.unlink:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $me
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.unlink.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg NickServ@*.RusNet UNLINK $did(4) $did(5) }
  }
}

alias nickserv.unlink.help dialog -m nickserv.unlink.help nickserv.unlink.help
dialog nickserv.unlink.help {
  title "Помощь..."
  size -1 -1 120 55
  option dbu
  text "Отсоединяет указанный ник от Вашего основного ника. Если Вы отсоединяете основной ник, то следующий ник в связке становится новым основным ником", 1, 5 5 110 55, center
  button "OK", 2, 45 40 30 10, ok
}
on *:dialog:nickserv.unlink.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.unlink nickserv.unlink | did -f nickserv.unlink 4 }
  }
}

;===== nickserv.status =====

alias nickserv.status dialog -m nickserv.status nickserv.status
dialog nickserv.status {
  title "STATUS"
  size -1 -1 90 45
  option dbu
  text "Ник(и)", 1, 27 5 30 10
  edit "", 4, 5 13  60 10, autohs
  button "?", 6, 70 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:nickserv.status:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $snick($active,1)
  }
  if ($devent == sclick) {
    if ($did == 6) { nickserv.status.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet STATUS $did(4) }
  }
}

alias nickserv.status.help dialog -m nickserv.status.help nickserv.status.help
dialog nickserv.status.help {
  title "Помощь..."
  size -1 -1 120 115
  option dbu
  text "Сообщает, опознан ли пользователь с указанным ником как владелец этого ника", 1, 5 5 110 20, center
  text "Возможные ответы:", 3, 5 25 110 10, center
  text "0 - в данный момент в онлайне нет пользователя с таким ником или ник не зарегистрирован", 4, 5 35 110 30
  text "1 - пользователь не опознан как владелец ника", 5, 5 55 110 30
  text "2 - пользователь опознан как владелец ника через список доступа ника", 6, 5 68 110 30
  text "3 - пользователь идентифицировался с паролем для этого ника", 7, 5 82 110 30
  button "OK", 2, 45 100 30 10, ok
}
on *:dialog:nickserv.status.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.status nickserv.status | did -f nickserv.status 4 }
  }
}

;===== nickserv.set.kill.help =====

alias nickserv.set.kill.help dialog -m nickserv.set.kill.help nickserv.set.kill.help
dialog nickserv.set.kill.help {
  title "Помощь..."
  size -1 -1 140 75
  option dbu
  text "Переключает защиту ника отсоединением. Если защита включена, NickServ принудительно отсоединит пользователя, который будет использовать Ваш ник без идентификации, несмотря на то, что маска сети находится в Вашем ACCESS LIST. На выполнение команды IDENTUIFY дается 60 секунд", 1, 5 5 130 50, center
  button "OK", 2, 55 60 30 10, ok
}

;===== nickserv.set.automask.help =====

alias nickserv.set.automask.help dialog -m nickserv.set.automask.help nickserv.set.automask.help
dialog nickserv.set.automask.help {
  title "Помощь..."
  size -1 -1 140 65
  option dbu
  text "Устанавливает переключатель автоматического добавления адресов. Если AUTOMASK включен, и Вы прошли идентификацию командой IDENTIFY с неизвестного адреса, этот адрес автоматически добавится к Вашему ACCESS листу", 1, 5 5 130 50, center
  button "OK", 2, 55 50 30 10, ok
}

;===== nickserv.set.password =====

alias nickserv.set.password dialog -m nickserv.set.password nickserv.set.password
dialog nickserv.set.password {
  title "SET PASSWORD"
  size -1 -1 90 45
  option dbu
  text "Пароль", 1, 24 5 30 10
  edit "", 4, 15 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:nickserv.set.password:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { nickserv.set.password.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet SET PASSWORD $did(4) }
  }
}

alias nickserv.set.password.help dialog -m nickserv.set.password.help nickserv.set.password.help
dialog nickserv.set.password.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Изменяет пароль для Вашего ника. Не рекомендуется выбирать пароли, которые легко угадываются", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.set.password.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.set.password nickserv.set.password | did -f nickserv.set.password 4 }
  }
}

;===== nickserv.set.secure.help =====

alias nickserv.set.secure.help dialog -m nickserv.set.secure.help nickserv.set.secure.help
dialog nickserv.set.secure.help {
  title "Помощь..."
  size -1 -1 140 95
  option dbu
  text "Если настройка SECURE включена, то при попытке выполнить RECOVER/RELEASE для Вашего ника, нужно будет указать правильный пароль независимо от совпадения хоста с маской в ACCESS листе. Когда SECURE выключена, клиенты, использующие Ваш ник не будут отсоединяться, если они не выполнили IDENTIFY, но у них не будет возможности выполнять команды NickServ для Вашего ника без идентификации командой IDENTIFY", 1, 5 5 130 90, center
  button "OK", 2, 55 80 30 10, ok
}

;===== nickserv.set.private.help =====

alias nickserv.set.private.help dialog -m nickserv.set.private.help nickserv.set.private.help
dialog nickserv.set.private.help {
  title "Помощь..."
  size -1 -1 120 60
  option dbu
  text "Если опция PRIVATE включена, Ваш ник не будет показан, когда кто-нибудь вызовет команду LIST с шаблоном, совпадающим с маской хоста в Вашем ACCESS листе", 1, 5 5 110 50, center
  button "OK", 2, 45 45 30 10, ok
}

;===== nickserv.set.memos.help =====

alias nickserv.set.memos.help dialog -m nickserv.set.memos.help nickserv.set.memos.help
dialog nickserv.set.memos.help {
  title "Помощь..."
  size -1 -1 120 55
  option dbu
  text "Если MEMOS выключено, пользователи, пытающиеся отправить Вам мемо, получат сообщение о том, что Вы в настоящий момент не получаете мемо", 1, 5 5 110 50, center
  button "OK", 2, 45 40 30 10, ok
}

;===== nickserv.set.notify.help =====

alias nickserv.set.notify.help dialog -m nickserv.set.notify.help nickserv.set.notify.help
dialog nickserv.set.notify.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Если NOTIFY выключено, вы не будете уведомлены о том, что кто-либо отправил Вам мемо", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}

;===== nickserv.set.signon.help =====

alias nickserv.set.signon.help dialog -m nickserv.set.signon.help nickserv.set.signon.help
dialog nickserv.set.signon.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Когда опция SIGNON выключена, Вы не будете извещаться о новых сообщениях во время первого соединения к сети или изменения ника", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}

;===== nickserv.set.email =====

alias nickserv.set.email dialog -m nickserv.set.email nickserv.set.email
dialog nickserv.set.email {
  title "SET EMAIL"
  size -1 -1 90 45
  option dbu
  text "E-Mail", 1, 27 5 30 10
  edit "", 4, 15 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:nickserv.set.email:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { nickserv.set.email.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet SET EMAIL $did(4) }
  }
}

alias nickserv.set.email.help dialog -m nickserv.set.email.help nickserv.set.email.help
dialog nickserv.set.email.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Устанавливает Ваш email. Когда кто-либо выполнит команду INFO для вашего ника, он сможет увидеть Ваш email", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.set.email.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.set.email nickserv.set.email | did -f nickserv.set.email 4 }
  }
}

;===== nickserv.set.url =====

alias nickserv.set.url dialog -m nickserv.set.url nickserv.set.url
dialog nickserv.set.url {
  title "SET URL"
  size -1 -1 90 45
  option dbu
  text "URL сайта", 1, 20 5 40 10
  edit "", 4, 15 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:nickserv.set.url:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { nickserv.set.url.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg NickServ@*.RusNet SET URL $did(4) }
  }
}

alias nickserv.set.url.help dialog -m nickserv.set.url.help nickserv.set.url.help
dialog nickserv.set.url.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Устанавливает Ваш URL. Когда кто-либо выполнит команду INFO для вашего ника, он сможет увидеть Ваш URL", 1, 5 5 110 50, center
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:nickserv.set.url.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v nickserv.set.url nickserv.set.url | did -f nickserv.set.url 4 }
  }
}

;===== nickserv.set.hide =====

alias nickserv.set.hide dialog -m nickserv.set.hide nickserv.set.hide
dialog nickserv.set.hide {
  title "SET HIDE"
  size -1 -1 102 45
  option dbu
  radio "Скрыть", 1, 5 5 30 10
  radio "Открыть", 2, 5 15 33 10
  text "Опция", 3, 55 5 30 10
  combo 5, 45 13 35 65, drop
  button "?", 6, 85 13 12 10
  button "OK", 7, 15 30 30 10, ok
  button "Отмена", 8, 55 30 30 10, cancel
}
on *:dialog:nickserv.set.hide:*:*: {
  if ($devent == init) { 
    didtok $dname 5 32 EMAIL USERMASK QUIT OLLINKS
    did -c $dname 5 1
    did -c $dname 1
  }
  if ($devent == sclick) {
    if ($did == 6) && ($did(5).sel == 1) { set %nickserv.set.hide 1 | nickserv.set.hide.help }
    if ($did == 6) && ($did(5).sel == 2) { set %nickserv.set.hide 2 | nickserv.set.hide.help }
    if ($did == 6) && ($did(5).sel == 3) { set %nickserv.set.hide 3 | nickserv.set.hide.help }
    if ($did == 6) && ($did(5).sel == 4) { set %nickserv.set.hide 4 | nickserv.set.hide.help }
    if ($did == 7) && ($did(1).state) { /msg NickServ@*.RusNet SET HIDE $did(5) ON }
    if ($did == 7) && ($did(2).state) { /msg NickServ@*.RusNet SET HIDE $did(5) OFF }
  }
}

alias nickserv.set.hide.help dialog -m nickserv.set.hide.help nickserv.set.hide.help
dialog nickserv.set.hide.help {
  title "Скрыть"
  size -1 -1 120 40
  option dbu
  text "Ваш email", 1, 5 5 110 20, center
  text "Вашу последнюю маску", 2, 5 5 110 20, center
  text "Ваше последнее сообщение при выходе", 3, 5 5 110 20, center
  text "Последний бывший в онлайне связанный с Вашим ник", 4, 5 5 110 20, center
  button "OK", 9, 45 25 30 10, ok
}
on *:dialog:nickserv.set.hide.help:*:*: {
  if ($devent == init) {
    if (%nickserv.set.hide == 1) { did -v $dname 1 | did -h $dname 2 | did -h $dname 3 | did -h $dname 4 }
    if (%nickserv.set.hide == 2) { did -h $dname 1 | did -v $dname 2 | did -h $dname 3 | did -h $dname 4 }
    if (%nickserv.set.hide == 3) { did -h $dname 1 | did -h $dname 2 | did -v $dname 3 | did -h $dname 4 }
    if (%nickserv.set.hide == 4) { did -h $dname 1 | did -h $dname 2 | did -h $dname 3 | did -v $dname 4 }
  }
  if ($devent == sclick) {
    if ($did == 9) { dialog -v nickserv.set.hide nickserv.set.hide | did -f nickserv.set.hide 5 }
  }
}

;===== nickserv.set.privmsg.help =====

alias nickserv.set.privmsg.help dialog -m nickserv.set.privmsg.help nickserv.set.privmsg.help
dialog nickserv.set.privmsg.help {
  title "Помощь..."
  size -1 -1 120 65
  option dbu
  text "Эта настройка включает/выключает пересылку сообщений от сервисов IRC в приват. Если она выключена, сервисы используют NOTICE (сообщение идет в консоль соединения), если включена, то будет использоваться PRIVMSG (отвечать в приват)", 1, 5 5 110 50, center
  button "OK", 2, 45 52 30 10, ok
}

;++++++++++++++++++++ MEMOSERV ++++++++++++++++++++

;===== memoserv.send.nick =====

alias memoserv.send.nick dialog -m memoserv.send.nick memoserv.send.nick
dialog memoserv.send.nick {
  title "SEND me"
  size -1 -1 153 45
  option dbu
  text "Ник", 1, 20 5 30 10
  text "Текст", 2, 82 5 30 10
  edit "", 4, 5 13  40 10, autohs
  edit "", 5, 51 13 80 10, autohs
  button "?", 6, 136 13 12 10
  button "OK", 7, 40 30 30 10, ok
  button "Отмена", 8, 80 30 30 10, cancel
}
on *:dialog:memoserv.send.nick:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { memoserv.send.nick.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg MemoServ SEND $did(4) $did(5) }
  }
}

alias memoserv.send.nick.help dialog -m memoserv.send.nick.help memoserv.send.nick.help
dialog memoserv.send.nick.help {
  title "Помощь..."
  size -1 -1 120 65
  option dbu
  text "Пользователь с данным ником получит сообщение, содержащее введенный текст. Пользователь также получит извещение, что он получил новое сообщение, в случае, если опция NOTIFY включена", 1, 5 5 110 75, center  
  button "OK", 2, 45 50 30 10, ok
}
on *:dialog:memoserv.send.nick.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.send.nick memoserv.send.nick | did -f memoserv.send.nick 4 }
  }
}

;===== memoserv.send.chan =====

alias memoserv.send.chan dialog -m memoserv.send.chan memoserv.send.chan
dialog memoserv.send.chan {
  title "SEND chan"
  size -1 -1 153 45
  option dbu
  text "Канал", 1, 20 5 30 10
  text "Текст", 2, 82 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 9 13  40 10, autohs
  edit "", 5, 52 13 80 10, autohs
  button "?", 6, 136 13 12 10
  button "OK", 7, 40 30 30 10, ok
  button "Отмена", 8, 80 30 30 10, cancel
}
on *:dialog:memoserv.send.chan:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { memoserv.send.chan.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg MemoServ SEND $chr(35) $+ $did(4) $did(5) }
  }
}

alias memoserv.send.chan.help dialog -m memoserv.send.chan.help memoserv.send.chan.help
dialog memoserv.send.chan.help {
  title "Помощь..."
  size -1 -1 120 55
  option dbu
  text "Все автоопы канала получат сообщение, содержащее введенный текст. Вы должны обладать уровнем доступа автооп (autoop) или выше, чтобы посылать сообщение на канал", 1, 5 5 110 75, center  
  button "OK", 2, 45 40 30 10, ok
}
on *:dialog:memoserv.send.chan.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.send.chan memoserv.send.chan | did -f memoserv.send.chan 4 }
  }
}

;===== memoserv.list.chan =====

alias memoserv.list.chan dialog -m memoserv.list.chan memoserv.list.chan
dialog memoserv.list.chan {
  title "LIST"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 26 5 50 10
  text "#", 3, 16 15 10 10
  edit "", 4, 20 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:memoserv.list.chan:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { memoserv.list.chan.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg MemoServ LIST $chr(35) $+ $did(4) }
  }
}

alias memoserv.list.chan.help dialog -m memoserv.list.chan.help memoserv.list.chan.help
dialog memoserv.list.chan.help {
  title "Помощь..."
  size -1 -1 120 45
  option dbu
  text "Показывает список всех сообщений для канала. Также показывает время отправления сообщения", 1, 5 5 110 50, center
  button "OK", 2, 45 30 30 10, ok
}
on *:dialog:memoserv.list.chan.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.list.chan memoserv.list.chan | did -f memoserv.list.chan 4 }
  }
}

;===== memoserv.read.me =====

alias memoserv.read.me dialog -m memoserv.read.me memoserv.read.me
dialog memoserv.read.me {
  title "READ me"
  size -1 -1 75 45
  option dbu
  text "Номер", 1, 20 5 50 10
  edit "", 4, 22 13  19 10, autohs
  button "?", 6, 44 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:memoserv.read.me:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 NEW
  }
  if ($devent == sclick) {
    if ($did == 6) { memoserv.read.me.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg MemoServ READ $did(4) }
  }
}

alias memoserv.read.me.help dialog -m memoserv.read.me.help memoserv.read.me.help
dialog memoserv.read.me.help {
  title "Помощь..."
  size -1 -1 120 60
  option dbu
  text "Показывает сообщение с указанным номером из Вашего списка сообщений. Если указано NEW, будут показаны только новые сообщения. Если же указано LAST, будут показаны недавно полученные сообщения", 1, 5 5 110 50, center
  button "OK", 2, 45 46 30 10, ok
}
on *:dialog:memoserv.read.me.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.read.me memoserv.read.me | did -f memoserv.read.me 4 }
  }
}

;===== memoserv.read.chan =====

alias memoserv.read.chan dialog -m memoserv.read.chan memoserv.read.chan
dialog memoserv.read.chan {
  title "READ chan"
  size -1 -1 94 45
  option dbu
  text "Канал", 1, 21 5 30 10
  text "Номер", 2, 54 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 10 13  40 10, autohs
  edit "", 5, 55 13 15 10
  button "?", 6, 76 13 12 10
  button "OK", 7, 12 30 30 10, ok
  button "Отмена", 8, 52 30 30 10, cancel
}
on *:dialog:memoserv.read.chan:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 ALL 
  }
  if ($devent == sclick) {
    if ($did == 6) { memoserv.read.chan.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg MemoServ READ $chr(35) $+ $did(4) $did(5) }
  }
}

alias memoserv.read.chan.help dialog -m memoserv.read.chan.help memoserv.read.chan.help
dialog memoserv.read.chan.help {
  title "Помощь..."
  size -1 -1 120 50
  option dbu
  text "Показывает сообщение с указанным номером из списка сообщений канала. Если указано ALL, будут показаны все сообщения", 1, 5 5 110 40, center  
  button "OK", 2, 45 35 30 10, ok
}
on *:dialog:memoserv.read.chan.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.read.chan memoserv.read.chan | did -f memoserv.read.chan 4 }
  }
}

;===== memoserv.del.me =====

alias memoserv.del.me dialog -m memoserv.del.me memoserv.del.me
dialog memoserv.del.me {
  title "DEL memo me"
  size -1 -1 75 45
  option dbu
  text "Номер", 1, 10 45 30 10
  edit "", 4, 17 13  15 10, autohs
  button "?", 6, 42 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:memoserv.del.me:*:*: {
  if ($devent == init) {
    did -ra $dname 4 ALL
  }
  if ($devent == sclick) {
    if ($did == 6) { memoserv.del.me.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg MemoServ DEL $did(4) }
  }
}

alias memoserv.del.me.help dialog -m memoserv.del.me.help memoserv.del.me.help
dialog memoserv.del.me.help {
  title "Помощь..."
  size -1 -1 120 45
  option dbu
  text "Помечает сообщение с указанным номером (или все сообщения, если указано ALL) к удалению", 1, 5 5 110 75, center  
  button "OK", 2, 45 30 30 10, ok
}
on *:dialog:memoserv.del.me.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.del.me memoserv.del.me | did -f memoserv.del.me 4 }
  }
}

;===== memoserv.del.chan =====

alias memoserv.del.chan dialog -m memoserv.del.chan memoserv.del.chan
dialog memoserv.del.chan {
  title "DEL memo chan"
  size -1 -1 94 45
  option dbu
  text "Канал", 1, 21 5 30 10
  text "Номер", 2, 54 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 10 13  40 10, autohs
  edit "", 5, 55 13 15 10
  button "?", 6, 76 13 12 10
  button "OK", 7, 12 30 30 10, ok
  button "Отмена", 8, 52 30 30 10, cancel
}
on *:dialog:memoserv.del.chan:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
    did -ra $dname 5 ALL 
  }
  if ($devent == sclick) {
    if ($did == 6) { memoserv.del.chan.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($len($did(5)) != 0) { /msg MemoServ DEL $chr(35) $+ $did(4) $did(5) }
  }
}

alias memoserv.del.chan.help dialog -m memoserv.del.chan.help memoserv.del.chan.help
dialog memoserv.del.chan.help {
  title "Помощь..."
  size -1 -1 120 45
  option dbu
  text "Помечает сообщение канала с указанным номером (или все сообщения, если указано ALL) к удалению", 1, 5 5 110 60, center  
  button "OK", 2, 45 30 30 10, ok
}
on *:dialog:memoserv.del.chan.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.del.chan memoserv.del.chan | did -f memoserv.del.chan 4 }
  }
}

;===== memoserv.set.notify =====

alias memoserv.set.notify dialog -m memoserv.set.notify memoserv.set.notify
dialog memoserv.set.notify {
  title "SET NOTIFY"
  size -1 -1 80 45
  option dbu
  text "Опция", 2, 15 5 30 10
  combo 5, 10 13 40 65, drop
  button "?", 6, 57 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 45 30 30 10, cancel
}
on *:dialog:memoserv.set.notify:*:*: {
  if ($devent == init) { 
    didtok $dname 5 32 ON LOGON NEW OFF
    did -c $dname 5 1
  }
  if ($devent == sclick) {
    if ($did == 6) && ($did(5).sel == 1) { set %memoserv.set.notify.mode 1 | memoserv.set.notify.help }
    if ($did == 6) && ($did(5).sel == 2) { set %memoserv.set.notify.mode 2 | memoserv.set.notify.help }
    if ($did == 6) && ($did(5).sel == 3) { set %memoserv.set.notify.mode 3 | memoserv.set.notify.help }
    if ($did == 6) && ($did(5).sel == 4) { set %memoserv.set.notify.mode 4 | memoserv.set.notify.help }
    if ($did == 7) { /msg MemoServ SET NOTIFY $did(5) }
  }
}

alias memoserv.set.notify.help dialog -m memoserv.set.notify.help memoserv.set.notify.help
dialog memoserv.set.notify.help {
  title "Очистить режимы канала"
  size -1 -1 120 50
  option dbu
  text "Вы будете уведомлены о записках когда подключитесь к серверу, при выходе из режима AWAY, и сразу же когда придет новая записка", 1, 5 5 110 40, center
  text "Вы будете уведомлены о записках только когда подключитесь к серверу или при выходе из режима AWAY", 2, 5 5 110 40, center
  text "Вы будете уведомлены о записке только в тот момент когда кто-то ее пошлет вам", 3, 5 5 110 40, center
  text "Вы не будете уведомлены о новых записках", 4, 5 5 110 40, center
  button "OK", 9, 45 35 30 10, ok
}
on *:dialog:memoserv.set.notify.help:*:*: {
  if ($devent == init) {
    if (%memoserv.set.notify.mode == 1) { did -v $dname 1 | did -h $dname 2 | did -h $dname 3 | did -h $dname 4 }
    if (%memoserv.set.notify.mode == 2) { did -h $dname 1 | did -v $dname 2 | did -h $dname 3 | did -h $dname 4 }
    if (%memoserv.set.notify.mode == 3) { did -h $dname 1 | did -h $dname 2 | did -v $dname 3 | did -h $dname 4 }
    if (%memoserv.set.notify.mode == 4) { did -h $dname 1 | did -h $dname 2 | did -h $dname 3 | did -v $dname 4 }
  }
  if ($devent == sclick) {
    if ($did == 9) { dialog -v memoserv.set.notify memoserv.set.notify | did -f memoserv.set.notify 5 }
  }
}

;===== memoserv.set.limit.my =====

alias memoserv.set.limit.my dialog -m memoserv.set.limit.my memoserv.set.limit.my
dialog memoserv.set.limit.my {
  title "SET LIMIT my"
  size -1 -1 75 45
  option dbu
  text "Кол-во", 2, 10 5 30 10
  edit "", 4, 22 13  11 10
  button "?", 6, 42 13 12 10
  button "OK", 7, 5 30 30 10, ok
  button "Отмена", 8, 40 30 30 10, cancel
}
on *:dialog:memoserv.set.limit.my:*:*: {
  if ($devent == sclick) {
    if ($did == 6) { memoserv.set.limit.my.help }
    if ($did == 7) && ($did(4) >= 0) && ($did(4) <= 20) { /msg MemoServ SET LIMIT $did(4) }
  }
}

alias memoserv.set.limit.my.help dialog -m memoserv.set.limit.my.help memoserv.set.limit.my.help
dialog memoserv.set.limit.my.help {
  title "Помощь..."
  size -1 -1 120 55
  option dbu
  text "Устанавливает максимальное количество записок которые вы сможете принимать. Если вы установите ''0'' то никто не сможет послать вам записку.          МАСИМУМ записок - 20", 1, 5 5 110 60, center  
  button "OK", 2, 45 40 30 10, ok
}
on *:dialog:memoserv.set.limit.my.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.set.limit.my memoserv.set.limit.my | did -f memoserv.set.limit.my 4 }
  }
}

;===== memoserv.set.limit.chan =====

alias memoserv.set.limit.chan dialog -m memoserv.set.limit.chan memoserv.set.limit.chan
dialog memoserv.set.limit.chan {
  title "SET LIMIT chan"
  size -1 -1 94 45
  option dbu
  text "Канал", 1, 21 5 30 10
  text "Кол-во", 2, 54 5 30 10
  text "#", 3, 5 15 10 10
  edit "", 4, 10 13  40 10, autohs
  edit "", 5, 55 13 11 10
  button "?", 6, 74 13 12 10
  button "OK", 7, 12 30 30 10, ok
  button "Отмена", 8, 52 30 30 10, cancel
}
on *:dialog:memoserv.set.limit.chan:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { memoserv.set.limit.chan.help }
    if ($did == 7) && ($len($did(4)) != 0) && ($did(5) >= 0) && ($did(5) <= 20) { /msg MemoServ SET LIMIT $chr(35) $+ $did(4) $did(5) }
  }
}

alias memoserv.set.limit.chan.help dialog -m memoserv.set.limit.chan.help memoserv.set.limit.chan.help
dialog memoserv.set.limit.chan.help {
  title "Помощь..."
  size -1 -1 120 55
  option dbu
  text "Устанавливает максимальное количество записок которые сможет принимать канал. Если вы установите ''0'' то никто не сможет послать записку на указанный канал. МАСИМУМ записок - 30", 1, 5 5 110 60, center  
  button "OK", 2, 45 40 30 10, ok
}
on *:dialog:memoserv.set.limit.chan.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.set.limit.chan memoserv.set.limit.chan | did -f memoserv.set.limit.chan 4 }
  }
}

;===== memoserv.info.chan =====

alias memoserv.info.chan dialog -m memoserv.info.chan memoserv.info.chan
dialog memoserv.info.chan {
  title "INFO chan"
  size -1 -1 90 45
  option dbu
  text "Канал", 1, 26 5 50 10
  text "#", 3, 16 15 10 10
  edit "", 4, 20 13  40 10, autohs
  button "?", 6, 62 13 12 10
  button "OK", 7, 10 30 30 10, ok
  button "Отмена", 8, 50 30 30 10, cancel
}
on *:dialog:memoserv.info.chan:*:*: {
  if ($devent == init) { 
    did -ra $dname 4 $mid($active,2-)
  }
  if ($devent == sclick) {
    if ($did == 6) { memoserv.info.chan.help }
    if ($did == 7) && ($len($did(4)) != 0) { /msg MemoServ INFO $did(4) }
  }
}

alias memoserv.info.chan.help dialog -m memoserv.info.chan.help memoserv.info.chan.help
dialog memoserv.info.chan.help {
  title "Помощь..."
  size -1 -1 120 40
  option dbu
  text "Показывает общее кол-во записок, число непрочитанных записок и т.д.", 1, 5 5 110 50, center
  button "OK", 2, 45 25 30 10, ok
}
on *:dialog:memoserv.info.chan.help:*:*: {
  if ($devent == sclick) {
    if ($did == 2) { dialog -v memoserv.info.chan memoserv.info.chan | did -f memoserv.info.chan 4 }
  }
}
