Subversion Repositories Kolibri OS

Rev

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

Rev 5640 Rev 5646
Line 902... Line 902...
902
	PutPixel(x+32,y+6,color);
902
	PutPixel(x+32,y+6,color);
903
	//sprintf(#text,"%d",EDI.date.year);
903
	//sprintf(#text,"%d",EDI.date.year);
904
	//WriteText(x, y, 0x80, 0x000000, #text);
904
	//WriteText(x, y, 0x80, 0x000000, #text);
905
}
905
}
Line -... Line 906...
-
 
906
 
-
 
907
:void __path_name__(dword BUF,PATH)
-
 
908
{
-
 
909
	dword beg = PATH;
-
 
910
	dword pos = PATH;
-
 
911
	dword sav = PATH;
-
 
912
	dword i;
-
 
913
	while(DSBYTE[pos])
-
 
914
	{
-
 
915
		if(DSBYTE[pos]=='/')sav = pos;
-
 
916
		pos++;
-
 
917
	}
-
 
918
	i = sav-beg;
-
 
919
	while(i)
-
 
920
	{
-
 
921
		DSBYTE[BUF] = DSBYTE[beg];
-
 
922
		beg++;
-
 
923
		BUF++;
-
 
924
		i--;
-
 
925
	}
-
 
926
	/*while(DSBYTE[beg])
-
 
927
	{
-
 
928
		DSBYTE[BUF1] = DSBYTE[beg];
-
 
929
		beg++;
-
 
930
		BUF1++;
-
 
931
	}*/
-
 
932
	//DSBYTE[BUF1] = 0;
-
 
933
	DSBYTE[BUF] = 0;
-
 
934
}
906
 
935
 
Line 907... Line 936...
907
dword __generator;  // random number generator - äëÿ ãåíåðàöèè ñëó÷àéíûõ ÷èñåë
936
dword __generator;  // random number generator - äëÿ ãåíåðàöèè ñëó÷àéíûõ ÷èñåë
Line -... Line 937...
-
 
937
 
-
 
938
:dword program_path_length;
-
 
939
 
-
 
940
char __BUF_DIR__[4096];
908
 
941
 
909
:dword program_path_length;
942
dword __DIR__;
910
 
943
 
-
 
944
//The initialization of the initial data before running
-
 
945
void load_init_main()
911
//The initialization of the initial data before running
946
{
Line -... Line 947...
-
 
947
	__DIR__ = #__BUF_DIR__;
912
void load_init_main()
948
	
913
{
949
	__path_name__(__DIR__,I_Path);
Line 914... Line 950...
914
	SKIN.height   = GetSkinHeight();
950
	
915
	
951
	SKIN.height   = GetSkinHeight();