М-да... Протоморзил конечно я конкретно
В SDK рядом с WaitForVerticalBlank есть функция GetVerticalBlankStatus, которая может легко заменить первую:
- Код: Выделить всё
do until GetVerticalBlankStatus = 1
loop
Правда, здесь тоже цикл подвисания, но он не ест 99,999% процесорного времени, как WaitForVerticalBlank, и в таком виде вполне пригоден для использования.