[FAQ] Вопросы по работе в AIMP SkinEditor v3.50+

[JohnDoe]

Спасибо. Всё равно не понял, как это работает, но сделал по образу и подобию Bliss Compact.

[Black_AVP]

Кто-нибудь пробовал с помощью только биндинга (без скриптов) создать реверсивный счётчик?
Т. е. , чтоб считал так: 0, 1, 2 ... 8, 9, 8, 7 ... 1, 0 ...  (при модуле = 10).
Вроде, напрашивается соединение двух счётчиков, но уже два вечера голову ломаю, пока не выходит.

[Алексей Долматов]

Сделал так, но связал с громкостью. поэтому сложно протестировать
Tests - это сам счётчик, его связываем с тем откуда брать данные (в моём случае громкость)
Tst - это десятичный преобразователь, его связываем с выводом (в моём случае это цифровое табло)

%IFEqual(%Value1,1,1,%IFEqual(%Value1,2,2,%IFEqual(%Value1,3,3,%IFEqual(%Value1,4,4,%IFEqual(%Value1,5,5,%IFEqual(%Value1,6,6,%IFEqual(%Value1,7,7,%IFEqual(%Value1,8,8,%IFEqual(%Value1,9,9,%IFEqual(%Value1,10,9,%IFEqual(%Value1,11,8,%IFEqual(%Value1,12,7,%IFEqual(%Value1,13,6,%IFEqual(%Value1,14,5,%IFEqual(%Value1,15,4,%IFEqual(%Value1,16,3,%IFEqual(%Value1,17,2,%IFEqual(%Value1,18,1,0))))))))))))))))))

[Алексей Долматов]

Для демонстрации установил ограничение на громкости, проверять до 18 включительно, выше 0

[Black_AVP]

Сделал так, но связал с громкостью. поэтому сложно протестировать
Tests - это сам счётчик, его связываем с тем откуда брать данные (в моём случае громкость)
Tst - это десятичный преобразователь, его связываем с выводом (в моём случае это цифровое табло)

Спасибо, конечно! Но если модуль счётчика будет, к примеру, 500 или больше, то во что превратится это и без того громоздкое выражение?
Уж лучше оставлю на скриптах - для меня так проще и нагляднее.

[Алексей Долматов]

Можно и проще 
В связи прописываем так, пример для громкости (100 значений, модуль 50)

If(Value <= 50  OR Value  = 100,Value,50- Value MOD 50)

[Black_AVP]

Можно и проще 
В связи прописываем так, пример для громкости (100 значений, модуль 50)

Тогла уж лучше так (для 100 значений и при модуле = 100):
If(Value < 51, Value, 100- Value)
Но у меня задача несколько иная: реверсивный счётчик работает от таймера, да ещё и модуль его надо переключать.

[Black_AVP]

Пытаюсь отловить окончание трека по такой схеме:

Однако, оказывается, что значение "100" у половины треков не появляется.
Пробовал с таким выражением:
If(Value >= 99, CurrentValue + 1, CurrentValue)
Но тогда в конце трека счётчик успевает сосчитать сразу несколько раз, причём всегда по-разному. 
То же самое происходит, если пытаться поймать начало трека:
If(Value = 0, CurrentValue + 1, CurrentValue)

[McClaud]

Пытаюсь отловить окончание трека по такой схеме:

Однако, оказывается, что значение "100" у половины треков не появляется.
Пробовал с таким выражением:
If(Value >= 99, CurrentValue + 1, CurrentValue)
Но тогда в конце трека счётчик успевает сосчитать сразу несколько раз, причём всегда по-разному. 
То же самое происходит, если пытаться поймать начало трека:
If(Value = 0, CurrentValue + 1, CurrentValue)

А если использовать не Progress, а TrackPosition или TrackPositionRemaining? Там, конечно, нет фиксированного значения длительности, но НОЛЬ-то есть.

[Black_AVP]

А если использовать не Progress, а TrackPosition или TrackPositionRemaining? Там, конечно, нет фиксированного значения длительности, но НОЛЬ-то есть.

Пробовал и эти сервисы - картина аналогичная, уверенно поймать конец/начало трека не получается.

[Aleksandr009]

Здравствуйте. Возник вопрос - как с помощью скрипта воздействовать на какую-либо точку какого-либо провайдера, т.е действия Action или установить значение, а также получить данные провайдера?
Хочу сделать кнопки сброса настроек эквалайзера и звуковых эффектов.
Заранее спасибо!

[Black_AVP]

Хочу сделать кнопки сброса настроек эквалайзера и звуковых эффектов.

Так, в справке всё это есть. Просто придётся пробежаться по всем полосам элвалайзера и установить их в 0:
EQ.Set('BandValueX', 0), где
EQ - имя перемонной элвалайзера (провайдер prvEqualizer);
X - номер полосы (1..18).
Лучше сделать в цикле - меньше писанины.

Звуковые эффекты сбрасываются в 0 по ПКМ. Если нужно от кнопки - для этого и биндинга достаточно - просто прописать в связи "0".

[Aleksandr009]

Так, в справке всё это есть. Просто придётся пробежаться по всем полосам элвалайзера и установить их в 0:
EQ.Set('BandValueX', 0), где
EQ - имя перемонной элвалайзера (провайдер prvEqualizer);
X - номер полосы (1..18).
Лучше сделать в цикле - меньше писанины.

Звуковые эффекты сбрасываются в 0 по ПКМ. Если нужно от кнопки - для этого и биндинга достаточно - просто прописать в связи "0".

Спасибо, Black_AVP! +

[Black_AVP]

Лучше сделать в цикле - меньше писанины.

Code: [Select]

procedure Execute(var State: Integer);
var
  EQ: TComponent;
  N: Integer;
 
begin
  ...
  EQ:= FindObject('prvEqualizer');
  for N:= 1 to 18 do
    EQ.Set('BandValue' + IntToStr(N), 0);
  ...
end;


[Aleksandr009]

Code: [Select]

procedure Execute(var State: Integer);
var
  EQ: TComponent;
  N: Integer;
 
begin
  ...
  EQ:= FindObject('prvEqualizer');
  for N:= 1 to 18 do
    EQ.Set('BandValue' + IntToStr(N), 0);
  ...
end;


Ещё раз благодарю, Black_AVP