kolibrios-gitea/programs/cmm/template/t.c
Kirill Lipatov (Leency) af05642a48 @RESHARE: add into IMG, and to autorun, fix memory leak
QUARK: move to ISO
SYSMON: use @reshare
Various small updates and fixes

git-svn-id: svn://kolibrios.org@9428 a494cfbc-eb01-0410-851d-a64ba20cac60
2021-12-16 19:08:12 +00:00

28 lines
512 B
C

#define MEMSIZE 1024*50
#include "../lib/gui.h"
#include "../lib/fs.h"
void main()
{
proc_info Form;
@SetEventMask(EVM_REDRAW + EVM_KEY + EVM_BUTTON + EVM_MOUSE);
loop() switch(WaitEvent())
{
case evMouse:
mouse.get();
break;
case evKey:
@GetKeyScancode();
if (AL == SCAN_CODE_ESC) @ExitProcess();
break;
case evReDraw:
sc.get();
DefineAndDrawWindow(100, 100, 300, 250, 0x34, sc.work, "Template app", 0);
GetProcessInfo(#Form, SelfInfo);
}
}