//ª®¯ª¨
#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] = "
¡¢£¤¥¦§¨©ª«¬®¯àáâãäåæçèéêëìíîïðñ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);}
// á ¥â ª«®ëå èà¨ä⮢, ¯®í⮬㠤¥« ¥¬ ª®áâë«ì ¨§
//¯ «®ç¥ª ¤«ï ¬®à®¦¥®£® ¨ ¦¥¢ ⥫쮩 १¨ª¨:
//¨¬ ¥¬ ®¡« áâì íªà ¨ ¢ë¢®¤¨¬ ¥ñ ®¡à â® ¯®«®áª ¬¨ ᮠᬥ饨¥¬,
//çâ® ¤ ñâ ¯¥à¥ª®á ª à⨪¨
//ਠ«¨ç¨¨ ä® ¨ â.¯. ¯à®ï¢¨âáï ¢áï ª®áâë«ì®áâì à¥è¥¨ï :)
//ç áâì ¤ ëå 㦥 ¯®«ãç¥ ¢ 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);
}