Intro application closes on Windows 7

[dartfnm]

The problem with GetAsyncKeyState, MSDN says:

Determines whether a key is up or down at the time the function is called, and whether the key was pressed after a previous call to GetAsyncKeyState.

You need to call

	push 01bH ;ESC key code for GetAsyncKeyState
	call GetAsyncKeyState ; RESET KEYS STATES

Before asking a key for exit from application

call GetAsyncKeyState
jz mainloop

[w23]

I'm not sure I understand what the problem is. Is it the case that ESC being pressed just before an intro is run results in intro just exiting at once?

If so, I don't think adding additional call for handling a rare case can be justified from size perspective. After all, we cut so many corners in an attempt to make it under 4096 bytes.

[dartfnm]

Проблема была у меня под Виндой 7-кой, интра закрывалась сразу после загрузки, без ошибок. Пришлось подебажить - и оказалась что интра выходит из цикла сразу же, на первом Loop'e, потому что это async функция GetAsyncKeyState - возвращаяет дельту состояний, между прошлым вызовом и этим, а раз ты вызов этой функции до этого не делал, - то происходит сразу выход из нее.
Лечится просто добавлением 2х строк перед основным циклом:

	push 01bH ;ESC key code for GetAsyncKeyState
	call GetAsyncKeyState ; RESET KEYS STATES