Т > KeyScanWin ;Т Display native Windows keyscan code (negative INKEYs) : (О 10,8:Г ╠<40:К 128 ▀ О 13 2*ESC OFF !<Н ┘ Я д15+B%│16,Ґ10):Ж:Рend:Ю .FЯ "Press Shift-Escape to finish"'д16,Ґ10); PО 23,1;0;0;0;0 ZУ dЯ д16,Ґ11); nЦ A%=0 ╦ 255 ┬ 16 xЦ B%=A% ╦ A%+15 ┌ "GetAsyncKeyState",B% ╦ K% #▄Г K%:Я " "єh0(B%,2)" "; ▀ Я ┴4; )√Г і-1:Г і-113:Я д15-A%│16,Ґ10):Рend: ═М:Я ╙М:Щ ё ЄщРend ЎУ Щ і(0)=-1 хО23,1,1;0;0;0; р*ESC ON э*FX15 ФА #Пщєh0(A%,N%)=б"0000000"+ц~A%,N%) ЪЪ