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

[Black_AVP_Bim]

... "аниматор" бобины един, сменяются лишь текстуры.

Так это ес-но, я не понял в чём проблема, зачем нужно считывать скриптом State?

[McClaud]

Так это ес-но, я не понял в чём проблема, зачем нужно считывать скриптом State?

Основное назначение скрипта менять бобины, а когда ещё и перемотка, то менять на смазанную. Номера бобин и набов считываются со своих счётчиков, а откуда считать признак перемотки?

[Black_AVP_Bim]

State  это и есть признак перемотки, через коммутатор он передаётся на счетчик, тот в свою очереь по этому значению и переключает на разблюренную текстуру бобины.

[Artem]

Что перемотка продолжается, позиция в треке стоит близко к 0 (может, колышется), а у нас бобины при этом вертятся, поскольку State = 1.
Пробовал вырубить State через acPlayerSeekBackward.Checked, но, похоже, это свойство не публично или read only.

upd
А, ведь, точно время в этот момент "колышется", где-то в пределах до 0.3 сек, пока не отпустишь кнопку. Тогда переходит в PLAY.
В перерывах между rewind плеер пытается воспроизвести трек с начала.

Если кнопка "удерживается" - значит перемотка идет. Без вариантов. Между интервалами rewind-а плеер будет пытаться играть, и не важно на нуле мы сейчас стоим или нет.
Если ты хочешь, чтобы бобины в данном случае переставали вертеться - тогда нужно закладываться именно что на текущую позицию, а не факт перемотки.

[McClaud]

State  это и есть признак перемотки, через коммутатор он передаётся на счетчик, тот в свою очереь по этому значению и переключает на разблюренную текстуру бобины.

Так у меня же там и смена просто бобин, в одном скрипте

[Black_AVP_Bim]

Если ты хочешь, чтобы бобины в данном случае переставали вертеться - тогда нужно закладываться именно что на текущую позицию, а не факт перемотки.

Так вот и получается, что опять надо скриптом отлавливать начало трека, из коммутаторов и счётчиков создать некий триггер, который остановил бы аниматоры бобин и переключил ещё текстуры в них, затем отловить отпускание пользователем кнопки перемотки, чтоб вернуть этот триггер в исходное состояние для повторного использования.
Реализуемо, конечно, но  ...

[Black_AVP_Bim]

Так у меня же там и смена просто бобин, в одном скрипте

Ну, зря ты так сделал. Тут нужна другая структура ресурсов.
Для каждой бобины должен один пункт-ссылка, например "Bobina", тот в свою очередь должен ссылаться на ещё два пункта-ссылки: Bob и Bob_b (обычная и размытая).
Сами же текстуры будут в списке ресурсов парами: Bob1, Bob1_b, .... BobN, BobN_b. Вот их и надо отдельным скриптом подставлять в Bob и Bob_b (переключать их будт пользователь).
А Bob или Bob_b в Bobina при перемотке.

[Artem]

Так вот и получается, что опять надо скриптом отлавливать начало трека,

Для начала нужно определиться, к чему крепится анимация, к позиции трека или к состоянию перемотки. State показывает, что пользователь держит кнопку перемотки, и по факту перемотка происходит в пределах 0-1 секунды, туда, сюда.

[McClaud]

Ну, зря ты так сделал. Тут нужна другая структура ресурсов.
Для каждой бобины должен один пункт-ссылка, например "Bobina", тот в свою очередь должен ссылаться на ещё два пункта-ссылки: Bob и Bob_b (обычная и размытая).
Сами же текстуры будут в списке ресурсов парами: Bob1, Bob1_b, .... BobN, BobN_b. Вот их и надо отдельным скриптом подставлять в Bob и Bob_b (переключать их будт пользователь).
А Bob или Bob_b в Bobina при перемотке.

Т. е. скриптов два? У меня структура текстур именно, как ты и описал, но смена в одном скрипте.

[Black_AVP_Bim]

Т. е. скриптов два? У меня структура текстур именно, как ты и описал, но смена в одном скрипте.

Да, и оба с предельно простым кодом типа:

Code: [Select]

procedure Execute(var State: Integer);
var
  S: String;
 
begin
  if State = 0 then S:= '' else S:= '_b';
  BeginUpdateResources;
  FindResource('Bobina').Set('ID', 'Bob' + S);
  EndUpdateResources;
end;

Во втором скрипте уже пользователь переключает сами текстуры бобин (парами).
Такое построение позволяет переключать текстуры даже в режиме перемотки.

[Black_AVP_Bim]

Для начала нужно определиться, к чему крепится анимация, к позиции трека или к состоянию перемотки.

К состоянию перемотки, конечно. Разрешение на анимацию бобин собирается из нескольких условий:


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

[McClaud]

Да, и оба с предельно простым кодом типа:

Code: [Select]

procedure Execute(var State: Integer);
var
  S: String;
 
begin
  if State = 0 then S:= '' else S:= '_b';
  BeginUpdateResources;
  FindResource('Bobina').Set('ID', 'Bob' + S);
  EndUpdateResources;
end;

Во втором скрипте уже пользователь переключает сами текстуры бобин (парами).
Такое построение позволяет переключать текстуры даже в режиме перемотки.

Спасибо, так и точно проще получится!

[Black_AVP_Bim]

Со вторым скриптом помочь?

[McClaud]

Со вторым скриптом помочь?

Да уж, пожалуй, сам справлюсь, опыт есть. Но твой вариант для общего развития я бы посмотрел 

[Black_AVP_Bim]

Code: [Select]

procedure Execute(var State: Integer);
var
  S: String;
 
begin
  S := 'Bob' + IntToStr(State + 1);            // если имена нумеруются с 1 (Bob1, Bob1_b...)
  BeginUpdateResources;
  FindResource('Bob').Set('ID', S);             // имя текстуры будет BobN
  FindResource('Bob_b').Set('ID', S + '_b'); // имя текстуры будет BobN_b
  EndUpdateResources;
end;