kolibrios/programs/cmm/template/template.c
Kirill Lipatov (Leency) 7f1f263ff5 cmm: cleanup
git-svn-id: svn://kolibrios.org@7854 a494cfbc-eb01-0410-851d-a64ba20cac60
2020-05-01 20:57:17 +00:00

38 lines
595 B
C

/*
* Template C-- program
*/
#define MEMSIZE 1024*40
#include "../lib/io.h"
#include "../lib/gui.h"
proc_info Form;
void main()
{
word btn;
loop() switch(WaitEvent())
{
case evButton:
btn = GetButtonID();
if (btn == 1) ExitProcess();
break;
case evKey:
GetKeys();
if (key_scancode == SCAN_CODE_ESC) ExitProcess();
break;
case evReDraw:
draw_window();
break;
}
}
void draw_window()
{
DefineAndDrawWindow(215, 100, 350, 300, 0x34, 0xEEEeee, "Window title",0);
GetProcessInfo(#Form, SelfInfo);
}