Subversion Repositories Kolibri OS

Rev

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

Rev 1971 Rev 2085
Line 1... Line 1...
1 
//ª­®¯ª¨
 1 
//ª­®¯ª¨
2 
#define BACK		300
 2 
#define BACK		300
3 
#define FORWARD	301
 3 
#define FORWARD		301
4 
#define REFRESH	302
 4 
#define REFRESH		302
5 
#define HOME		303
 5 
#define HOME		303
- 
 
 6 
#define NEWTAB		304
6 
#define GOTOURL	305
 7 
#define GOTOURL		305
7 
#define SEARCHWEB	306
 8 
#define SEARCHWEB	306
8 
#define ID1		178
 9 
#define ID1		178
9 
#define ID2		177
 10 
#define ID2		177
Line 24... Line 25...
24 
	copystr(#URL, #temp1);
 25 
	copystr(#URL, #temp1);
25 
	temp1[len] = 0x00;
 26 
	temp1[len] = 0x00;
26 
	return #temp1;
 27 
	return #temp1;
27 
}
 28 
}
Line -... Line 29...
- 
 
 29 
 
- 
 
 30 
inline fastcall CopyScreen(dword EBX, ECX, EDX)
- 
 
 31 
{
- 
 
 32 
  EAX = 36;
- 
 
 33 
  $int  0x40;
Line 28... Line 34...
28 
 
 34 
}
Line 29... Line 35...
29 
 
 35 
 
30 
inline byte chTag(dword text) {return strcmp(#tag,text);}
 36 
inline byte chTag(dword text) {return strcmp(#tag,text);}
Line 41... Line 47...
41 
dword italic_buf;
 47 
dword italic_buf;
42 
int tile_height=2,//¡ã¤¥¬ ¢ë¢®¤¨âì ¤¢ã寨ªá¥«ì­ë¬¨ ¯®«®áª ¬¨
 48 
int tile_height=2,//¡ã¤¥¬ ¢ë¢®¤¨âì ¤¢ã寨ªá¥«ì­ë¬¨ ¯®«®áª ¬¨
43 
i, skin_width,
 49 
i, skin_width,
44 
shift=-2;
 50 
shift=-2;
Line 45... Line -...
45 
 
 - 
 
46 
  skin_width = GetSkinWidth();
 - 
 
47 
  Form.GetInfo(SelfInfo);
 51 
 
48 
  italic_buf = malloc(w*h*3);
 - 
 
49 
  //ebx = 㪠§ â¥«ì ­  ¯à¥¤¢ à¨â¥«ì­® ¢ë¤¥«¥­­ãî ®¡« áâì ¯ ¬ïâ¨, ªã¤  ¡ã¤¥â ¯®¬¥é¥­® ¨§®¡à ¦¥­¨¥ ¢ ä®à¬ â¥ BBGGRRBBGGRR...
 52 
  italic_buf = malloc(w*h*3);
50 
  EBX = italic_buf;
 - 
 
51 
  //ecx = [à §¬¥à ¯® ®á¨ x]*65536 + [à §¬¥à ¯® ®á¨ y]
 - 
 
52 
  ECX = w * 65536 + h;
 - 
 
- 
 
 53 
  skin_width = GetSkinWidth();
53 
  //edx = [ª®®à¤¨­ â  ¯® ®á¨ x]*65536 + [ª®®à¤¨­ â  ¯® ®á¨ y]
 54 
 
54 
  EDX = x + Form.left * 65536 + y + Form.top + skin_width;
 55 
  CopyScreen(italic_buf, w * 65536 + h, x + Form.left + 2 * 65536 + y + Form.top + skin_width);
55 
  EAX = 36;
 - 
 
Line 56... Line 56...
56 
  $int  0x40;
 56 
 
57 
 
 57
58 
  FOR (i=0;i*tile_height
 58 
  FOR (i=0;i*tile_height
59 
    PutImage(w*3*tile_height*i+italic_buf,w,tile_height,x+shift-i,i*tile_height+y);
 59 
    PutImage(w*3*tile_height*i+italic_buf,w,tile_height,x+shift-i+1,i*tile_height+y);
60 
  }
 60 
  }