Quote (Jack)
Настолько бредового кода я давно не видел о_О И вообще не понял что он, по-твоему, делает..
Когда переходишь в граф. режим есть задержка длиной в 2 секунды, когда прога работает, а монитор ничего не показывает. Во время этой задержки ScanLine остается неподвижным. Этот код просто ждет изменение ScanLine'а. ---
ЕПТ!!! Код написал с ошибкой. Вот правильный
Code
Function WaitScreen()
old_sl = ScanLine()
While MilliSecs() ;Чтоб цикл не закончился
If old_sl <> ScanLine() Then Exit
old_sl = ScanLine()
Wend
End Function