Subversion Repositories Kolibri OS

Rev

Rev 6887 | Rev 9537 | 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;
24
	$int 0x40;
25
	EDX += 20<<16;
26
	ECX = EDI.date.month;
27
	$int 0x40;
28
	EDX += 20<<16;
29
	EBX = 4<<16;
30
	ECX = EDI.date.year;
31
	$int 0x40;
32
	DrawBar(x+17,y+10,2,2,color);
33
	DrawBar(x+37,y+10,2,2,color);
34
}
35
 
5640 pavelyakov 36
#endif