1
0
kolibrios/programs/cmm/examples/window.c
Kirill Lipatov (Leency) 52461ceda9 add forgotten tcc files
git-svn-id: svn://kolibrios.org@7760 a494cfbc-eb01-0410-851d-a64ba20cac60
2020-04-04 15:15:50 +00:00

37 lines
755 B
C

#define MEMSIZE 4096*10
#include "../lib/io.h"
#include "../lib/window.h"
window win1=0;
void main()
{
io.dir.load(0,DIR_ONLYREAL);
win1.background = 0xFFFFFF;
win1.left = 200;
win1.ondraw = #draw_window;
win1.create();
}
void draw_window()
{
int i;
for (i=0; i<io.dir.count; i++)WriteText(5,i*8+3,0x80,0xFF00FF,io.dir.position(i));
DrawCaptButton(100, 10, 100, 22, 22, 0xCCCccc, 0x000000, "Button");
WriteText(100,50,0x80,0,"Textline small");
WriteText(100,70,0x90,0,"Textline big");
DrawBar(100, 110, 100, 100, 0x66AF86);
draw_ascii();
}
void draw_ascii()
{
char s[2];
int i, x, y;
s[1]=EOS;
for (i=0; i<256; i++) {
y = i / 20;
x = i % 20;
s[0] = i;
WriteText(x*33, y*33, 0x91, 0, #s);
}
}