Subversion Repositories Kolibri OS

Rev

Rev 6887 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  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.  
  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.  
  36. #endif