Subversion Repositories Kolibri OS

Rev

Rev 7806 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5640 pavelyakov 1 
//IO library
2 
#ifndef INCLUDE_DATE_H
3 
#define INCLUDE_DATE_H
4 
 
5 
#ifndef INCLUDE_STRING_H
6 
#include "../lib/strings.h"
7 
#endif
8 
 
9 
:struct date
10 
{
11 
	byte day;
12 
	byte month;
13 
	word year;
14 
};
15 
 
7806 leency 16 
:void DrawDate(dword x, y, color, in_date)
17 
{
18 
	EDI = in_date;
19 
	EAX = 47;
20 
	EBX = 2<<16;
21 
	EDX = x<<16+y;
22 
	ESI = 0x90<<24+color;
23 
	ECX = EDI.date.day;
9537 leency 24 
	$int 64
7806 leency 25 
	EDX += 20<<16;
26 
	ECX = EDI.date.month;
9537 leency 27 
	$int 64
7806 leency 28 
	EDX += 20<<16;
29 
	EBX = 4<<16;
30 
	ECX = EDI.date.year;
9537 leency 31 
	$int 64
7806 leency 32 
	DrawBar(x+17,y+10,2,2,color);
9537 leency 33 
	$add ebx, 20 << 16
34 
	$int 64
7806 leency 35 
}
36 
 
5640 pavelyakov 37 
#endif