Subversion Repositories Kolibri OS

Rev

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

Rev 5598 Rev 5640
Line 1... Line 1...
1
#define MEMSIZE 0x3E80
1
#define MEMSIZE 0x3E80
-
 
2
 
-
 
3
#include "../lib/io.h"
2
#include "..\lib\strings.h" 
4
#include "../lib/draw.h"
Line 3... Line 5...
3
 
5
 
4
void main()
6
void main()
5
{   
7
{   
6
	int id, key;
8
	int id, key;
-
 
9
	mem_Init();
7
	
10
	io.set("/sys/RUN",ATR_HIDDEN);
8
	loop()
11
	loop()
9
   {
12
   {
10
      switch(WaitEvent())
13
      switch(WaitEvent())
11
      {
14
      {
Line 25... Line 28...
25
			draw_window();
28
			draw_window();
26
			break;
29
			break;
27
      }
30
      }
28
   }
31
   }
29
}
32
}
30
 
-
 
31
 
-
 
32
void draw_window()
33
void draw_window()
33
{
34
{
34
	proc_info Form;
35
	proc_info Form;
-
 
36
	dword pos;
-
 
37
	//float zz=0.944,ret;
35
	DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header");
38
	DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header");
-
 
39
	//draw.gradient(pos,10,10,0x0,20,20,0x0);
36
	GetProcessInfo(#Form, SelfInfo);
40
	GetProcessInfo(#Form, SelfInfo);
37
	WriteText(50,80,0x80,0,"Press Enter");
41
	draw.circle(60,60,5);
-
 
42
 
38
	WriteText(10,110,0x80,0,#param);
43
	WriteText(10,110,0x80,0,#param);
39
}
44
}
Line 40... Line -...
40
 
-
 
41
 
45