Мне нужна хорошая анимация в паскале. Неважна идея, важно чтобы красиво выглядела. Надо четверть закрыть. Буду очень благодарен

Анимация в паскале вообще не очень ... единственный вариант это рисовать все линии на шаге, потом стирать их и рисовать на следующем (в цикле). Выставить задержку, тогда будет создаваться иллюзия анимации. Лучше воспользоваться Delphi, там тот же паскать, но с анимацией получше.