Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 5131 → Rev 5132

/programs/develop/libraries/newlib_example/Tupfile.lua
0,0 → 1,6
if tup.getconfig("NO_GCC") ~= "" or tup.getconfig("NO_FASM") ~= "" then return end
HELPERDIR = (tup.getconfig("HELPERDIR") == "") and "../../.." or tup.getconfig("HELPERDIR")
tup.include(HELPERDIR .. "/use_gcc.lua")
tup.include(HELPERDIR .. "/use_newlib.lua")
compile_gcc{"main.c"}
link_gcc("binclock")
/programs/develop/libraries/newlib_example/main.c
0,0 → 1,87
#include <kos32sys.h>
 
#define B_SZ 10
 
static char * Title="BinClock";
 
static void draw_small_box(int x,int y,int is_on)
{
draw_bar(x,y,B_SZ,B_SZ,is_on ? 0xFF0000 : 0x103000);
}
 
static void draw_box_group(int x,int y,int num)
{
int i,j;
char buf[2];
buf[0]=(num&(1+2+4+8))+'0';
buf[1]='\0';
for(i=0;i<4;i++)
{
j=(B_SZ+2)*i;
draw_small_box(x,y+((B_SZ+2)*i),num & (1<<(3-i)) ? 1 : 0);
}
draw_bar(x,y+((B_SZ+2)*4),B_SZ,B_SZ,0x800000);
draw_text_sys(buf,x+2,y+((B_SZ+2)*4)+3,1,0xFFFFFF);
}
 
static void draw_bcd_num(int x,int y,int num)
{
int v1,v2;
v1=(num>>4)&(1+2+4+8);
v2=num & (1+2+4+8);
draw_box_group(x,y,v1);
draw_box_group(x+B_SZ+2,y,v2);
}
 
static void draw_hms(int x,int y)
{
unsigned t;
int h,m,s;
__asm__ __volatile__("int $0x40" : "=a"(t) : "a"(3));
s=(t & 0x00FF0000)>>16;
m=(t & 0x0000FF00)>>8;
h=(t & 0x000000FF);
draw_bcd_num(x,y,h);
x+=((B_SZ+2)<<1)+2;
draw_bcd_num(x,y,m);
x+=((B_SZ+2)<<1)+2;
draw_bcd_num(x,y,s);
}
 
static void draw_h(void)
{
draw_hms(22,28);
}
 
static void paint(void)
{
BeginDraw();
DrawWindow(100,100,40+((B_SZ+2)*6)+4,30+((B_SZ+2)*4)+16,Title,0x80,0x13);
draw_bar(20,26,((B_SZ+2)*6)+4+2,4+((B_SZ+1)*4)+2,0);
draw_h();
EndDraw();
}
 
int main(void)
{
int i;
paint();
for(;;)
{
i=wait_for_event(20);
draw_h();
switch(i)
{
case 1:
paint();
continue;
case 2:
get_key();
continue;
case 3:
if(get_os_button()==1) return 0;
continue;
}
}
}