Цитата:
Сообщение от icWasya
>код ужасен - править и править
например, вот это
Код:
X_Sp:=0;Y_Sp:=0;
case Num_splash of
0: begin X_Sp:=0;Y_Sp:=0; end;
1: begin X_Sp:=1;Y_Sp:=0; end;
... и ещё 58 строк
смело можно заменить на
Код:
X_Sp:=Num_splash mod 4;
Y_Sp:=Num_splash div 4;
|
ОП, первые правки появились
продолжаем, кому интересно.
ЗЫ: Не пойдёт поправка,.. т.к. не на всех фреймах анимация из 4 кадров, - на некоторых из 5.
И кстати, если память мне не изменяет, конструкция Case работает быстрее операторов div и mod (т.к. case в данном случае играет роли "выборки" из табличных значений, в отличии от арифметико-логических операций с числами)
Скачать исходники + exe
тут
Библиотека GraphicEx
тут