Subversion Repositories Kolibri OS

Rev

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

Rev 7086 Rev 7227
Line 153... Line 153...
153
};
153
};
Line 154... Line 154...
154
 
154
 
155
struct frame
155
struct frame
156
{
156
{
157
	dword type;
157
	dword type;
158
	word size_x;                  
158
	word size_x; //start_x, size_x => Mario, WTF? Is this so complex to use x/y/w/h ?                  
159
	word start_x;                 
159
	word start_x;                 
160
	word size_y;                  
160
	word size_y;                  
161
	word start_y;                
161
	word start_y;                
162
	dword ext_col;            
162
	dword ext_col;            
Line 168... Line 168...
168
	dword font_size_y;           
168
	dword font_size_y;           
169
	dword font_color;            
169
	dword font_color;            
170
	dword font_backgr_color;
170
	dword font_backgr_color;
171
};     
171
};
Line -... Line 172...
-
 
172
 
-
 
173
:frame frame123 = { 0, 260, 10, 60, 16, NULL, 0xFFFfff, 1, NULL, 0, 1, 12, 0x000111, 0xCCCccc };
-
 
174
:void DrawFrame(dword x,y,w,h,text)
-
 
175
{
-
 
176
	frame123.font_color = system.color.work_text;
-
 
177
	frame123.ext_col = system.color.work_graph;
-
 
178
	frame123.int_col = system.color.work_light;
-
 
179
	frame123.font_backgr_color = system.color.work;
-
 
180
 
-
 
181
	frame123.start_x = x;
-
 
182
	frame123.start_y = y;
-
 
183
	frame123.size_x = w;
-
 
184
	frame123.size_y = h;
-
 
185
	frame123.text_pointer = text;
-
 
186
	frame_draw stdcall (#frame123);
-
 
187
}
-
 
188
 
172
 
189
 
173
#endif
190
#endif