Crazy CommFort Plugin v2.17.5 [плагин для клиента]

[CrazyVirus]

А если сервер не на 1000 человек, а на 10-20 ? Можно и целиком позаписывать файл.
Не набросаешь кодик? в VB я ноль.
Думаю многим нужна такая функция.

И нет ли другого способа реализовать это?

Вход:

Код: Выделить всё

CCPE:1||||||||0||||||0||
CCPA:21||file = cp.CommDataDir & "PluginsData\userslist.txt":;Set fso = CreateObject("Scripting.FileSystemObject"):;pos = 0:;data = "":;If fso.FileExists(file) Then:;  Set f = fso.OpenTextFile(file, 1, False, -1):;  data = f.ReadAll:;  pos = InStr(1, data, cp.EventUserName & " : ", 1):;  If pos <> 0 Then:;    pos2 = InStr(pos, data, vbNewLine, 1):;    If pos2 <> 0 Then:;      data = Left(data, pos-1) & cp.EventUserName & " : сейчас в чате" & vbNewLine & Right(data, Len(data)-pos2-1):;    End If:;  End If:;End If:;If pos = 0 Or pos2 = 0 Then:;  data = data & cp.EventUserName & " : сейчас в чате" & vbNewLine:;End If:;Set f = fso.OpenTextFile(file, 2, True, -1):;f.Write data

Выход:

Код: Выделить всё

CCPE:2||||||||0||||||0||
CCPA:21||file = cp.CommDataDir & "PluginsData\userslist.txt":;Set fso = CreateObject("Scripting.FileSystemObject"):;pos = 0:;If fso.FileExists(file) Then:;  Set f = fso.OpenTextFile(file, 1, False, -1):;  data = f.ReadAll:;  pos = InStr(1, data, cp.EventUserName & " : ", 1):;  If pos <> 0 Then:;    pos2 = InStr(pos, data, vbNewLine, 1):;    If pos2 <> 0 Then:;      data = Left(data, pos-1) & cp.EventUserName & " : вышел из чата " & FormatDateTime(Now, 0) & vbNewLine & Right(data, Len(data)-pos2-1):;    End If:;  End If:;End If:;If pos = 0 Or pos2 = 0 Then:;  data = data & cp.EventUserName & " : вышел из чата " & FormatDateTime(Now, 0) & vbNewLine:;End If:;Set f = fso.OpenTextFile(file, 2, True, -1):;f.Write data

Команда:

Код: Выделить всё

CCPE:8||||||||0||||4||||0||0||!seen
CCPA:21||If Left(cp.EventText, 6) = "!seen " Then:;  user = Right(cp.EventText, Len(cp.EventText)-6):;  file = cp.CommDataDir & "PluginsData\userslist.txt":;  Set fso = CreateObject("Scripting.FileSystemObject"):;  pos = 0:;  If fso.FileExists(file) Then:;    Set f = fso.OpenTextFile(file, 1, False, -1):;    data = f.ReadAll:;    pos = InStr(1, data, user & " : ", 1):;    If pos <> 0 Then:;      pos2 = InStr(pos, data, vbNewLine, 1):;      If pos2 <> 0 Then:;        data = Mid(data, pos, pos2-pos):;        cp.SendUserMsg cp.EventUserName, data, False:;      End If:;    End If:;  End If:;End If

Как-то так. Вроде бы этот бред работает.

[Stranger22]

Как-то так. Вроде бы этот бред работает.

Как часы.
Пока проблем нету.

[Guron_18]

Всем кто мониторит кс. Решил таки выложить свою реализацию мониторинга кс серверов.
На вбс даже не представляю как это можно реализовать...

Код: Выделить всё

[Events]
E12_Name=cs_all
E12_ID=5
E12_MyStatus=работаю
E12_MyStatusNE=1
E12_Channel=%ac%
E12_ChannelNE=0
E12_Text=cs
E12_TextType=2
E12_TimeLimitEn=1
E12_TimeLimit=6
E12_Checked=0
E12_Expanded=0
E12_A0_CmdType=15
E12_A0_Channel=%ch%
E12_A0_Nick=46.164.141.21:27662
E12_A0_Cmd=Адрес сервера 	[url]connect %addr%[/url]:;Имя: 		%name%:;Мод: 		%mod%:;Карта: 		%map%:;Игроков: 	[url]%pl%[/url]:;Посмотреть список игроков пиши [url]cs1[/url]  (Придет в ЛС)
E12_A0_RestTime=0
E12_A0_Checked=1
E12_A0_Delay=0
E12_A1_CmdType=15
E12_A1_Channel=%ch%
E12_A1_Nick=91.192.152.83:27015
E12_A1_Cmd=Адрес сервера 	[url]connect %addr%[/url]:;Имя: 		%name%:;Мод: 		%mod%:;Карта: 		%map%:;Игроков: 	[url]%pl%[/url]:;Посмотреть список игроков пиши [url]cs2[/url]  (Придет в ЛС)
E12_A1_RestTime=0
E12_A1_Checked=1
E12_A1_Delay=0
E13_Name=CS 1.6 BCM Death Run(cs1)
E13_ID=5
E13_MyStatus=работаю
E13_MyStatusNE=1
E13_Channel=%ac%
E13_ChannelNE=0
E13_Text=cs1
E13_TextType=2
E13_Checked=0
E13_Expanded=0
E13_A0_CmdType=3
E13_A0_Channel=%ch%
E13_A0_Cmd=%nick%> информация отправлена в ЛС!
E13_A0_int1=0
E13_A0_int2=0
E13_A0_RestTime=0
E13_A0_Checked=1
E13_A0_Delay=0
E13_A1_CmdType=17
E13_A1_Channel=%nick%
E13_A1_Nick=46.164.141.21:27662
E13_A1_Cmd=%pltime%  -  %plname%  -  %plscore%
E13_A1_bool1=1
E13_A1_RestTime=0
E13_A1_Checked=1
E13_A1_Delay=0
E14_Name=CS 1.6 Speeak (cs2)
E14_ID=5
E14_MyStatus=работаю
E14_MyStatusNE=1
E14_Channel=%ac%
E14_ChannelNE=0
E14_Text=cs2
E14_TextType=2
E14_Checked=0
E14_Expanded=0
E14_A0_CmdType=3
E14_A0_Channel=%ch%
E14_A0_Cmd=%nick%> информация отправлена в ЛС!
E14_A0_RestTime=0
E14_A0_Checked=1
E14_A0_Delay=0
E14_A1_CmdType=17
E14_A1_Channel=%nick%
E14_A1_Nick=91.192.152.83:27015
E14_A1_Cmd=%pltime%  -  %plname%  -  %plscore%
E14_A1_bool1=1
E14_A1_RestTime=0
E14_A1_Checked=1
E14_A1_Delay=0

[Stranger22]

fun.viks.net.ua

Добрый день.
Ты на сервере, который у тебя в подписи, администратор? Если да - навтыкай модераторам. Если нет - убери рекламу из подписи. Ну а если это ты сам делаешь, то я не знаю... *faceplam.jpg*
Как-то позвал туда один пользователь - модераторы отклонили заявку с причиной... да без причины.
Написал что по приглашению - написали что никто меня не звал. : )
Сейчас вот увидел - решил зайти посмотреть что-нибудь интересное в чатике, ну и как мониторинг реализован.
Увидел что заявки отклонены - вспомнил что за сервер.
Отправил новую, думаю результат будет таким же печальным.

[leonbratsk]

С AIMP 3 не все видит треки. Видать API идет для AIMP 2. Если трек не найдет пишет N/A в состоянии.
И хотелось бы увидеть в следующей версии прокручиваемый активный процесс и с возможностью установки времени обновления(ведь на каждом сервере по разному стоит частота обновления активного процесса).
К примеру играет трек какой-то трек и мы знаем, что длина акт. процесса максимум 42 символа и получается.

Moonbeam feat. Avis Vox-The Lilt (Original Mix) - 1 секунда
onbeam feat. Avis Vox-The Lilt (Original Mix) Mo - 5 секунда
beam feat. Avis Vox-The Lilt (Original Mix) Moon - 10 секунда
am feat. Avis Vox-The Lilt (Original Mix) Moonbe - 15 секунда
feat. Avis Vox-The Lilt (Original Mix) Moonbeam - 20 секунда
eat. Avis Vox-The Lilt (Original Mix) Moonbeam f - 25 секунда
t. Avis Vox-The Lilt (Original Mix) Moonbeam fea - 30 секунда

* На форуме почему-то большое количество пробелов подряд убирает.

[Yaroslav]

Огосспади, прокручиваемый активный процесс?! Люди, да вы что, зачем вам это?
Подумайте, кому, на самом деле, интересно что вы слушаете? Я вот в Скайпе отключил уведомления об изменении состояний у тех, кто туда музыку вставляет...

* На форуме почему-то большое количество пробелов подряд убирает.

Это не «на форуме», это по стандарту HTML весь подряд идущий whitespace (пробелы, табы, переводы строк и т.д.) отображает как один проблел. Для того, чтобы сохранялось форматирования пробелами надо выбирать тег [ code ][ /code ]

[leonbratsk]

Огосспади, прокручиваемый активный процесс?! Люди, да вы что, зачем вам это?
Подумайте, кому, на самом деле, интересно что вы слушаете? Я вот в Скайпе отключил уведомления об изменении состояний у тех, кто туда музыку вставляет...

* На форуме почему-то большое количество пробелов подряд убирает.

Это не «на форуме», это по стандарту HTML весь подряд идущий whitespace (пробелы, табы, переводы строк и т.д.) отображает как один проблел. Для того, чтобы сохранялось форматирования пробелами надо выбирать тег [ code ][ /code ]

1. Для индивидуальности. В ином случае код для изменения активного процесса есть на C++, можно и самому сделать, но есть пару мелких аспектов.
2. Не силен в HTML.

[CrazyVirus]

С AIMP 3 не все видит треки. Видать API идет для AIMP 2. Если трек не найдет пишет N/A в состоянии.

Не совсем понял. Можно пример?

Огосспади, прокручиваемый активный процесс?! Люди, да вы что, зачем вам это?
Подумайте, кому, на самом деле, интересно что вы слушаете?

Полностью согласен.

[Maxim Mirgorodsky]

Прокручиваемый активный процесс очень негативен с точки зрения нагрузки на сеть. Каждое изменение ведь рассылается всем подключенным клиентам.

[VoFka]

Скромный вопрос.
Есть ли возможность с помощью плагина создавать опросы-голосование в каналах, с возможностью голосования пользователей (выбор вариантов ответа 1, 2, 3 и т.д.) и потом чтобы выводился результат голосования в канале
Типо:
Сколько стоит колбаса?
Варианты ответов:
1. 100р
2.120р
3. 123р
и т.д.
Все голосуют за свой номер и потом в канале:
Итог голосований: Большинство голосов за №2 120р
Или что то в этом духе

[leonbratsk]

Скромный вопрос.
Есть ли возможность с помощью плагина создавать опросы-голосование в каналах, с возможностью голосования пользователей (выбор вариантов ответа 1, 2, 3 и т.д.) и потом чтобы выводился результат голосования в канале
Типо:
Сколько стоит колбаса?
Варианты ответов:
1. 100р
2.120р
3. 123р
и т.д.
Все голосуют за свой номер и потом в канале:
Итог голосований: Большинство голосов за №2 120р
Или что то в этом духе

Можно, если руки прямые.

[VoFka]

Можно, если руки прямые.

Замечательный ответ, осталось выяснить КАК? Обычно в подобных вопросах подразумевается просьба об объяснениии, а не АГА, УГУ или НЕА

[dv]

[Cообщение удалено]

[VoFka]

в подобных случаях, т.к. речь не о рядовой настройке плагина, событий и т.п., хотя даже такие бывают вопросы у людей как настроить стандартное событие и т.п. (стр. 1-41 данной темы) речь и идет о том, что если можно, то как? Здесь явно не рядовая стандартная настройка. А само осознание, что можно, ни о чем не говорит, ну разве что вызывает умиление и чувство распирающей радости))))).
P.S. Нууу, прям всё можно, вот бан с себя фиг снимешь и самолет не построишь))).
А плагин сам по себе отличный!!!!!

[dv]

[Cообщение удалено]
.