Make(delphi) ver(4.04 build 185) Add(Label,11451624,140,266) { Left=215 Top=225 Width=200 Height=19 Font=[Arial,9,1,0,204] Caption="Aero Stripes" AutoSize=1 Alignment=2 } Add(Label,3420571,133,259) { Left=10 Top=225 Width=200 Height=19 Font=[Arial,9,1,0,204] Caption="Blure Balance" AutoSize=1 Alignment=2 } Add(MainForm,2953706,14,105) { Width=435 Height=330 Caption="AeroTweak" Icon=[ZIPBE25000078DAEDD90754D357DF07F0E0A8D53EADD6AAB5AD93E1C08D1471002A82E24211054544C4818018105096228A80282088C81090BD2140980949D88184904512B203499821B241DBBE374090F67DDAB7A57D9ED3F79C5ECE977B929390CFFFDEFBFFFD6FF843200AE067FB7608F8BD0692AA02812C8340201B40C05390CB9089E765CD4B05F24FFBA7FDBF68F3E7CF5758BDE2DB4F16CDFF64017838E7EF6C9D356B96C2CAAF972ED0DAB846F5828EDA593B436D2717E3030FEF9EDCF5E8FE19ADE04FE6CC56052F5B347E2AFE0DB8CBBFFC62A1F6FA159A66FBD5AFD89CD0727138A1E9ED725CDDD74657D5E5CCD665A63ADFCED5DFBB147250160F9303DE8BE7CF3D0CDEB70D6405C827FF25A7C2979FCE99A7BA7CD12AFDAD4A478C3437DFBC7250CDD54E5FCDDB5E6FDBA38B9A4A3774D77C66B07BD2F9EFB26F19E4A0F72583274A4BBE30515DB9DCCC406DBD8BF2B285C7FE0373A1F0D5FC399F6F5DFEC5F6431B565C38BE5DD1C94463DD038BDDEB1E9B6BAC753DBE71A999F637730E6B2D831C0226DD7DBFE2D5FA5A41F7B8CA1767AEED5572F432DEF32CD44A37A634C0B63EF1962E32CE6E6F62C8A58D41CFAC8E4483CF530359F957CDC5650D250BD31D2B9F1DDDB8DC556BE582F3BB972A18EC5902D1DBBD047268CF52C821603B24B34F8FCE37B3F5CE6E5D76F1CEF19DF7FD2DF542631C0C93B2DD4F17E4B919C0D3ED7725BFB5548E8EB9B82AAAE8D1196498E9DAD4900BAB5EC9120D354A031FB90B4463EEDCB95B6629287CF967E7E2C55125EB8CFD90EFAC9421DBB5C19C03BBBE3C7B9729E81F56FCECB4D57E955BDE160702C2EF18C5A67A9966C37DCF2372DD8F1424D9EC888FBBAC181367B13636F6D2EA98F198AF7A13737165B42C453E67CA5E992A668699AF8D8ABAB2213DEFA125DEEDE2E1D8577627F2521CF450AF2E1F40CF9EA5A038D3B9A8C90C9B156FBAF56AC371C8122C48EC5EC82A477D65F367F627A263BDCCF2F282AF5621C3ACEAE1BE46C82C571D5886837A46AAEDD694C46BEB13622DD6C6C54D2456EE8FB358131B6FA9949476730B3C17AA515D1D72859303DDD35A70770F37CF499D897A7A891775694D5CC4C5956F22CD56BE29703F4B59F8E9DC8380B215E40FCF457E90D39C4463154BDC09C812D931E08CE6AD6A86B9E3EB23CC911541C628D4B3D36884EFF1F262EFC325F91EFBF3B39C7665A7D96D4B4DBCBE21118C7B7CF20DD5EC1C078D72B8AB7663B1BB0EADCC43875BEABA9B5F74675B4BBEAD0AB9F2E92976FAF58D8C346B459C2C481F9396C88BABC6FD11C05FF2D882B664C15C03D97A02F91E44E98FCCC5AB739A9F66197E7B89620859423C095942B058B29305F7A430336E55D193AE97E323CD9198E746A8B227C7D08827C7AA117EC709653E47E9A5DEFADC32AF83A2528F7D6D058EDB9830DBF554988D0A29CF46899877539108BBB99608B35EDB54E17B94957E631353EE47F89AB2803F5EEE47F859D2577C3ECF68D22FCF0E9025BF672EB2EF5BFC2BEBCC1A73995F169AF52A6D76A127859D79BB9A91628DA2BEB52C6A7A7B4D800D3793563E37EC41781F1096B86B720A9DD55A0AA09BE9F9B737D1F2ED3736C3ECD653736D54C8B09B4AC489288EFB314F0E33336DB6B2E47E94AF89CC9F30E50FB84A5DBDF053935FF8E591ED38E7FD961FEE7B7D71F1D995268CD390AFA8A7204B9AED14F5387077323B0BF8536FA29AE3ADCAF06F2C07F12F8DDAB081C7F8153EBA7CC4FDBDBCA2BBEAEC02872D0C991F26F3DB4EF873E57EEB713F11F558AF25DB6EC7941FFDD4941D69B63A69CAFFDC8AB46EF1028B5FF16B4CD6DA65BF3617D91E66CBD126DF9D16184316CBC277D97C8A57E84EE4E538D4B0D26C518CA4EB6842CC9501FC2B636143F0097EADBF1E0BE3ADC32C71FD9E05771CF7D365FE5C30FE39137ED2CFFC8F745B72ECD539537E7F63993F45EE473EBF42D8BCF4B31BBFE19747F69560C1FFF2BB9BADA93AFF9D81DCDFE6B9D3845FE8DEC4CF75AC65A7DBA1992937AB083196038DE167450D2F4E0A6A9FEAB3AB1F1F60601EEC6E2E75DE462D808E8F3F4DEECF9936FEB937D612910FF73372A19ABC346BA589F513709605FC69727F79A055E3F6AFFF65F73BFCB2EC04F91664B6DC9FE57A7E7DA3F9B707C5E7208B5BCF02BF8FD66541917B233FCFA98E93710BCD4CB3A96B7A63D94F787D4E840B311460030E73AA7D0E302ABCF634A35CD54808A72D4DF0DBAA64D8849F92FB0B3FC25D939EE7B4972FF7A3038C9951666BD23E8EBF79C3AEEF163AFD4EBF2CEA93E7C55C99BFF4A9F566CAE515FB24E7218B65E97ABADFBAB5C88D20C873AEE366D963D899B71A8831967DA408135163E82941FDB3239C5ADF838CCA877B9BD16E3B494897AD04C49D4DF812E8463CA8974DB936CA44D931E44EFACBDC77D10B5CB404723FE6F95966D485B55953FEC08B757B572CBA37AD7EEE9CAC3FB2EB81EAA47535C8F2C9EBC367D3EB2B2614AA46B35AA921F7F7BC30B8D556E44E68CD77C1F2B26F63D859F60452ACE53B72D47931E1E5E9D686E706DC5A5FDD964AEF7D34B4BB3AB91CF891C08F74546D28836EA82DB257A9CFB35126C8C7BFD44D8306BFA7D32AF3A783609E193162CC15B3632C5645C45AAC0AC784985768AD5C643FB9375D36B9B7FB6CB2EECCFEBF6A6879A0AD3ACB6AC5F629FFCB130EC262F7A6B602977AE0AFE464434964993FFA829810662468083CC6A9F3D36DA97AA445C3787C4F46DDDDDA8874DA8443DE51AD2F73D8505BE6B0AEA6E4B64A2DDC56A921CF5AB1B1CC559D52EC76809F65A3549B63AB545313789A9A757D5D02CC56D1AFC04EF1093EF272D19D5DAB2ECD74EF83F0BFBE5B7CE5AB4DE376539030C37BC2620FA2107EB7819F03ADE2E63A52287157A4943766E2A657675AF1C1C7B958FF432D358FB569184F0D32EADEB646A4F3661CC269537D99E386DA52E8BA9A52A84A4DE96DE5EA127BE51A8C873A0E795F975D705B055D60AF82AA0F3D4384DB6E8829BEADF4A8D85EE91121DA02F6F6D456EB99FA2B436F6B4B6F7EB371EC1264519F19E4CB9E9727DD45251E2421FC1E8E9FEB50CDCB75A451DF027FCCC57662B8711B3EF8040FFB548F59EBA343ABB8BF8B8C76DD4E40BA6C91F91BCA1C37D64DF783545578AAD7973F38C4017E942CF5A1464D05B61BE3E4FEA6D7E773E2CF6CB79FA9BFEAA5E3C1616C76DA0FB64B56FE600159341065E4212EF5240A8B5CF10298630D0F768701AE61526AAC793BE9F5D9B6C69093BC8667475875BEFB69550F34817F475339F08335D48000FE32E02F83AA8CDB65C1C8FC5E7AE37EB8CCFFC2B0096EBBF1EDD4F8BF36CD493CAB069DB13FD4516FB8FF5DD70F5D3CDC0FCF8FEA0D265CF46E47781245256E8D6DF94EB5A00E31E989D7A4B4B84B1DE4887342C24B433E2ED08085F53B40AFF6D22463DCD4647EFCB8FF0EF03BAC97F9ABA6FC1E3BEB510FF5B870B93FE414116EA71A2FF737BE3E979564AAEE3C537FCD2B67DD91813EF18F1FC6C43F8E8DF047DB70D4AEAAE73471A97BA3B0C0B95690EFCC6224DD007E8B0E72A409F09FE2E3828EB2B1FE0719350F77532ADC774EF89D3703FF865A84E3845F7E0C6877352C0AECF5A6FCA132FFA68429FF2BA30CE0BF37537F4384CBE1D1FEDED61FDF8FCAC2FD30D22F19EB130FF77330ED9D95C1A4D602170E33C5BA97FEF6722725CA54440C3B2DC0071D63D73FD565D43CDA4BA9F0D8D98472D98A2F077EE4BFF163DC7760D1D3FCD8504362E1AD8F7E7CD8A9F4241375D799FAB1E14EFAA3FD528ECC0EC2FC30D2D735D6D73E3CFA4E3C342A150E0C8A29C39DF8B4217E918F849E70AD9D146E2C00358853FFF410A3F6F13E6AA5873A11D4D049FFC63A50476BD16EEA75D8C0334DD4543786B02649847E74E4A33FE46413F027CAFDB89727D3522F6A7ACCD4DF18714777ACAF8701EC2C10DA8791771D6352E1D0686FEBE0A884DF3FDCCD19196CA7BF1F10358FF6B712477A5B2A073A1A73A46D15315DBC9210312BDFBF9599E72760C103053C6464ABB0365DD44E8077B437C2DBC5B83C713B3EA703ED7DF8A3FFC5F1A642FBCD53FE86D0E3A91997F7DE9FA91F17765B7FEC5D171DD85BC0FAA77C18EA6D1FED150C8DF670FB47BAD9EF863A19C30342F2587F2B61B48F871B9672B043BDCCEA0109A3A2AFBB1925ED2297493A88C5DDC0DC29C6E775881B72C4426CA6081C87B0AD3AA54D549B2CFA993FF8E8CFFCF52F8EA66459693F98F1F8BF763C00FC54E0A7033FE9C39044342AE10D8EF4B0FB863B19BD8322F2503F1F37D6C7AD1B91B2AA877A5B30033DB4F2FE6E4AE9BB4E62A1A41D0FEB16D5677708EBD2C5C02B6AAD4C6C1360DEB6F25131603EA278AD98E856D4C369E76FA001B168BA3FD82039EB9A8ED78CFD2F6D0F8DF6B6D3646BE7C7B1E1A6F783DDC251097760A49BD937DCDE2C196C6B1CEAE3548F4A9915C3123A72B0875AD2DF4584BFEB6884F58A1B32BB85B5291DAD950962013A46C82F8F6AE596BDE6734A5E72D9452F38604DB1B9A5217C94973E67CA1F6440FCD9F8071D49CEBEBE7FC67EC26BE8FED1DE8EE9FEB6D11ECEC048574BDF9098221910E006A54CF48884563AD44D860F7435C1FA3A709952715D4A8FB02ABE53808E16F310E16D9C925001BB3088C7CA0FE0B4C0FC588C9CC72DF44C2F06ABC08F53FE40EFA3FFC57152E1AD69FE40FDE4EC6B7FC21F0E3D382A696F99583F53FEC1914E06F0937B06F8F583D216E4480FB960A8AB31ABBFBD3EE59DA8265ED256F1A64B501EDECE2D792164C19FF15B729F7019D9DE6C5AC67D6673AA1B9D9AE442A324383633323D99C8FB7AEC8FF5DF9034BD7E3604E9A7645DD59EB19FF8C6556744D2CE067E0658FFC489F503FC5D323F4932C0C70E4A1965233D24D86047434A9FA83A46DA868EE8E123423BB845CF45ACBC27AD8CAC075C5AAA2B8B9AE4C4A0BC85D24831B6D4A6686B3221E22AA939D98981F0D065CAFD0D2FCF900BA75DBF1A828FA4665ED17A3073BF3BF07708C6EB27A83FC00FCE5FEEA06CFD0C8BC9137EBACC9F3BD4814DEC135644F4F2CB82BAB870BF7656EEC33646BA2B8F9AE4C826C7D93288D1D79B09AFAF90F161E644902652AC2D950D0F101742D5C853FE572614B07F98DAFFE0428EA56558CCBC7E5252FCF68DF4760A7F00D7AF1FC64668EF8724A07EF287C0F9DB3FDC4EE91D1080F5C3404CF9DB30E1BDBC22FF2E76DE43311BE62DE4C0FD45DCE22031A730B003ACFBAEE68C871DE464573121D6BEB526F01CB3D8F97BF0FD721D4AEEC7859B51E1D3F69FF89786E9697FE2FA45CB0CDE3DDCDBD501FC02E06F793FD4DB39266D1D1E3F873B19EFC03930DCCFC3BE9734978E89B1E9230254F410BB28B89F9EF3484A4EBCD3591F6A26C03CD66394B969104AEF6EAF2B71D95255ECA45A51E4B8015DE8B01E258BDC5F08828FB46A01FBFFE88FFB1FE3CCD40BBBDC66BC7EDE3E54EEE5D13B47A41D12298FDAD94142493A09F983EDD8642918EB765E89BF9491E53248CF80F6D2526D3AA949D744C4D84B7CFCEB73ECFA9093F4EA007D32E6B13601E9A9515F7A6F7BCD847F5345F11D5534C27377554D90311EFFE6069594E8C8262638F16B832E538BED957D3FEE3FCF67279B7EEFF267FEFF9C66B66B73D259B5F5D1FACA0BE8059E5E3DB85066774330BDA3268028AAF06BE316B9F5B1F39D248CCC5B9DCDC9D781DF4230EE0F3366E0A32C5A4849F66C6AA63BBF39DB4B40CDF4E252D3BD6894548FC6C6281B74B5DFC95CA4AB665C315435A818BACEA718AAFC68DC2EDFFF479AC392CEED74FCAB6E6474352738F5E065FE17F4CEBA2072477DA8585C1732D88E8B1810E3A2FBDBEA222582CA57622E2A84C32AF6A750D39C6B70AFCD0BAB9F1A2463BCB55EA33CD40391F7B60594396DF22D71DCF0B8C4613DC8BA47C55095C9288FF788BBDB022A7C0E859393EED1E34F6D39F157F9454D716A12666675373D23A787991BD4CDC881330B3C18B48CDB0DE478AB7262CC453821E25C2E0EECDB1B424E2661038FC6D504E845573DD109AFF0DE1B3AE97F5A76779B3FDA4B3BB4EEC5B984A638DB7C72B2730531E16E1D3EE61E8210773FA331C63318FBCAD921CFCEE0509CE1A6FFD87DBD6E5A26941C7F154B49BC8A26BDBD5C3AEE8F3481C9BE3711A2CC32490937F29B339DCBE8B99E15CD39DED5D42C1F0425F369262D2F2CB229C9FF7ED5F35BE6854EC65A6997B4562418ABFDD7EFA3F63032CFF3917E2D6DB5418CB6DAD0167EE5CB465E457819171319CF4246F8308AC3AEE3E23CF511DE16CAB05BC73E4F32D1F83BDC239D6AF4E2E7B3251C9866739EFF26A48FC522D8EDA37FEB7BD1FFB47FDA1F693FFD6AFBA033D17B2D1CEFA49079E3CF42200AE3CF4EBE57D6EB4CF6AB412FFB9BF326FBD9933D44DE3F98EC574FF60B27FBD993BDC22F1E4FBE5EE7A7BF5F2F3F6EE92FFA9FC68F4AD6CF9B18BE793FFD66FB1FC17B3710] Position=1 link(onCreate,7696632:doEvent1,[]) } Add(InlineCode,4306030,161,119) { @Hint=#10:Aero Tweak| WorkPoints=#148:doGetParametrs=ARG(MainColor, AlphaMainColor, GlowColor, AlphaGlowColor, ColorBalance, AfterGlowColorBalance, BlurBalance, AeroStripes, Transparent)|148:doSetParametrs=ARG(MainColor, AlphaMainColor, GlowColor, AlphaGlowColor, ColorBalance, AfterGlowColorBalance, BlurBalance, AeroStripes, Transparent)|24:doAero=ARG(AeroParametr)| EventPoints=#14:onGetParametrs| VarPoints=#6:IsAero| DataPoints=#8:AutoSave| Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses Windows,kol,Share,Debug;|0:|4:type|27: TDWM_COLORPARAMS = record|69: ColorizationColor : Cardinal; // Активный цвет|88: ColorizationAfterglow : Cardinal; // Неактивный цвет (после размытия)|84: ColorizationColorBalance : Cardinal; // Насыщенность активного цвета|86: ColorizationAfterglowBalance : Cardinal; // Насыщенность неактивного цвета|72: ColorizationBlurBalance : Cardinal; // Уровень размытия|80: ColorizationGlassReflectionIntensity : Cardinal; // Количество линий на фоне|68: ColorizationOpaqueBlend : Cardinal; // Прозрачность|6: end;|39: IDWM_COLORPARAMS = ^TDWM_COLORPARAMS;|4:type|91: TDwmpGetColorizationParameters = function(dcpParams: IDWM_COLORPARAMS): HRESULT; stdcall;|112: TDwmpSetColorizationParameters = function(dcpParams: IDWM_COLORPARAMS; someBool: boolean): HRESULT; stdcall; |82: TDwmIsCompositionEnabled = function(var bool : boolean): HRESULT; stdcall;|92: TDwmEnableComposition = function(uCompositionAction : Dword): HRESULT; stdcall; |4:type|28: THiAsmClass = class(TDebug)|10: private|23: Hdwmapi : THandle;|29: ValidOSVersion: boolean;|49: function IsCompositionEnabled: boolean; |9: public|31: onGetParametrs: THI_Event;|25: AutoSave: THI_Event;|24: constructor Create;|59: procedure doGetParametrs(var _Data:TData; Index:word);|64: procedure doSetParametrs(var _Data:TData; Index:word); |56: procedure doAero(var _Data:TData; Index:word); |51: procedure IsAero(var _Data:TData; Index:word);|5: end;|0:|14:implementation|0:|42:function THiAsmClass.IsCompositionEnabled;|3:var|53: DwmIsCompositionEnabled : TDwmIsCompositionEnabled;|5:begin|18: Result := false;|34: if not ValidOSVersion then exit;|39: Hdwmapi := LoadLibrary('dwmapi.dll');|27: if Hdwmapi = 0 then exit;|83: @DwmIsCompositionEnabled := GetProcAddress(Hdwmapi, 'DwmIsCompositionEnabled'); |34: DwmIsCompositionEnabled(Result);|27: FreeLibrary(Hdwmapi); |4:end;|0:|31:constructor THiAsmClass.Create;|3:var|27: osVInfo : TOSVersionInfo;|5:begin|12: inherited;|40: ZeroMemory(@osVinfo, SizeOf(osVinfo));|56: OsVinfo.dwOSVersionInfoSize := SizeOf(TOSVersionInfo);|126: ValidOSVersion := GetVersionEx(osVInfo) and (osVinfo.dwPlatformId = VER_PLATFORM_WIN32_NT) and (osVinfo.dwMajorVersion >= 6)|4:end;|0:|29:procedure THiAsmClass.IsAero;|5:begin|50: dtInteger(_Data, integer(IsCompositionEnabled));|4:end;|0:|29:procedure THiAsmClass.doAero;|3:var|47: DwmEnableComposition : TDwmEnableComposition;|5:begin|34: if not ValidOSVersion then exit;|39: Hdwmapi := LoadLibrary('dwmapi.dll');|27: if Hdwmapi = 0 then exit;|75: @DwmEnableComposition := GetProcAddress(Hdwmapi, 'DwmEnableComposition');|41: DwmEnableComposition(ToInteger(_Data));|26: FreeLibrary(Hdwmapi); |4:end;|0:|37:procedure THiAsmClass.doGetParametrs;|3:var|65: DwmpGetColorizationParameters : TDwmpGetColorizationParameters;|29: IColors : IDWM_COLORPARAMS;|67: dacc, dcc, daca, dca, dccb, dcab, dcbb, dcgri, dcob : TData; |5:begin|34: if not ValidOSVersion then exit;|39: Hdwmapi := LoadLibrary('dwmapi.dll');|27: if Hdwmapi = 0 then exit;|131: @DwmpGetColorizationParameters := GetProcAddress(Hdwmapi, MAKEINTRESOURCE(127)); // вызов недокументированной функции по ординалу|15: new(IColors);|41: DwmpGetColorizationParameters(IColors);|0:|82: dtInteger(dcc, integer(Color2RGBQuad(IColors.ColorizationColor and $00FFFFFF)));|68: dtInteger(dacc, (IColors.ColorizationColor and $FF000000) shr 24);|86: dtInteger(dca, integer(Color2RGBQuad(IColors.ColorizationAfterglow and $00FFFFFF)));|72: dtInteger(daca, (IColors.ColorizationAfterglow and $FF000000) shr 24);|52: dtInteger(dccb, IColors.ColorizationColorBalance);|60: dtInteger(dcab, IColors.ColorizationAfterglowBalance); |51: dtInteger(dcbb, IColors.ColorizationBlurBalance);|65: dtInteger(dcgri, IColors.ColorizationGlassReflectionIntensity);|61: dtInteger(dcob, IColors.ColorizationOpaqueBlend xor 1); |0:|21: dcc.ldata := @dacc;|21: dacc.ldata := @dca;|21: dca.ldata := @daca;|22: daca.ldata := @dccb;|28: dccb.ldata := @dcab; |22: dcab.ldata := @dcbb;|23: dcbb.ldata := @dcgri;|27: dcgri.ldata := @dcob; |0:|36: _hi_onEvent_(onGetParametrs, dcc);|19: dispose(IColors);|23: FreeLibrary(Hdwmapi);|4:end;|0:|37:procedure THiAsmClass.doSetParametrs;|3:var|65: DwmpSetColorizationParameters : TDwmpSetColorizationParameters;|29: IColors : IDWM_COLORPARAMS;|58: cc, acc, ca, aca, ccb, cab, cbb, cgri, cob : Cardinal; |5:begin|0:|34: if not ValidOSVersion then exit;|39: Hdwmapi := LoadLibrary('dwmapi.dll');|27: if Hdwmapi = 0 then exit;|131: @DwmpSetColorizationParameters := GetProcAddress(Hdwmapi, MAKEINTRESOURCE(131)); // вызов недокументированной функции по ординалу|15: new(IColors);|0:|35: cc := ReadInteger(_Data, Null);|35: acc := ReadInteger(_Data, Null);|35: ca := ReadInteger(_Data, Null);|35: aca := ReadInteger(_Data, Null);|0:|135: IColors.ColorizationColor := ((cc shr 16) and $FF) or ((cc shl 16) and $FF0000) or (cc and $FF00) or (acc shl 24);|135: IColors.ColorizationAfterglow := ((ca shr 16) and $FF) or ((ca shl 16) and $FF0000) or (ca and $FF00) or (aca shl 24);|75: IColors.ColorizationColorBalance := ReadInteger(_Data, Null);|75: IColors.ColorizationAfterglowBalance := ReadInteger(_Data, Null);|75: IColors.ColorizationBlurBalance := ReadInteger(_Data, Null);|75: IColors.ColorizationGlassReflectionIntensity := ReadInteger(_Data, Null);|81: IColors.ColorizationOpaqueBlend := ReadInteger(_Data, Null) xor 1;|0:|82: DwmpSetColorizationParameters(IColors, boolean(ToIntegerEvent(AutoSave) xor 1));|2: |19: dispose(IColors);|23: FreeLibrary(Hdwmapi);|4:end;|2: |4:end.| link(onGetParametrs,5644652:doValue,[]) link(AutoSave,15078:Checked,[]) } Add(AlphaImage,16417586,483,126) { Left=15 Top=30 Width=128 Height=128 Name="ailphaimage_1" Point(doAlphaBlendValue) link(onClick,12717846:doOpen,[]) link(AlphaBitmap,8411215:Result,[]) } Add(AlphaBitmap,822696,434,84) { HWidth=64 HHeight=64 Point(doCreate) Point(FillColor) Point(onCreate) link(onCreate,8411215:doShadow,[]) } Add(AlphaShadow,8411215,483,84) { TransparentColor=65793 DeepBlur=0 Point(Result) } Add(MT_MultiData,14671227,287,119) { Count=9 link(onData1,9868519:doEvent1,[(350,125)(350,104)]) link(onData2,7059270:doValue,[]) link(onData3,204996:doEvent1,[(355,139)(355,223)]) link(onData4,8284142:doValue,[(350,146)(350,251)]) link(onData5,8963933:doPosition,[(345,153)(345,293)]) link(onData6,13667991:doPosition,[(340,160)(340,335)]) link(onData7,2557018:doPosition,[(335,167)(335,377)]) link(onData8,5039298:doPosition,[(330,174)(330,419)]) link(onData9,13736940:doCheck,[]) } Add(AlphaImage,5588786,483,245) { Left=165 Top=30 Width=128 Height=128 Name="ailphaimage_1" Point(doAlphaBlendValue) link(onClick,1985270:doOpen,[]) link(AlphaBitmap,7533053:Result,[]) } Add(AlphaBitmap,12492323,441,203) { HWidth=64 HHeight=64 Point(doCreate) Point(FillColor) Point(onCreate) link(onCreate,7533053:doShadow,[]) } Add(AlphaShadow,7533053,483,203) { TransparentColor=65793 DeepBlur=0 Point(Result) } Add(CheckBox,13736940,693,175) { Left=310 Top=50 Width=98 Font=[Arial,9,1,0,204] TabOrder=-1 Caption="Transparent" link(onCheck,16207617:doWork2,[]) } Add(ColorDialog,12717846,539,126) { link(onSelect,16368392:doEvent1,[]) link(Color,5644652:Value1,[(545,77)(280,77)(280,159)(244,159)]) } Add(ColorDialog,1985270,539,245) { link(onSelect,3540012:doEvent1,[]) link(Color,5644652:Value3,[(545,197)(258,197)]) } Add(TrackBar,8963933,665,287) { Left=10 Top=185 Width=200 TabOrder=-1 Hint="0" Max=100 TickCount=10 TickMarks=2 Point(doHint) link(onPosition,3064016:doEvent1,[]) } Add(Label,6471701,126,252) { Left=10 Top=170 Width=200 Height=17 Font=[Arial,9,1,0,204] Caption="Color Balance" AutoSize=1 Alignment=2 } Add(CheckBox,10821933,161,175) { Left=310 Top=30 Width=63 Font=[Arial,9,1,0,204] TabOrder=-1 Caption="Aero" link(onCheck,1866586:doEvent1,[]) } Add(Label,4862305,119,245) { Left=215 Top=170 Width=200 Height=19 Font=[Arial,9,1,0,204] Caption="After Glow Color Balance" AutoSize=1 Alignment=2 } Add(TrackBar,13667991,672,329) { Left=215 Top=185 Width=200 TabOrder=-1 Hint="0" Max=100 TickCount=10 TickMarks=2 Point(doHint) link(onPosition,16503781:doEvent1,[]) } Add(Label,7936252,112,238) { Left=15 Top=10 Width=128 Height=19 Font=[Arial,9,1,0,204] Caption="Main Color" AutoSize=1 Alignment=2 } Add(Label,11129971,105,231) { Left=165 Top=10 Width=128 Height=19 Font=[Arial,9,1,0,204] Caption="Glow Color" AutoSize=1 Alignment=2 } Add(TrackBar,2557018,679,371) { Left=10 Top=240 Width=200 TabOrder=-1 Hint="0" Max=100 TickCount=10 TickMarks=2 Point(doHint) link(onPosition,2546468:doEvent1,[]) } Add(TrackBar,5039298,686,413) { Left=215 Top=240 Width=200 TabOrder=-1 Hint="0" Max=100 TickCount=10 TickMarks=2 Point(doHint) link(onPosition,16225921:doEvent1,[]) } Add(MT_MultiMem,5644652,238,119) { Count=4 link(onData,14671227:doSeparateMT,[]) } Add(Hub,11001292,441,126) { link(onEvent1,16417586:doLoad,[]) link(onEvent2,16417586:doAlphaBlendValue,[(469,139)(469,146)]) } Add(Hub,8691425,441,245) { link(onEvent1,5588786:doLoad,[]) link(onEvent2,5588786:doAlphaBlendValue,[(469,258)(469,265)]) } Add(DoData,2114673,105,175) { link(onEventData,10821933:doCheck,[]) link(Data,4306030:IsAero,[(111,163)(167,163)]) } Add(Hub,7696632,63,119) { link(onEvent1,7640791:doWork2,[]) link(onEvent2,2114673:doData,[(92,132)(92,181)]) } Add(Memory,9920367,637,105) { } Add(Hub,9868519,378,98) { link(onEvent1,822696:doCreate,[]) link(onEvent2,4605559:doWork2,[]) } Add(MT_AddData,629498,637,469) { Count=9 link(onAdd,4382119:doEvent1,[(777,475)(777,64)(100,64)(100,132)]) link(Data1,9920367:Value,[]) link(Data2,7059270:Value,[(650,410)(384,410)]) link(Data3,12499048:Value,[]) link(Data4,8284142:Value,[(664,405)(391,405)]) link(Data5,8963933:Position,[]) link(Data6,13667991:Position,[]) link(Data7,2557018:Position,[]) link(Data8,5039298:Position,[]) link(Data9,13736940:Checked,[]) } Add(Memory,12499048,651,224) { } Add(Hub,204996,378,217) { link(onEvent1,12492323:doCreate,[]) link(onEvent2,14864592:doWork2,[]) } Add(Hub,3064016,735,287) { link(onEvent1,8963933:doHint,[(760,293)(760,280)(653,280)(653,307)]) link(onEvent2,1677225:doWork2,[]) } Add(Hub,16503781,735,329) { link(onEvent1,13667991:doHint,[(760,335)(760,323)(660,323)(660,349)]) link(onEvent2,13804923:doWork2,[]) } Add(Hub,2546468,735,371) { link(onEvent1,2557018:doHint,[(760,377)(760,365)(667,365)(667,391)]) link(onEvent2,8744903:doWork2,[]) } Add(Hub,16225921,735,413) { link(onEvent1,5039298:doHint,[(760,419)(760,408)(674,408)(674,433)]) link(onEvent2,12438857:doWork2,[]) } Add(Hub,16368392,588,126) { OutCount=3 link(onEvent1,4605559:doWork3,[(613,132)]) link(onEvent2,16207617:doWork1,[(767,139)]) link(onEvent3,7059270:doClear,[(614,146)(614,165)(365,165)(365,139)]) } Add(Hub,3540012,588,245) { OutCount=3 link(onEvent1,14864592:doWork3,[(613,251)]) link(onEvent2,8292921:doWork2,[]) link(onEvent3,8284142:doClear,[(614,265)(614,285)(372,285)(372,258)]) } Add(HubEx,4605559,609,105) { link(onEvent,9920367:doValue,[]) } Add(HubEx,14864592,609,224) { link(onEvent,12499048:doValue,[]) } Add(HubEx,16207617,763,175) { Angle=1 link(onEvent,8292921:doWork1,[]) } Add(HubEx,8292921,763,252) { Angle=1 link(onEvent,1677225:doWork1,[]) } Add(HubEx,1677225,763,294) { Angle=1 link(onEvent,13804923:doWork1,[]) } Add(HubEx,13804923,763,336) { Angle=1 link(onEvent,8744903:doWork1,[]) } Add(HubEx,8744903,763,378) { Angle=1 link(onEvent,12438857:doWork1,[]) } Add(HubEx,12438857,763,420) { Angle=1 link(onEvent,14740513:doTimer,[(767,452)(569,452)(569,475)]) } Add(Hub,4382119,112,126) { link(onEvent1,4306030:doSetParametrs,[]) link(onEvent2,5371057:doWork2,[]) } Add(HubEx,7640791,133,119) { link(onEvent,4306030:doGetParametrs,[]) } Add(Timer,14740513,588,469) { Interval=50 Enable=1 AutoStop=1 link(onTimer,629498:doAdd,[]) } Add(Hub,1866586,203,175) { link(onEvent1,5371057:doWork3,[(228,181)(228,161)(137,161)]) link(onEvent2,4306030:doAero,[(228,188)(228,215)(149,215)(149,139)]) } Add(HubEx,5371057,133,133) { Angle=3 link(onEvent,7640791:doWork3,[]) } Add(Memory,7059270,378,126) { Default=Integer(255) link(onData,11001292:doEvent1,[]) } Add(Memory,8284142,385,245) { Default=Integer(255) link(onData,8691425:doEvent1,[]) } Add(CheckBox,15078,161,70) { Left=310 Top=70 Width=98 Font=[Arial,9,1,0,204] TabOrder=-1 Caption="AutoSave" }