You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
l3lib/html-doku/deu_rtf/llinput_geteventloopkeyboar...

44 lines
2.0 KiB
Plaintext

This file contains invisible Unicode characters!

This file contains invisible Unicode characters that may be processed differently from what appears below. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to reveal hidden characters.

{\rtf1\ansi\ansicpg1252\deff0\deflang3079{\fonttbl{\f0\fmodern\fcharset0 Courier;}{\f1\fswiss\fprq2\fcharset0 System;}}
{\colortbl ;\red0\green0\blue255;\red0\green0\blue0;\red128\green0\blue0;\red128\green128\blue128;\red160\green0\blue160;}
{\*\generator Msftedit 5.41.15.1507;}\viewkind4\uc1\pard\cf1\lang1033\f0\fs20 #include\cf2 <lowlevellib.h>\par
\par
\par
\cf1 int\cf2 \cf3 os_main\cf2 (\cf1 int\cf2 \cf4 argc\cf2 , \cf1 char\cf2 **\cf4 argv\cf2 , \cf1 char\cf2 **\cf4 envp\cf2 )\par
\{\b\par
\par
\b0 \cf3 llgfx_SetDisplayMode\cf2 (320,240,16,0,0);\par
\par
\cf1 while\cf2 (\cf4 osmain_endgame\cf2 ==\cf1 false\cf2 )\{\par
\par
\cf3 llgfx_ClearScreen\cf2 (\cf5 BLACK\cf2 );\par
\par
\cf1 PtrInputEvent\cf2 \cf4 ev\cf2 ;\par
\cf1 while\cf2 ( \cf4 ev\cf2 = \cf3 llinput_GetEvent\cf2 ()) \{\par
\cf1 if\cf2 (\cf3 STATE_Justdown\cf2 (\cf4 ev\cf2 ) == \cf1 false\cf2 ) \cf1 continue\cf2 ;\par
\par
\cf1 switch\cf2 (\cf4 ev\cf2 ->\cf1 id\cf2 )\{\par
\cf1 case\cf2 \cf5 LLINPUT_CURSOR_DOWN\cf2 :\par
\cf3 llgfx_Printf\cf2 ("down");\par
\cf1 break\cf2 ;\par
\cf1 case\cf2 \cf5 LLINPUT_CURSOR_UP\cf2 :\par
\cf3 llgfx_Printf\cf2 ("up");\par
\cf1 break\cf2 ;\par
\cf1 case\cf2 \cf5 LLINPUT_CURSOR_RIGHT\cf2 :\par
\cf1 break\cf2 ;\par
\cf1 case\cf2 \cf5 LLINPUT_CURSOR_LEFT\cf2 :\par
\cf1 break\cf2 ;\par
\cf1 case\cf2 \cf5 LLINPUT_KEY_X\cf2 :\par
\cf3 llgfx_Printf\cf2 ("x");\par
\cf1 break\cf2 ; \par
\}\par
\} \par
\par
\cf3 llgfx_FlipScreen\cf2 (1);\par
\cf3 llinput_Update\cf2 ();\par
\cf3 llirq_Sleep\cf2 (10);\par
\}\par
\par
\cf1 return\cf2 0;\par
\}\cf0\lang3079\b\f1\par
}