Subversion Repositories Kolibri OS

Rev

Rev 5582 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5582 Rev 5591
Line 31... Line 31...
31 
};
 31 
};
Line 32... Line 32...
32 
 
 32 
 
33 
 
 33 
 
34 
:void DrawDate(dword x, y, color, in_date)
 34 
:void DrawDate(dword x, y, color, in_date)
35 
{
 35 
{
36 
	char text[15];
 36 
	//char text[15];
37 
	/*EDI = in_date;
 37 
	EDI = in_date;
38 
	EAX = 47;
 38 
	EAX = 47;
39 
	EBX = 2<<16;
 39 
	EBX = 2<<16;
40 
	EDX = x<<16+y;
 40 
	EDX = x<<16+y;
Line 45... Line 45...
45 
	ECX = EDI.date.month;
 45 
	ECX = EDI.date.month;
46 
	$int 0x40;
 46 
	$int 0x40;
47 
	EDX += 18<<16;
 47 
	EDX += 18<<16;
48 
	EBX = 4<<16;
 48 
	EBX = 4<<16;
49 
	ECX = EDI.date.year;
 49 
	ECX = EDI.date.year;
50 
	$int 0x40;*/
 50 
	$int 0x40;
51 
 
 - 
 
- 
 
 51 
	PutPixel(x+14,y+6,color);
- 
 
 52 
	PutPixel(x+32,y+6,color);
52 
	//sprintf(#text,"%s","ddf");
 53 
	//sprintf(#text,"%d",EDI.date.year);
53 
	WriteText(x, y, 0x80, color, "adas\0");
 54 
	//WriteText(x, y, 0x80, 0x000000, #text);
54 
}
 55 
}
Line 55... Line 56...
55 
 
 56 
 
56 
 
 57 
 
Line 299... Line 300...
299 
		strcat(#absolute_path, relative_path);
 300 
		strcat(#absolute_path, relative_path);
300 
	}
 301 
	}
301 
	return #absolute_path;
 302 
	return #absolute_path;
302 
}
 303 
}
Line -... Line 304...
- 
 
 304 
 
303 
 
 305 
:byte ConvertSize_size_prefix[8];
304 
:dword ConvertSize(dword bytes)
 306 
:dword ConvertSize(dword bytes)
305 
{
 307 
{
306 
  byte size_prefix[8], size_nm[4];
 308 
  byte size_nm[4];
307 
  if (bytes>=1073741824) strcpy(#size_nm, "Gb");
 309 
  if (bytes>=1073741824) strncpy(#size_nm, "Gb",2);
308 
  else if (bytes>=1048576) strcpy(#size_nm, "Mb");
 310 
  else if (bytes>=1048576) strncpy(#size_nm, "Mb",2);
309 
  else if (bytes>=1024) strcpy(#size_nm, "Kb");
 311 
  else if (bytes>=1024) strncpy(#size_nm, "Kb",2);
310 
  else strcpy(#size_nm, "b");
 312 
  else strncpy(#size_nm, "b ",2);
311 
  while (bytes>1023) bytes/=1024;
 - 
 
312 
  itoa_(#size_prefix, bytes);
 313 
  while (bytes>1023) bytes/=1024;
313 
  strcat(#size_prefix, #size_nm);
 - 
 
314 
  //sprintf(#size_prefix,"%s","123");
 314 
  sprintf(#ConvertSize_size_prefix,"%d %s",bytes,#size_nm);
315 
  return #size_prefix;
 315 
  return #ConvertSize_size_prefix;
Line 316... Line 316...
316 
}
 316 
}
317 
 
 317 
 
318 
:dword ConvertSizeToKb(unsigned int bytes)
 318 
:dword ConvertSizeToKb(unsigned int bytes)