[Grinch]

Сообщение от Rackot

в чём косяк?

ну для начала форум не посвящен багам, что б ты знал.
ну так как ты спросил про скрипт то:

Сообщение от NLObP

Добавь в начале, после VAR
tac : integer;