XProfan

Def InitCommonControls(0) !"COMCTL32","InitCommonControls"
DEF @ALoadImage(6) ! "USER32","LoadImageA"
DEF @ASetWindowLong(3) ! "USER32","SetWindowLongA"
DEF @Agetwindowlong(2) ! "USER32","getwindowlongA"
DEF IMAGELIST_TO_TOOLBAR(2) SendMessage(&(2),1072,0,&(1))
DEF AUTOSIZE_TOOLBAR(1) Sendmessage(&(1),1057,0,0)
DEF DISABLE_BUTTON(2) Sendmessage(&(1),1025,&(2),Or(0,Mul(0,$10000)))
DEF ENABLE_BUTTON(2) Sendmessage(&(1),1025,&(2),Or(1,Mul(0,$10000)))
DEF HIDE_BUTTON(2) Sendmessage(&(1),1028,&(2),Or(1,Mul(0,$10000)))
DEF SHOW_BUTTON(2) Sendmessage(&(1),1028,&(2),Or(0,Mul(0,$10000)))
DEF INIT_TOOLBAR(1) Sendmessage (&(1),1054,20,0)
DEF ADD_BITMAP(1) Sendmessage (&(1),1043,0,TBADDBITMAP#)
DEF ADD_UserBITMAP(2) Sendmessage (&(1),1043,&(2),TBADDBITMAP#)
DEF CUSTOMIZE_TOOLBAR(1) Sendmessage (&(1),1051,0,0)
DEF TTM_AKTIVATE(1) @SendMessage(&(1),$0401,1,0)
DEF TTM_DEAKTIVATE(1) @SendMessage(&(1),$0401,0,0)
DEF SHOWBAND(2) @SendMessage(&(1),1059,&(2),1)
DEF DONTSHOWBAND(2) @SendMessage(&(1),1059,&(2),0)
DEF ASleep(1) !"Kernel32","Sleep"
DEF @AGetFileVersion(4) ! "Version","GetFileVersio