forked from KolibriOS/kolibrios
63 lines
1.7 KiB
Plaintext
63 lines
1.7 KiB
Plaintext
//ª®¯ª¨
|
||
#define BACK 300
|
||
#define FORWARD 301
|
||
#define REFRESH 302
|
||
#define HOME 303
|
||
#define GOTOURL 305
|
||
#define SEARCHWEB 306
|
||
#define ID1 178
|
||
#define ID2 177
|
||
|
||
#define WINDOWS 0
|
||
#define DOS 1
|
||
#define KOI 2
|
||
#define UTF 3
|
||
|
||
#define DONT_LOAD 0
|
||
#define LETS_LOAD 1
|
||
|
||
byte utf100tmmv_mas[77] = "€<>‚ƒ„…†‡ˆ‰Š‹Œ<E280B9>Ž<EFBFBD><C5BD>‘’“”•–—˜™š›œ<E280BA>žŸ ¡¢£¤¥¦§¨©ª«¬®¯àáâãäåæçèéêëìíîïðñh£si\244j";
|
||
|
||
|
||
dword get_URL_part(byte len) {
|
||
char temp1[1000];
|
||
copystr(#URL, #temp1);
|
||
temp1[len] = 0x00;
|
||
return #temp1;
|
||
}
|
||
|
||
|
||
inline byte chTag(dword text) {return strcmp(#tag,text);}
|
||
|
||
//“ á ¥â ª«®ëå èà¨ä⮢, ¯®í⮬㠤¥« ¥¬ ª®áâë«ì ¨§
|
||
//¯ «®ç¥ª ¤«ï ¬®à®¦¥®£® ¨ ¦¥¢ ⥫쮩 १¨ª¨:
|
||
//‘¨¬ ¥¬ ®¡« áâì íªà ¨ ¢ë¢®¤¨¬ ¥ñ ®¡à â® ¯®«®áª ¬¨ ᮠᬥ饨¥¬,
|
||
//çâ® ¤ ñâ ¯¥à¥ª®á ª à⨪¨
|
||
//<2F>ਠ«¨ç¨¨ ä® ¨ â.¯. ¯à®ï¢¨âáï ¢áï ª®áâë«ì®áâì à¥è¥¨ï :)
|
||
|
||
//ç áâì ¤ ëå 㦥 ¯®«ãç¥ ¢ TBW - skin_width, Form.top, ¯®¤ª«î票¥ memory
|
||
inline void Skew(dword x,y,w,h)
|
||
{
|
||
dword italic_buf;
|
||
int tile_height=2,//¡ã¤¥¬ ¢ë¢®¤¨âì ¤¢ã寨ªá¥«ì묨 ¯®«®áª ¬¨
|
||
i, skin_width,
|
||
shift=-2;
|
||
|
||
skin_width = GetSkinWidth();
|
||
Form.GetInfo(SelfInfo);
|
||
italic_buf = malloc(w*h*3);
|
||
//ebx = 㪠§ â¥«ì ¯à¥¤¢ à¨â¥«ì® ¢ë¤¥«¥ãî ®¡« áâì ¯ ¬ïâ¨, ªã¤ ¡ã¤¥â ¯®¬¥é¥® ¨§®¡à ¦¥¨¥ ¢ ä®à¬ ⥠BBGGRRBBGGRR...
|
||
EBX = italic_buf;
|
||
//ecx = [à §¬¥à ¯® ®á¨ x]*65536 + [à §¬¥à ¯® ®á¨ y]
|
||
ECX = w * 65536 + h;
|
||
//edx = [ª®®à¤¨ â ¯® ®á¨ x]*65536 + [ª®®à¤¨ â ¯® ®á¨ y]
|
||
EDX = x + Form.left * 65536 + y + Form.top + skin_width;
|
||
EAX = 36;
|
||
$int 0x40;
|
||
|
||
FOR (i=0;i*tile_height<h;i++){
|
||
PutImage(w*3*tile_height*i+italic_buf,w,tile_height,x+shift-i,i*tile_height+y);
|
||
}
|
||
free(italic_buf);
|
||
}
|