Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- It is CODEX installer de-compiled script:
- I think this will help to make ::
- {
- Created with Inno Setup Decompiler (1.3.0.0)
- [url]http://vdisasm.com/isd/[/url]
- }
- type
- TPOINT = record
- field_0: Integer;
- field_1: Integer;
- end;
- Record39 = record
- field_0: Integer;
- field_1: Integer;
- field_2: Integer;
- field_3: Integer;
- end;
- Record50 = record
- field_0: Integer;
- field_1: Cardinal;
- field_2: PChar;
- field_3: PChar;
- field_4: Word;
- field_5: Cardinal;
- field_6: Integer;
- field_7: PChar;
- end;
- TWINDOWSVERSION = record
- field_0: Cardinal;
- field_1: Cardinal;
- field_2: Cardinal;
- field_3: Cardinal;
- field_4: Cardinal;
- field_5: BOOLEAN;
- field_6: Byte;
- field_7: Word;
- end;
- TFILETIME = record
- field_0: Cardinal;
- field_1: Cardinal;
- end;
- TFINDREC = record
- field_0: UnicodeString;
- field_1: Cardinal;
- field_2: Cardinal;
- field_3: Cardinal;
- field_4: TFILETIME;
- field_5: TFILETIME;
- field_6: TFILETIME;
- field_7: UnicodeString;
- field_8: Integer;
- end;
- var
- gvar_0: TFOLDERTREEVIEW;
- gvar_1: TNEWEDIT;
- gvar_2, gvar_3, gvar_4, gvar_5, gvar_6: TLABEL;
- gvar_7, gvar_8, gvar_9, gvar_10, gvar_11, gvar_12, gvar_13: TBEVEL;
- gvar_14: TCHECKBOX;
- gvar_15: TNEWCOMBOBOX;
- gvar_16, gvar_17: String;
- gvar_18, gvar_19, gvar_52, gvar_58: Cardinal;
- gvar_20: TNEWMEMO;
- gvar_21, gvar_22, gvar_23, gvar_24, gvar_25, gvar_26, gvar_27, gvar_53, gvar_54: Integer;
- gvar_28, gvar_29, gvar_30, gvar_31, gvar_32, gvar_33, gvar_34, gvar_35, gvar_36, gvar_37, gvar_38: BOOLEAN;
- gvar_39: Double;
- gvar_40, gvar_41, gvar_42, gvar_43, gvar_44, gvar_45, gvar_46: TBUTTON;
- gvar_47, gvar_48, gvar_49, gvar_50: TBITMAPIMAGE;
- gvar_51: TMEMORYSTREAM;
- gvar_55: TPOINT;
- gvar_56: Single;
- gvar_57: Extended;
- gvar_59: Record39;
- gvar_60: array [1..7] of TNEWICON;
- gvar_61, gvar_62, gvar_63: TSETUPFORM;
- gvar_64, gvar_65: TNEWPROGRESSBAR;
- gvar_66: array of BOOLEAN;
- gvar_67: TNEWSTATICTEXT;
- procedure LoadFromStreamVCLStyleW(Arg0: ?) stdcall;
- external 'LoadFromStreamVCLStyleW@VclStylesInno.dll stdcall';
- procedure UnLoadVCLStyles() stdcall;
- external 'UnLoadVCLStyles@VclStylesInno.dll stdcall';
- procedure AddRichEdit(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?) stdcall;
- external 'AddRichEdit@VclStylesInno.dll stdcall';
- procedure AddLineRichEdit(Arg0: ?; Arg1: ?) stdcall;
- external 'AddLineRichEdit@VclStylesInno.dll stdcall';
- procedure FreeRichEdit() stdcall;
- external 'FreeRichEdit@VclStylesInno.dll stdcall';
- function GetLogicalDrives(): ? stdcall;
- external 'GetLogicalDrives@kernel32.dll stdcall';
- function GetDriveTypeA(Arg0: ?): ? stdcall;
- external 'GetDriveTypeA@kernel32.dll stdcall';
- function DeleteFileA(Arg0: ?): ? stdcall;
- external 'DeleteFileA@kernel32.dll stdcall';
- function AnimateWindow(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'AnimateWindow@user32 stdcall';
- function ISArcExtract(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?; Arg6: ?; Arg7: ?; Arg8: ?; Arg9: ?): ? stdcall;
- external 'ISArcExtract@ISDone.dll stdcall DelayLoad';
- function IS7zipExtract(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?): ? stdcall;
- external 'IS7zipExtract@ISDone.dll stdcall DelayLoad';
- function ISRarExtract(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?): ? stdcall;
- external 'ISRarExtract@ISDone.dll stdcall DelayLoad';
- function ISPrecompExtract(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?): ? stdcall;
- external 'ISPrecompExtract@ISDone.dll stdcall DelayLoad';
- function ISSrepExtract(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?): ? stdcall;
- external 'ISSrepExtract@ISDone.dll stdcall DelayLoad';
- function ISxDeltaExtract(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?; Arg6: ?; Arg7: ?; Arg8: ?): ? stdcall;
- external 'ISxDeltaExtract@ISDone.dll stdcall DelayLoad';
- function ISPackZIP(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?): ? stdcall;
- external 'ISPackZIP@ISDone.dll stdcall DelayLoad';
- function ShowChangeDiskWindow(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'ShowChangeDiskWindow@ISDone.dll stdcall DelayLoad';
- function Exec2(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'Exec2@ISDone.dll stdcall DelayLoad';
- function ISFindFiles(Arg0: ?; Arg1: ?; var Arg2: ?): ? stdcall;
- external 'ISFindFiles@ISDone.dll stdcall DelayLoad';
- function ISPickFilename(Arg0: ?; Arg1: ?; var Arg2: ?; Arg3: ?): ? stdcall;
- external 'ISPickFilename@ISDone.dll stdcall DelayLoad';
- function ISGetName(Arg0: ?): ? stdcall;
- external 'ISGetName@ISDone.dll stdcall DelayLoad';
- function ISFindFree(Arg0: ?): ? stdcall;
- external 'ISFindFree@ISDone.dll stdcall DelayLoad';
- function ISExec(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?; Arg6: ?; Arg7: ?): ? stdcall;
- external 'ISExec@ISDone.dll stdcall DelayLoad';
- function SrepInit(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'SrepInit@ISDone.dll stdcall DelayLoad';
- function PrecompInit(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'PrecompInit@ISDone.dll stdcall DelayLoad';
- function FileSearchInit(Arg0: ?): ? stdcall;
- external 'FileSearchInit@ISDone.dll stdcall DelayLoad';
- function ISDoneInit(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?; Arg6: ?; Arg7: ?): ? stdcall;
- external 'ISDoneInit@ISDone.dll stdcall';
- function ISDoneStop(): ? stdcall;
- external 'ISDoneStop@ISDone.dll stdcall';
- function ChangeLanguage(Arg0: ?): ? stdcall;
- external 'ChangeLanguage@ISDone.dll stdcall DelayLoad';
- function SuspendProc(): ? stdcall;
- external 'SuspendProc@ISDone.dll stdcall';
- function ResumeProc(): ? stdcall;
- external 'ResumeProc@ISDone.dll stdcall';
- function BASS_Init(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?): ? stdcall;
- external 'BASS_Init@BASS.dll stdcall';
- function BASS_Free(): ? stdcall;
- external 'BASS_Free@BASS.dll stdcall';
- function BASS_StreamCreateFile(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?): ? stdcall;
- external 'BASS_StreamCreateFile@bp.dll stdcall';
- function BASS_Start(): ? stdcall;
- external 'BASS_Start@BASS.dll stdcall';
- function BASS_Stop(): ? stdcall;
- external 'BASS_Stop@BASS.dll stdcall';
- function BASS_Pause(): ? stdcall;
- external 'BASS_Pause@BASS.dll stdcall';
- function BASS_SetVolume(Arg0: ?): ? stdcall;
- external 'BASS_SetVolume@BASS.dll stdcall';
- function BASS_ChannelPlay(Arg0: ?; Arg1: ?): ? stdcall;
- external 'BASS_ChannelPlay@BASS.dll stdcall';
- function BASS_ChannelPause(Arg0: ?): ? stdcall;
- external 'BASS_ChannelPause@BASS.dll stdcall';
- function BASS_ChannelIsActive(Arg0: ?): ? stdcall;
- external 'BASS_ChannelIsActive@{tmp}\BASS.dll stdcall DelayLoad';
- function BASS_ChannelSetAttribute(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'BASS_ChannelSetAttribute@{tmp}\BASS.dll stdcall DelayLoad';
- procedure SetTaskBarProgressValue(Arg0: ?; Arg1: ?) stdcall;
- external 'SetTaskBarProgressValue@{tmp}\WinTB.dll stdcall DelayLoad';
- procedure SetTaskBarProgressState(Arg0: ?; Arg1: ?) stdcall;
- external 'SetTaskBarProgressState@{tmp}\WinTB.dll stdcall DelayLoad';
- procedure SetTaskBarToolTip(Arg0: ?; Arg1: ?) stdcall;
- external 'SetTaskBarToolTip@{tmp}\WinTB.dll stdcall DelayLoad';
- function TaskBarAddButton(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?): ? stdcall;
- external 'TaskBarAddButton@{tmp}\WinTB.dll stdcall DelayLoad';
- procedure TaskBarUpdateButtons(Arg0: ?) stdcall;
- external 'TaskBarUpdateButtons@{tmp}\WinTB.dll stdcall DelayLoad';
- procedure TaskBarButtonEnabled(Arg0: ?; Arg1: ?) stdcall;
- external 'TaskBarButtonEnabled@{tmp}\WinTB.dll stdcall DelayLoad';
- procedure TaskBarButtonToolTip(Arg0: ?; Arg1: ?) stdcall;
- external 'TaskBarButtonToolTip@{tmp}\WinTB.dll stdcall DelayLoad';
- procedure TaskBarButtonIcon(Arg0: ?; Arg1: ?) stdcall;
- external 'TaskBarButtonIcon@{tmp}\WinTB.dll stdcall DelayLoad';
- procedure TaskBarV10(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?; Arg5: ?; Arg6: ?) stdcall;
- external 'TaskBarV10@{tmp}\WinTB.dll stdcall DelayLoad';
- function wrapcallback(Arg0: ?; Arg1: ?): ? stdcall;
- external 'wrapcallback@{tmp}\ISDone.dlll stdcall DelayLoad';
- procedure TaskBarDestroy() stdcall;
- external 'TaskBarDestroy@{tmp}\WinTB.dll stdcall DelayLoad';
- function ShowWindow(Arg0: ?; Arg1: ?): ? stdcall;
- external 'ShowWindow@user32.dll stdcall';
- function ScreenToClient(Arg0: ?; var Arg1: ?): ? stdcall;
- external 'ScreenToClient@user32.dll stdcall';
- function GetCursorPos(var Arg0: ?): ? stdcall;
- external 'GetCursorPos@user32.dll stdcall';
- function SetWindowLongA(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'SetWindowLongA@user32.dll stdcall';
- function wrapcallback(Arg0: ?; Arg1: ?): ? stdcall;
- external 'wrapcallback@ISDone.dll stdcall';
- function CallWindowProcA(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?; Arg4: ?): ? stdcall;
- external 'CallWindowProcA@user32.dll stdcall';
- function GetWindowLongA(Arg0: ?; Arg1: ?): ? stdcall;
- external 'GetWindowLongA@user32.dll stdcall';
- function SetLayeredWindowAttributes(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?): ? stdcall;
- external 'SetLayeredWindowAttributes@user32.dll stdcall';
- function SetTimer(Arg0: ?; Arg1: ?; Arg2: ?; Arg3: ?): ? stdcall;
- external 'SetTimer@user32.dll stdcall';
- function KillTimer(Arg0: ?; Arg1: ?): ? stdcall;
- external 'KillTimer@user32.dll stdcall';
- function wrapcallback(Arg0: ?; Arg1: ?): ? stdcall;
- external 'wrapcallback@ISDone.dll stdcall DelayLoad';
- function SystemParametersInfoW(Arg0: ?; Arg1: ?; var Arg2: ?; Arg3: ?): ? stdcall;
- external 'SystemParametersInfoW@user32.dll stdcall';
- function CreateMutexA(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'CreateMutexA@kernel32.dll stdcall';
- function CloseHandle(Arg0: ?): ? stdcall;
- external 'CloseHandle@kernel32.dll stdcall';
- function IsThemeActive(): ? stdcall;
- external 'IsThemeActive@UxTheme.dll stdcall DelayLoad';
- function SHFileOperation(Arg0: ?): ? stdcall;
- external 'SHFileOperation@shell32.dll stdcall';
- function CheckMD5(Arg0: ?; Arg1: ?; Arg2: ?): ? stdcall;
- external 'CheckMD5@ISMD5.dll stdcall';
- procedure !MAIN();
- begin
- label_15693:
- exit;
- end;
- procedure DELOLDFILES();
- begin
- label_15694:
- exit;
- end;
- function PROGRESSCALLBACK(Arg0: Integer; Arg1: Integer; Arg2: PChar; Arg3: PChar; Arg4: PChar; Arg5: PChar): Cardinal;
- var
- v_1: String;
- v_2, v_10: BOOLEAN;
- v_3, v_6, v_9, v_12, v_17, v_19, v_21, v_22: Integer;
- v_4, v_7: TNEWPROGRESSBAR;
- v_5, v_8: TWIZARDFORM;
- v_11, v_18, v_25: UnicodeString;
- v_13, v_15, v_26: TSTRINGS;
- v_14, v_16, v_20, v_24, v_27: TNEWMEMO;
- v_23: TFONT;
- begin
- label_15695:
- v_2 := Arg0 <= 1000;
- flag := not v_2;
- if flag then goto label_15797;
- label_15739:
- v_3 := Arg0;
- v_5 := WIZARDFORM();
- v_4 := v_5.PROGRESSGAUGE;
- v_4.POSITION := v_3;
- label_15797:
- v_8 := WIZARDFORM();
- v_7 := v_8.PROGRESSGAUGE;
- v_6 := v_7.POSITION;
- v_6 := v_6 / 10;
- v_9 := 0;
- SetTaskBarProgressValue(v_9, v_6);
- v_1 := Arg2;
- v_14 := gvar_20;
- v_13 := v_14.LINES;
- v_12 := v_13.COUNT;
- v_12 := v_12 - 1;
- v_16 := gvar_20;
- v_15 := v_16.LINES;
- v_11 := v_15.STRINGS[v_12];
- v_10 := v_11 <> v_1;
- flag := not v_10;
- if flag then goto label_16270;
- label_16061:
- v_20 := gvar_20;
- v_19 := v_20.WIDTH;
- v_22 := 50;
- v_21 := SCALEX(v_22);
- v_19 := v_19 - v_21;
- v_24 := gvar_20;
- v_23 := v_24.FONT;
- v_25 := Arg2;
- v_18 := MINIMIZEPATHNAME(v_25, v_23, v_19);
- v_27 := gvar_20;
- v_26 := v_27.LINES;
- v_17 := v_26.ADD(v_18);
- label_16270:
- result := gvar_21;
- exit;
- end;
- function CHECKERROR(): BOOLEAN;
- begin
- label_16282:
- result := gvar_28;
- result := not result;
- exit;
- end;
- function NOSD(): UnicodeString;
- var
- v_1, v_2, v_3, v_15, v_20, v_23, v_24, v_28: Integer;
- v_4, v_8: Cardinal;
- v_5, v_6, v_7, v_22, v_25: UnicodeString;
- v_9, v_10, v_11, v_16, v_17: BOOLEAN;
- v_12, v_13, v_26: String;
- v_14, v_18, v_19, v_27: Char;
- v_21: String;
- begin
- label_16300:
- v_6 := '{sd}';
- v_5 := EXPANDCONSTANT(v_6);
- v_7 := '{pf}\';
- result := EXPANDCONSTANT(v_7);
- v_8 := GetLogicalDrives();
- v_1 := v_8;
- v_9 := v_1 <> 0;
- flag := not v_9;
- if flag then goto label_17064;
- label_16468:
- v_3 := 1;
- label_16488:
- v_10 := v_3 <= 64;
- if not v_10 then goto label_17063;
- label_16519:
- v_2 := v_1;
- v_2 := v_2 and 1;
- v_11 := v_2 = 1;
- flag := not v_11;
- if flag then goto label_17036;
- label_16585:
- v_15 := 64;
- v_15 := v_15 + v_3;
- v_14 := v_15;
- v_13 := v_14;
- v_13 := v_13 + ':';
- v_12 := v_13;
- v_4 := GetDriveTypeA(v_12);
- v_16 := v_4 = 3;
- flag := not v_16;
- if flag then goto label_17036;
- label_16733:
- v_20 := 64;
- v_20 := v_20 + v_3;
- v_19 := v_20;
- v_18 := v_19;
- v_23 := 1;
- v_24 := 1;
- v_25 := v_5;
- v_22 := COPY(v_25, v_24, v_23);
- v_21 := v_22;
- v_17 := v_18 <> v_21;
- flag := not v_17;
- if flag then goto label_17036;
- label_16929:
- v_28 := 64;
- v_28 := v_28 + v_3;
- v_27 := v_28;
- v_26 := v_27;
- v_26 := v_26 + ':\Games\';
- result := v_26;
- goto label_17063;
- label_17036:
- v_1 := v_1 shr 1;
- inc(v_3);
- goto label_16488;
- label_17063:
- label_17064:
- exit;
- end;
- function ADDDRIVETOLIST(Arg0: TNEWCOMBOBOX): BOOLEAN;
- var
- v_1, v_2, v_3, v_12, v_14, v_18, v_22, v_30: Integer;
- v_4, v_5: Cardinal;
- v_6, v_7, v_8, v_13, v_21: BOOLEAN;
- v_9, v_10, v_16: String;
- v_11, v_17: Char;
- v_15, v_23, v_24, v_25, v_31, v_32, v_33: UnicodeString;
- v_19, v_28, v_36: TSTRINGS;
- v_20, v_29, v_37, v_38: TNEWCOMBOBOX;
- v_26, v_34: TEDIT;
- v_27, v_35: TWIZARDFORM;
- begin
- label_17065:
- v_5 := GetLogicalDrives();
- v_1 := v_5;
- v_6 := v_1 <> 0;
- flag := not v_6;
- if flag then goto label_17601;
- label_17153:
- v_3 := 1;
- label_17173:
- v_7 := v_3 <= 64;
- if not v_7 then goto label_17600;
- label_17204:
- v_2 := v_1;
- v_2 := v_2 and 1;
- v_8 := v_2 = 1;
- flag := not v_8;
- if flag then goto label_17573;
- label_17270:
- v_12 := 64;
- v_12 := v_12 + v_3;
- v_11 := v_12;
- v_10 := v_11;
- v_10 := v_10 + ':';
- v_9 := v_10;
- v_4 := GetDriveTypeA(v_9);
- v_13 := v_4 = 3;
- flag := not v_13;
- if flag then goto label_17573;
- label_17418:
- v_18 := 64;
- v_18 := v_18 + v_3;
- v_17 := v_18;
- v_16 := v_17;
- v_16 := v_16 + ':\';
- v_15 := v_16;
- v_20 := Arg0;
- v_19 := v_20.ITEMS;
- v_14 := v_19.ADD(v_15);
- label_17573:
- v_1 := v_1 shr 1;
- inc(v_3);
- goto label_17173;
- label_17600:
- label_17601:
- v_27 := WIZARDFORM();
- v_26 := v_27.DIREDIT;
- v_25 := v_26.TEXT;
- v_24 := EXTRACTFILEDRIVE(v_25);
- v_23 := ADDBACKSLASH(v_24);
- v_29 := Arg0;
- v_28 := v_29.ITEMS;
- v_22 := v_28.INDEXOF(v_23);
- v_21 := v_22 >= 0;
- flag := not v_21;
- if flag then goto label_17948;
- label_17783:
- v_35 := WIZARDFORM();
- v_34 := v_35.DIREDIT;
- v_33 := v_34.TEXT;
- v_32 := EXTRACTFILEDRIVE(v_33);
- v_31 := ADDBACKSLASH(v_32);
- v_37 := Arg0;
- v_36 := v_37.ITEMS;
- v_30 := v_36.INDEXOF(v_31);
- v_38 := Arg0;
- v_38.ITEMINDEX := v_30;
- label_17948:
- result := 1;
- exit;
- end;
- function _ISWIN8(): BOOLEAN;
- var
- v_1: TWINDOWSVERSION;
- v_2: Pointer;
- v_3, v_4, v_5, v_6, v_7: BOOLEAN;
- begin
- label_17961:
- v_2 := &v_1;
- GETWINDOWSVERSIONEX({var}v_2);
- v_5 := v_1.field_0 = 6;
- if not v_5 then goto label_18081;
- label_18038:
- v_6 := v_1.field_1 > 1;
- v_5 := v_5 and v_6;
- label_18081:
- v_4 := v_5;
- if v_4 then goto label_18146;
- label_18103:
- v_7 := v_1.field_0 > 6;
- v_4 := v_4 or v_7;
- label_18146:
- v_3 := v_4;
- flag := not v_3;
- if flag then goto label_18188;
- label_18171:
- result := 1;
- goto label_18200;
- label_18188:
- result := 0;
- label_18200:
- exit;
- end;
- function ISANSI(Arg0: UnicodeString): BOOLEAN;
- var
- v_1, v_2, v_3, v_4, v_7, v_8, v_9, v_10, v_13, v_14: UnicodeString;
- v_5, v_11: BOOLEAN;
- v_6, v_12: Integer;
- begin
- label_18201:
- v_3 := Arg0;
- v_1 := ANSIUPPERCASE(v_3);
- v_4 := Arg0;
- v_2 := UPPERCASE(v_4);
- v_7 := v_2;
- v_8 := v_1;
- v_6 := COMPARESTR(v_8, v_7);
- v_5 := v_6 = 0;
- flag := not v_5;
- if flag then goto label_18521;
- label_18360:
- v_9 := Arg0;
- v_1 := LOWERCASE(v_9);
- v_10 := Arg0;
- v_2 := ANSILOWERCASE(v_10);
- v_13 := v_2;
- v_14 := v_1;
- v_12 := COMPARESTR(v_14, v_13);
- v_11 := v_12 = 0;
- flag := not v_11;
- if flag then goto label_18521;
- label_18509:
- result := 1;
- label_18521:
- exit;
- end;
- function DEFDIRWIZ(Arg0: UnicodeString): UnicodeString;
- var
- v_1: BOOLEAN;
- v_2, v_4: WideString;
- v_3, v_5, v_6: UnicodeString;
- begin
- label_18522:
- v_1 := _ISWIN8();
- flag := not v_1;
- if flag then goto label_18644;
- label_18552:
- v_3 := NOSD();
- v_2 := v_3;
- v_2 := v_2 + 'Assassins Creed Syndicate';
- result := v_2;
- goto label_18757;
- label_18644:
- v_6 := '{pf}\';
- v_5 := EXPANDCONSTANT(v_6);
- v_4 := v_5;
- v_4 := v_4 + 'Assassins Creed Syndicate';
- result := v_4;
- label_18757:
- exit;
- end;
- function MBORTB(Arg0: Extended): UnicodeString;
- var
- v_1, v_10: BOOLEAN;
- v_2, v_12, v_19: WideString;
- v_3, v_5, v_7, v_8, v_13, v_18, v_20, v_25: UnicodeString;
- v_4, v_11, v_17, v_24: Extended;
- v_6, v_16, v_23: Integer;
- v_9: Pointer;
- v_14, v_15, v_21, v_22: array of Pointer;
- begin
- label_18758:
- v_1 := Arg0 < 1024;
- flag := not v_1;
- if flag then goto label_18902;
- label_18797:
- v_4 := Arg0;
- v_5 := '0';
- v_3 := FORMATFLOAT(v_5, v_4);
- v_2 := v_3;
- v_2 := v_2 + ' Mb';
- result := v_2;
- goto label_19367;
- label_18902:
- v_11 := Arg0;
- v_11 := v_11 / 1024;
- v_10 := v_11 < 1024;
- flag := not v_10;
- if flag then goto label_19173;
- label_18974:
- v_16 := 1;
- SETARRAYLENGTH({var}v_15, v_16);
- v_17 := Arg0;
- v_17 := v_17 / 1024;
- SetStackPointerToCopy v_15[0], v_17;
- v_14 := v_15;
- v_18 := '%.2n';
- v_13 := FORMAT(v_18, v_14);
- v_12 := v_13;
- v_12 := v_12 + ' GB';
- result := v_12;
- goto label_19367;
- label_19173:
- v_23 := 1;
- SETARRAYLENGTH({var}v_22, v_23);
- v_24 := Arg0;
- v_24 := v_24 / 1048576;
- SetStackPointerToCopy v_22[0], v_24;
- v_21 := v_22;
- v_25 := '%.2n';
- v_20 := FORMAT(v_25, v_21);
- v_19 := v_20;
- v_19 := v_19 + ' TB';
- result := v_19;
- label_19367:
- v_7 := '.';
- v_8 := ',';
- v_9 := &result;
- v_6 := STRINGCHANGE({var}v_9, v_8, v_7);
- exit;
- end;
- function FILESEACH(Arg0: UnicodeString): String;
- var
- v_1, v_3, v_5, v_7, v_16, v_18: BOOLEAN;
- v_2, v_8, v_9, v_10, v_11, v_12, v_13, v_15: UnicodeString;
- v_4, v_6, v_17, v_19: Integer;
- v_14: Pointer;
- begin
- label_19439:
- v_2 := Arg0;
- v_1 := FILEEXISTS(v_2);
- v_1 := not v_1;
- flag := not v_1;
- if flag then goto label_19856;
- label_19492:
- v_3 := 0;
- v_4 := gvar_25;
- TaskBarButtonEnabled(v_4, v_3);
- v_5 := 0;
- v_6 := gvar_26;
- TaskBarButtonEnabled(v_6, v_5);
- v_9 := Arg0;
- v_8 := EXTRACTFILEEXT(v_9);
- v_11 := Arg0;
- v_10 := EXTRACTFILENAME(v_11);
- v_13 := Arg0;
- v_12 := EXTRACTFILEPATH(v_13);
- v_14 := &Arg0;
- v_15 := 'File not found!';
- v_7 := GETOPENFILENAME(v_15, {var}v_14, v_12, v_10, v_8);
- flag := not v_7;
- if flag then goto label_19771;
- label_19760:
- result := Arg0;
- label_19771:
- v_16 := 1;
- v_17 := gvar_25;
- TaskBarButtonEnabled(v_17, v_16);
- v_18 := 1;
- v_19 := gvar_26;
- TaskBarButtonEnabled(v_19, v_18);
- goto label_19867;
- label_19856:
- result := Arg0;
- label_19867:
- exit;
- end;
- function FINISHEDDONE(): BOOLEAN;
- var
- v_1, v_4, v_6, v_14, v_16, v_17, v_28, v_32, v_34, v_36, v_37, v_41, v_43, v_51, v_53, v_55, v_61, v_65, v_67, v_69, v_70, v_76, v_82: Integer;
- v_2, v_10, v_12, v_24, v_57, v_78, v_80: TBUTTON;
- v_3, v_5, v_11, v_13, v_19, v_20, v_23, v_56, v_74, v_75, v_77, v_79, v_81: BOOLEAN;
- v_7, v_21, v_22, v_25, v_26, v_38, v_58, v_59, v_71: UnicodeString;
- v_8: TNEWBUTTON;
- v_9, v_15, v_18, v_42, v_49: TWIZARDFORM;
- v_27, v_30, v_44, v_45, v_46, v_60, v_63: TLABEL;
- v_29, v_62: TFONT;
- v_31, v_52, v_64: Cardinal;
- v_33, v_54, v_66: TNEWICON;
- v_35, v_50, v_68: String;
- v_39, v_72: TSTRINGS;
- v_40, v_73: TNEWMEMO;
- v_47: TNEWPROGRESSBARSTYLE;
- v_48: TNEWPROGRESSBAR;
- begin
- label_19868:
- v_2 := gvar_40;
- v_2.HIDE();
- v_3 := 1;
- v_4 := gvar_25;
- TaskBarButtonEnabled(v_4, v_3);
- v_5 := 1;
- v_6 := gvar_26;
- TaskBarButtonEnabled(v_6, v_5);
- v_9 := WIZARDFORM();
- v_8 := v_9.NEXTBUTTON;
- v_7 := v_8.CAPTION;
- v_10 := gvar_45;
- v_10.CAPTION := v_7;
- v_11 := 1;
- v_12 := gvar_45;
- v_12.VISIBLE := v_11;
- v_1 := 0;
- label_20111:
- v_13 := v_1 <= 40;
- if not v_13 then goto label_20279;
- label_20142:
- v_15 := WIZARDFORM();
- v_14 := v_15.CLIENTHEIGHT;
- v_17 := 1;
- v_16 := SCALEY(v_17);
- v_14 := v_14 + v_16;
- v_18 := WIZARDFORM();
- v_18.CLIENTHEIGHT := v_14;
- v_1 := v_1 + 1;
- inc(v_1);
- goto label_20111;
- label_20279:
- v_19 := gvar_28;
- flag := not v_19;
- if flag then goto label_20813;
- label_20309:
- v_22 := '{srcexe}';
- v_21 := EXPANDCONSTANT(v_22);
- v_20 := ISANSI(v_21);
- flag := not v_20;
- if flag then goto label_20431;
- label_20386:
- v_23 := 1;
- v_24 := gvar_41;
- v_24.ENABLED := v_23;
- goto label_20471;
- label_20431:
- v_56 := 0;
- v_57 := gvar_41;
- v_57.ENABLED := v_56;
- label_20471:
- v_26 := '{cm:Fail}';
- v_25 := EXPANDCONSTANT(v_26);
- v_27 := gvar_5;
- v_27.CAPTION := v_25;
- v_28 := 1776615;
- v_30 := gvar_5;
- v_29 := v_30.FONT;
- v_29.COLOR := v_28;
- v_33 := gvar_60[5];
- v_32 := v_33.HANDLE;
- v_31 := v_32;
- v_34 := gvar_26;
- TaskBarButtonIcon(v_34, v_31);
- v_35 := 'Retry';
- v_36 := gvar_26;
- TaskBarButtonToolTip(v_36, v_35);
- v_38 := 'Error!';
- v_40 := gvar_20;
- v_39 := v_40.LINES;
- v_37 := v_39.ADD(v_38);
- goto label_21379;
- label_20813:
- v_59 := '{cm:Success}';
- v_58 := EXPANDCONSTANT(v_59);
- v_60 := gvar_5;
- v_60.CAPTION := v_58;
- v_61 := 3464448;
- v_63 := gvar_5;
- v_62 := v_63.FONT;
- v_62.COLOR := v_61;
- v_66 := gvar_60[4];
- v_65 := v_66.HANDLE;
- v_64 := v_65;
- v_67 := gvar_26;
- TaskBarButtonIcon(v_67, v_64);
- v_68 := 'Run Assassins Creed Syndicate Update 1';
- v_69 := gvar_26;
- TaskBarButtonToolTip(v_69, v_68);
- v_71 := 'Done!';
- v_73 := gvar_20;
- v_72 := v_73.LINES;
- v_70 := v_72.ADD(v_71);
- v_74 := gvar_33;
- flag := not v_74;
- if flag then goto label_21299;
- label_21214:
- v_75 := 1;
- v_76 := gvar_26;
- TaskBarButtonEnabled(v_76, v_75);
- v_77 := 1;
- v_78 := gvar_42;
- v_78.ENABLED := v_77;
- goto label_21379;
- label_21299:
- v_79 := 0;
- v_80 := gvar_42;
- v_80.ENABLED := v_79;
- v_81 := 0;
- v_82 := gvar_26;
- TaskBarButtonEnabled(v_82, v_81);
- label_21379:
- v_42 := WIZARDFORM();
- v_41 := v_42.CLIENTWIDTH;
- v_44 := gvar_5;
- v_43 := v_44.WIDTH;
- v_41 := v_41 - v_43;
- v_41 := v_41 / 2;
- v_45 := gvar_5;
- v_45.LEFT := v_41;
- v_46 := gvar_5;
- v_46.SHOW();
- v_47 := 0;
- v_49 := WIZARDFORM();
- v_48 := v_49.PROGRESSGAUGE;
- v_48.STYLE := v_47;
- v_50 := 'Exit';
- v_51 := gvar_25;
- TaskBarButtonToolTip(v_51, v_50);
- v_54 := gvar_60[6];
- v_53 := v_54.HANDLE;
- v_52 := v_53;
- v_55 := gvar_25;
- TaskBarButtonIcon(v_55, v_52);
- result := 1;
- exit;
- end;
- procedure BTNONCLICK(Arg0: Integer);
- var
- v_1: Integer;
- v_2, v_3, v_10, v_14, v_21, v_28, v_32, v_36: BOOLEAN;
- v_4, v_11, v_15, v_22, v_29, v_33, v_39, v_42: TNOTIFYEVENT;
- v_5, v_8, v_16, v_19, v_23, v_26: TNEWBUTTON;
- v_6, v_9, v_17, v_20, v_24, v_27: TWIZARDFORM;
- v_7, v_13, v_18, v_25, v_31, v_35, v_41, v_44: TOBJECT;
- v_12, v_30, v_34: TBUTTON;
- v_37, v_38: Cardinal;
- v_40, v_43: TBITMAPIMAGE;
- begin
- label_21719:
- v_1 := Arg0;
- v_2 := gvar_25 = v_1;
- if not v_2 then goto label_22183;
- label_21767:
- v_3 := gvar_22 = 1;
- flag := not v_3;
- if flag then goto label_21924;
- label_21806:
- v_6 := WIZARDFORM();
- v_5 := v_6.NEXTBUTTON;
- v_4 := v_5.ONCLICK;
- v_9 := WIZARDFORM();
- v_8 := v_9.NEXTBUTTON;
- v_7 := v_8;
- CallVar v_4;
- goto label_22178;
- label_21924:
- v_10 := gvar_22 = 2;
- flag := not v_10;
- if flag then goto label_22026;
- label_21963:
- v_12 := gvar_40;
- v_11 := v_12.ONCLICK;
- v_13 := gvar_40;
- CallVar v_11;
- goto label_22178;
- label_22026:
- v_14 := gvar_22 = 3;
- flag := not v_14;
- if flag then goto label_22178;
- label_22065:
- v_17 := WIZARDFORM();
- v_16 := v_17.NEXTBUTTON;
- v_15 := v_16.ONCLICK;
- v_20 := WIZARDFORM();
- v_19 := v_20.NEXTBUTTON;
- v_18 := v_19;
- CallVar v_15;
- label_22178:
- goto label_22790;
- label_22183:
- v_2 := gvar_26 = v_1;
- if not v_2 then goto label_22557;
- label_22210:
- v_21 := gvar_22 <= 2;
- flag := not v_21;
- if flag then goto label_22367;
- label_22249:
- v_24 := WIZARDFORM();
- v_23 := v_24.CANCELBUTTON;
- v_22 := v_23.ONCLICK;
- v_27 := WIZARDFORM();
- v_26 := v_27.CANCELBUTTON;
- v_25 := v_26;
- CallVar v_22;
- goto label_22552;
- label_22367:
- v_28 := gvar_28;
- flag := not v_28;
- if flag then goto label_22459;
- label_22396:
- v_30 := gvar_41;
- v_29 := v_30.ONCLICK;
- v_31 := gvar_41;
- CallVar v_29;
- goto label_22552;
- label_22459:
- v_32 := gvar_28;
- v_32 := not v_32;
- flag := not v_32;
- if flag then goto label_22552;
- label_22494:
- v_34 := gvar_42;
- v_33 := v_34.ONCLICK;
- v_35 := gvar_42;
- CallVar v_33;
- label_22552:
- goto label_22790;
- label_22557:
- v_2 := gvar_24 = v_1;
- if not v_2 then goto label_22790;
- label_22584:
- v_38 := gvar_52;
- v_37 := BASS_ChannelIsActive(v_38);
- v_36 := v_37 = 3;
- v_36 := not v_36;
- flag := not v_36;
- if flag then goto label_22727;
- label_22664:
- v_40 := gvar_48;
- v_39 := v_40.ONCLICK;
- v_41 := gvar_48;
- CallVar v_39;
- goto label_22785;
- label_22727:
- v_43 := gvar_47;
- v_42 := v_43.ONCLICK;
- v_44 := gvar_47;
- CallVar v_42;
- label_22785:
- goto label_22790;
- label_22790:
- exit;
- end;
- function LOADTASKBAR(): BOOLEAN;
- var
- v_1, v_3, v_4, v_5, v_6, v_9, v_11, v_14, v_18, v_23, v_24, v_29, v_31, v_35, v_38, v_42, v_45, v_49, v_51: Integer;
- v_2: Record39;
- v_7, v_8, v_15, v_30, v_37, v_44: BOOLEAN;
- v_10: TWIZARDFORM;
- v_12: TMAINFORM;
- v_13, v_33, v_40, v_47: String;
- v_16, v_27: Pointer;
- v_17, v_19, v_25, v_28, v_34, v_41, v_48: Cardinal;
- v_20, v_22, v_32, v_39, v_46: UnicodeString;
- v_21: WideString;
- v_26, v_36, v_43, v_50: TNEWICON;
- begin
- label_22793:
- v_2 := gvar_59;
- v_4 := 18;
- v_3 := SCALEX(v_4);
- v_6 := 40;
- v_5 := SCALEY(v_6);
- v_7 := 0;
- v_8 := 1;
- v_10 := WIZARDFORM();
- v_9 := v_10.HANDLE;
- v_12 := MAINFORM();
- v_11 := v_12.HANDLE;
- TaskBarV10(v_11, v_9, v_8, v_7, v_5, v_3, v_2);
- v_13 := 'Assassins Creed Syndicate Update 1';
- v_14 := 0;
- SetTaskBarToolTip(v_14, v_13);
- v_1 := 1;
- label_23107:
- v_15 := v_1 <= 7;
- if not v_15 then goto label_23493;
- label_23138:
- v_16 := &gvar_60;
- v_18 := v_1;
- v_18 := v_18 - 1;
- v_17 := v_18;
- v_16 := &v_16.v_17;
- v_19 := 40;
- v_16 := v_19.CREATE();
- v_21 := '_IS_I';
- v_23 := v_1;
- v_22 := INTTOSTR(v_23);
- v_21 := v_21 + v_22;
- v_20 := v_21;
- v_25 := HINSTANCE();
- v_24 := v_25;
- v_27 := &gvar_60;
- v_29 := v_1;
- v_29 := v_29 - 1;
- v_28 := v_29;
- v_27 := &v_27.v_28;
- v_26 := v_27;
- v_26.LOADFROMRESOURCENAME(v_24, v_20);
- inc(v_1);
- goto label_23107;
- label_23493:
- v_30 := 1;
- v_32 := 'BtnOnClick';
- v_31 := CALLBACKADDR(v_32);
- v_33 := 'Music';
- v_36 := gvar_60[3];
- v_35 := v_36.HANDLE;
- v_34 := v_35;
- gvar_24 := TaskBarAddButton(v_34, v_33, v_31, v_30);
- v_37 := 1;
- v_39 := 'BtnOnClick';
- v_38 := CALLBACKADDR(v_39);
- v_40 := 'Exit';
- v_43 := gvar_60[6];
- v_42 := v_43.HANDLE;
- v_41 := v_42;
- gvar_26 := TaskBarAddButton(v_41, v_40, v_38, v_37);
- v_44 := 1;
- v_46 := 'BtnOnClick';
- v_45 := CALLBACKADDR(v_46);
- v_47 := 'Install';
- v_50 := gvar_60[0];
- v_49 := v_50.HANDLE;
- v_48 := v_49;
- gvar_25 := TaskBarAddButton(v_48, v_47, v_45, v_44);
- v_51 := 0;
- TaskBarUpdateButtons(v_51);
- result := 1;
- exit;
- end;
- function BASS_STREAMCREATEFILE(Arg0: Cardinal; Arg1: String; Arg2: Cardinal; Arg3: Cardinal; Arg4: Cardinal): Cardinal;
- var
- v_1, v_10, v_11, v_12, v_15, v_16, v_17: Cardinal;
- v_2, v_13, v_18: String;
- v_3: BOOLEAN;
- v_4, v_9: UnicodeString;
- v_5, v_7: Integer;
- v_6, v_8: Pointer;
- v_14, v_19: Cardinal;
- begin
- label_24017:
- v_3 := Arg0;
- flag := not v_3;
- if flag then goto label_24283;
- label_24056:
- v_4 := Arg1;
- v_1 := EXTRACTTEMPORARYFILESIZE(v_4);
- v_5 := v_1;
- v_6 := &v_2;
- SETLENGTH({var}v_6, v_5);
- v_8 := &v_2;
- v_7 := CASTANSISTRINGTOINTEGER({var}v_8);
- v_9 := Arg1;
- EXTRACTTEMPORARYFILETOBUFFER(v_9, v_7);
- v_10 := Arg4;
- v_11 := v_1;
- v_12 := Arg2;
- v_13 := v_2;
- v_14 := Arg0;
- result := BASS_StreamCreateFile(v_14, v_13, v_12, v_11, v_10);
- goto label_24380;
- label_24283:
- v_15 := Arg4;
- v_16 := Arg3;
- v_17 := Arg2;
- v_18 := Arg1;
- v_19 := Arg0;
- result := BASS_StreamCreateFile(v_19, v_18, v_17, v_16, v_15);
- label_24380:
- exit;
- end;
- procedure MYONTIMER1(Arg0: Cardinal; Arg1: Cardinal; Arg2: Cardinal; Arg3: Cardinal);
- var
- v_1, v_7: BOOLEAN;
- v_2, v_3, v_4, v_8: Cardinal;
- v_5, v_10, v_11, v_12: Integer;
- v_6, v_13: TWIZARDFORM;
- v_9: Byte;
- begin
- label_24381:
- v_1 := gvar_23 > 100;
- flag := not v_1;
- if flag then goto label_24508;
- label_24420:
- v_3 := gvar_54;
- v_6 := WIZARDFORM();
- v_5 := v_6.HANDLE;
- v_4 := v_5;
- v_2 := KillTimer(v_4, v_3);
- label_24508:
- gvar_23 := gvar_23 + 5;
- v_8 := 2;
- v_10 := 255;
- v_10 := v_10 - gvar_23;
- v_9 := v_10;
- v_11 := 0;
- v_13 := WIZARDFORM();
- v_12 := v_13.HANDLE;
- v_7 := SetLayeredWindowAttributes(v_12, v_11, v_9, v_8);
- exit;
- end;
- function MYPROC(Arg0: Integer; Arg1: Integer; Arg2: Integer; Arg3: Integer): Integer;
- var
- v_1, v_3, v_4, v_12, v_13, v_14, v_15, v_17, v_18, v_24, v_29, v_32, v_33, v_34, v_35, v_40, v_41, v_43, v_44, v_46, v_47: Integer;
- v_2, v_6, v_20, v_21, v_31, v_37: BOOLEAN;
- v_5, v_16, v_19, v_30, v_36, v_42: TWIZARDFORM;
- v_7: Cardinal;
- v_8, v_10, v_11, v_22, v_23, v_26, v_27, v_28, v_38, v_45: Cardinal;
- v_9: Pointer;
- v_25: ProcPtr49;
- v_39: Byte;
- begin
- label_24671:
- v_2 := Arg1 = 534;
- flag := not v_2;
- if flag then goto label_25356;
- label_24715:
- v_3 := -20;
- v_5 := WIZARDFORM();
- v_4 := v_5.HANDLE;
- v_1 := GetWindowLongA(v_4, v_3);
- v_8 := 0;
- v_9 := &gvar_58;
- v_10 := 0;
- v_11 := 38;
- v_7 := SystemParametersInfoW(v_11, v_10, {var}v_9, v_8);
- v_6 := v_7;
- v_6 := not v_6;
- flag := not v_6;
- if flag then goto label_24918;
- label_24917:
- exit;
- label_24918:
- v_14 := -20;
- v_16 := WIZARDFORM();
- v_15 := v_16.HANDLE;
- v_13 := GetWindowLongA(v_15, v_14);
- v_13 := v_13 or 524288;
- v_17 := -20;
- v_19 := WIZARDFORM();
- v_18 := v_19.HANDLE;
- v_12 := SetWindowLongA(v_18, v_17, v_13);
- v_20 := gvar_23 = 0;
- if not v_20 then goto label_25159;
- label_25120:
- v_21 := gvar_58 <> 0;
- v_20 := v_20 and v_21;
- label_25159:
- flag := not v_20;
- if flag then goto label_25356;
- label_25172:
- v_24 := 4;
- v_25 := procedure MYONTIMER1(Arg0: Cardinal; Arg1: Cardinal; Arg2: Cardinal; Arg3: Cardinal);;
- v_23 := wrapcallback(v_25, v_24);
- v_26 := 10;
- v_27 := 1;
- v_30 := WIZARDFORM();
- v_29 := v_30.HANDLE;
- v_28 := v_29;
- v_22 := SetTimer(v_28, v_27, v_26, v_23);
- gvar_54 := v_22;
- label_25356:
- v_31 := Arg1 = 533;
- flag := not v_31;
- if flag then goto label_25619;
- label_25395:
- gvar_23 := 0;
- v_33 := v_1;
- v_34 := -20;
- v_36 := WIZARDFORM();
- v_35 := v_36.HANDLE;
- v_32 := SetWindowLongA(v_35, v_34, v_33);
- v_38 := 2;
- v_39 := 255;
- v_40 := 0;
- v_42 := WIZARDFORM();
- v_41 := v_42.HANDLE;
- v_37 := SetLayeredWindowAttributes(v_41, v_40, v_39, v_38);
- label_25619:
- v_43 := Arg3;
- v_44 := Arg2;
- v_45 := Arg1;
- v_46 := Arg0;
- v_47 := gvar_53;
- result := CallWindowProcA(v_47, v_46, v_45, v_44, v_43);
- exit;
- end;
- function PROCESSFILES(Arg0: String): array of String;
- var
- v_1, v_2, v_7, v_10, v_11, v_13, v_14, v_16, v_18: Integer;
- v_3, v_9: BOOLEAN;
- v_4, v_12, v_17: String;
- v_5: Char;
- v_6, v_8, v_15, v_19: Pointer;
- begin
- label_25717:
- label_25732:
- v_4 := Arg0;
- v_5 := ',';
- v_1 := POS(v_5, v_4);
- v_6 := &result;
- v_2 := GETARRAYLENGTH(v_6);
- v_7 := v_2;
- v_7 := v_7 + 1;
- v_8 := &result;
- SETARRAYLENGTH({var}v_8, v_7);
- v_9 := v_1 > 0;
- flag := not v_9;
- if flag then goto label_26054;
- label_25902:
- v_10 := v_1;
- v_10 := v_10 - 1;
- v_11 := 1;
- v_12 := Arg0;
- result[v_2] := COPY(v_12, v_11, v_10);
- v_13 := v_1;
- v_14 := 1;
- v_15 := &Arg0;
- DELETE({var}v_15, v_14, v_13);
- goto label_26112;
- label_26054:
- result[v_2] := Arg0;
- v_18 := 0;
- v_19 := &Arg0;
- SETLENGTH({var}v_19, v_18);
- label_26112:
- v_17 := Arg0;
- v_16 := LENGTH(v_17);
- v_3 := v_16 = 0;
- if not v_3 then goto label_25732;
- label_26178:
- exit;
- end;
- procedure MOVEFILE(Arg0: String; Arg1: String);
- var
- v_1, v_2: BOOLEAN;
- v_3, v_4: UnicodeString;
- begin
- label_26180:
- v_2 := 0;
- v_3 := Arg1;
- v_4 := Arg0;
- v_1 := FILECOPY(v_4, v_3, v_2);
- exit;
- end;
- procedure COPYFILES(Arg0: String; Arg1: String; Arg2: String);
- var
- v_1, v_2: TFINDREC;
- v_3, v_4, v_14, v_16, v_25, v_26, v_28, v_30, v_31, v_36, v_51, v_52, v_53, v_55, v_56, v_57: BOOLEAN;
- v_5, v_6, v_12, v_43, v_44, v_58, v_59, v_63: String;
- v_7, v_8, v_10, v_29: Integer;
- v_9: array of String;
- v_11, v_13, v_18, v_23, v_24, v_45, v_46, v_67: Pointer;
- v_15, v_17, v_19, v_21, v_22, v_32, v_33, v_34, v_35, v_38, v_39, v_41, v_42, v_47, v_49, v_50, v_61, v_62, v_65, v_66: UnicodeString;
- v_20, v_37, v_40, v_48, v_60, v_64: WideString;
- v_27, v_54: Cardinal;
- begin
- label_26251:
- v_10 := 0;
- v_11 := &v_9;
- SETARRAYLENGTH({var}v_11, v_10);
- v_12 := Arg2;
- v_9 := PROCESSFILES(v_12);
- v_13 := &v_9;
- v_8 := GETARRAYLENGTH(v_13);
- v_15 := Arg1;
- v_14 := DIREXISTS(v_15);
- v_14 := not v_14;
- flag := not v_14;
- if flag then goto label_26485;
- label_26450:
- v_17 := Arg1;
- v_16 := CREATEDIR(v_17);
- label_26485:
- v_18 := &v_1;
- v_22 := Arg0;
- v_21 := ADDBACKSLASH(v_22);
- v_20 := v_21;
- v_20 := v_20 + '*.*';
- v_19 := v_20;
- v_3 := FINDFIRST(v_19, {var}v_18);
- label_26619:
- label_26624:
- v_25 := v_3;
- if not v_25 then goto label_27238;
- label_26645:
- v_27 := v_1.field_1;
- v_27 := v_27 and 16;
- v_26 := v_27 = 0;
- flag := not v_26;
- if flag then goto label_27204;
- label_26721:
- v_4 := 0;
- v_7 := 0;
- label_26753:
- v_29 := v_8;
- v_29 := v_29 - 1;
- v_28 := v_7 <= v_29;
- if not v_28 then goto label_26971;
- label_26813:
- v_33 := v_9[v_7];
- v_32 := ANSILOWERCASE(v_33);
- v_35 := v_1.field_0;
- v_34 := ANSILOWERCASE(v_35);
- v_31 := v_32 = v_34;
- v_30 := v_31;
- flag := not v_30;
- if flag then goto label_26960;
- label_26943:
- v_4 := 1;
- goto label_26971;
- label_26960:
- inc(v_7);
- goto label_26753;
- label_26971:
- v_36 := v_4;
- v_36 := not v_36;
- flag := not v_36;
- if flag then goto label_27204;
- label_27007:
- v_39 := Arg0;
- v_38 := ADDBACKSLASH(v_39);
- v_37 := v_38;
- v_37 := v_37 + v_1.field_0;
- v_5 := v_37;
- v_42 := Arg1;
- v_41 := ADDBACKSLASH(v_42);
- v_40 := v_41;
- v_40 := v_40 + v_1.field_0;
- v_6 := v_40;
- v_43 := v_6;
- v_44 := v_5;
- MOVEFILE(v_44, v_43);
- label_27204:
- v_45 := &v_1;
- v_3 := FINDNEXT({var}v_45);
- goto label_26624;
- label_27238:
- v_46 := &v_2;
- v_50 := Arg0;
- v_49 := ADDBACKSLASH(v_50);
- v_48 := v_49;
- v_48 := v_48 + '*.*';
- v_47 := v_48;
- v_3 := FINDFIRST(v_47, {var}v_46);
- label_27361:
- v_51 := v_3;
- if not v_51 then goto label_27829;
- label_27382:
- v_54 := v_2.field_1;
- v_54 := v_54 and 16;
- v_53 := v_54 = 16;
- if not v_53 then goto label_27578;
- label_27460:
- v_56 := v_2.field_0 = '.';
- if v_56 then goto label_27547;
- label_27502:
- v_57 := v_2.field_0 = '..';
- v_56 := v_56 or v_57;
- label_27547:
- v_55 := v_56;
- v_55 := not v_55;
- v_53 := v_53 and v_55;
- label_27578:
- v_52 := v_53;
- flag := not v_52;
- if flag then goto label_27795;
- label_27603:
- v_58 := Arg2;
- v_62 := Arg1;
- v_61 := ADDBACKSLASH(v_62);
- v_60 := v_61;
- v_60 := v_60 + v_2.field_0;
- v_59 := v_60;
- v_66 := Arg0;
- v_65 := ADDBACKSLASH(v_66);
- v_64 := v_65;
- v_64 := v_64 + v_2.field_0;
- v_63 := v_64;
- COPYFILES(v_63, v_59, v_58);
- label_27795:
- v_67 := &v_2;
- v_3 := FINDNEXT({var}v_67);
- goto label_27361;
- label_27829:
- goto label_27832;
- label_27832:
- v_23 := &v_1;
- FINDCLOSE({var}v_23);
- v_24 := &v_2;
- FINDCLOSE({var}v_24);
- goto label_27878;
- label_27878:
- exit;
- end;
- function BACKUPDIR(Arg0: String; Arg1: String; Arg2: BOOLEAN): BOOLEAN;
- var
- v_1, v_32, v_49: Record50;
- v_2, v_3, v_15, v_17, v_20: String;
- v_4: TFINDREC;
- v_5, v_6, v_8, v_13, v_22, v_23, v_24, v_25, v_26, v_27, v_28: BOOLEAN;
- v_7, v_9, v_10, v_11, v_12, v_19, v_33, v_34, v_35, v_36, v_43, v_44, v_46, v_47: UnicodeString;
- v_14, v_16, v_31, v_48: Integer;
- v_18, v_21, v_37: Pointer;
- v_29, v_30, v_38, v_39, v_40, v_41, v_42, v_45: WideString;
- begin
- label_27879:
- v_7 := Arg1;
- v_6 := FORCEDIRECTORIES(v_7);
- v_8 := Arg2;
- flag := not v_8;
- if flag then goto label_27992;
- label_27968:
- v_1.field_1 := 1;
- goto label_28011;
- label_27992:
- v_1.field_1 := 2;
- label_28011:
- v_1.field_4 := 660;
- v_10 := Arg0;
- v_9 := ADDBACKSLASH(v_10);
- v_2 := v_9;
- v_12 := Arg1;
- v_11 := ADDBACKSLASH(v_12);
- v_3 := v_11;
- v_15 := Arg0;
- v_14 := LENGTH(v_15);
- v_17 := v_2;
- v_16 := LENGTH(v_17);
- v_13 := v_14 = v_16;
- flag := not v_13;
- if flag then goto label_29105;
- label_28227:
- v_18 := &v_4;
- v_20 := v_2;
- v_20 := v_20 + '*';
- v_19 := v_20;
- v_5 := FINDFIRST(v_19, {var}v_18);
- label_28320:
- label_28325:
- v_22 := v_5;
- if not v_22 then goto label_29073;
- label_28346:
- v_25 := v_4.field_0 <> '';
- if not v_25 then goto label_28436;
- label_28396:
- v_26 := v_4.field_0 <> '.';
- v_25 := v_25 and v_26;
- label_28436:
- v_24 := v_25;
- if not v_24 then goto label_28503;
- label_28458:
- v_27 := v_4.field_0 <> '..';
- v_24 := v_24 and v_27;
- label_28503:
- v_23 := v_24;
- flag := not v_23;
- if flag then goto label_29039;
- label_28528:
- v_28 := v_4.field_1 = 16;
- flag := not v_28;
- if flag then goto label_28703;
- label_28571:
- v_30 := v_2;
- v_30 := v_30 + v_4.field_0;
- v_29 := v_30;
- v_29 := v_29 + Chr($0)+Chr($0);
- v_2 := v_29;
- v_3 := v_3 + Chr($0)+Chr($0);
- v_1.field_2 := v_2;
- v_1.field_3 := v_3;
- goto label_28891;
- label_28703:
- v_39 := v_2;
- v_39 := v_39 + v_4.field_0;
- v_38 := v_39;
- v_38 := v_38 + Chr($0)+Chr($0);
- v_2 := v_38;
- v_41 := v_3;
- v_41 := v_41 + v_4.field_0;
- v_40 := v_41;
- v_40 := v_40 + Chr($0)+Chr($0);
- v_3 := v_40;
- v_1.field_2 := v_2;
- v_1.field_3 := v_3;
- label_28891:
- v_32 := v_1;
- v_31 := SHFileOperation(v_32);
- result := 0 = v_31;
- v_34 := v_2;
- v_33 := EXTRACTFILEPATH(v_34);
- v_2 := v_33;
- v_36 := v_3;
- v_35 := EXTRACTFILEPATH(v_36);
- v_3 := v_35;
- label_29039:
- v_37 := &v_4;
- v_5 := FINDNEXT({var}v_37);
- goto label_28325;
- label_29073:
- goto label_29076;
- label_29076:
- v_21 := &v_4;
- FINDCLOSE({var}v_21);
- goto label_29100;
- label_29100:
- goto label_29353;
- label_29105:
- v_44 := v_2;
- v_43 := REMOVEBACKSLASHUNLESSROOT(v_44);
- v_42 := v_43;
- v_42 := v_42 + Chr($0)+Chr($0);
- v_2 := v_42;
- v_47 := v_3;
- v_46 := REMOVEBACKSLASHUNLESSROOT(v_47);
- v_45 := v_46;
- v_45 := v_45 + Chr($0)+Chr($0);
- v_3 := v_45;
- v_1.field_2 := v_2;
- v_1.field_3 := v_3;
- v_49 := v_1;
- v_48 := SHFileOperation(v_49);
- result := 0 = v_48;
- label_29353:
- exit;
- end;
- procedure COPYDIRBAT(Arg0: String; Arg1: String);
- var
- v_1, v_10: Integer;
- v_2, v_3, v_7, v_15: BOOLEAN;
- v_4, v_16: String;
- v_5, v_6, v_11, v_12, v_13, v_14, v_18, v_19: UnicodeString;
- v_8: Pointer;
- v_9: TEXECWAIT;
- v_17: WideString;
- begin
- label_29354:
- v_3 := 1;
- v_4 := 'echo D | XCOPY /E /D /H /R /Y /C "';
- v_4 := v_4 + Arg0;
- v_4 := v_4 + '" "';
- v_4 := v_4 + Arg1;
- v_4 := v_4 + '"';
- v_6 := '{userdocs}\start.bat';
- v_5 := EXPANDCONSTANT(v_6);
- v_2 := SAVESTRINGTOFILE(v_5, v_4, v_3);
- v_8 := &v_1;
- v_9 := 1;
- v_10 := 0;
- v_11 := '';
- v_12 := '';
- v_14 := '{userdocs}\start.bat';
- v_13 := EXPANDCONSTANT(v_14);
- v_7 := EXEC(v_13, v_12, v_11, v_10, v_9, {var}v_8);
- v_19 := '{userdocs}';
- v_18 := EXPANDCONSTANT(v_19);
- v_17 := v_18;
- v_17 := v_17 + '\start.bat';
- v_16 := v_17;
- v_15 := DeleteFileA(v_16);
- exit;
- end;
- function SEARCHFIRSTFILE(Arg0: String): String;
- var
- v_1, v_17, v_27, v_32, v_33: String;
- v_2: TFINDREC;
- v_3, v_5, v_14, v_19, v_20, v_21, v_22, v_23, v_25, v_30: BOOLEAN;
- v_4, v_9, v_10, v_11, v_12, v_13, v_16: UnicodeString;
- v_6, v_7, v_26: Integer;
- v_8: TMSGBOXTYPE;
- v_15, v_18, v_29: Pointer;
- v_24, v_31: Cardinal;
- v_28, v_34: WideString;
- begin
- label_29868:
- v_4 := Arg0;
- v_3 := DIREXISTS(v_4);
- v_3 := not v_3;
- flag := not v_3;
- if flag then goto label_30077;
- label_29931:
- v_7 := 0;
- v_8 := 1;
- v_10 := '{cm:ExDir}';
- v_9 := EXPANDCONSTANT(v_10);
- v_6 := MSGBOX(v_9, v_8, v_7);
- v_5 := v_6 = 1;
- flag := not v_5;
- if flag then goto label_30077;
- label_30076:
- exit;
- label_30077:
- v_13 := Arg0;
- v_12 := REMOVEBACKSLASH(v_13);
- v_11 := ADDBACKSLASH(v_12);
- v_1 := v_11;
- v_15 := &v_2;
- v_17 := v_1;
- v_17 := v_17 + '*.*';
- v_16 := v_17;
- v_14 := FINDFIRST(v_16, {var}v_15);
- flag := not v_14;
- if flag then goto label_30807;
- label_30241:
- label_30258:
- label_30263:
- v_21 := v_2.field_0 <> '.';
- if not v_21 then goto label_30350;
- label_30305:
- v_22 := v_2.field_0 <> '..';
- v_21 := v_21 and v_22;
- label_30350:
- v_20 := v_21;
- flag := not v_20;
- if flag then goto label_30735;
- label_30375:
- v_24 := v_2.field_1;
- v_24 := v_24 and 16;
- v_23 := v_24 = 0;
- flag := not v_23;
- if flag then goto label_30591;
- label_30451:
- v_27 := gvar_17;
- v_26 := LENGTH(v_27);
- v_25 := v_26 < 1;
- flag := not v_25;
- if flag then goto label_30574;
- label_30525:
- v_28 := v_1;
- v_28 := v_28 + v_2.field_0;
- gvar_17 := v_28;
- goto label_30575;
- label_30574:
- exit;
- label_30575:
- result := gvar_17;
- goto label_30735;
- label_30591:
- v_31 := v_2.field_1;
- v_31 := v_31 and 16;
- v_30 := v_31 = 16;
- flag := not v_30;
- if flag then goto label_30735;
- label_30667:
- v_34 := v_1;
- v_34 := v_34 + v_2.field_0;
- v_33 := v_34;
- v_32 := SEARCHFIRSTFILE(v_33);
- label_30735:
- v_29 := &v_2;
- v_19 := FINDNEXT({var}v_29);
- v_19 := not v_19;
- if not v_19 then goto label_30263;
- label_30780:
- goto label_30783;
- label_30783:
- v_18 := &v_2;
- FINDCLOSE({var}v_18);
- goto label_30807;
- label_30807:
- exit;
- end;
- procedure COPYCRACK(Arg0: String; Arg1: String);
- var
- v_1, v_2, v_3, v_9, v_11, v_12, v_14, v_15, v_16, v_30, v_33, v_48, v_49, v_71, v_72, v_75, v_78: String;
- v_4, v_17, v_22, v_28, v_29, v_37, v_42, v_50, v_55, v_73, v_74: BOOLEAN;
- v_5, v_6, v_7, v_18, v_20, v_21, v_23, v_24, v_26, v_27, v_31, v_32, v_34, v_35, v_36, v_38, v_40, v_41, v_43, v_44, v_46, v_47, v_51, v_53, v_54, v_56, v_57, v_59, v_60, v_64, v_65, v_69, v_70, v_76, v_77, v_79, v_80, v_81: UnicodeString;
- v_8, v_10, v_61, v_62, v_66, v_67: Integer;
- v_13: Pointer;
- v_19, v_25, v_39, v_45, v_52, v_58: WideString;
- v_63, v_68: TMSGBOXTYPE;
- begin
- label_30808:
- v_3 := Arg0;
- gvar_17 := SEARCHFIRSTFILE(v_3);
- v_1 := gvar_17;
- v_5 := v_1;
- v_4 := FILEEXISTS(v_5);
- v_4 := not v_4;
- flag := not v_4;
- if flag then goto label_30912;
- label_30911:
- exit;
- label_30912:
- v_7 := v_1;
- v_6 := GETMD5OFFILE(v_7);
- v_2 := v_6;
- v_9 := Arg0;
- v_8 := LENGTH(v_9);
- v_11 := v_1;
- v_12 := Arg0;
- v_10 := POS(v_12, v_11);
- v_13 := &v_1;
- DELETE({var}v_13, v_10, v_8);
- v_14 := '';
- v_15 := Arg1;
- v_16 := Arg0;
- COPYFILES(v_16, v_15, v_14);
- v_21 := Arg1;
- v_20 := REMOVEBACKSLASH(v_21);
- v_19 := v_20;
- v_19 := v_19 + v_1;
- v_18 := v_19;
- v_17 := FILEEXISTS(v_18);
- flag := not v_17;
- if flag then goto label_31553;
- label_31238:
- v_27 := Arg1;
- v_26 := REMOVEBACKSLASH(v_27);
- v_25 := v_26;
- v_25 := v_25 + v_1;
- v_24 := v_25;
- v_23 := GETMD5OFFILE(v_24);
- v_22 := v_2 <> v_23;
- flag := not v_22;
- if flag then goto label_31535;
- label_31372:
- v_29 := 0;
- v_32 := Arg1;
- v_31 := REMOVEBACKSLASH(v_32);
- v_30 := v_31;
- v_36 := Arg0;
- v_35 := REMOVEBACKSLASH(v_36);
- v_34 := ADDBACKSLASH(v_35);
- v_33 := v_34;
- v_28 := BACKUPDIR(v_33, v_30, v_29);
- goto label_31548;
- label_31535:
- gvar_33 := 1;
- exit;
- label_31548:
- goto label_31711;
- label_31553:
- v_74 := 0;
- v_77 := Arg1;
- v_76 := REMOVEBACKSLASH(v_77);
- v_75 := v_76;
- v_81 := Arg0;
- v_80 := REMOVEBACKSLASH(v_81);
- v_79 := ADDBACKSLASH(v_80);
- v_78 := v_79;
- v_73 := BACKUPDIR(v_78, v_75, v_74);
- label_31711:
- v_41 := Arg1;
- v_40 := REMOVEBACKSLASH(v_41);
- v_39 := v_40;
- v_39 := v_39 + v_1;
- v_38 := v_39;
- v_37 := FILEEXISTS(v_38);
- flag := not v_37;
- if flag then goto label_32018;
- label_31822:
- v_47 := Arg1;
- v_46 := REMOVEBACKSLASH(v_47);
- v_45 := v_46;
- v_45 := v_45 + v_1;
- v_44 := v_45;
- v_43 := GETMD5OFFILE(v_44);
- v_42 := v_2 <> v_43;
- flag := not v_42;
- if flag then goto label_32000;
- label_31956:
- v_48 := Arg1;
- v_49 := Arg0;
- COPYDIRBAT(v_49, v_48);
- goto label_32013;
- label_32000:
- gvar_33 := 1;
- exit;
- label_32013:
- goto label_32057;
- label_32018:
- v_71 := Arg1;
- v_72 := Arg0;
- COPYDIRBAT(v_72, v_71);
- label_32057:
- v_54 := Arg1;
- v_53 := REMOVEBACKSLASH(v_54);
- v_52 := v_53;
- v_52 := v_52 + v_1;
- v_51 := v_52;
- v_50 := FILEEXISTS(v_51);
- flag := not v_50;
- if flag then goto label_32433;
- label_32168:
- v_60 := Arg1;
- v_59 := REMOVEBACKSLASH(v_60);
- v_58 := v_59;
- v_58 := v_58 + v_1;
- v_57 := v_58;
- v_56 := GETMD5OFFILE(v_57);
- v_55 := v_2 <> v_56;
- flag := not v_55;
- if flag then goto label_32415;
- label_32302:
- v_62 := 0;
- v_63 := 1;
- v_65 := '{cm:ErrCopy}';
- v_64 := EXPANDCONSTANT(v_65);
- v_61 := MSGBOX(v_64, v_63, v_62);
- goto label_32428;
- label_32415:
- gvar_33 := 1;
- exit;
- label_32428:
- goto label_32541;
- label_32433:
- v_67 := 0;
- v_68 := 1;
- v_70 := '{cm:ErrCopy}';
- v_69 := EXPANDCONSTANT(v_70);
- v_66 := MSGBOX(v_69, v_68, v_67);
- label_32541:
- exit;
- end;
- procedure CBDRIVEONCLICK(Arg0: TOBJECT);
- var
- v_1: String;
- v_2, v_6, v_9: Integer;
- v_3, v_7, v_11, v_13: UnicodeString;
- v_4, v_15: TEDIT;
- v_5, v_16: TWIZARDFORM;
- v_8, v_14: TNEWCOMBOBOX;
- v_10: Pointer;
- v_12: WideString;
- begin
- label_32542:
- v_5 := WIZARDFORM();
- v_4 := v_5.DIREDIT;
- v_3 := v_4.TEXT;
- v_1 := v_3;
- v_8 := gvar_15;
- v_7 := v_8.TEXT;
- v_6 := LENGTH(v_7);
- v_9 := 1;
- v_10 := &v_1;
- DELETE({var}v_10, v_9, v_6);
- v_14 := gvar_15;
- v_13 := v_14.TEXT;
- v_12 := v_13;
- v_12 := v_12 + v_1;
- v_11 := v_12;
- v_16 := WIZARDFORM();
- v_15 := v_16.DIREDIT;
- v_15.TEXT := v_11;
- exit;
- end;
- procedure CANCELBUTTONCLICK(Arg0: Integer; var Arg1: BOOLEAN; var Arg2: BOOLEAN);
- var
- v_1, v_3, v_5, v_7, v_8, v_11, v_19, v_21, v_23, v_25, v_26: BOOLEAN;
- v_2, v_4, v_6, v_9, v_10, v_12, v_13, v_17, v_18, v_20, v_22, v_24, v_29: Integer;
- v_14: TMSGBOXTYPE;
- v_15, v_16: UnicodeString;
- v_27, v_28: Cardinal;
- v_30: TWIZARDFORM;
- begin
- label_32836:
- v_1 := 0;
- v_2 := gvar_25;
- TaskBarButtonEnabled(v_2, v_1);
- v_3 := 0;
- v_4 := gvar_26;
- TaskBarButtonEnabled(v_4, v_3);
- v_5 := 0;
- v_6 := gvar_24;
- TaskBarButtonEnabled(v_6, v_5);
- Arg2 := 0;
- v_7 := Arg0 = 12;
- flag := not v_7;
- if flag then goto label_33437;
- label_33007:
- Arg1 := 0;
- v_8 := SuspendProc();
- v_9 := 8;
- v_10 := 0;
- SetTaskBarProgressState(v_10, v_9);
- v_13 := 4;
- v_14 := 1;
- v_16 := '{cm:InteProc}';
- v_15 := EXPANDCONSTANT(v_16);
- v_12 := MSGBOX(v_15, v_14, v_13);
- v_11 := v_12 = 6;
- flag := not v_11;
- if flag then goto label_33247;
- label_33232:
- gvar_21 := 1;
- label_33247:
- v_17 := 2;
- v_18 := 0;
- SetTaskBarProgressState(v_18, v_17);
- v_19 := 1;
- v_20 := gvar_25;
- TaskBarButtonEnabled(v_20, v_19);
- v_21 := 1;
- v_22 := gvar_26;
- TaskBarButtonEnabled(v_22, v_21);
- v_23 := 1;
- v_24 := gvar_24;
- TaskBarButtonEnabled(v_24, v_23);
- v_25 := ResumeProc();
- goto label_33545;
- label_33437:
- v_27 := 589824;
- v_28 := 300;
- v_30 := WIZARDFORM();
- v_29 := v_30.HANDLE;
- v_26 := AnimateWindow(v_29, v_28, v_27);
- Arg1 := 1;
- label_33545:
- exit;
- end;
- function HASHPROGRESS(Arg0: Cardinal): BOOLEAN;
- var
- v_1: Integer;
- v_2: TNEWPROGRESSBAR;
- v_3: TAPPLICATION;
- v_4: BOOLEAN;
- begin
- label_33546:
- v_1 := Arg0;
- v_2 := gvar_65;
- v_2.POSITION := v_1;
- v_3 := APPLICATION();
- v_3.PROCESSMESSAGES();
- v_4 := gvar_38;
- flag := not v_4;
- if flag then goto label_33654;
- label_33637:
- result := 0;
- goto label_33666;
- label_33654:
- result := 1;
- label_33666:
- exit;
- end;
- procedure CHECKHASHFILE(Arg0: UnicodeString; Arg1: UnicodeString; Arg2: UnicodeString; Arg3: TNEWSTATICTEXT);
- var
- v_1, v_3, v_12: Integer;
- v_2, v_4, v_5, v_7, v_9, v_10, v_15, v_18, v_24, v_25, v_34, v_35, v_40, v_41, v_46, v_47: UnicodeString;
- v_6, v_13, v_17: Pointer;
- v_8, v_23, v_33, v_39, v_45: WideString;
- v_11: TNEWSTATICTEXT;
- v_14, v_16, v_19, v_20, v_26, v_30, v_36, v_42: BOOLEAN;
- v_21, v_22, v_28, v_29, v_31, v_32, v_37, v_38, v_43, v_44: String;
- v_27: ProcPtr51;
- begin
- label_33667:
- v_2 := Arg0;
- v_4 := '';
- v_5 := Arg1;
- v_6 := &v_2;
- v_3 := STRINGCHANGE({var}v_6, v_5, v_4);
- v_10 := '{cm:CurHashText3}';
- v_9 := EXPANDCONSTANT(v_10);
- v_8 := v_9;
- v_8 := v_8 + ' ';
- v_8 := v_8 + v_2;
- v_7 := v_8;
- v_11 := Arg3;
- v_11.CAPTION := v_7;
- v_1 := 0;
- v_12 := gvar_27;
- v_12 := v_12 + 1;
- v_13 := &gvar_66;
- SETARRAYLENGTH({var}v_13, v_12);
- v_15 := Arg0;
- v_14 := FILEEXISTS(v_15);
- if not v_14 then goto label_34076;
- label_34012:
- v_17 := &v_1;
- v_18 := Arg0;
- v_16 := FILESIZE(v_18, {var}v_17);
- v_14 := v_14 and v_16;
- label_34076:
- flag := not v_14;
- if flag then goto label_34893;
- label_34089:
- v_19 := v_1 = 0;
- flag := not v_19;
- if flag then goto label_34343;
- label_34128:
- gvar_66[gvar_27] := 0;
- v_20 := gvar_38;
- v_20 := not v_20;
- flag := not v_20;
- if flag then goto label_34326;
- label_34179:
- v_21 := 'FF0000';
- v_23 := v_2;
- v_23 := v_23 + ' ';
- v_25 := '{cm:CurHashText5}';
- v_24 := EXPANDCONSTANT(v_25);
- v_23 := v_23 + v_24;
- v_22 := v_23;
- AddLineRichEdit(v_22, v_21);
- label_34326:
- gvar_27 := gvar_27 + 1;
- exit;
- label_34343:
- v_27 := function HASHPROGRESS(Arg0: Cardinal): BOOLEAN;;
- v_28 := Arg2;
- v_29 := Arg0;
- v_26 := CheckMD5(v_29, v_28, v_27);
- flag := not v_26;
- if flag then goto label_34648;
- label_34428:
- gvar_66[gvar_27] := 1;
- v_30 := gvar_38;
- v_30 := not v_30;
- flag := not v_30;
- if flag then goto label_34626;
- label_34479:
- v_31 := '43cf8b';
- v_33 := v_2;
- v_33 := v_33 + ' ';
- v_35 := '{cm:CurHashText7}';
- v_34 := EXPANDCONSTANT(v_35);
- v_33 := v_33 + v_34;
- v_32 := v_33;
- AddLineRichEdit(v_32, v_31);
- label_34626:
- gvar_27 := gvar_27 + 1;
- exit;
- goto label_34888;
- label_34648:
- gvar_66[gvar_27] := 0;
- v_36 := gvar_38;
- v_36 := not v_36;
- flag := not v_36;
- if flag then goto label_34871;
- label_34699:
- v_37 := 'FF0000';
- v_39 := v_2;
- v_39 := v_39 + ' ';
- v_41 := '{cm:CurHashText6}';
- v_40 := EXPANDCONSTANT(v_41);
- v_39 := v_39 + v_40;
- v_39 := v_39 + ' ';
- v_39 := v_39 + Arg2;
- v_38 := v_39;
- AddLineRichEdit(v_38, v_37);
- label_34871:
- gvar_27 := gvar_27 + 1;
- exit;
- goto label_35108;
- label_34893:
- gvar_66[gvar_27] := 0;
- v_42 := gvar_38;
- v_42 := not v_42;
- flag := not v_42;
- if flag then goto label_35091;
- label_34944:
- v_43 := 'FF0000';
- v_45 := v_2;
- v_45 := v_45 + ' ';
- v_47 := '{cm:CurHashText4}';
- v_46 := EXPANDCONSTANT(v_47);
- v_45 := v_45 + v_46;
- v_44 := v_45;
- AddLineRichEdit(v_44, v_43);
- label_35091:
- gvar_27 := gvar_27 + 1;
- exit;
- exit;
- end;
- function GETTEXTWIDTH(Arg0: UnicodeString; Arg1: TFONT): Integer;
- var
- v_1, v_3, v_7, v_10: TBITMAP;
- v_2: Cardinal;
- v_4: TPERSISTENT;
- v_5: TFONT;
- v_6, v_9: TCANVAS;
- v_8: UnicodeString;
- begin
- label_35109:
- v_2 := 71;
- v_1 := v_2.CREATE();
- label_35164:
- v_4 := Arg1;
- v_7 := v_1;
- v_6 := v_7.CANVAS;
- v_5 := v_6.FONT;
- v_5.ASSIGN(v_4);
- v_8 := Arg0;
- v_10 := v_1;
- v_9 := v_10.CANVAS;
- result := v_9.TEXTWIDTH(v_8);
- goto label_35305;
- label_35305:
- v_3 := v_1;
- v_3.FREE();
- goto label_35329;
- label_35329:
- exit;
- end;
- function GETTEXTHEIGHT(Arg0: UnicodeString; Arg1: TFONT): Integer;
- var
- v_1, v_3, v_7, v_10: TBITMAP;
- v_2: Cardinal;
- v_4: TPERSISTENT;
- v_5: TFONT;
- v_6, v_9: TCANVAS;
- v_8: UnicodeString;
- begin
- label_35330:
- v_2 := 71;
- v_1 := v_2.CREATE();
- label_35385:
- v_4 := Arg1;
- v_7 := v_1;
- v_6 := v_7.CANVAS;
- v_5 := v_6.FONT;
- v_5.ASSIGN(v_4);
- v_8 := Arg0;
- v_10 := v_1;
- v_9 := v_10.CANVAS;
- result := v_9.TEXTHEIGHT(v_8);
- goto label_35526;
- label_35526:
- v_3 := v_1;
- v_3.FREE();
- goto label_35550;
- label_35550:
- exit;
- end;
- procedure HASHFORMPAINT(Arg0: TOBJECT);
- var
- v_1: BOOLEAN;
- v_2, v_7, v_9, v_11, v_12, v_13, v_15, v_17, v_18: Integer;
- v_3: TFONT;
- v_4, v_6, v_14, v_16: TNEWSTATICTEXT;
- v_5: UnicodeString;
- v_8, v_10: TBUTTON;
- v_19: TSETUPFORM;
- begin
- label_35551:
- v_4 := gvar_67;
- v_3 := v_4.FONT;
- v_6 := gvar_67;
- v_5 := v_6.CAPTION;
- v_2 := GETTEXTWIDTH(v_5, v_3);
- v_8 := gvar_46;
- v_7 := v_8.WIDTH;
- v_10 := gvar_46;
- v_9 := v_10.LEFT;
- v_7 := v_7 + v_9;
- v_12 := 5;
- v_11 := SCALEX(v_12);
- v_7 := v_7 - v_11;
- v_1 := v_2 > v_7;
- flag := not v_1;
- if flag then goto label_35962;
- label_35807:
- v_14 := gvar_67;
- v_13 := v_14.HEIGHT;
- v_16 := gvar_67;
- v_15 := v_16.TOP;
- v_13 := v_13 + v_15;
- v_18 := 5;
- v_17 := SCALEY(v_18);
- v_13 := v_13 + v_17;
- v_19 := gvar_63;
- v_19.CLIENTHEIGHT := v_13;
- label_35962:
- exit;
- end;
- function ISTRUE(Arg0: array of BOOLEAN): BOOLEAN;
- var
- v_1, v_3: Integer;
- v_2, v_5: BOOLEAN;
- v_4: Pointer;
- begin
- label_35963:
- v_1 := 0;
- label_35988:
- v_4 := &Arg0;
- v_3 := GETARRAYLENGTH(v_4);
- v_3 := v_3 - 1;
- v_2 := v_1 <= v_3;
- if not v_2 then goto label_36146;
- label_36066:
- v_5 := Arg0[v_1];
- v_5 := not v_5;
- flag := not v_5;
- if flag then goto label_36123;
- label_36105:
- result := 0;
- exit;
- goto label_36135;
- label_36123:
- result := 1;
- inc(v_1);
- goto label_35988;
- label_36146:
- exit;
- end;
- procedure HASHFORMCLOSE(Arg0: TOBJECT; var Arg1: BOOLEAN);
- var
- v_1, v_2: TSETUPFORM;
- v_3: BOOLEAN;
- v_4: TWIZARDFORM;
- begin
- label_36148:
- Arg1 := 0;
- gvar_38 := 1;
- v_1 := gvar_63;
- v_1.HIDE();
- v_2 := gvar_63;
- v_2.FREE();
- FreeRichEdit();
- v_3 := 1;
- v_4 := WIZARDFORM();
- v_4.ENABLED := v_3;
- exit;
- end;
- procedure CANCELHASHFILED(Arg0: TOBJECT);
- var
- v_1, v_2, v_3, v_4, v_5: Integer;
- v_6: TSETUPFORM;
- begin
- label_36263:
- v_2 := 0;
- v_3 := 0;
- v_4 := 16;
- v_6 := gvar_63;
- v_5 := v_6.HANDLE;
- v_1 := SENDMESSAGE(v_5, v_4, v_3, v_2);
- exit;
- end;
- procedure STEPHASH1(Arg0: UnicodeString; Arg1: UnicodeString);
- var
- v_1: BOOLEAN;
- v_2: TNEWSTATICTEXT;
- v_3, v_4, v_5, v_6: UnicodeString;
- begin
- label_36380:
- v_1 := gvar_38;
- v_1 := not v_1;
- flag := not v_1;
- if flag then goto label_36516;
- label_36415:
- v_2 := gvar_67;
- v_3 := Arg1;
- v_5 := '{app}\';
- v_4 := EXPANDCONSTANT(v_5);
- v_6 := Arg0;
- CHECKHASHFILE(v_6, v_4, v_3, v_2);
- label_36516:
- exit;
- end;
- function HASHOLDFILES(): BOOLEAN;
- var
- v_1, v_2, v_4, v_5, v_25, v_30, v_31, v_32, v_34, v_35, v_36, v_37, v_38, v_39, v_45, v_53, v_55, v_57, v_59, v_60, v_61, v_63, v_64, v_65, v_67, v_69, v_70, v_77, v_78, v_79, v_80, v_81, v_83, v_84, v_85, v_87, v_89, v_90, v_97, v_107, v_109, v_111, v_113, v_115, v_116, v_117, v_119, v_121, v_122, v_123, v_125, v_127, v_128, v_129, v_132, v_139, v_144, v_146, v_148, v_149, v_150, v_152, v_154, v_155, v_156, v_158, v_160, v_162, v_163, v_164, v_165, v_166, v_173: Integer;
- v_3, v_6, v_10, v_12, v_14, v_15, v_33, v_62, v_110, v_133, v_157, v_180, v_191, v_192: TSETUPFORM;
- v_7: UnicodeString;
- v_8, v_9, v_22, v_23, v_28, v_92, v_102, v_131, v_136, v_137, v_142, v_198, v_199: UnicodeString;
- v_11: TCLOSEQUERYEVENT;
- v_13, v_105: TNOTIFYEVENT;
- v_16, v_51, v_75, v_134: TCOMPONENT;
- v_17, v_52, v_76, v_135: Cardinal;
- v_18, v_72, v_100, v_178: TWINCONTROL;
- v_19, v_21, v_24, v_27, v_29, v_40, v_42, v_44, v_47, v_50, v_66, v_68, v_94, v_167: TLABEL;
- v_20, v_41, v_43, v_169, v_171, v_181, v_183, v_184, v_186, v_188, v_189, v_193, v_195, v_196: BOOLEAN;
- v_26, v_46, v_49, v_93, v_95, v_98, v_140, v_176: TFONT;
- v_48, v_175: TFONTSTYLES;
- v_54, v_56, v_58, v_71, v_73, v_82, v_86, v_88, v_124, v_126, v_130, v_151, v_153: TNEWPROGRESSBAR;
- v_74: TNEWBUTTON;
- v_91, v_96, v_99, v_101, v_104, v_106, v_108, v_112, v_114, v_118, v_120, v_145, v_147, v_159, v_161: TBUTTON;
- v_103: TSETUPMESSAGEID;
- v_138, v_141, v_143, v_168, v_170, v_172, v_174, v_177, v_179, v_200: TNEWSTATICTEXT;
- v_182, v_187, v_194: TWIZARDFORM;
- v_185, v_190, v_197: array of BOOLEAN;
- begin
- label_36517:
- result := 0;
- gvar_38 := 0;
- gvar_27 := 0;
- gvar_63 := CREATECUSTOMFORM();
- v_2 := 450;
- v_1 := SCALEX(v_2);
- v_3 := gvar_63;
- v_3.CLIENTWIDTH := v_1;
- v_5 := 250;
- v_4 := SCALEY(v_5);
- v_6 := gvar_63;
- v_6.CLIENTHEIGHT := v_4;
- v_9 := '{cm:CurHashText1}';
- v_8 := EXPANDCONSTANT(v_9);
- v_7 := v_8;
- v_10 := gvar_63;
- v_10.CAPTION := v_7;
- v_11 := procedure HASHFORMCLOSE(Arg0: TOBJECT; var Arg1: BOOLEAN);;
- v_12 := gvar_63;
- v_12.ONCLOSEQUERY := v_11;
- v_13 := procedure HASHFORMPAINT(Arg0: TOBJECT);;
- v_14 := gvar_63;
- v_14.ONPAINT := v_13;
- v_15 := gvar_63;
- v_15.CENTER();
- v_16 := gvar_63;
- v_17 := 30;
- gvar_6 := v_17.CREATE(v_16);
- v_18 := gvar_63;
- v_19 := gvar_6;
- v_19.PARENT := v_18;
- v_20 := 0;
- v_21 := gvar_6;
- v_21.AUTOSIZE := v_20;
- v_23 := '{cm:CurHashText2}';
- v_22 := EXPANDCONSTANT(v_23);
- v_24 := gvar_6;
- v_24.CAPTION := v_22;
- v_27 := gvar_6;
- v_26 := v_27.FONT;
- v_29 := gvar_6;
- v_28 := v_29.CAPTION;
- v_25 := GETTEXTHEIGHT(v_28, v_26);
- v_25 := v_25 * 2;
- v_31 := 3;
- v_30 := SCALEY(v_31);
- v_25 := v_25 + v_30;
- v_33 := gvar_63;
- v_32 := v_33.CLIENTWIDTH;
- v_35 := 10;
- v_34 := SCALEX(v_35);
- v_32 := v_32 - v_34;
- v_37 := 5;
- v_36 := SCALEY(v_37);
- v_39 := 5;
- v_38 := SCALEX(v_39);
- v_40 := gvar_6;
- v_40.SETBOUNDS(v_38, v_36, v_32, v_25);
- v_41 := 1;
- v_42 := gvar_6;
- v_42.TRANSPARENT := v_41;
- v_43 := 1;
- v_44 := gvar_6;
- v_44.WORDWRAP := v_43;
- v_45 := 8;
- v_47 := gvar_6;
- v_46 := v_47.FONT;
- v_46.SIZE := v_45;
- v_48 := [1];
- v_50 := gvar_6;
- v_49 := v_50.FONT;
- v_49.STYLE := v_48;
- v_51 := gvar_63;
- v_52 := 43;
- gvar_65 := v_52.CREATE(v_51);
- v_53 := 0;
- v_54 := gvar_65;
- v_54.POSITION := v_53;
- v_55 := 1000;
- v_56 := gvar_65;
- v_56.MAX := v_55;
- v_57 := 0;
- v_58 := gvar_65;
- v_58.MIN := v_57;
- v_60 := 18;
- v_59 := SCALEY(v_60);
- v_62 := gvar_63;
- v_61 := v_62.CLIENTWIDTH;
- v_64 := 95;
- v_63 := SCALEX(v_64);
- v_61 := v_61 - v_63;
- v_66 := gvar_6;
- v_65 := v_66.TOP;
- v_68 := gvar_6;
- v_67 := v_68.HEIGHT;
- v_65 := v_65 + v_67;
- v_70 := 5;
- v_69 := SCALEX(v_70);
- v_71 := gvar_65;
- v_71.SETBOUNDS(v_69, v_65, v_61, v_59);
- v_72 := gvar_63;
- v_73 := gvar_65;
- v_73.PARENT := v_72;
- v_75 := gvar_63;
- v_76 := 59;
- v_74 := v_76.CREATE(v_75);
- gvar_46 := v_74;
- v_78 := 23;
- v_77 := SCALEY(v_78);
- v_80 := 80;
- v_79 := SCALEX(v_80);
- v_82 := gvar_65;
- v_81 := v_82.TOP;
- v_84 := 3;
- v_83 := SCALEY(v_84);
- v_81 := v_81 - v_83;
- v_86 := gvar_65;
- v_85 := v_86.LEFT;
- v_88 := gvar_65;
- v_87 := v_88.WIDTH;
- v_85 := v_85 + v_87;
- v_90 := 5;
- v_89 := SCALEX(v_90);
- v_85 := v_85 + v_89;
- v_91 := gvar_46;
- v_91.SETBOUNDS(v_85, v_81, v_79, v_77);
- v_94 := gvar_6;
- v_93 := v_94.FONT;
- v_92 := v_93.NAME;
- v_96 := gvar_46;
- v_95 := v_96.FONT;
- v_95.NAME := v_92;
- v_97 := 8;
- v_99 := gvar_46;
- v_98 := v_99.FONT;
- v_98.SIZE := v_97;
- v_100 := gvar_63;
- v_101 := gvar_46;
- v_101.PARENT := v_100;
- v_103 := 14;
- v_102 := SETUPMESSAGE(v_103);
- v_104 := gvar_46;
- v_104.CAPTION := v_102;
- v_105 := procedure CANCELHASHFILED(Arg0: TOBJECT);;
- v_106 := gvar_46;
- v_106.ONCLICK := v_105;
- v_107 := 2;
- v_108 := gvar_46;
- v_108.MODALRESULT := v_107;
- v_110 := gvar_63;
- v_109 := v_110.CLIENTHEIGHT;
- v_112 := gvar_46;
- v_111 := v_112.TOP;
- v_109 := v_109 - v_111;
- v_114 := gvar_46;
- v_113 := v_114.HEIGHT;
- v_109 := v_109 - v_113;
- v_116 := 30;
- v_115 := SCALEY(v_116);
- v_109 := v_109 - v_115;
- v_118 := gvar_46;
- v_117 := v_118.WIDTH;
- v_120 := gvar_46;
- v_119 := v_120.LEFT;
- v_117 := v_117 + v_119;
- v_122 := 5;
- v_121 := SCALEX(v_122);
- v_117 := v_117 - v_121;
- v_124 := gvar_65;
- v_123 := v_124.TOP;
- v_126 := gvar_65;
- v_125 := v_126.HEIGHT;
- v_123 := v_123 + v_125;
- v_128 := 5;
- v_127 := SCALEY(v_128);
- v_123 := v_123 + v_127;
- v_130 := gvar_65;
- v_129 := v_130.LEFT;
- v_131 := 'MyHash';
- v_133 := gvar_63;
- v_132 := v_133.HANDLE;
- AddRichEdit(v_132, v_131, v_129, v_123, v_117, v_109);
- v_134 := gvar_63;
- v_135 := 45;
- gvar_67 := v_135.CREATE(v_134);
- v_137 := '{cm:CurHashText3}';
- v_136 := EXPANDCONSTANT(v_137);
- v_138 := gvar_67;
- v_138.CAPTION := v_136;
- v_141 := gvar_67;
- v_140 := v_141.FONT;
- v_143 := gvar_67;
- v_142 := v_143.CAPTION;
- v_139 := GETTEXTHEIGHT(v_142, v_140);
- v_145 := gvar_46;
- v_144 := v_145.WIDTH;
- v_147 := gvar_46;
- v_146 := v_147.LEFT;
- v_144 := v_144 + v_146;
- v_149 := 5;
- v_148 := SCALEX(v_149);
- v_144 := v_144 - v_148;
- v_151 := gvar_65;
- v_150 := v_151.TOP;
- v_153 := gvar_65;
- v_152 := v_153.HEIGHT;
- v_150 := v_150 + v_152;
- v_155 := 5;
- v_154 := SCALEY(v_155);
- v_150 := v_150 + v_154;
- v_157 := gvar_63;
- v_156 := v_157.CLIENTHEIGHT;
- v_150 := v_150 + v_156;
- v_159 := gvar_46;
- v_158 := v_159.TOP;
- v_150 := v_150 - v_158;
- v_161 := gvar_46;
- v_160 := v_161.HEIGHT;
- v_150 := v_150 - v_160;
- v_163 := 30;
- v_162 := SCALEY(v_163);
- v_150 := v_150 - v_162;
- v_165 := 5;
- v_164 := SCALEY(v_165);
- v_150 := v_150 + v_164;
- v_167 := gvar_6;
- v_166 := v_167.LEFT;
- v_168 := gvar_67;
- v_168.SETBOUNDS(v_166, v_150, v_144, v_139);
- v_169 := 1;
- v_170 := gvar_67;
- v_170.AUTOSIZE := v_169;
- v_171 := 1;
- v_172 := gvar_67;
- v_172.WORDWRAP := v_171;
- v_173 := 32768;
- v_174 := gvar_67;
- v_174.COLOR := v_173;
- v_175 := [1];
- v_177 := gvar_67;
- v_176 := v_177.FONT;
- v_176.STYLE := v_175;
- v_178 := gvar_63;
- v_179 := gvar_67;
- v_179.PARENT := v_178;
- v_180 := gvar_63;
- v_180.SHOW();
- v_181 := 0;
- v_182 := WIZARDFORM();
- v_182.ENABLED := v_181;
- v_183 := gvar_38;
- if not v_183 then goto label_40541;
- label_40488:
- v_185 := gvar_66;
- v_184 := ISTRUE(v_185);
- v_184 := not v_184;
- v_183 := v_183 and v_184;
- label_40541:
- flag := not v_183;
- if flag then goto label_40607;
- label_40554:
- v_186 := 1;
- v_187 := WIZARDFORM();
- v_187.ENABLED := v_186;
- result := 0;
- label_40607:
- v_188 := gvar_38;
- v_188 := not v_188;
- if not v_188 then goto label_40686;
- label_40639:
- v_190 := gvar_66;
- v_189 := ISTRUE(v_190);
- v_188 := v_188 and v_189;
- label_40686:
- flag := not v_188;
- if flag then goto label_40801;
- label_40699:
- v_191 := gvar_63;
- v_191.HIDE();
- v_192 := gvar_63;
- v_192.FREE();
- FreeRichEdit();
- v_193 := 1;
- v_194 := WIZARDFORM();
- v_194.ENABLED := v_193;
- result := 1;
- label_40801:
- v_195 := gvar_38;
- v_195 := not v_195;
- if not v_195 then goto label_40886;
- label_40833:
- v_197 := gvar_66;
- v_196 := ISTRUE(v_197);
- v_196 := not v_196;
- v_195 := v_195 and v_196;
- label_40886:
- flag := not v_195;
- if flag then goto label_40977;
- label_40899:
- v_199 := '{cm:CurHashText8}';
- v_198 := EXPANDCONSTANT(v_199);
- v_200 := gvar_67;
- v_200.CAPTION := v_198;
- label_40977:
- exit;
- end;
- function NEXTBUTTONCLICK(Arg0: Integer): BOOLEAN;
- var
- v_1, v_2, v_4, v_6, v_8, v_17, v_23, v_25, v_27, v_29, v_30: BOOLEAN;
- v_3, v_5, v_7, v_12, v_13, v_18, v_19, v_24, v_26, v_28, v_33: Integer;
- v_9, v_15, v_16, v_21, v_22: UnicodeString;
- v_10: TEDIT;
- v_11, v_34: TWIZARDFORM;
- v_14, v_20: TMSGBOXTYPE;
- v_31, v_32: Cardinal;
- begin
- label_40978:
- result := 1;
- v_1 := Arg0 = 6;
- flag := not v_1;
- if flag then goto label_41637;
- label_41029:
- v_2 := 0;
- v_3 := gvar_25;
- TaskBarButtonEnabled(v_3, v_2);
- v_4 := 0;
- v_5 := gvar_26;
- TaskBarButtonEnabled(v_5, v_4);
- v_6 := 0;
- v_7 := gvar_24;
- TaskBarButtonEnabled(v_7, v_6);
- v_11 := WIZARDFORM();
- v_10 := v_11.DIREDIT;
- v_9 := v_10.TEXT;
- v_8 := ISANSI(v_9);
- v_8 := not v_8;
- flag := not v_8;
- if flag then goto label_41358;
- label_41239:
- v_13 := 0;
- v_14 := 2;
- v_16 := '{cm:ErrDir}';
- v_15 := EXPANDCONSTANT(v_16);
- v_12 := MSGBOX(v_15, v_14, v_13);
- result := 0;
- label_41358:
- v_17 := gvar_18 < 32;
- flag := not v_17;
- if flag then goto label_41517;
- label_41397:
- v_19 := 0;
- v_20 := 2;
- v_22 := '{cm:ErrSize}';
- v_21 := EXPANDCONSTANT(v_22);
- v_18 := MSGBOX(v_21, v_20, v_19);
- result := 0;
- label_41517:
- v_23 := 1;
- v_24 := gvar_25;
- TaskBarButtonEnabled(v_24, v_23);
- v_25 := 1;
- v_26 := gvar_26;
- TaskBarButtonEnabled(v_26, v_25);
- v_27 := 1;
- v_28 := gvar_24;
- TaskBarButtonEnabled(v_28, v_27);
- label_41637:
- v_29 := Arg0 = 14;
- flag := not v_29;
- if flag then goto label_41772;
- label_41676:
- v_31 := 589824;
- v_32 := 500;
- v_34 := WIZARDFORM();
- v_33 := v_34.HANDLE;
- v_30 := AnimateWindow(v_33, v_32, v_31);
- label_41772:
- exit;
- end;
- procedure DIREDITONCHANGE(Arg0: TOBJECT);
- var
- v_1, v_2, v_9, v_10, v_12, v_13, v_14, v_16, v_17, v_25, v_26, v_27, v_33, v_34, v_35: UnicodeString;
- v_3, v_28, v_36: TEDIT;
- v_4, v_29, v_37: TWIZARDFORM;
- v_5, v_8, v_19, v_23: BOOLEAN;
- v_6, v_7: Pointer;
- v_11: WideString;
- v_15: Extended;
- v_18, v_22, v_43: TLABEL;
- v_20, v_24, v_32, v_41: Integer;
- v_21, v_42: TFONT;
- v_30, v_38: TSTRINGS;
- v_31, v_39, v_40: TNEWCOMBOBOX;
- begin
- label_41773:
- v_4 := WIZARDFORM();
- v_3 := v_4.DIREDIT;
- v_2 := v_3.TEXT;
- v_1 := EXTRACTFILEDRIVE(v_2);
- v_6 := &gvar_19;
- v_7 := &gvar_18;
- v_8 := 1;
- v_9 := v_1;
- v_5 := GETSPACEONDISK(v_9, v_8, {var}v_7, {var}v_6);
- v_13 := '{cm:FreeSpace1}';
- v_12 := EXPANDCONSTANT(v_13);
- v_11 := v_12;
- v_11 := v_11 + ' ';
- v_15 := 32;
- v_14 := MBORTB(v_15);
- v_11 := v_11 + v_14;
- v_11 := v_11 + ' ';
- v_17 := '{cm:FreeSpace2}';
- v_16 := EXPANDCONSTANT(v_17);
- v_11 := v_11 + v_16;
- v_10 := v_11;
- v_18 := gvar_3;
- v_18.CAPTION := v_10;
- v_19 := gvar_18 > 32;
- v_19 := not v_19;
- flag := not v_19;
- if flag then goto label_42295;
- label_42229:
- v_20 := 1776615;
- v_22 := gvar_3;
- v_21 := v_22.FONT;
- v_21.COLOR := v_20;
- goto label_42356;
- label_42295:
- v_41 := 15130849;
- v_43 := gvar_3;
- v_42 := v_43.FONT;
- v_42.COLOR := v_41;
- label_42356:
- v_29 := WIZARDFORM();
- v_28 := v_29.DIREDIT;
- v_27 := v_28.TEXT;
- v_26 := EXTRACTFILEDRIVE(v_27);
- v_25 := ADDBACKSLASH(v_26);
- v_31 := gvar_15;
- v_30 := v_31.ITEMS;
- v_24 := v_30.INDEXOF(v_25);
- v_23 := v_24 >= 0;
- flag := not v_23;
- if flag then goto label_42703;
- label_42538:
- v_37 := WIZARDFORM();
- v_36 := v_37.DIREDIT;
- v_35 := v_36.TEXT;
- v_34 := EXTRACTFILEDRIVE(v_35);
- v_33 := ADDBACKSLASH(v_34);
- v_39 := gvar_15;
- v_38 := v_39.ITEMS;
- v_32 := v_38.INDEXOF(v_33);
- v_40 := gvar_15;
- v_40.ITEMINDEX := v_32;
- label_42703:
- exit;
- end;
- procedure PAUSEBTNCLICK(Arg0: TOBJECT);
- var
- v_1, v_2, v_8, v_11, v_21, v_23, v_29, v_32, v_42: BOOLEAN;
- v_3, v_24: TNEWPROGRESSBARSTATE;
- v_4, v_25: TNEWPROGRESSBAR;
- v_5, v_10, v_26, v_31: TWIZARDFORM;
- v_6, v_27: UnicodeString;
- v_7, v_12, v_28, v_33: TBUTTON;
- v_9, v_30: TNEWBUTTON;
- v_13, v_14, v_16, v_18, v_20, v_22, v_34, v_35, v_37, v_39, v_41, v_43: Integer;
- v_15, v_36: String;
- v_17, v_38: Cardinal;
- v_19, v_40: TNEWICON;
- begin
- label_42704:
- v_1 := gvar_32;
- v_1 := not v_1;
- flag := not v_1;
- if flag then goto label_43196;
- label_42739:
- v_2 := SuspendProc();
- v_3 := 2;
- v_5 := WIZARDFORM();
- v_4 := v_5.PROGRESSGAUGE;
- v_4.STATE := v_3;
- v_6 := 'Resume';
- v_7 := gvar_40;
- v_7.CAPTION := v_6;
- v_8 := 0;
- v_10 := WIZARDFORM();
- v_9 := v_10.CANCELBUTTON;
- v_9.ENABLED := v_8;
- v_11 := 0;
- v_12 := gvar_44;
- v_12.ENABLED := v_11;
- v_13 := 8;
- v_14 := 0;
- SetTaskBarProgressState(v_14, v_13);
- v_15 := 'Resume';
- v_16 := gvar_25;
- TaskBarButtonToolTip(v_16, v_15);
- v_19 := gvar_60[0];
- v_18 := v_19.HANDLE;
- v_17 := v_18;
- v_20 := gvar_25;
- TaskBarButtonIcon(v_20, v_17);
- v_21 := 0;
- v_22 := gvar_26;
- TaskBarButtonEnabled(v_22, v_21);
- gvar_32 := 1;
- exit;
- goto label_43646;
- label_43196:
- v_23 := ResumeProc();
- v_24 := 0;
- v_26 := WIZARDFORM();
- v_25 := v_26.PROGRESSGAUGE;
- v_25.STATE := v_24;
- v_27 := 'Pause';
- v_28 := gvar_40;
- v_28.CAPTION := v_27;
- v_29 := 1;
- v_31 := WIZARDFORM();
- v_30 := v_31.CANCELBUTTON;
- v_30.ENABLED := v_29;
- v_32 := 1;
- v_33 := gvar_44;
- v_33.ENABLED := v_32;
- v_34 := 2;
- v_35 := 0;
- SetTaskBarProgressState(v_35, v_34);
- v_36 := 'Pause';
- v_37 := gvar_25;
- TaskBarButtonToolTip(v_37, v_36);
- v_40 := gvar_60[1];
- v_39 := v_40.HANDLE;
- v_38 := v_39;
- v_41 := gvar_25;
- TaskBarButtonIcon(v_41, v_38);
- v_42 := 1;
- v_43 := gvar_26;
- TaskBarButtonEnabled(v_43, v_42);
- gvar_32 := 0;
- exit;
- exit;
- end;
- procedure AGAINONCLICK(Arg0: TOBJECT);
- var
- v_1, v_13: Integer;
- v_2, v_3, v_10, v_18: BOOLEAN;
- v_4, v_19: String;
- v_5, v_20: WideString;
- v_6, v_7, v_8, v_9, v_14, v_15, v_16, v_17, v_21, v_22: UnicodeString;
- v_11: Pointer;
- v_12: TEXECWAIT;
- v_23: TNOTIFYEVENT;
- v_24, v_27: TNEWBUTTON;
- v_25, v_28: TWIZARDFORM;
- v_26: TOBJECT;
- begin
- label_43647:
- v_3 := 1;
- v_5 := 'Start "" /b "';
- v_7 := '{src}';
- v_6 := EXPANDCONSTANT(v_7);
- v_5 := v_5 + v_6;
- v_5 := v_5 + '\Setup.exe"';
- v_4 := v_5;
- v_9 := '{userdocs}\Again.bat';
- v_8 := EXPANDCONSTANT(v_9);
- v_2 := SAVESTRINGTOFILE(v_8, v_4, v_3);
- v_11 := &v_1;
- v_12 := 1;
- v_13 := 0;
- v_14 := '';
- v_15 := '';
- v_17 := '{userdocs}\Again.bat';
- v_16 := EXPANDCONSTANT(v_17);
- v_10 := EXEC(v_16, v_15, v_14, v_13, v_12, {var}v_11);
- v_22 := '{userdocs}';
- v_21 := EXPANDCONSTANT(v_22);
- v_20 := v_21;
- v_20 := v_20 + '\Again.bat';
- v_19 := v_20;
- v_18 := DeleteFileA(v_19);
- v_25 := WIZARDFORM();
- v_24 := v_25.NEXTBUTTON;
- v_23 := v_24.ONCLICK;
- v_28 := WIZARDFORM();
- v_27 := v_28.NEXTBUTTON;
- v_26 := v_27;
- CallVar v_23;
- exit;
- end;
- procedure RUNONCLICK(Arg0: TOBJECT);
- var
- v_1, v_5: Integer;
- v_2: BOOLEAN;
- v_3: Pointer;
- v_4: TEXECWAIT;
- v_6, v_7, v_8, v_9: UnicodeString;
- v_10: TNOTIFYEVENT;
- v_11, v_14: TNEWBUTTON;
- v_12, v_15: TWIZARDFORM;
- v_13: TOBJECT;
- begin
- label_44297:
- v_3 := &v_1;
- v_4 := 0;
- v_5 := 5;
- v_6 := '';
- v_7 := '';
- v_9 := '{app}\ACS.exe';
- v_8 := EXPANDCONSTANT(v_9);
- v_2 := EXEC(v_8, v_7, v_6, v_5, v_4, {var}v_3);
- v_12 := WIZARDFORM();
- v_11 := v_12.NEXTBUTTON;
- v_10 := v_11.ONCLICK;
- v_15 := WIZARDFORM();
- v_14 := v_15.NEXTBUTTON;
- v_13 := v_14;
- CallVar v_10;
- exit;
- end;
- function UNNIN(): BOOLEAN;
- var
- v_1: BOOLEAN;
- begin
- label_44584:
- v_1 := gvar_21 <> 1;
- flag := not v_1;
- if flag then goto label_44640;
- label_44623:
- result := 0;
- goto label_44652;
- label_44640:
- result := 1;
- label_44652:
- exit;
- end;
- procedure LABELCRACKONMOUSEENTER(Arg0: TOBJECT);
- var
- v_1: BOOLEAN;
- v_2: TCHECKBOX;
- v_3: Integer;
- v_4: TFONT;
- v_5: TLABEL;
- begin
- label_44653:
- v_2 := gvar_14;
- v_1 := v_2.ENABLED;
- flag := not v_1;
- if flag then goto label_44761;
- label_44700:
- v_3 := 2981354;
- v_5 := gvar_4;
- v_4 := v_5.FONT;
- v_4.COLOR := v_3;
- label_44761:
- exit;
- end;
- procedure LABELCRACKONMOUSELEAVE(Arg0: TOBJECT);
- var
- v_1: BOOLEAN;
- v_2: TCHECKBOX;
- v_3: Integer;
- v_4: TFONT;
- v_5: TLABEL;
- begin
- label_44762:
- v_2 := gvar_14;
- v_1 := v_2.ENABLED;
- flag := not v_1;
- if flag then goto label_44870;
- label_44809:
- v_3 := 15130849;
- v_5 := gvar_4;
- v_4 := v_5.FONT;
- v_4.COLOR := v_3;
- label_44870:
- exit;
- end;
- procedure LABELCRACKONCLICK(Arg0: TOBJECT);
- var
- v_1, v_3, v_5, v_7: BOOLEAN;
- v_2, v_4, v_6, v_8: TCHECKBOX;
- begin
- label_44871:
- v_2 := gvar_14;
- v_1 := v_2.CHECKED;
- if not v_1 then goto label_44962;
- label_44915:
- v_4 := gvar_14;
- v_3 := v_4.ENABLED;
- v_1 := v_1 and v_3;
- label_44962:
- flag := not v_1;
- if flag then goto label_45020;
- label_44975:
- v_5 := 0;
- v_6 := gvar_14;
- v_6.CHECKED := v_5;
- goto label_45060;
- label_45020:
- v_7 := 1;
- v_8 := gvar_14;
- v_8.CHECKED := v_7;
- label_45060:
- exit;
- end;
- procedure NULLONCLICK(Arg0: TOBJECT);
- begin
- label_45061:
- exit;
- end;
- procedure BASS_CHANGEPOS(Arg0: Single);
- var
- v_1, v_2, v_4, v_7, v_12: BOOLEAN;
- v_3, v_5, v_6, v_9, v_14, v_15: Cardinal;
- v_8: Cardinal;
- v_10: UnicodeString;
- v_11: Extended;
- v_13: Single;
- begin
- label_45062:
- gvar_56 := Arg0;
- v_1 := gvar_56 < 0.03;
- flag := not v_1;
- if flag then goto label_45158;
- label_45118:
- v_3 := gvar_52;
- v_2 := BASS_ChannelPause(v_3);
- goto label_45398;
- label_45158:
- v_6 := gvar_52;
- v_5 := BASS_ChannelIsActive(v_6);
- v_4 := v_5 = 3;
- flag := not v_4;
- if flag then goto label_45285;
- label_45232:
- v_8 := 0;
- v_9 := gvar_52;
- v_7 := BASS_ChannelPlay(v_9, v_8);
- label_45285:
- v_11 := gvar_56;
- v_10 := FLOATTOSTR(v_11);
- LOG(v_10);
- v_13 := gvar_56;
- v_14 := 2;
- v_15 := gvar_52;
- v_12 := BASS_ChannelSetAttribute(v_15, v_14, v_13);
- label_45398:
- exit;
- end;
- procedure IMGBUTTONONMOVE(Arg0: TOBJECT; Arg1: TSHIFTSTATE; Arg2: Integer; Arg3: Integer);
- var
- v_1, v_7, v_8, v_9, v_10, v_13, v_40: BOOLEAN;
- v_2: Cardinal;
- v_3, v_4: Pointer;
- v_5: TPOINT;
- v_6: TWIZARDFORM;
- v_11, v_14, v_16, v_18, v_19, v_26, v_29, v_31, v_33, v_34, v_35, v_38: Integer;
- v_12, v_15, v_17, v_20, v_23, v_27, v_30, v_32, v_36, v_39: TBITMAPIMAGE;
- v_21, v_24: Cardinal;
- v_22, v_25: TOBJECT;
- v_28, v_37: Extended;
- v_41: Single;
- begin
- label_45399:
- v_3 := &gvar_55;
- v_2 := GetCursorPos({var}v_3);
- v_1 := v_2;
- v_1 := not v_1;
- flag := not v_1;
- if flag then goto label_45470;
- label_45469:
- exit;
- label_45470:
- v_4 := &Arg0;
- v_5 := gvar_55;
- v_6 := WIZARDFORM();
- gvar_55 := v_6.SCREENTOCLIENT(v_5);
- v_9 := gvar_31;
- if not v_9 then goto label_45643;
- label_45569:
- v_12 := gvar_49;
- v_11 := v_12.LEFT;
- v_10 := v_11 < gvar_55.0;
- v_9 := v_9 and v_10;
- label_45643:
- v_8 := v_9;
- if not v_8 then goto label_45786;
- label_45665:
- v_15 := gvar_49;
- v_14 := v_15.LEFT;
- v_17 := gvar_49;
- v_16 := v_17.WIDTH;
- v_14 := v_14 + v_16;
- v_13 := v_14 > gvar_55.0;
- v_8 := v_8 and v_13;
- label_45786:
- v_7 := v_8;
- flag := not v_7;
- if flag then goto label_45995;
- label_45811:
- v_18 := gvar_55.0;
- v_21 := 36;
- v_22 := Arg0;
- Proc256();
- v_19 := v_20.WIDTH;
- v_19 := v_19 / 2;
- v_18 := v_18 - v_19;
- v_24 := 36;
- v_25 := Arg0;
- Proc256();
- v_23.LEFT := v_18;
- label_45995:
- v_27 := gvar_49;
- v_26 := v_27.WIDTH;
- gvar_57 := v_26;
- v_30 := gvar_50;
- v_29 := v_30.LEFT;
- v_32 := gvar_50;
- v_31 := v_32.WIDTH;
- v_31 := v_31 / 4;
- v_29 := v_29 + v_31;
- v_34 := 1;
- v_33 := SCALEX(v_34);
- v_29 := v_29 + v_33;
- v_36 := gvar_49;
- v_35 := v_36.LEFT;
- v_29 := v_29 - v_35;
- v_28 := v_29;
- v_37 := gvar_57;
- v_39 := gvar_50;
- v_38 := v_39.WIDTH;
- v_38 := v_38 / 4;
- v_37 := v_37 + v_38;
- v_28 := v_28 / v_37;
- gvar_56 := v_28;
- v_40 := gvar_31;
- flag := not v_40;
- if flag then goto label_46408;
- label_46386:
- v_41 := gvar_56;
- BASS_CHANGEPOS(v_41);
- label_46408:
- exit;
- end;
- procedure BKGBUTTONONMOUSEENTER(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);
- var
- v_1, v_4, v_7: BOOLEAN;
- v_2: Cardinal;
- v_3: Pointer;
- v_5: TPOINT;
- v_6: TWIZARDFORM;
- v_8, v_10, v_12, v_15, v_18, v_20, v_22, v_23, v_24, v_27, v_30, v_32: Integer;
- v_9, v_11, v_13, v_14, v_16, v_19, v_21, v_25, v_28, v_31, v_33, v_34: TBITMAPIMAGE;
- v_17, v_26: Extended;
- v_29: Single;
- begin
- label_46410:
- v_3 := &gvar_55;
- v_2 := GetCursorPos({var}v_3);
- v_1 := v_2;
- v_1 := not v_1;
- flag := not v_1;
- if flag then goto label_46481;
- label_46480:
- exit;
- label_46481:
- v_4 := gvar_31;
- v_4 := not v_4;
- flag := not v_4;
- if flag then goto label_47298;
- label_46516:
- v_5 := gvar_55;
- v_6 := WIZARDFORM();
- gvar_55 := v_6.SCREENTOCLIENT(v_5);
- v_9 := gvar_50;
- v_8 := v_9.LEFT;
- v_7 := gvar_55.0 > v_8;
- flag := not v_7;
- if flag then goto label_46778;
- label_46637:
- v_11 := gvar_50;
- v_10 := v_11.LEFT;
- v_10 := v_10 + 3;
- v_13 := gvar_50;
- v_12 := v_13.WIDTH;
- v_12 := v_12 / 2;
- v_10 := v_10 + v_12;
- v_14 := gvar_50;
- v_14.LEFT := v_10;
- goto label_46914;
- label_46778:
- v_31 := gvar_50;
- v_30 := v_31.LEFT;
- v_30 := v_30 - 3;
- v_33 := gvar_50;
- v_32 := v_33.WIDTH;
- v_32 := v_32 / 2;
- v_30 := v_30 - v_32;
- v_34 := gvar_50;
- v_34.LEFT := v_30;
- label_46914:
- v_16 := gvar_49;
- v_15 := v_16.WIDTH;
- gvar_57 := v_15;
- v_19 := gvar_50;
- v_18 := v_19.LEFT;
- v_21 := gvar_50;
- v_20 := v_21.WIDTH;
- v_20 := v_20 / 4;
- v_18 := v_18 + v_20;
- v_23 := 1;
- v_22 := SCALEX(v_23);
- v_18 := v_18 + v_22;
- v_25 := gvar_49;
- v_24 := v_25.LEFT;
- v_18 := v_18 - v_24;
- v_17 := v_18;
- v_26 := gvar_57;
- v_28 := gvar_50;
- v_27 := v_28.WIDTH;
- v_27 := v_27 / 4;
- v_26 := v_26 + v_27;
- v_17 := v_17 / v_26;
- gvar_56 := v_17;
- v_29 := gvar_56;
- BASS_CHANGEPOS(v_29);
- label_47298:
- exit;
- end;
- procedure IMGBUTTONONMOUSEDOWN(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);
- var
- v_1: Pointer;
- v_2, v_11: TMEMORYSTREAM;
- v_3, v_8: UnicodeString;
- v_4, v_14: TBITMAPIMAGE;
- v_5, v_15: Cardinal;
- v_6, v_16: TOBJECT;
- v_7, v_12: TSTREAM;
- v_9: String;
- v_10: Integer;
- v_13: TBITMAP;
- begin
- label_47299:
- gvar_31 := 1;
- v_1 := &Arg0;
- label_47344:
- v_5 := 36;
- v_6 := Arg0;
- Proc256();
- v_3 := v_4.NAME;
- gvar_16 := v_3;
- v_7 := gvar_51;
- v_9 := gvar_16;
- v_9 := v_9 + '3.bmp';
- v_8 := v_9;
- EXTRACTTEMPORARYFILETOSTREAM(v_8, v_7);
- v_10 := 0;
- v_11 := gvar_51;
- v_11.POSITION := v_10;
- v_12 := gvar_51;
- v_15 := 36;
- v_16 := Arg0;
- Proc256();
- v_13 := v_14.BITMAP;
- v_13.LOADFROMSTREAM(v_12);
- goto label_47647;
- label_47647:
- v_2 := gvar_51;
- v_2.CLEAR();
- goto label_47671;
- label_47671:
- exit;
- end;
- procedure IMGBUTTONONMOUSEUP(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);
- var
- v_1: BOOLEAN;
- v_2: Pointer;
- v_3, v_12: TMEMORYSTREAM;
- v_4, v_9: UnicodeString;
- v_5, v_15: TBITMAPIMAGE;
- v_6, v_16: Cardinal;
- v_7, v_17: TOBJECT;
- v_8, v_13: TSTREAM;
- v_10: String;
- v_11: Integer;
- v_14: TBITMAP;
- begin
- label_47673:
- gvar_31 := 0;
- v_1 := gvar_30;
- flag := not v_1;
- if flag then goto label_48075;
- label_47714:
- v_2 := &Arg0;
- label_47747:
- v_6 := 36;
- v_7 := Arg0;
- Proc256();
- v_4 := v_5.NAME;
- gvar_16 := v_4;
- v_8 := gvar_51;
- v_10 := gvar_16;
- v_10 := v_10 + '2.bmp';
- v_9 := v_10;
- EXTRACTTEMPORARYFILETOSTREAM(v_9, v_8);
- v_11 := 0;
- v_12 := gvar_51;
- v_12.POSITION := v_11;
- v_13 := gvar_51;
- v_16 := 36;
- v_17 := Arg0;
- Proc256();
- v_14 := v_15.BITMAP;
- v_14.LOADFROMSTREAM(v_13);
- goto label_48050;
- label_48050:
- v_3 := gvar_51;
- v_3.CLEAR();
- goto label_48074;
- label_48074:
- label_48075:
- exit;
- end;
- procedure IMGBUTTONONMOUSEENTER(Arg0: TOBJECT);
- var
- v_1: Pointer;
- v_2, v_12: TMEMORYSTREAM;
- v_3, v_9, v_19: UnicodeString;
- v_4, v_15: TBITMAPIMAGE;
- v_5, v_16: Cardinal;
- v_6, v_17: TOBJECT;
- v_7: BOOLEAN;
- v_8, v_13, v_18: TSTREAM;
- v_10, v_20: String;
- v_11: Integer;
- v_14: TBITMAP;
- begin
- label_48076:
- gvar_30 := 1;
- v_1 := &Arg0;
- label_48121:
- v_5 := 36;
- v_6 := Arg0;
- Proc256();
- v_3 := v_4.NAME;
- gvar_16 := v_3;
- v_7 := gvar_31;
- flag := not v_7;
- if flag then goto label_48317;
- label_48235:
- v_8 := gvar_51;
- v_10 := gvar_16;
- v_10 := v_10 + '3.bmp';
- v_9 := v_10;
- EXTRACTTEMPORARYFILETOSTREAM(v_9, v_8);
- goto label_48394;
- label_48317:
- v_18 := gvar_51;
- v_20 := gvar_16;
- v_20 := v_20 + '2.bmp';
- v_19 := v_20;
- EXTRACTTEMPORARYFILETOSTREAM(v_19, v_18);
- label_48394:
- v_11 := 0;
- v_12 := gvar_51;
- v_12.POSITION := v_11;
- v_13 := gvar_51;
- v_16 := 36;
- v_17 := Arg0;
- Proc256();
- v_14 := v_15.BITMAP;
- v_14.LOADFROMSTREAM(v_13);
- goto label_48535;
- label_48535:
- v_2 := gvar_51;
- v_2.CLEAR();
- goto label_48559;
- label_48559:
- exit;
- end;
- procedure IMGBUTTONONMOUSELEAVE(Arg0: TOBJECT);
- var
- v_1: Pointer;
- v_2, v_11: TMEMORYSTREAM;
- v_3, v_8: UnicodeString;
- v_4, v_14: TBITMAPIMAGE;
- v_5, v_15: Cardinal;
- v_6, v_16: TOBJECT;
- v_7, v_12: TSTREAM;
- v_9: String;
- v_10: Integer;
- v_13: TBITMAP;
- begin
- label_48561:
- gvar_30 := 0;
- v_1 := &Arg0;
- label_48606:
- v_5 := 36;
- v_6 := Arg0;
- Proc256();
- v_3 := v_4.NAME;
- gvar_16 := v_3;
- v_7 := gvar_51;
- v_9 := gvar_16;
- v_9 := v_9 + '1.bmp';
- v_8 := v_9;
- EXTRACTTEMPORARYFILETOSTREAM(v_8, v_7);
- v_10 := 0;
- v_11 := gvar_51;
- v_11.POSITION := v_10;
- v_12 := gvar_51;
- v_15 := 36;
- v_16 := Arg0;
- Proc256();
- v_13 := v_14.BITMAP;
- v_13.LOADFROMSTREAM(v_12);
- goto label_48909;
- label_48909:
- v_2 := gvar_51;
- v_2.CLEAR();
- goto label_48933;
- label_48933:
- exit;
- end;
- procedure IMGBUTTON1ONCLICK(Arg0: TOBJECT);
- var
- v_1, v_4: BOOLEAN;
- v_2, v_3, v_5, v_6: Cardinal;
- v_7, v_9: Integer;
- v_8: TNEWICON;
- begin
- label_48935:
- v_3 := gvar_52;
- v_2 := BASS_ChannelIsActive(v_3);
- v_1 := v_2 = 3;
- v_1 := not v_1;
- flag := not v_1;
- if flag then goto label_49128;
- label_49015:
- v_5 := gvar_52;
- v_4 := BASS_ChannelPause(v_5);
- v_8 := gvar_60[2];
- v_7 := v_8.HANDLE;
- v_6 := v_7;
- v_9 := gvar_24;
- TaskBarButtonIcon(v_9, v_6);
- label_49128:
- exit;
- end;
- procedure IMGBUTTON2ONCLICK(Arg0: TOBJECT);
- var
- v_1, v_4, v_5: BOOLEAN;
- v_2, v_3, v_7, v_8: Cardinal;
- v_6: Cardinal;
- v_9, v_11: Integer;
- v_10: TNEWICON;
- begin
- label_49129:
- v_3 := gvar_52;
- v_2 := BASS_ChannelIsActive(v_3);
- v_1 := v_2 = 3;
- if not v_1 then goto label_49245;
- label_49200:
- v_4 := gvar_56 > 0.03;
- v_1 := v_1 and v_4;
- label_49245:
- flag := not v_1;
- if flag then goto label_49389;
- label_49258:
- v_6 := 0;
- v_7 := gvar_52;
- v_5 := BASS_ChannelPlay(v_7, v_6);
- v_10 := gvar_60[3];
- v_9 := v_10.HANDLE;
- v_8 := v_9;
- v_11 := gvar_24;
- TaskBarButtonIcon(v_11, v_8);
- label_49389:
- exit;
- end;
- procedure LOADSOUNDBUTTON();
- var
- v_1, v_44, v_81, v_112: TCOMPONENT;
- v_2, v_7, v_10, v_45, v_48, v_53, v_82, v_85, v_90, v_113, v_116, v_121: TWIZARDFORM;
- v_3, v_46, v_83, v_114, v_155, v_156, v_157, v_160, v_161, v_162, v_182, v_184, v_185, v_186, v_190, v_215: Cardinal;
- v_4, v_6, v_15, v_16, v_17, v_18, v_19, v_21, v_23, v_24, v_25, v_27, v_29, v_30, v_50, v_52, v_58, v_59, v_60, v_61, v_62, v_64, v_66, v_67, v_87, v_89, v_95, v_96, v_97, v_98, v_99, v_101, v_102, v_103, v_105, v_106, v_118, v_120, v_126, v_127, v_128, v_129, v_130, v_132, v_133, v_134, v_136, v_138, v_154, v_158, v_165, v_168, v_170, v_172, v_173, v_174, v_177, v_187, v_189, v_191, v_193, v_196, v_203, v_210, v_218: Integer;
- v_5, v_8, v_11, v_13, v_31, v_33, v_35, v_37, v_39, v_41, v_43, v_49, v_51, v_54, v_56, v_63, v_65, v_68, v_70, v_72, v_74, v_76, v_78, v_80, v_86, v_88, v_91, v_93, v_100, v_104, v_107, v_109, v_111, v_117, v_119, v_122, v_124, v_131, v_135, v_137, v_139, v_140, v_142, v_144, v_146, v_148, v_150, v_152, v_166, v_169, v_171, v_175, v_178, v_200, v_207, v_214, v_222: TBITMAPIMAGE;
- v_9, v_47, v_84, v_115: TWINCONTROL;
- v_12, v_55, v_92, v_123, v_153, v_159, v_180, v_183: BOOLEAN;
- v_14, v_57, v_94, v_125, v_197, v_204, v_211, v_219: TMEMORYSTREAM;
- v_20, v_22, v_26, v_28: TBEVEL;
- v_32, v_69, v_108, v_141, v_195, v_202, v_209, v_217: UnicodeString;
- v_34, v_36, v_42, v_71, v_73, v_79, v_143, v_145: TNOTIFYEVENT;
- v_38, v_40, v_75, v_77, v_110, v_147, v_149: TMOUSEEVENT;
- v_151: TMOUSEMOVEEVENT;
- v_163: String;
- v_164, v_181: Cardinal;
- v_167, v_176: Extended;
- v_179: Single;
- v_188, v_192: TNEWICON;
- v_194, v_198, v_201, v_205, v_208, v_212, v_216, v_220: TSTREAM;
- v_199, v_206, v_213, v_221: TBITMAP;
- begin
- label_49390:
- v_2 := WIZARDFORM();
- v_1 := v_2;
- v_3 := 36;
- gvar_48 := v_3.CREATE(v_1);
- v_4 := 0;
- v_5 := gvar_48;
- v_5.REPLACECOLOR := v_4;
- v_7 := WIZARDFORM();
- v_6 := v_7.COLOR;
- v_8 := gvar_48;
- v_8.REPLACEWITHCOLOR := v_6;
- v_10 := WIZARDFORM();
- v_9 := v_10;
- v_11 := gvar_48;
- v_11.PARENT := v_9;
- v_12 := 1;
- v_13 := gvar_48;
- v_13.STRETCH := v_12;
- label_49673:
- v_215 := 37;
- gvar_51 := v_215.CREATE();
- v_216 := gvar_51;
- v_217 := 'Pause1.bmp';
- EXTRACTTEMPORARYFILETOSTREAM(v_217, v_216);
- v_218 := 0;
- v_219 := gvar_51;
- v_219.POSITION := v_218;
- v_220 := gvar_51;
- v_222 := gvar_48;
- v_221 := v_222.BITMAP;
- v_221.LOADFROMSTREAM(v_220);
- goto label_49861;
- label_49861:
- v_14 := gvar_51;
- v_14.CLEAR();
- goto label_49885;
- label_49885:
- v_16 := 11;
- v_15 := SCALEY(v_16);
- v_18 := 11;
- v_17 := SCALEX(v_18);
- v_20 := gvar_8;
- v_19 := v_20.TOP;
- v_22 := gvar_8;
- v_21 := v_22.HEIGHT;
- v_19 := v_19 + v_21;
- v_24 := 20;
- v_23 := SCALEY(v_24);
- v_19 := v_19 - v_23;
- v_26 := gvar_8;
- v_25 := v_26.LEFT;
- v_28 := gvar_8;
- v_27 := v_28.WIDTH;
- v_25 := v_25 + v_27;
- v_30 := 16;
- v_29 := SCALEX(v_30);
- v_25 := v_25 - v_29;
- v_31 := gvar_48;
- v_31.SETBOUNDS(v_25, v_19, v_17, v_15);
- v_32 := 'Pause';
- v_33 := gvar_48;
- v_33.NAME := v_32;
- v_34 := procedure IMGBUTTONONMOUSEENTER(Arg0: TOBJECT);;
- v_35 := gvar_48;
- v_35.ONMOUSEENTER := v_34;
- v_36 := procedure IMGBUTTONONMOUSELEAVE(Arg0: TOBJECT);;
- v_37 := gvar_48;
- v_37.ONMOUSELEAVE := v_36;
- v_38 := procedure IMGBUTTONONMOUSEDOWN(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);;
- v_39 := gvar_48;
- v_39.ONMOUSEDOWN := v_38;
- v_40 := procedure IMGBUTTONONMOUSEUP(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);;
- v_41 := gvar_48;
- v_41.ONMOUSEUP := v_40;
- v_42 := procedure IMGBUTTON1ONCLICK(Arg0: TOBJECT);;
- v_43 := gvar_48;
- v_43.ONCLICK := v_42;
- v_45 := WIZARDFORM();
- v_44 := v_45;
- v_46 := 36;
- gvar_47 := v_46.CREATE(v_44);
- v_48 := WIZARDFORM();
- v_47 := v_48;
- v_49 := gvar_47;
- v_49.PARENT := v_47;
- v_50 := 0;
- v_51 := gvar_47;
- v_51.REPLACECOLOR := v_50;
- v_53 := WIZARDFORM();
- v_52 := v_53.COLOR;
- v_54 := gvar_47;
- v_54.REPLACEWITHCOLOR := v_52;
- v_55 := 1;
- v_56 := gvar_47;
- v_56.STRETCH := v_55;
- label_50797:
- v_208 := gvar_51;
- v_209 := 'Play1.bmp';
- EXTRACTTEMPORARYFILETOSTREAM(v_209, v_208);
- v_210 := 0;
- v_211 := gvar_51;
- v_211.POSITION := v_210;
- v_212 := gvar_51;
- v_214 := gvar_47;
- v_213 := v_214.BITMAP;
- v_213.LOADFROMSTREAM(v_212);
- goto label_50951;
- label_50951:
- v_57 := gvar_51;
- v_57.CLEAR();
- goto label_50975;
- label_50975:
- v_59 := 11;
- v_58 := SCALEY(v_59);
- v_61 := 11;
- v_60 := SCALEX(v_61);
- v_63 := gvar_48;
- v_62 := v_63.TOP;
- v_65 := gvar_48;
- v_64 := v_65.LEFT;
- v_67 := 13;
- v_66 := SCALEX(v_67);
- v_64 := v_64 - v_66;
- v_68 := gvar_47;
- v_68.SETBOUNDS(v_64, v_62, v_60, v_58);
- v_69 := 'Play';
- v_70 := gvar_47;
- v_70.NAME := v_69;
- v_71 := procedure IMGBUTTONONMOUSEENTER(Arg0: TOBJECT);;
- v_72 := gvar_47;
- v_72.ONMOUSEENTER := v_71;
- v_73 := procedure IMGBUTTONONMOUSELEAVE(Arg0: TOBJECT);;
- v_74 := gvar_47;
- v_74.ONMOUSELEAVE := v_73;
- v_75 := procedure IMGBUTTONONMOUSEDOWN(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);;
- v_76 := gvar_47;
- v_76.ONMOUSEDOWN := v_75;
- v_77 := procedure IMGBUTTONONMOUSEUP(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);;
- v_78 := gvar_47;
- v_78.ONMOUSEUP := v_77;
- v_79 := procedure IMGBUTTON2ONCLICK(Arg0: TOBJECT);;
- v_80 := gvar_47;
- v_80.ONCLICK := v_79;
- v_82 := WIZARDFORM();
- v_81 := v_82;
- v_83 := 36;
- gvar_49 := v_83.CREATE(v_81);
- v_85 := WIZARDFORM();
- v_84 := v_85;
- v_86 := gvar_49;
- v_86.PARENT := v_84;
- v_87 := 0;
- v_88 := gvar_49;
- v_88.REPLACECOLOR := v_87;
- v_90 := WIZARDFORM();
- v_89 := v_90.COLOR;
- v_91 := gvar_49;
- v_91.REPLACEWITHCOLOR := v_89;
- v_92 := 1;
- v_93 := gvar_49;
- v_93.STRETCH := v_92;
- label_51741:
- v_201 := gvar_51;
- v_202 := 'trackBkg.bmp';
- EXTRACTTEMPORARYFILETOSTREAM(v_202, v_201);
- v_203 := 0;
- v_204 := gvar_51;
- v_204.POSITION := v_203;
- v_205 := gvar_51;
- v_207 := gvar_49;
- v_206 := v_207.BITMAP;
- v_206.LOADFROMSTREAM(v_205);
- goto label_51898;
- label_51898:
- v_94 := gvar_51;
- v_94.CLEAR();
- goto label_51922;
- label_51922:
- v_96 := 3;
- v_95 := SCALEY(v_96);
- v_98 := 60;
- v_97 := SCALEX(v_98);
- v_100 := gvar_47;
- v_99 := v_100.TOP;
- v_102 := 4;
- v_101 := SCALEY(v_102);
- v_99 := v_99 + v_101;
- v_104 := gvar_47;
- v_103 := v_104.LEFT;
- v_106 := 65;
- v_105 := SCALEX(v_106);
- v_103 := v_103 - v_105;
- v_107 := gvar_49;
- v_107.SETBOUNDS(v_103, v_99, v_97, v_95);
- v_108 := 'trackBkg';
- v_109 := gvar_49;
- v_109.NAME := v_108;
- v_110 := procedure BKGBUTTONONMOUSEENTER(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);;
- v_111 := gvar_49;
- v_111.ONMOUSEDOWN := v_110;
- v_113 := WIZARDFORM();
- v_112 := v_113;
- v_114 := 36;
- gvar_50 := v_114.CREATE(v_112);
- v_116 := WIZARDFORM();
- v_115 := v_116;
- v_117 := gvar_50;
- v_117.PARENT := v_115;
- v_118 := 0;
- v_119 := gvar_50;
- v_119.REPLACECOLOR := v_118;
- v_121 := WIZARDFORM();
- v_120 := v_121.COLOR;
- v_122 := gvar_50;
- v_122.REPLACEWITHCOLOR := v_120;
- v_123 := 1;
- v_124 := gvar_50;
- v_124.STRETCH := v_123;
- label_52571:
- v_194 := gvar_51;
- v_195 := 'trackbtn1.bmp';
- EXTRACTTEMPORARYFILETOSTREAM(v_195, v_194);
- v_196 := 0;
- v_197 := gvar_51;
- v_197.POSITION := v_196;
- v_198 := gvar_51;
- v_200 := gvar_50;
- v_199 := v_200.BITMAP;
- v_199.LOADFROMSTREAM(v_198);
- goto label_52729;
- label_52729:
- v_125 := gvar_51;
- v_125.CLEAR();
- goto label_52753;
- label_52753:
- v_127 := 9;
- v_126 := SCALEY(v_127);
- v_129 := 8;
- v_128 := SCALEX(v_129);
- v_131 := gvar_49;
- v_130 := v_131.TOP;
- v_133 := 9;
- v_132 := SCALEY(v_133);
- v_132 := v_132 / 2;
- v_130 := v_130 - v_132;
- v_135 := gvar_49;
- v_134 := v_135.HEIGHT;
- v_134 := v_134 / 2;
- v_130 := v_130 + v_134;
- v_137 := gvar_49;
- v_136 := v_137.LEFT;
- v_139 := gvar_49;
- v_138 := v_139.WIDTH;
- v_138 := v_138 / 2;
- v_136 := v_136 + v_138;
- v_140 := gvar_50;
- v_140.SETBOUNDS(v_136, v_130, v_128, v_126);
- v_141 := 'trackbtn';
- v_142 := gvar_50;
- v_142.NAME := v_141;
- v_143 := procedure IMGBUTTONONMOUSEENTER(Arg0: TOBJECT);;
- v_144 := gvar_50;
- v_144.ONMOUSEENTER := v_143;
- v_145 := procedure IMGBUTTONONMOUSELEAVE(Arg0: TOBJECT);;
- v_146 := gvar_50;
- v_146.ONMOUSELEAVE := v_145;
- v_147 := procedure IMGBUTTONONMOUSEDOWN(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);;
- v_148 := gvar_50;
- v_148.ONMOUSEDOWN := v_147;
- v_149 := procedure IMGBUTTONONMOUSEUP(Arg0: TOBJECT; Arg1: TMOUSEBUTTON; Arg2: TSHIFTSTATE; Arg3: Integer; Arg4: Integer);;
- v_150 := gvar_50;
- v_150.ONMOUSEUP := v_149;
- v_151 := procedure IMGBUTTONONMOVE(Arg0: TOBJECT; Arg1: TSHIFTSTATE; Arg2: Integer; Arg3: Integer);;
- v_152 := gvar_50;
- v_152.ONMOUSEMOVE := v_151;
- v_154 := 0;
- v_155 := 0;
- v_156 := 0;
- v_157 := 44100;
- v_158 := -1;
- v_153 := BASS_Init(v_158, v_157, v_156, v_155, v_154);
- v_159 := BASS_Start();
- v_160 := 4;
- v_161 := 0;
- v_162 := 0;
- v_163 := 'Music.ogg';
- v_164 := 1;
- gvar_52 := BASS_STREAMCREATEFILE(v_164, v_163, v_162, v_161, v_160);
- v_166 := gvar_49;
- v_165 := v_166.WIDTH;
- gvar_57 := v_165;
- v_169 := gvar_50;
- v_168 := v_169.LEFT;
- v_171 := gvar_50;
- v_170 := v_171.WIDTH;
- v_170 := v_170 / 4;
- v_168 := v_168 + v_170;
- v_173 := 1;
- v_172 := SCALEX(v_173);
- v_168 := v_168 + v_172;
- v_175 := gvar_49;
- v_174 := v_175.LEFT;
- v_168 := v_168 - v_174;
- v_167 := v_168;
- v_176 := gvar_57;
- v_178 := gvar_50;
- v_177 := v_178.WIDTH;
- v_177 := v_177 / 4;
- v_176 := v_176 + v_177;
- v_167 := v_167 / v_176;
- gvar_56 := v_167;
- v_179 := gvar_56;
- BASS_CHANGEPOS(v_179);
- v_181 := 1;
- v_182 := gvar_52;
- v_180 := BASS_ChannelPlay(v_182, v_181);
- v_185 := gvar_52;
- v_184 := BASS_ChannelIsActive(v_185);
- v_183 := v_184 = 3;
- v_183 := not v_183;
- flag := not v_183;
- if flag then goto label_54246;
- label_54163:
- v_188 := gvar_60[3];
- v_187 := v_188.HANDLE;
- v_186 := v_187;
- v_189 := gvar_24;
- TaskBarButtonIcon(v_189, v_186);
- goto label_54324;
- label_54246:
- v_192 := gvar_60[2];
- v_191 := v_192.HANDLE;
- v_190 := v_191;
- v_193 := gvar_24;
- TaskBarButtonIcon(v_193, v_190);
- label_54324:
- exit;
- end;
- procedure DUBLEONCLICK(Arg0: TOBJECT);
- var
- v_1, v_6, v_12: TOBJECT;
- v_2: BOOLEAN;
- v_3, v_9: TNOTIFYEVENT;
- v_4, v_7, v_10, v_13: TNEWBUTTON;
- v_5, v_8, v_11, v_14: TWIZARDFORM;
- begin
- label_54325:
- v_1 := Arg0;
- v_2 := gvar_44 = v_1;
- if not v_2 then goto label_54491;
- label_54373:
- v_5 := WIZARDFORM();
- v_4 := v_5.CANCELBUTTON;
- v_3 := v_4.ONCLICK;
- v_8 := WIZARDFORM();
- v_7 := v_8.CANCELBUTTON;
- v_6 := v_7;
- CallVar v_3;
- goto label_54636;
- label_54491:
- v_2 := gvar_45 = v_1;
- if not v_2 then goto label_54636;
- label_54518:
- v_11 := WIZARDFORM();
- v_10 := v_11.NEXTBUTTON;
- v_9 := v_10.ONCLICK;
- v_14 := WIZARDFORM();
- v_13 := v_14.NEXTBUTTON;
- v_12 := v_13;
- CallVar v_9;
- goto label_54636;
- label_54636:
- exit;
- end;
- function GETBVALUE(Arg0: Cardinal): Byte;
- var
- v_1: Cardinal;
- begin
- label_54639:
- v_1 := Arg0;
- v_1 := v_1 shr 16;
- result := v_1;
- exit;
- end;
- function GETGVALUE(Arg0: Cardinal): Byte;
- var
- v_1: Cardinal;
- begin
- label_54684:
- v_1 := Arg0;
- v_1 := v_1 shr 8;
- result := v_1;
- exit;
- end;
- function GETRVALUE(Arg0: Cardinal): Byte;
- begin
- label_54729:
- result := Arg0;
- exit;
- end;
- function GETOPTIMALBKCOLOR(Arg0: Integer): Integer;
- var
- v_1, v_2, v_3: Word;
- v_4, v_6, v_8: Byte;
- v_5, v_7, v_9: Cardinal;
- v_10: BOOLEAN;
- v_11, v_12, v_13: Extended;
- begin
- label_54741:
- v_5 := Arg0;
- v_4 := GETRVALUE(v_5);
- v_1 := v_4;
- v_7 := Arg0;
- v_6 := GETGVALUE(v_7);
- v_2 := v_6;
- v_9 := Arg0;
- v_8 := GETBVALUE(v_9);
- v_3 := v_8;
- v_11 := 0.222;
- v_11 := v_11 * v_1;
- v_12 := 0.707;
- v_12 := v_12 * v_2;
- v_11 := v_11 + v_12;
- v_13 := 0.071;
- v_13 := v_13 * v_3;
- v_11 := v_11 + v_13;
- v_10 := v_11 <= 127;
- flag := not v_10;
- if flag then goto label_55094;
- label_55074:
- result := 16777215;
- goto label_55109;
- label_55094:
- result := 0;
- label_55109:
- exit;
- end;
- procedure DIRFOLDERCHANGE(Arg0: TOBJECT);
- var
- v_1, v_2: UnicodeString;
- v_3, v_11, v_17: TFOLDERTREEVIEW;
- v_4: TNEWEDIT;
- v_5, v_6, v_7, v_8, v_9, v_10, v_12, v_13, v_14, v_15, v_16: Integer;
- begin
- label_55110:
- v_3 := gvar_0;
- v_2 := v_3.DIRECTORY;
- v_1 := ADDBACKSLASH(v_2);
- v_4 := gvar_1;
- v_4.TEXT := v_1;
- v_7 := 15130849;
- v_6 := GETOPTIMALBKCOLOR(v_7);
- v_8 := 0;
- v_9 := 4381;
- v_11 := gvar_0;
- v_10 := v_11.HANDLE;
- v_5 := SENDMESSAGE(v_10, v_9, v_8, v_6);
- v_13 := 15130849;
- v_14 := 0;
- v_15 := 4382;
- v_17 := gvar_0;
- v_16 := v_17.HANDLE;
- v_12 := SENDMESSAGE(v_16, v_15, v_14, v_13);
- exit;
- end;
- procedure BACKCLICK(Arg0: TOBJECT);
- var
- v_1: BOOLEAN;
- v_2, v_3, v_7, v_8: UnicodeString;
- v_4: TEDIT;
- v_5: TWIZARDFORM;
- v_6, v_9: TFOLDERTREEVIEW;
- v_10: TNEWEDIT;
- begin
- label_55436:
- v_1 := 1;
- v_5 := WIZARDFORM();
- v_4 := v_5.DIREDIT;
- v_3 := v_4.TEXT;
- v_2 := ADDBACKSLASH(v_3);
- v_6 := gvar_0;
- v_6.CHANGEDIRECTORY(v_2, v_1);
- v_9 := gvar_0;
- v_8 := v_9.DIRECTORY;
- v_7 := ADDBACKSLASH(v_8);
- v_10 := gvar_1;
- v_10.TEXT := v_7;
- exit;
- end;
- procedure NEWCLICK(Arg0: TOBJECT);
- var
- v_1, v_4, v_5: UnicodeString;
- v_2: TSETUPMESSAGEID;
- v_3, v_6: TFOLDERTREEVIEW;
- v_7: TNEWEDIT;
- begin
- label_55624:
- v_2 := 112;
- v_1 := SETUPMESSAGE(v_2);
- v_3 := gvar_0;
- v_3.CREATENEWDIRECTORY(v_1);
- v_6 := gvar_0;
- v_5 := v_6.DIRECTORY;
- v_4 := ADDBACKSLASH(v_5);
- v_7 := gvar_1;
- v_7.TEXT := v_4;
- exit;
- end;
- procedure BROWSECLICK(Arg0: TOBJECT);
- var
- v_1, v_2, v_3, v_4, v_148, v_154, v_157, v_160, v_162, v_165, v_167, v_169, v_177, v_179, v_224, v_230, v_233, v_236, v_238, v_241, v_243, v_245, v_253, v_255, v_300, v_306, v_309, v_312, v_314, v_316, v_318, v_326, v_328, v_373, v_379, v_382, v_385, v_387, v_390, v_392, v_400, v_402: TBUTTON;
- v_5, v_87, v_90, v_92, v_95: TLABEL;
- v_6, v_7, v_8, v_9, v_10, v_11, v_12, v_13, v_14, v_15, v_108, v_110, v_112, v_114, v_118, v_120, v_122, v_126, v_127, v_129, v_131, v_133, v_141, v_143, v_147, v_173, v_175, v_183, v_184, v_186, v_188, v_190, v_194, v_196, v_198, v_202, v_203, v_205, v_207, v_209, v_217, v_219, v_223, v_249, v_251, v_259, v_260, v_262, v_264, v_266, v_270, v_272, v_274, v_278, v_279, v_281, v_283, v_285, v_293, v_295, v_299, v_322, v_324, v_332, v_333, v_335, v_337, v_339, v_343, v_345, v_347, v_351, v_352, v_354, v_356, v_358, v_366, v_368, v_372, v_396, v_398, v_406, v_407, v_409, v_411, v_413, v_417, v_419, v_421, v_425, v_426, v_428, v_430, v_432: TBEVEL;
- v_16, v_19, v_22, v_24, v_28, v_34, v_37, v_40, v_44, v_444, v_447: TSETUPFORM;
- v_17, v_18, v_20, v_21, v_35, v_38, v_47, v_48, v_49, v_50, v_51, v_52, v_53, v_54, v_62, v_63, v_64, v_65, v_66, v_67, v_68, v_69, v_79, v_80, v_81, v_82, v_83, v_84, v_85, v_86, v_93, v_98, v_99, v_100, v_101, v_102, v_104, v_105, v_106, v_107, v_117, v_119, v_121, v_123, v_124, v_125, v_138, v_139, v_140, v_142, v_144, v_145, v_146, v_155, v_158, v_166, v_172, v_174, v_176, v_178, v_180, v_181, v_182, v_193, v_195, v_197, v_199, v_200, v_201, v_214, v_215, v_216, v_218, v_220, v_221, v_222, v_231, v_234, v_242, v_248, v_250, v_252, v_254, v_256, v_257, v_258, v_269, v_271, v_273, v_275, v_276, v_277, v_290, v_291, v_292, v_294, v_296, v_297, v_298, v_307, v_310, v_321, v_323, v_325, v_327, v_329, v_330, v_331, v_342, v_344, v_346, v_348, v_349, v_350, v_363, v_364, v_365, v_367, v_369, v_370, v_371, v_380, v_383, v_395, v_397, v_399, v_401, v_403, v_404, v_405, v_416, v_418, v_420, v_422, v_423, v_424, v_446: Integer;
- v_23: TPOSITION;
- v_25: UnicodeString;
- v_26, v_29, v_71, v_88, v_149, v_163, v_225, v_239, v_301, v_315, v_374, v_388, v_434, v_435, v_439, v_440, v_448, v_449: UnicodeString;
- v_27, v_89, v_164, v_240, v_389: TSETUPMESSAGEID;
- v_30, v_33, v_36, v_39, v_94, v_150, v_153, v_156, v_159, v_226, v_229, v_232, v_235, v_302, v_305, v_308, v_311, v_375, v_378, v_381, v_384: TFONT;
- v_31, v_72, v_151, v_227, v_303, v_376, v_436, v_451: TEDIT;
- v_32, v_43, v_73, v_152, v_228, v_304, v_377, v_437, v_452: TWIZARDFORM;
- v_41, v_134, v_168, v_210, v_244, v_286, v_359, v_433, v_445: BOOLEAN;
- v_42, v_58, v_75, v_91, v_113, v_132, v_161, v_189, v_208, v_237, v_265, v_284, v_313, v_338, v_357, v_386, v_412, v_431, v_443: TWINCONTROL;
- v_45, v_60, v_77, v_96, v_115, v_136, v_170, v_191, v_212, v_246, v_267, v_288, v_319, v_340, v_361, v_393, v_414, v_454, v_457, v_460, v_463: TCOMPONENT;
- v_46, v_61, v_78, v_97, v_116, v_137, v_171, v_192, v_213, v_247, v_268, v_289, v_320, v_341, v_362, v_394, v_415, v_455, v_458, v_461, v_464: Cardinal;
- v_55, v_57, v_59, v_103, v_438, v_441: TFOLDERTREEVIEW;
- v_56, v_317, v_391: TNOTIFYEVENT;
- v_70, v_74, v_76, v_442, v_450: TNEWEDIT;
- v_109, v_128, v_185, v_204, v_261, v_280, v_334, v_353, v_408, v_427: TBEVELSHAPE;
- v_111, v_130, v_187, v_206, v_263, v_282, v_336, v_355, v_410, v_429: TBEVELSTYLE;
- v_135, v_211, v_287, v_360: Cardinal;
- v_453, v_456, v_459, v_462: TNEWBUTTON;
- begin
- label_55758:
- gvar_61 := CREATECUSTOMFORM();
- label_55862:
- v_18 := 450;
- v_17 := SCALEX(v_18);
- v_19 := gvar_61;
- v_19.CLIENTWIDTH := v_17;
- v_21 := 317;
- v_20 := SCALEY(v_21);
- v_22 := gvar_61;
- v_22.CLIENTHEIGHT := v_20;
- v_23 := 4;
- v_24 := gvar_61;
- v_24.POSITION := v_23;
- v_27 := 11;
- v_26 := SETUPMESSAGE(v_27);
- v_25 := v_26;
- v_28 := gvar_61;
- v_28.CAPTION := v_25;
- v_32 := WIZARDFORM();
- v_31 := v_32.DIREDIT;
- v_30 := v_31.FONT;
- v_29 := v_30.NAME;
- v_34 := gvar_61;
- v_33 := v_34.FONT;
- v_33.NAME := v_29;
- v_35 := 8;
- v_37 := gvar_61;
- v_36 := v_37.FONT;
- v_36.SIZE := v_35;
- v_38 := 15130849;
- v_40 := gvar_61;
- v_39 := v_40.FONT;
- v_39.COLOR := v_38;
- v_41 := 0;
- v_43 := WIZARDFORM();
- v_42 := v_43;
- v_44 := gvar_61;
- v_44.CENTERINSIDECONTROL(v_42, v_41);
- v_45 := gvar_61;
- v_46 := 28;
- gvar_0 := v_46.CREATE(v_45);
- v_48 := 261;
- v_47 := SCALEY(v_48);
- v_50 := 355;
- v_49 := SCALEX(v_50);
- v_52 := 51;
- v_51 := SCALEY(v_52);
- v_54 := 5;
- v_53 := SCALEX(v_54);
- v_55 := gvar_0;
- v_55.SETBOUNDS(v_53, v_51, v_49, v_47);
- v_56 := procedure DIRFOLDERCHANGE(Arg0: TOBJECT);;
- v_57 := gvar_0;
- v_57.ONCHANGE := v_56;
- v_58 := gvar_61;
- v_59 := gvar_0;
- v_59.PARENT := v_58;
- v_60 := gvar_61;
- v_61 := 29;
- gvar_1 := v_61.CREATE(v_60);
- v_63 := 15;
- v_62 := SCALEY(v_63);
- v_65 := 440;
- v_64 := SCALEX(v_65);
- v_67 := 25;
- v_66 := SCALEY(v_67);
- v_69 := 5;
- v_68 := SCALEX(v_69);
- v_70 := gvar_1;
- v_70.SETBOUNDS(v_68, v_66, v_64, v_62);
- v_73 := WIZARDFORM();
- v_72 := v_73.DIREDIT;
- v_71 := v_72.TEXT;
- v_74 := gvar_1;
- v_74.TEXT := v_71;
- v_75 := gvar_61;
- v_76 := gvar_1;
- v_76.PARENT := v_75;
- v_77 := gvar_61;
- v_78 := 30;
- v_5 := v_78.CREATE(v_77);
- v_80 := 20;
- v_79 := SCALEY(v_80);
- v_82 := 400;
- v_81 := SCALEX(v_82);
- v_84 := 5;
- v_83 := SCALEY(v_84);
- v_86 := 6;
- v_85 := SCALEX(v_86);
- v_87 := v_5;
- v_87.SETBOUNDS(v_85, v_83, v_81, v_79);
- v_89 := 10;
- v_88 := SETUPMESSAGE(v_89);
- v_90 := v_5;
- v_90.CAPTION := v_88;
- v_91 := gvar_61;
- v_92 := v_5;
- v_92.PARENT := v_91;
- v_93 := 15130849;
- v_95 := v_5;
- v_94 := v_95.FONT;
- v_94.COLOR := v_93;
- v_96 := gvar_61;
- v_97 := 31;
- v_6 := v_97.CREATE(v_96);
- v_99 := 5;
- v_98 := SCALEY(v_99);
- v_101 := 80;
- v_100 := SCALEX(v_101);
- v_103 := gvar_0;
- v_102 := v_103.TOP;
- v_105 := 2;
- v_104 := SCALEY(v_105);
- v_102 := v_102 - v_104;
- v_107 := 365;
- v_106 := SCALEX(v_107);
- v_108 := v_6;
- v_108.SETBOUNDS(v_106, v_102, v_100, v_98);
- v_109 := 3;
- v_110 := v_6;
- v_110.SHAPE := v_109;
- v_111 := 1;
- v_112 := v_6;
- v_112.STYLE := v_111;
- v_113 := gvar_61;
- v_114 := v_6;
- v_114.PARENT := v_113;
- v_115 := gvar_61;
- v_116 := 31;
- v_7 := v_116.CREATE(v_115);
- v_118 := v_6;
- v_117 := v_118.HEIGHT;
- v_120 := v_6;
- v_119 := v_120.WIDTH;
- v_122 := v_6;
- v_121 := v_122.TOP;
- v_124 := 10;
- v_123 := SCALEY(v_124);
- v_121 := v_121 + v_123;
- v_126 := v_6;
- v_125 := v_126.LEFT;
- v_127 := v_7;
- v_127.SETBOUNDS(v_125, v_121, v_119, v_117);
- v_128 := 3;
- v_129 := v_7;
- v_129.SHAPE := v_128;
- v_130 := 1;
- v_131 := v_7;
- v_131.STYLE := v_130;
- v_132 := gvar_61;
- v_133 := v_7;
- v_133.PARENT := v_132;
- v_135 := IsThemeActive();
- v_134 := v_135;
- flag := not v_134;
- if flag then goto label_58325;
- label_58270:
- v_136 := gvar_61;
- v_137 := 35;
- v_1 := v_137.CREATE(v_136);
- goto label_58392;
- label_58325:
- v_463 := gvar_61;
- v_464 := 59;
- v_462 := v_464.CREATE(v_463);
- v_1 := v_462;
- label_58392:
- v_139 := 25;
- v_138 := SCALEY(v_139);
- v_141 := v_6;
- v_140 := v_141.WIDTH;
- v_143 := v_7;
- v_142 := v_143.TOP;
- v_145 := 17;
- v_144 := SCALEY(v_145);
- v_142 := v_142 + v_144;
- v_147 := v_6;
- v_146 := v_147.LEFT;
- v_148 := v_1;
- v_148.SETBOUNDS(v_146, v_142, v_140, v_138);
- v_152 := WIZARDFORM();
- v_151 := v_152.DIREDIT;
- v_150 := v_151.FONT;
- v_149 := v_150.NAME;
- v_154 := v_1;
- v_153 := v_154.FONT;
- v_153.NAME := v_149;
- v_155 := 8;
- v_157 := v_1;
- v_156 := v_157.FONT;
- v_156.SIZE := v_155;
- v_158 := 0;
- v_160 := v_1;
- v_159 := v_160.FONT;
- v_159.COLOR := v_158;
- v_161 := gvar_61;
- v_162 := v_1;
- v_162.PARENT := v_161;
- v_164 := 21;
- v_163 := SETUPMESSAGE(v_164);
- v_165 := v_1;
- v_165.CAPTION := v_163;
- v_166 := 1;
- v_167 := v_1;
- v_167.MODALRESULT := v_166;
- v_168 := 1;
- v_169 := v_1;
- v_169.DEFAULT := v_168;
- v_170 := gvar_61;
- v_171 := 31;
- v_8 := v_171.CREATE(v_170);
- v_173 := v_6;
- v_172 := v_173.HEIGHT;
- v_175 := v_6;
- v_174 := v_175.WIDTH;
- v_177 := v_1;
- v_176 := v_177.TOP;
- v_179 := v_1;
- v_178 := v_179.HEIGHT;
- v_176 := v_176 + v_178;
- v_181 := 10;
- v_180 := SCALEY(v_181);
- v_176 := v_176 + v_180;
- v_183 := v_6;
- v_182 := v_183.LEFT;
- v_184 := v_8;
- v_184.SETBOUNDS(v_182, v_176, v_174, v_172);
- v_185 := 3;
- v_186 := v_8;
- v_186.SHAPE := v_185;
- v_187 := 1;
- v_188 := v_8;
- v_188.STYLE := v_187;
- v_189 := gvar_61;
- v_190 := v_8;
- v_190.PARENT := v_189;
- v_191 := gvar_61;
- v_192 := 31;
- v_9 := v_192.CREATE(v_191);
- v_194 := v_6;
- v_193 := v_194.HEIGHT;
- v_196 := v_6;
- v_195 := v_196.WIDTH;
- v_198 := v_8;
- v_197 := v_198.TOP;
- v_200 := 10;
- v_199 := SCALEY(v_200);
- v_197 := v_197 + v_199;
- v_202 := v_8;
- v_201 := v_202.LEFT;
- v_203 := v_9;
- v_203.SETBOUNDS(v_201, v_197, v_195, v_193);
- v_204 := 3;
- v_205 := v_9;
- v_205.SHAPE := v_204;
- v_206 := 1;
- v_207 := v_9;
- v_207.STYLE := v_206;
- v_208 := gvar_61;
- v_209 := v_9;
- v_209.PARENT := v_208;
- v_211 := IsThemeActive();
- v_210 := v_211;
- flag := not v_210;
- if flag then goto label_59936;
- label_59881:
- v_212 := gvar_61;
- v_213 := 35;
- v_2 := v_213.CREATE(v_212);
- goto label_60003;
- label_59936:
- v_460 := gvar_61;
- v_461 := 59;
- v_459 := v_461.CREATE(v_460);
- v_2 := v_459;
- label_60003:
- v_215 := 25;
- v_214 := SCALEY(v_215);
- v_217 := v_6;
- v_216 := v_217.WIDTH;
- v_219 := v_9;
- v_218 := v_219.TOP;
- v_221 := 17;
- v_220 := SCALEY(v_221);
- v_218 := v_218 + v_220;
- v_223 := v_6;
- v_222 := v_223.LEFT;
- v_224 := v_2;
- v_224.SETBOUNDS(v_222, v_218, v_216, v_214);
- v_228 := WIZARDFORM();
- v_227 := v_228.DIREDIT;
- v_226 := v_227.FONT;
- v_225 := v_226.NAME;
- v_230 := v_2;
- v_229 := v_230.FONT;
- v_229.NAME := v_225;
- v_231 := 8;
- v_233 := v_2;
- v_232 := v_233.FONT;
- v_232.SIZE := v_231;
- v_234 := 0;
- v_236 := v_2;
- v_235 := v_236.FONT;
- v_235.COLOR := v_234;
- v_237 := gvar_61;
- v_238 := v_2;
- v_238.PARENT := v_237;
- v_240 := 14;
- v_239 := SETUPMESSAGE(v_240);
- v_241 := v_2;
- v_241.CAPTION := v_239;
- v_242 := 2;
- v_243 := v_2;
- v_243.MODALRESULT := v_242;
- v_244 := 1;
- v_245 := v_2;
- v_245.CANCEL := v_244;
- v_246 := gvar_61;
- v_247 := 31;
- v_10 := v_247.CREATE(v_246);
- v_249 := v_6;
- v_248 := v_249.HEIGHT;
- v_251 := v_6;
- v_250 := v_251.WIDTH;
- v_253 := v_2;
- v_252 := v_253.TOP;
- v_255 := v_2;
- v_254 := v_255.HEIGHT;
- v_252 := v_252 + v_254;
- v_257 := 10;
- v_256 := SCALEY(v_257);
- v_252 := v_252 + v_256;
- v_259 := v_6;
- v_258 := v_259.LEFT;
- v_260 := v_10;
- v_260.SETBOUNDS(v_258, v_252, v_250, v_248);
- v_261 := 3;
- v_262 := v_10;
- v_262.SHAPE := v_261;
- v_263 := 1;
- v_264 := v_10;
- v_264.STYLE := v_263;
- v_265 := gvar_61;
- v_266 := v_10;
- v_266.PARENT := v_265;
- v_267 := gvar_61;
- v_268 := 31;
- v_11 := v_268.CREATE(v_267);
- v_270 := v_6;
- v_269 := v_270.HEIGHT;
- v_272 := v_6;
- v_271 := v_272.WIDTH;
- v_274 := v_10;
- v_273 := v_274.TOP;
- v_276 := 10;
- v_275 := SCALEY(v_276);
- v_273 := v_273 + v_275;
- v_278 := v_8;
- v_277 := v_278.LEFT;
- v_279 := v_11;
- v_279.SETBOUNDS(v_277, v_273, v_271, v_269);
- v_280 := 3;
- v_281 := v_11;
- v_281.SHAPE := v_280;
- v_282 := 1;
- v_283 := v_11;
- v_283.STYLE := v_282;
- v_284 := gvar_61;
- v_285 := v_11;
- v_285.PARENT := v_284;
- v_287 := IsThemeActive();
- v_286 := v_287;
- flag := not v_286;
- if flag then goto label_61547;
- label_61492:
- v_288 := gvar_61;
- v_289 := 35;
- v_3 := v_289.CREATE(v_288);
- goto label_61614;
- label_61547:
- v_457 := gvar_61;
- v_458 := 59;
- v_456 := v_458.CREATE(v_457);
- v_3 := v_456;
- label_61614:
- v_291 := 25;
- v_290 := SCALEY(v_291);
- v_293 := v_6;
- v_292 := v_293.WIDTH;
- v_295 := v_11;
- v_294 := v_295.TOP;
- v_297 := 17;
- v_296 := SCALEY(v_297);
- v_294 := v_294 + v_296;
- v_299 := v_6;
- v_298 := v_299.LEFT;
- v_300 := v_3;
- v_300.SETBOUNDS(v_298, v_294, v_292, v_290);
- v_304 := WIZARDFORM();
- v_303 := v_304.DIREDIT;
- v_302 := v_303.FONT;
- v_301 := v_302.NAME;
- v_306 := v_3;
- v_305 := v_306.FONT;
- v_305.NAME := v_301;
- v_307 := 8;
- v_309 := v_3;
- v_308 := v_309.FONT;
- v_308.SIZE := v_307;
- v_310 := 0;
- v_312 := v_3;
- v_311 := v_312.FONT;
- v_311.COLOR := v_310;
- v_313 := gvar_61;
- v_314 := v_3;
- v_314.PARENT := v_313;
- v_315 := 'Default';
- v_316 := v_3;
- v_316.CAPTION := v_315;
- v_317 := procedure BACKCLICK(Arg0: TOBJECT);;
- v_318 := v_3;
- v_318.ONCLICK := v_317;
- v_319 := gvar_61;
- v_320 := 31;
- v_12 := v_320.CREATE(v_319);
- v_322 := v_6;
- v_321 := v_322.HEIGHT;
- v_324 := v_6;
- v_323 := v_324.WIDTH;
- v_326 := v_3;
- v_325 := v_326.TOP;
- v_328 := v_3;
- v_327 := v_328.HEIGHT;
- v_325 := v_325 + v_327;
- v_330 := 10;
- v_329 := SCALEY(v_330);
- v_325 := v_325 + v_329;
- v_332 := v_6;
- v_331 := v_332.LEFT;
- v_333 := v_12;
- v_333.SETBOUNDS(v_331, v_325, v_323, v_321);
- v_334 := 3;
- v_335 := v_12;
- v_335.SHAPE := v_334;
- v_336 := 1;
- v_337 := v_12;
- v_337.STYLE := v_336;
- v_338 := gvar_61;
- v_339 := v_12;
- v_339.PARENT := v_338;
- v_340 := gvar_61;
- v_341 := 31;
- v_13 := v_341.CREATE(v_340);
- v_343 := v_6;
- v_342 := v_343.HEIGHT;
- v_345 := v_6;
- v_344 := v_345.WIDTH;
- v_347 := v_12;
- v_346 := v_347.TOP;
- v_349 := 10;
- v_348 := SCALEY(v_349);
- v_346 := v_346 + v_348;
- v_351 := v_8;
- v_350 := v_351.LEFT;
- v_352 := v_13;
- v_352.SETBOUNDS(v_350, v_346, v_344, v_342);
- v_353 := 3;
- v_354 := v_13;
- v_354.SHAPE := v_353;
- v_355 := 1;
- v_356 := v_13;
- v_356.STYLE := v_355;
- v_357 := gvar_61;
- v_358 := v_13;
- v_358.PARENT := v_357;
- v_360 := IsThemeActive();
- v_359 := v_360;
- flag := not v_359;
- if flag then goto label_63110;
- label_63055:
- v_361 := gvar_61;
- v_362 := 35;
- v_4 := v_362.CREATE(v_361);
- goto label_63177;
- label_63110:
- v_454 := gvar_61;
- v_455 := 59;
- v_453 := v_455.CREATE(v_454);
- v_4 := v_453;
- label_63177:
- v_364 := 25;
- v_363 := SCALEY(v_364);
- v_366 := v_6;
- v_365 := v_366.WIDTH;
- v_368 := v_13;
- v_367 := v_368.TOP;
- v_370 := 17;
- v_369 := SCALEY(v_370);
- v_367 := v_367 + v_369;
- v_372 := v_6;
- v_371 := v_372.LEFT;
- v_373 := v_4;
- v_373.SETBOUNDS(v_371, v_367, v_365, v_363);
- v_377 := WIZARDFORM();
- v_376 := v_377.DIREDIT;
- v_375 := v_376.FONT;
- v_374 := v_375.NAME;
- v_379 := v_4;
- v_378 := v_379.FONT;
- v_378.NAME := v_374;
- v_380 := 8;
- v_382 := v_4;
- v_381 := v_382.FONT;
- v_381.SIZE := v_380;
- v_383 := 0;
- v_385 := v_4;
- v_384 := v_385.FONT;
- v_384.COLOR := v_383;
- v_386 := gvar_61;
- v_387 := v_4;
- v_387.PARENT := v_386;
- v_389 := 112;
- v_388 := SETUPMESSAGE(v_389);
- v_390 := v_4;
- v_390.CAPTION := v_388;
- v_391 := procedure NEWCLICK(Arg0: TOBJECT);;
- v_392 := v_4;
- v_392.ONCLICK := v_391;
- v_393 := gvar_61;
- v_394 := 31;
- v_14 := v_394.CREATE(v_393);
- v_396 := v_6;
- v_395 := v_396.HEIGHT;
- v_398 := v_6;
- v_397 := v_398.WIDTH;
- v_400 := v_4;
- v_399 := v_400.TOP;
- v_402 := v_4;
- v_401 := v_402.HEIGHT;
- v_399 := v_399 + v_401;
- v_404 := 10;
- v_403 := SCALEY(v_404);
- v_399 := v_399 + v_403;
- v_406 := v_6;
- v_405 := v_406.LEFT;
- v_407 := v_14;
- v_407.SETBOUNDS(v_405, v_399, v_397, v_395);
- v_408 := 3;
- v_409 := v_14;
- v_409.SHAPE := v_408;
- v_410 := 1;
- v_411 := v_14;
- v_411.STYLE := v_410;
- v_412 := gvar_61;
- v_413 := v_14;
- v_413.PARENT := v_412;
- v_414 := gvar_61;
- v_415 := 31;
- v_15 := v_415.CREATE(v_414);
- v_417 := v_6;
- v_416 := v_417.HEIGHT;
- v_419 := v_6;
- v_418 := v_419.WIDTH;
- v_421 := v_14;
- v_420 := v_421.TOP;
- v_423 := 10;
- v_422 := SCALEY(v_423);
- v_420 := v_420 + v_422;
- v_425 := v_8;
- v_424 := v_425.LEFT;
- v_426 := v_15;
- v_426.SETBOUNDS(v_424, v_420, v_418, v_416);
- v_427 := 3;
- v_428 := v_15;
- v_428.SHAPE := v_427;
- v_429 := 1;
- v_430 := v_15;
- v_430.STYLE := v_429;
- v_431 := gvar_61;
- v_432 := v_15;
- v_432.PARENT := v_431;
- v_433 := 1;
- v_437 := WIZARDFORM();
- v_436 := v_437.DIREDIT;
- v_435 := v_436.TEXT;
- v_434 := ADDBACKSLASH(v_435);
- v_438 := gvar_0;
- v_438.CHANGEDIRECTORY(v_434, v_433);
- v_441 := gvar_0;
- v_440 := v_441.DIRECTORY;
- v_439 := ADDBACKSLASH(v_440);
- v_442 := gvar_1;
- v_442.TEXT := v_439;
- v_443 := gvar_0;
- v_444 := gvar_61;
- v_444.ACTIVECONTROL := v_443;
- v_447 := gvar_61;
- v_446 := v_447.SHOWMODAL();
- v_445 := v_446 = 1;
- flag := not v_445;
- if flag then goto label_64973;
- label_64879:
- v_450 := gvar_1;
- v_449 := v_450.TEXT;
- v_448 := ADDBACKSLASH(v_449);
- v_452 := WIZARDFORM();
- v_451 := v_452.DIREDIT;
- v_451.TEXT := v_448;
- label_64973:
- goto label_64975;
- label_64975:
- v_16 := gvar_61;
- v_16.FREE();
- goto label_64999;
- label_64999:
- exit;
- end;
- function MD5PROGRESS(Arg0: Cardinal): BOOLEAN;
- var
- v_1: Integer;
- v_2: TNEWPROGRESSBAR;
- v_3: TAPPLICATION;
- v_4: BOOLEAN;
- begin
- label_65000:
- v_1 := Arg0;
- v_2 := gvar_64;
- v_2.POSITION := v_1;
- v_3 := APPLICATION();
- v_3.PROCESSMESSAGES();
- v_4 := gvar_35;
- flag := not v_4;
- if flag then goto label_65108;
- label_65091:
- result := 0;
- goto label_65120;
- label_65108:
- result := 1;
- label_65120:
- exit;
- end;
- procedure MD5FORMCLOSE(Arg0: TOBJECT; var Arg1: BOOLEAN);
- begin
- label_65121:
- Arg1 := 0;
- gvar_35 := 1;
- exit;
- end;
- procedure SKIPCLICK(Arg0: TOBJECT);
- var
- v_1, v_2, v_3, v_4, v_5: Integer;
- v_6: TSETUPFORM;
- begin
- label_65146:
- v_2 := 0;
- v_3 := 0;
- v_4 := 16;
- v_6 := gvar_62;
- v_5 := v_6.HANDLE;
- v_1 := SENDMESSAGE(v_5, v_4, v_3, v_2);
- exit;
- end;
- function HASHSUMPACKED(Arg0: UnicodeString; Arg1: UnicodeString): BOOLEAN;
- var
- v_1, v_106, v_111, v_114, v_116, v_119, v_121: TBUTTON;
- v_2, v_38, v_40, v_49, v_51, v_53, v_56, v_59, v_62, v_65, v_68, v_109: TLABEL;
- v_3, v_17, v_18, v_22, v_23, v_25, v_26, v_41, v_42, v_43, v_44, v_45, v_46, v_47, v_48, v_54, v_63, v_71, v_73, v_75, v_77, v_78, v_79, v_80, v_81, v_82, v_83, v_84, v_92, v_93, v_94, v_95, v_96, v_98, v_99, v_100, v_102, v_104, v_105, v_112, v_139, v_140, v_150, v_151: Integer;
- v_4, v_9, v_15, v_16, v_39, v_50, v_52, v_88, v_129, v_130, v_133, v_136, v_138, v_149: BOOLEAN;
- v_5, v_7, v_8, v_11, v_13, v_14, v_20, v_21, v_29, v_30, v_57, v_66, v_67, v_107, v_117, v_118, v_127, v_128, v_142, v_143, v_153, v_154: UnicodeString;
- v_6, v_12, v_126: WideString;
- v_10: Pointer;
- v_19, v_141, v_152: TMSGBOXTYPE;
- v_24, v_27, v_31, v_33, v_34, v_122, v_131, v_132, v_134, v_135, v_137, v_144, v_145: TSETUPFORM;
- v_28: UnicodeString;
- v_32: TCLOSEQUERYEVENT;
- v_35, v_69, v_90, v_147: TCOMPONENT;
- v_36, v_70, v_91, v_148: Cardinal;
- v_37, v_86, v_115: TWINCONTROL;
- v_55, v_58, v_61, v_64, v_108, v_110, v_113: TFONT;
- v_60: TFONTSTYLES;
- v_72, v_74, v_76, v_85, v_87, v_97, v_101, v_103: TNEWPROGRESSBAR;
- v_89: Cardinal;
- v_120: TNOTIFYEVENT;
- v_123: ProcPtr51;
- v_124, v_125: String;
- v_146: TNEWBUTTON;
- begin
- label_65263:
- result := 0;
- v_8 := '{src}\';
- v_7 := EXPANDCONSTANT(v_8);
- v_6 := v_7;
- v_6 := v_6 + Arg0;
- v_5 := v_6;
- v_4 := FILEEXISTS(v_5);
- if not v_4 then goto label_65546;
- label_65408:
- v_10 := &v_3;
- v_14 := '{src}\';
- v_13 := EXPANDCONSTANT(v_14);
- v_12 := v_13;
- v_12 := v_12 + Arg0;
- v_11 := v_12;
- v_9 := FILESIZE(v_11, {var}v_10);
- v_4 := v_4 and v_9;
- label_65546:
- flag := not v_4;
- if flag then goto label_68658;
- label_65559:
- v_15 := v_3 = 0;
- flag := not v_15;
- if flag then goto label_65765;
- label_65598:
- v_18 := 4;
- v_19 := 3;
- v_21 := '{cm:MD5text6}';
- v_20 := EXPANDCONSTANT(v_21);
- v_17 := MSGBOX(v_20, v_19, v_18);
- v_16 := v_17 = 6;
- flag := not v_16;
- if flag then goto label_65764;
- label_65746:
- result := 1;
- exit;
- goto label_65765;
- label_65764:
- exit;
- label_65765:
- gvar_62 := CREATECUSTOMFORM();
- v_23 := 360;
- v_22 := SCALEX(v_23);
- v_24 := gvar_62;
- v_24.CLIENTWIDTH := v_22;
- v_26 := 45;
- v_25 := SCALEY(v_26);
- v_27 := gvar_62;
- v_27.CLIENTHEIGHT := v_25;
- v_30 := '{cm:MD5text1}';
- v_29 := EXPANDCONSTANT(v_30);
- v_28 := v_29;
- v_31 := gvar_62;
- v_31.CAPTION := v_28;
- v_32 := procedure MD5FORMCLOSE(Arg0: TOBJECT; var Arg1: BOOLEAN);;
- v_33 := gvar_62;
- v_33.ONCLOSEQUERY := v_32;
- v_34 := gvar_62;
- v_34.CENTER();
- v_35 := gvar_62;
- v_36 := 30;
- v_2 := v_36.CREATE(v_35);
- v_37 := gvar_62;
- v_38 := v_2;
- v_38.PARENT := v_37;
- v_39 := 0;
- v_40 := v_2;
- v_40.AUTOSIZE := v_39;
- v_42 := 18;
- v_41 := SCALEY(v_42);
- v_44 := 350;
- v_43 := SCALEX(v_44);
- v_46 := 4;
- v_45 := SCALEY(v_46);
- v_48 := 4;
- v_47 := SCALEX(v_48);
- v_49 := v_2;
- v_49.SETBOUNDS(v_47, v_45, v_43, v_41);
- v_50 := 1;
- v_51 := v_2;
- v_51.TRANSPARENT := v_50;
- v_52 := 1;
- v_53 := v_2;
- v_53.WORDWRAP := v_52;
- v_54 := 15130849;
- v_56 := v_2;
- v_55 := v_56.FONT;
- v_55.COLOR := v_54;
- v_57 := 'Arial';
- v_59 := v_2;
- v_58 := v_59.FONT;
- v_58.NAME := v_57;
- v_60 := [1];
- v_62 := v_2;
- v_61 := v_62.FONT;
- v_61.STYLE := v_60;
- v_63 := 8;
- v_65 := v_2;
- v_64 := v_65.FONT;
- v_64.SIZE := v_63;
- v_67 := '{cm:MD5text2}';
- v_66 := EXPANDCONSTANT(v_67);
- v_68 := v_2;
- v_68.CAPTION := v_66;
- v_69 := gvar_62;
- v_70 := 43;
- gvar_64 := v_70.CREATE(v_69);
- v_71 := 0;
- v_72 := gvar_64;
- v_72.POSITION := v_71;
- v_73 := 1000;
- v_74 := gvar_64;
- v_74.MAX := v_73;
- v_75 := 0;
- v_76 := gvar_64;
- v_76.MIN := v_75;
- v_78 := 18;
- v_77 := SCALEY(v_78);
- v_80 := 270;
- v_79 := SCALEX(v_80);
- v_82 := 25;
- v_81 := SCALEY(v_82);
- v_84 := 5;
- v_83 := SCALEX(v_84);
- v_85 := gvar_64;
- v_85.SETBOUNDS(v_83, v_81, v_79, v_77);
- v_86 := gvar_62;
- v_87 := gvar_64;
- v_87.PARENT := v_86;
- v_89 := IsThemeActive();
- v_88 := v_89;
- flag := not v_88;
- if flag then goto label_67260;
- label_67205:
- v_90 := gvar_62;
- v_91 := 35;
- v_1 := v_91.CREATE(v_90);
- goto label_67327;
- label_67260:
- v_147 := gvar_62;
- v_148 := 59;
- v_146 := v_148.CREATE(v_147);
- v_1 := v_146;
- label_67327:
- v_93 := 22;
- v_92 := SCALEY(v_93);
- v_95 := 80;
- v_94 := SCALEX(v_95);
- v_97 := gvar_64;
- v_96 := v_97.TOP;
- v_99 := 2;
- v_98 := SCALEY(v_99);
- v_96 := v_96 - v_98;
- v_101 := gvar_64;
- v_100 := v_101.LEFT;
- v_103 := gvar_64;
- v_102 := v_103.WIDTH;
- v_100 := v_100 + v_102;
- v_105 := 5;
- v_104 := SCALEX(v_105);
- v_100 := v_100 + v_104;
- v_106 := v_1;
- v_106.SETBOUNDS(v_100, v_96, v_94, v_92);
- v_109 := v_2;
- v_108 := v_109.FONT;
- v_107 := v_108.NAME;
- v_111 := v_1;
- v_110 := v_111.FONT;
- v_110.NAME := v_107;
- v_112 := 8;
- v_114 := v_1;
- v_113 := v_114.FONT;
- v_113.SIZE := v_112;
- v_115 := gvar_62;
- v_116 := v_1;
- v_116.PARENT := v_115;
- v_118 := '{cm:MD5text5}';
- v_117 := EXPANDCONSTANT(v_118);
- v_119 := v_1;
- v_119.CAPTION := v_117;
- v_120 := procedure SKIPCLICK(Arg0: TOBJECT);;
- v_121 := v_1;
- v_121.ONCLICK := v_120;
- v_122 := gvar_62;
- v_122.SHOW();
- v_123 := function MD5PROGRESS(Arg0: Cardinal): BOOLEAN;;
- v_124 := Arg1;
- v_128 := '{src}\';
- v_127 := EXPANDCONSTANT(v_128);
- v_126 := v_127;
- v_126 := v_126 + Arg0;
- v_125 := v_126;
- gvar_36 := CheckMD5(v_125, v_124, v_123);
- gvar_36 := not gvar_36;
- v_129 := gvar_35;
- v_129 := not v_129;
- if not v_129 then goto label_68192;
- label_68157:
- v_130 := gvar_36;
- v_130 := not v_130;
- v_129 := v_129 and v_130;
- label_68192:
- flag := not v_129;
- if flag then goto label_68262;
- label_68205:
- result := 1;
- v_131 := gvar_62;
- v_131.HIDE();
- v_132 := gvar_62;
- v_132.FREE();
- exit;
- label_68262:
- v_133 := gvar_35;
- if not v_133 then goto label_68300;
- label_68288:
- v_133 := v_133 and gvar_36;
- label_68300:
- flag := not v_133;
- if flag then goto label_68370;
- label_68313:
- result := 1;
- v_134 := gvar_62;
- v_134.HIDE();
- v_135 := gvar_62;
- v_135.FREE();
- exit;
- label_68370:
- v_136 := gvar_35;
- v_136 := not v_136;
- if not v_136 then goto label_68414;
- label_68402:
- v_136 := v_136 and gvar_36;
- label_68414:
- flag := not v_136;
- if flag then goto label_68653;
- label_68427:
- v_137 := gvar_62;
- v_137.HIDE();
- v_140 := 4;
- v_141 := 3;
- v_143 := '{cm:MD5text3}';
- v_142 := EXPANDCONSTANT(v_143);
- v_139 := MSGBOX(v_142, v_141, v_140);
- v_138 := v_139 = 6;
- flag := not v_138;
- if flag then goto label_68653;
- label_68597:
- v_144 := gvar_62;
- v_144.HIDE();
- v_145 := gvar_62;
- v_145.FREE();
- result := 1;
- label_68653:
- goto label_68818;
- label_68658:
- v_151 := 4;
- v_152 := 3;
- v_154 := '{cm:MD5text4}';
- v_153 := EXPANDCONSTANT(v_154);
- v_150 := MSGBOX(v_153, v_152, v_151);
- v_149 := v_150 = 6;
- flag := not v_149;
- if flag then goto label_68818;
- label_68806:
- result := 1;
- label_68818:
- exit;
- end;
- procedure STYLESTREAMCREATE(Arg0: UnicodeString);
- var
- v_1: Cardinal;
- v_2: String;
- v_3, v_8, v_9: UnicodeString;
- v_4, v_6: Integer;
- v_5, v_7: Pointer;
- begin
- label_68819:
- v_3 := Arg0;
- v_1 := EXTRACTTEMPORARYFILESIZE(v_3);
- v_4 := v_1;
- v_5 := &v_2;
- SETLENGTH({var}v_5, v_4);
- v_7 := &v_2;
- v_6 := CASTANSISTRINGTOINTEGER({var}v_7);
- v_8 := Arg0;
- EXTRACTTEMPORARYFILETOBUFFER(v_8, v_6);
- v_9 := v_2;
- LoadFromStreamVCLStyleW(v_9);
- exit;
- end;
- function INITIALIZESETUP(): BOOLEAN;
- var
- v_1, v_33, v_36: Cardinal;
- v_2, v_4, v_5, v_6, v_8, v_9, v_10, v_12, v_13, v_14, v_16, v_17, v_18, v_20, v_21, v_22, v_24, v_25, v_26, v_28, v_29, v_30, v_34, v_37, v_38: UnicodeString;
- v_3: WideString;
- v_7, v_11, v_15, v_19, v_23, v_27, v_35: BOOLEAN;
- v_31: String;
- v_32: Integer;
- begin
- label_68977:
- gvar_29 := 0;
- v_6 := '{src}';
- v_5 := EXPANDCONSTANT(v_6);
- v_4 := EXTRACTFILEPATH(v_5);
- v_3 := v_4;
- v_3 := v_3 + 'CODEX';
- v_2 := v_3;
- gvar_34 := DIREXISTS(v_2);
- v_9 := '{tmp}\ISDone.dll';
- v_8 := EXPANDCONSTANT(v_9);
- v_7 := FILEEXISTS(v_8);
- v_7 := not v_7;
- flag := not v_7;
- if flag then goto label_69250;
- label_69214:
- v_10 := 'ISDone.dll';
- EXTRACTTEMPORARYFILE(v_10);
- label_69250:
- v_13 := '{tmp}\VclStylesinno.dll';
- v_12 := EXPANDCONSTANT(v_13);
- v_11 := FILEEXISTS(v_12);
- v_11 := not v_11;
- flag := not v_11;
- if flag then goto label_69391;
- label_69348:
- v_14 := 'VclStylesinno.dll';
- EXTRACTTEMPORARYFILE(v_14);
- label_69391:
- v_17 := '{tmp}\BASS.dll';
- v_16 := EXPANDCONSTANT(v_17);
- v_15 := FILEEXISTS(v_16);
- v_15 := not v_15;
- flag := not v_15;
- if flag then goto label_69514;
- label_69480:
- v_18 := 'BASS.dll';
- EXTRACTTEMPORARYFILE(v_18);
- label_69514:
- v_21 := '{tmp}\bp.dll';
- v_20 := EXPANDCONSTANT(v_21);
- v_19 := FILEEXISTS(v_20);
- v_19 := not v_19;
- flag := not v_19;
- if flag then goto label_69633;
- label_69601:
- v_22 := 'bp.dll';
- EXTRACTTEMPORARYFILE(v_22);
- label_69633:
- v_25 := '{tmp}\wintb.dll';
- v_24 := EXPANDCONSTANT(v_25);
- v_23 := FILEEXISTS(v_24);
- v_23 := not v_23;
- flag := not v_23;
- if flag then goto label_69758;
- label_69723:
- v_26 := 'wintb.dll';
- EXTRACTTEMPORARYFILE(v_26);
- label_69758:
- v_29 := '{tmp}\ISMD5.dll';
- v_28 := EXPANDCONSTANT(v_29);
- v_27 := FILEEXISTS(v_28);
- v_27 := not v_27;
- flag := not v_27;
- if flag then goto label_69883;
- label_69848:
- v_30 := 'ISMD5.dll';
- EXTRACTTEMPORARYFILE(v_30);
- label_69883:
- v_31 := 'WSjuQKBxmd_mut';
- v_32 := 1;
- v_33 := 0;
- v_1 := CreateMutexA(v_33, v_32, v_31);
- v_34 := 'Style.vsf';
- STYLESTREAMCREATE(v_34);
- v_36 := v_1;
- v_35 := CloseHandle(v_36);
- v_37 := 'EDBF167E77DB750C826132AF6D889D1F';
- v_38 := 'setup-1.bin';
- result := HASHSUMPACKED(v_38, v_37);
- exit;
- end;
- procedure INITIALIZEWIZARD();
- var
- v_1, v_3: UnicodeString;
- v_2: TAPPLICATION;
- v_4, v_6, v_8, v_10, v_12, v_14, v_16, v_18, v_20, v_22, v_24, v_26, v_28, v_30, v_32, v_34, v_36, v_38, v_40, v_42, v_44, v_46, v_48, v_50, v_52, v_54, v_56, v_58, v_60, v_62, v_65, v_68, v_71, v_74, v_77, v_80, v_83, v_85, v_87, v_89, v_97, v_101, v_103, v_108, v_121, v_124, v_146, v_149, v_151, v_167, v_171, v_175, v_183, v_188, v_191, v_198, v_205, v_209, v_214, v_217, v_256, v_259, v_263, v_268, v_279, v_282, v_315, v_329, v_336, v_339, v_390, v_410, v_413, v_437, v_440, v_466, v_473, v_477, v_481, v_487, v_491, v_495, v_499, v_521, v_528, v_535, v_557, v_564, v_569, v_572, v_595, v_598, v_622, v_625, v_627, v_643, v_646, v_648, v_654, v_659, v_664, v_667, v_672, v_679, v_692, v_695, v_700, v_729, v_743, v_750, v_760, v_774, v_781, v_791, v_805, v_812, v_823, v_830, v_833, v_837, v_841, v_845, v_849, v_853: TWIZARDFORM;
- v_5, v_675, v_677, v_680, v_682, v_684, v_685, v_690: TNEWMEMO;
- v_7: TPANEL;
- v_9, v_11, v_13, v_15, v_17, v_21, v_23, v_25, v_27, v_29, v_31, v_33, v_35, v_37, v_39, v_41, v_43, v_45, v_47: TNEWSTATICTEXT;
- v_19, v_49, v_51, v_88, v_100: TBITMAPIMAGE;
- v_53, v_55: TNEWNOTEBOOK;
- v_57, v_59, v_115, v_117, v_119, v_122, v_129, v_133, v_137, v_140, v_142, v_144, v_147, v_155, v_159, v_163, v_224, v_228, v_232, v_385, v_388, v_395, v_397, v_399, v_403, v_404, v_406, v_408, v_411, v_416, v_420, v_424, v_428, v_431, v_433, v_435, v_438, v_443, v_447, v_451, v_455, v_457, v_460, v_462, v_464, v_467, v_502, v_506, v_510, v_514, v_538, v_542, v_546, v_550, v_574, v_576, v_580, v_582, v_584, v_588, v_589, v_591, v_593, v_596, v_601, v_605, v_609, v_613, v_616, v_618, v_620, v_623, v_631, v_635, v_639, v_651, v_702, v_704: TBEVEL;
- v_61: TNEWEDIT;
- v_63, v_66, v_69, v_72, v_172, v_219, v_236, v_238, v_276, v_295, v_297, v_299, v_313, v_331, v_354, v_356, v_358, v_496, v_532, v_676, v_683, v_710, v_712, v_714, v_726, v_757, v_788, v_818: BOOLEAN;
- v_64, v_67, v_70, v_73, v_208, v_480, v_494, v_831, v_835, v_839, v_843, v_847, v_851: TNEWBUTTON;
- v_75, v_195, v_207, v_243, v_252, v_253, v_304, v_363, v_374, v_375, v_518, v_554, v_687, v_688, v_716, v_740, v_752, v_771, v_783, v_802, v_814: UnicodeString;
- v_76: TPASSWORDEDIT;
- v_78, v_79, v_81, v_82, v_90, v_91, v_92, v_93, v_94, v_95, v_96, v_98, v_99, v_105, v_106, v_107, v_109, v_110, v_111, v_112, v_113, v_114, v_126, v_127, v_128, v_130, v_131, v_132, v_134, v_135, v_136, v_138, v_139, v_152, v_153, v_154, v_156, v_157, v_158, v_160, v_161, v_162, v_164, v_165, v_168, v_177, v_178, v_179, v_180, v_181, v_184, v_185, v_186, v_189, v_192, v_193, v_201, v_221, v_222, v_223, v_225, v_226, v_227, v_229, v_230, v_231, v_233, v_234, v_240, v_249, v_261, v_264, v_265, v_266, v_269, v_284, v_285, v_286, v_287, v_288, v_290, v_291, v_292, v_301, v_310, v_317, v_318, v_319, v_320, v_321, v_323, v_324, v_325, v_333, v_341, v_343, v_345, v_347, v_348, v_349, v_351, v_352, v_360, v_369, v_372, v_383, v_384, v_386, v_387, v_392, v_393, v_394, v_396, v_398, v_400, v_401, v_402, v_415, v_417, v_418, v_419, v_421, v_422, v_423, v_425, v_426, v_427, v_429, v_430, v_442, v_444, v_445, v_446, v_448, v_449, v_450, v_452, v_453, v_454, v_456, v_458, v_459, v_468, v_469, v_470, v_471, v_472, v_474, v_475, v_476, v_478, v_479, v_482, v_483, v_484, v_485, v_486, v_488, v_489, v_490, v_492, v_493, v_501, v_503, v_504, v_505, v_507, v_508, v_509, v_511, v_512, v_513, v_515, v_516, v_524, v_537, v_539, v_540, v_541, v_543, v_544, v_545, v_547, v_548, v_549, v_551, v_552, v_560, v_571, v_573, v_575, v_577, v_578, v_579, v_581, v_583, v_585, v_586, v_587, v_600, v_602, v_603, v_604, v_606, v_607, v_608, v_610, v_611, v_612, v_614, v_615, v_628, v_629, v_630, v_632, v_633, v_634, v_636, v_637, v_638, v_640, v_641, v_644, v_650, v_652, v_655, v_656, v_657, v_660, v_661, v_662, v_665, v_668, v_669, v_670, v_673, v_674, v_686, v_697, v_698, v_699, v_701, v_703, v_705, v_706, v_707, v_708, v_722, v_731, v_733, v_735, v_737, v_746, v_762, v_764, v_766, v_768, v_777, v_793, v_795, v_797, v_799, v_808, v_824, v_826, v_828, v_829: Integer;
- v_84: TPOSITION;
- v_86, v_120, v_145, v_148, v_204, v_216, v_258, v_281, v_328, v_338, v_409, v_436, v_465, v_527, v_563, v_594, v_621, v_624, v_678, v_694, v_749, v_780, v_811: TWINCONTROL;
- v_102, v_123, v_174, v_213, v_255, v_278, v_314, v_335, v_389, v_412, v_439, v_498, v_534, v_568, v_597, v_647, v_691, v_728, v_759, v_790, v_832, v_836, v_840, v_844, v_848, v_852: TCOMPONENT;
- v_104, v_125, v_176, v_215, v_257, v_280, v_316, v_337, v_391, v_414, v_441, v_500, v_536, v_570, v_599, v_649, v_693, v_730, v_761, v_792, v_825, v_834, v_838, v_842, v_846, v_850, v_854: Cardinal;
- v_116, v_141, v_405, v_432, v_461, v_590, v_617: TBEVELSHAPE;
- v_118, v_143, v_407, v_434, v_463, v_592, v_619: TBEVELSTYLE;
- v_150, v_166, v_170, v_182, v_187, v_190, v_197, v_262, v_267, v_520, v_556, v_742, v_773, v_804, v_822: TEDIT;
- v_169, v_196, v_199, v_202, v_241, v_244, v_247, v_250, v_302, v_305, v_308, v_311, v_361, v_364, v_367, v_370, v_519, v_522, v_525, v_555, v_558, v_561, v_717, v_720, v_723, v_741, v_744, v_747, v_772, v_775, v_778, v_803, v_806, v_809: TFONT;
- v_173, v_497, v_533, v_727, v_758, v_789: Cardinal;
- v_194, v_200, v_203, v_206, v_210, v_212, v_517, v_523, v_526, v_529, v_531, v_553, v_559, v_562, v_565, v_567, v_732, v_734, v_736, v_738, v_739, v_745, v_748, v_751, v_753, v_755, v_756, v_763, v_765, v_767, v_769, v_770, v_776, v_779, v_782, v_784, v_786, v_787, v_794, v_796, v_798, v_800, v_801, v_807, v_810, v_813, v_815, v_817, v_819, v_820: TBUTTON;
- v_211, v_274, v_377, v_379, v_381, v_530, v_566, v_754, v_785, v_816, v_821: TNOTIFYEVENT;
- v_218, v_220, v_235, v_237, v_239, v_242, v_245, v_248, v_251, v_254, v_270, v_283, v_294, v_296, v_298, v_300, v_303, v_306, v_309, v_312, v_322, v_326, v_340, v_342, v_344, v_353, v_355, v_357, v_359, v_362, v_365, v_368, v_371, v_373, v_376, v_378, v_380, v_382, v_696, v_709, v_711, v_713, v_715, v_718, v_721, v_724, v_725: TLABEL;
- v_246, v_307, v_366, v_719: TFONTSTYLES;
- v_260, v_271, v_273, v_275, v_277, v_289, v_293: TNEWCOMBOBOX;
- v_272: TCOMBOBOXSTYLE;
- v_327, v_330, v_332, v_334, v_346, v_350: TCHECKBOX;
- v_626, v_642, v_645, v_653, v_658, v_663, v_666, v_671: TNEWPROGRESSBAR;
- v_681: TSCROLLSTYLE;
- v_689: TSTRINGS;
- v_827: ProcPtr48;
- begin
- label_70140:
- v_1 := 'Assassins Creed Syndicate Update 1';
- v_2 := APPLICATION();
- v_2.TITLE := v_1;
- v_3 := 'Assassins Creed Syndicate Update 1';
- v_4 := WIZARDFORM();
- v_4.CAPTION := v_3;
- v_6 := WIZARDFORM();
- v_5 := v_6.READYMEMO;
- v_5.HIDE();
- v_8 := WIZARDFORM();
- v_7 := v_8.MAINPANEL;
- v_7.HIDE();
- v_10 := WIZARDFORM();
- v_9 := v_10.PAGENAMELABEL;
- v_9.HIDE();
- v_12 := WIZARDFORM();
- v_11 := v_12.PAGEDESCRIPTIONLABEL;
- v_11.HIDE();
- v_14 := WIZARDFORM();
- v_13 := v_14.DISKSPACELABEL;
- v_13.HIDE();
- v_16 := WIZARDFORM();
- v_15 := v_16.WELCOMELABEL1;
- v_15.HIDE();
- v_18 := WIZARDFORM();
- v_17 := v_18.WELCOMELABEL2;
- v_17.HIDE();
- v_20 := WIZARDFORM();
- v_19 := v_20.SELECTDIRBITMAPIMAGE;
- v_19.HIDE();
- v_22 := WIZARDFORM();
- v_21 := v_22.SELECTDIRBROWSELABEL;
- v_21.HIDE();
- v_24 := WIZARDFORM();
- v_23 := v_24.SELECTDIRLABEL;
- v_23.HIDE();
- v_26 := WIZARDFORM();
- v_25 := v_26.FINISHEDHEADINGLABEL;
- v_25.HIDE();
- v_28 := WIZARDFORM();
- v_27 := v_28.FINISHEDLABEL;
- v_27.HIDE();
- v_30 := WIZARDFORM();
- v_29 := v_30.FILENAMELABEL;
- v_29.HIDE();
- v_32 := WIZARDFORM();
- v_31 := v_32.STATUSLABEL;
- v_31.HIDE();
- v_34 := WIZARDFORM();
- v_33 := v_34.SELECTSTARTMENUFOLDERLABEL;
- v_33.HIDE();
- v_36 := WIZARDFORM();
- v_35 := v_36.SELECTSTARTMENUFOLDERBROWSELABEL;
- v_35.HIDE();
- v_38 := WIZARDFORM();
- v_37 := v_38.READYLABEL;
- v_37.HIDE();
- v_40 := WIZARDFORM();
- v_39 := v_40.LICENSELABEL1;
- v_39.HIDE();
- v_42 := WIZARDFORM();
- v_41 := v_42.INFOBEFORECLICKLABEL;
- v_41.HIDE();
- v_44 := WIZARDFORM();
- v_43 := v_44.INFOAFTERCLICKLABEL;
- v_43.HIDE();
- v_46 := WIZARDFORM();
- v_45 := v_46.COMPONENTSDISKSPACELABEL;
- v_45.HIDE();
- v_48 := WIZARDFORM();
- v_47 := v_48.SELECTCOMPONENTSLABEL;
- v_47.HIDE();
- v_50 := WIZARDFORM();
- v_49 := v_50.WIZARDSMALLBITMAPIMAGE;
- v_49.HIDE();
- v_52 := WIZARDFORM();
- v_51 := v_52.SELECTGROUPBITMAPIMAGE;
- v_51.HIDE();
- v_54 := WIZARDFORM();
- v_53 := v_54.OUTERNOTEBOOK;
- v_53.HIDE();
- v_56 := WIZARDFORM();
- v_55 := v_56.INNERNOTEBOOK;
- v_55.HIDE();
- v_58 := WIZARDFORM();
- v_57 := v_58.BEVEL;
- v_57.HIDE();
- v_60 := WIZARDFORM();
- v_59 := v_60.BEVEL1;
- v_59.HIDE();
- v_62 := WIZARDFORM();
- v_61 := v_62.GROUPEDIT;
- v_61.HIDE();
- v_63 := 0;
- v_65 := WIZARDFORM();
- v_64 := v_65.DIRBROWSEBUTTON;
- v_64.ENABLED := v_63;
- v_66 := 0;
- v_68 := WIZARDFORM();
- v_67 := v_68.DIRBROWSEBUTTON;
- v_67.VISIBLE := v_66;
- v_69 := 0;
- v_71 := WIZARDFORM();
- v_70 := v_71.GROUPBROWSEBUTTON;
- v_70.ENABLED := v_69;
- v_72 := 0;
- v_74 := WIZARDFORM();
- v_73 := v_74.GROUPBROWSEBUTTON;
- v_73.VISIBLE := v_72;
- v_75 := '';
- v_77 := WIZARDFORM();
- v_76 := v_77.PASSWORDEDIT;
- v_76.TEXT := v_75;
- v_79 := 480;
- v_78 := SCALEX(v_79);
- v_80 := WIZARDFORM();
- v_80.CLIENTWIDTH := v_78;
- v_82 := 450;
- v_81 := SCALEY(v_82);
- v_83 := WIZARDFORM();
- v_83.CLIENTHEIGHT := v_81;
- v_84 := 4;
- v_85 := WIZARDFORM();
- v_85.POSITION := v_84;
- v_87 := WIZARDFORM();
- v_86 := v_87;
- v_89 := WIZARDFORM();
- v_88 := v_89.WIZARDBITMAPIMAGE;
- v_88.PARENT := v_86;
- v_91 := 65;
- v_90 := SCALEY(v_91);
- v_93 := 450;
- v_92 := SCALEX(v_93);
- v_95 := 0;
- v_94 := SCALEY(v_95);
- v_97 := WIZARDFORM();
- v_96 := v_97.CLIENTWIDTH;
- v_96 := v_96 / 2;
- v_99 := 225;
- v_98 := SCALEX(v_99);
- v_96 := v_96 - v_98;
- v_101 := WIZARDFORM();
- v_100 := v_101.WIZARDBITMAPIMAGE;
- v_100.SETBOUNDS(v_96, v_94, v_92, v_90);
- v_103 := WIZARDFORM();
- v_102 := v_103;
- v_104 := 31;
- gvar_7 := v_104.CREATE(v_102);
- v_106 := 95;
- v_105 := SCALEY(v_106);
- v_108 := WIZARDFORM();
- v_107 := v_108.CLIENTWIDTH;
- v_110 := 20;
- v_109 := SCALEX(v_110);
- v_107 := v_107 - v_109;
- v_112 := 60;
- v_111 := SCALEY(v_112);
- v_114 := 10;
- v_113 := SCALEX(v_114);
- v_115 := gvar_7;
- v_115.SETBOUNDS(v_113, v_111, v_107, v_105);
- v_116 := 0;
- v_117 := gvar_7;
- v_117.SHAPE := v_116;
- v_118 := 1;
- v_119 := gvar_7;
- v_119.STYLE := v_118;
- v_121 := WIZARDFORM();
- v_120 := v_121;
- v_122 := gvar_7;
- v_122.PARENT := v_120;
- v_124 := WIZARDFORM();
- v_123 := v_124;
- v_125 := 31;
- gvar_8 := v_125.CREATE(v_123);
- v_127 := 75;
- v_126 := SCALEY(v_127);
- v_129 := gvar_7;
- v_128 := v_129.WIDTH;
- v_131 := 20;
- v_130 := SCALEX(v_131);
- v_128 := v_128 - v_130;
- v_133 := gvar_7;
- v_132 := v_133.TOP;
- v_135 := 10;
- v_134 := SCALEY(v_135);
- v_132 := v_132 + v_134;
- v_137 := gvar_7;
- v_136 := v_137.LEFT;
- v_139 := 10;
- v_138 := SCALEX(v_139);
- v_136 := v_136 + v_138;
- v_140 := gvar_8;
- v_140.SETBOUNDS(v_136, v_132, v_128, v_126);
- v_141 := 0;
- v_142 := gvar_8;
- v_142.SHAPE := v_141;
- v_143 := 0;
- v_144 := gvar_8;
- v_144.STYLE := v_143;
- v_146 := WIZARDFORM();
- v_145 := v_146;
- v_147 := gvar_8;
- v_147.PARENT := v_145;
- v_149 := WIZARDFORM();
- v_148 := v_149;
- v_151 := WIZARDFORM();
- v_150 := v_151.DIREDIT;
- v_150.PARENT := v_148;
- v_153 := 75;
- v_152 := SCALEY(v_153);
- v_155 := gvar_8;
- v_154 := v_155.WIDTH;
- v_157 := 150;
- v_156 := SCALEX(v_157);
- v_154 := v_154 - v_156;
- v_159 := gvar_8;
- v_158 := v_159.TOP;
- v_161 := 25;
- v_160 := SCALEY(v_161);
- v_158 := v_158 + v_160;
- v_163 := gvar_8;
- v_162 := v_163.LEFT;
- v_165 := 55;
- v_164 := SCALEX(v_165);
- v_162 := v_162 + v_164;
- v_167 := WIZARDFORM();
- v_166 := v_167.DIREDIT;
- v_166.SETBOUNDS(v_162, v_158, v_154, v_152);
- v_168 := 15130849;
- v_171 := WIZARDFORM();
- v_170 := v_171.DIREDIT;
- v_169 := v_170.FONT;
- v_169.COLOR := v_168;
- v_173 := IsThemeActive();
- v_172 := v_173;
- flag := not v_172;
- if flag then goto label_73854;
- label_73781:
- v_175 := WIZARDFORM();
- v_174 := v_175;
- v_176 := 35;
- gvar_43 := v_176.CREATE(v_174);
- goto label_73939;
- label_73854:
- v_853 := WIZARDFORM();
- v_852 := v_853;
- v_854 := 59;
- v_851 := v_854.CREATE(v_852);
- gvar_43 := v_851;
- label_73939:
- v_178 := 23;
- v_177 := SCALEY(v_178);
- v_180 := 80;
- v_179 := SCALEX(v_180);
- v_183 := WIZARDFORM();
- v_182 := v_183.DIREDIT;
- v_181 := v_182.TOP;
- v_185 := 1;
- v_184 := SCALEY(v_185);
- v_181 := v_181 - v_184;
- v_188 := WIZARDFORM();
- v_187 := v_188.DIREDIT;
- v_186 := v_187.LEFT;
- v_191 := WIZARDFORM();
- v_190 := v_191.DIREDIT;
- v_189 := v_190.WIDTH;
- v_186 := v_186 + v_189;
- v_193 := 5;
- v_192 := SCALEX(v_193);
- v_186 := v_186 + v_192;
- v_194 := gvar_43;
- v_194.SETBOUNDS(v_186, v_181, v_179, v_177);
- v_198 := WIZARDFORM();
- v_197 := v_198.DIREDIT;
- v_196 := v_197.FONT;
- v_195 := v_196.NAME;
- v_200 := gvar_43;
- v_199 := v_200.FONT;
- v_199.NAME := v_195;
- v_201 := 8;
- v_203 := gvar_43;
- v_202 := v_203.FONT;
- v_202.SIZE := v_201;
- v_205 := WIZARDFORM();
- v_204 := v_205;
- v_206 := gvar_43;
- v_206.PARENT := v_204;
- v_209 := WIZARDFORM();
- v_208 := v_209.DIRBROWSEBUTTON;
- v_207 := v_208.CAPTION;
- v_210 := gvar_43;
- v_210.CAPTION := v_207;
- v_211 := procedure BROWSECLICK(Arg0: TOBJECT);;
- v_212 := gvar_43;
- v_212.ONCLICK := v_211;
- v_214 := WIZARDFORM();
- v_213 := v_214;
- v_215 := 30;
- gvar_2 := v_215.CREATE(v_213);
- v_217 := WIZARDFORM();
- v_216 := v_217;
- v_218 := gvar_2;
- v_218.PARENT := v_216;
- v_219 := 0;
- v_220 := gvar_2;
- v_220.AUTOSIZE := v_219;
- v_222 := 15;
- v_221 := SCALEY(v_222);
- v_224 := gvar_8;
- v_223 := v_224.WIDTH;
- v_226 := 20;
- v_225 := SCALEX(v_226);
- v_223 := v_223 - v_225;
- v_228 := gvar_8;
- v_227 := v_228.TOP;
- v_230 := 5;
- v_229 := SCALEY(v_230);
- v_227 := v_227 + v_229;
- v_232 := gvar_8;
- v_231 := v_232.LEFT;
- v_234 := 10;
- v_233 := SCALEX(v_234);
- v_231 := v_231 + v_233;
- v_235 := gvar_2;
- v_235.SETBOUNDS(v_231, v_227, v_223, v_221);
- v_236 := 1;
- v_237 := gvar_2;
- v_237.TRANSPARENT := v_236;
- v_238 := 1;
- v_239 := gvar_2;
- v_239.WORDWRAP := v_238;
- v_240 := 15130849;
- v_242 := gvar_2;
- v_241 := v_242.FONT;
- v_241.COLOR := v_240;
- v_243 := 'Arial';
- v_245 := gvar_2;
- v_244 := v_245.FONT;
- v_244.NAME := v_243;
- v_246 := [1];
- v_248 := gvar_2;
- v_247 := v_248.FONT;
- v_247.STYLE := v_246;
- v_249 := 9;
- v_251 := gvar_2;
- v_250 := v_251.FONT;
- v_250.SIZE := v_249;
- v_253 := '{cm:DirInstall}';
- v_252 := EXPANDCONSTANT(v_253);
- v_254 := gvar_2;
- v_254.CAPTION := v_252;
- v_256 := WIZARDFORM();
- v_255 := v_256;
- v_257 := 33;
- gvar_15 := v_257.CREATE(v_255);
- v_259 := WIZARDFORM();
- v_258 := v_259;
- v_260 := gvar_15;
- v_260.PARENT := v_258;
- v_263 := WIZARDFORM();
- v_262 := v_263.DIREDIT;
- v_261 := v_262.HEIGHT;
- v_265 := 40;
- v_264 := SCALEX(v_265);
- v_268 := WIZARDFORM();
- v_267 := v_268.DIREDIT;
- v_266 := v_267.TOP;
- v_270 := gvar_2;
- v_269 := v_270.LEFT;
- v_271 := gvar_15;
- v_271.SETBOUNDS(v_269, v_266, v_264, v_261);
- v_272 := 2;
- v_273 := gvar_15;
- v_273.STYLE := v_272;
- v_274 := procedure CBDRIVEONCLICK(Arg0: TOBJECT);;
- v_275 := gvar_15;
- v_275.ONCLICK := v_274;
- v_277 := gvar_15;
- v_276 := ADDDRIVETOLIST(v_277);
- v_279 := WIZARDFORM();
- v_278 := v_279;
- v_280 := 30;
- gvar_3 := v_280.CREATE(v_278);
- v_282 := WIZARDFORM();
- v_281 := v_282;
- v_283 := gvar_3;
- v_283.PARENT := v_281;
- v_285 := 15;
- v_284 := SCALEY(v_285);
- v_287 := 15;
- v_286 := SCALEX(v_287);
- v_289 := gvar_15;
- v_288 := v_289.TOP;
- v_291 := 27;
- v_290 := SCALEY(v_291);
- v_288 := v_288 + v_290;
- v_293 := gvar_15;
- v_292 := v_293.LEFT;
- v_294 := gvar_3;
- v_294.SETBOUNDS(v_292, v_288, v_286, v_284);
- v_295 := 1;
- v_296 := gvar_3;
- v_296.TRANSPARENT := v_295;
- v_297 := 0;
- v_298 := gvar_3;
- v_298.WORDWRAP := v_297;
- v_299 := 1;
- v_300 := gvar_3;
- v_300.AUTOSIZE := v_299;
- v_301 := 15130849;
- v_303 := gvar_3;
- v_302 := v_303.FONT;
- v_302.COLOR := v_301;
- v_304 := 'Arial';
- v_306 := gvar_3;
- v_305 := v_306.FONT;
- v_305.NAME := v_304;
- v_307 := [1];
- v_309 := gvar_3;
- v_308 := v_309.FONT;
- v_308.STYLE := v_307;
- v_310 := 9;
- v_312 := gvar_3;
- v_311 := v_312.FONT;
- v_311.SIZE := v_310;
- v_313 := gvar_34;
- flag := not v_313;
- if flag then goto label_78303;
- label_76738:
- v_315 := WIZARDFORM();
- v_314 := v_315;
- v_316 := 32;
- gvar_14 := v_316.CREATE(v_314);
- v_318 := 15;
- v_317 := SCALEY(v_318);
- v_320 := 15;
- v_319 := SCALEX(v_320);
- v_322 := gvar_3;
- v_321 := v_322.TOP;
- v_324 := 20;
- v_323 := SCALEY(v_324);
- v_321 := v_321 + v_323;
- v_326 := gvar_3;
- v_325 := v_326.LEFT;
- v_327 := gvar_14;
- v_327.SETBOUNDS(v_325, v_321, v_319, v_317);
- v_329 := WIZARDFORM();
- v_328 := v_329;
- v_330 := gvar_14;
- v_330.PARENT := v_328;
- v_331 := 0;
- v_332 := gvar_14;
- v_332.CHECKED := v_331;
- v_333 := 1;
- v_334 := gvar_14;
- v_334.CURSOR := v_333;
- gvar_33 := 0;
- v_336 := WIZARDFORM();
- v_335 := v_336;
- v_337 := 30;
- gvar_4 := v_337.CREATE(v_335);
- v_339 := WIZARDFORM();
- v_338 := v_339;
- v_340 := gvar_4;
- v_340.PARENT := v_338;
- v_342 := gvar_4;
- v_341 := v_342.HEIGHT;
- v_344 := gvar_4;
- v_343 := v_344.WIDTH;
- v_346 := gvar_14;
- v_345 := v_346.TOP;
- v_348 := 1;
- v_347 := SCALEY(v_348);
- v_345 := v_345 + v_347;
- v_350 := gvar_14;
- v_349 := v_350.LEFT;
- v_352 := 17;
- v_351 := SCALEX(v_352);
- v_349 := v_349 + v_351;
- v_353 := gvar_4;
- v_353.SETBOUNDS(v_349, v_345, v_343, v_341);
- v_354 := 1;
- v_355 := gvar_4;
- v_355.TRANSPARENT := v_354;
- v_356 := 0;
- v_357 := gvar_4;
- v_357.WORDWRAP := v_356;
- v_358 := 1;
- v_359 := gvar_4;
- v_359.AUTOSIZE := v_358;
- v_360 := 15130849;
- v_362 := gvar_4;
- v_361 := v_362.FONT;
- v_361.COLOR := v_360;
- v_363 := 'Arial';
- v_365 := gvar_4;
- v_364 := v_365.FONT;
- v_364.NAME := v_363;
- v_366 := [1];
- v_368 := gvar_4;
- v_367 := v_368.FONT;
- v_367.STYLE := v_366;
- v_369 := 9;
- v_371 := gvar_4;
- v_370 := v_371.FONT;
- v_370.SIZE := v_369;
- v_372 := 1;
- v_373 := gvar_4;
- v_373.CURSOR := v_372;
- v_375 := '{cm:CopyCrack}';
- v_374 := EXPANDCONSTANT(v_375);
- v_376 := gvar_4;
- v_376.CAPTION := v_374;
- v_377 := procedure LABELCRACKONMOUSEENTER(Arg0: TOBJECT);;
- v_378 := gvar_4;
- v_378.ONMOUSEENTER := v_377;
- v_379 := procedure LABELCRACKONMOUSELEAVE(Arg0: TOBJECT);;
- v_380 := gvar_4;
- v_380.ONMOUSELEAVE := v_379;
- v_381 := procedure LABELCRACKONCLICK(Arg0: TOBJECT);;
- v_382 := gvar_4;
- v_382.ONCLICK := v_381;
- v_384 := 115;
- v_383 := SCALEY(v_384);
- v_385 := gvar_7;
- v_385.HEIGHT := v_383;
- v_387 := 95;
- v_386 := SCALEY(v_387);
- v_388 := gvar_8;
- v_388.HEIGHT := v_386;
- label_78303:
- v_390 := WIZARDFORM();
- v_389 := v_390;
- v_391 := 31;
- gvar_9 := v_391.CREATE(v_389);
- v_393 := 50;
- v_392 := SCALEY(v_393);
- v_395 := gvar_7;
- v_394 := v_395.WIDTH;
- v_397 := gvar_7;
- v_396 := v_397.TOP;
- v_399 := gvar_7;
- v_398 := v_399.HEIGHT;
- v_396 := v_396 + v_398;
- v_401 := 10;
- v_400 := SCALEY(v_401);
- v_396 := v_396 + v_400;
- v_403 := gvar_7;
- v_402 := v_403.LEFT;
- v_404 := gvar_9;
- v_404.SETBOUNDS(v_402, v_396, v_394, v_392);
- v_405 := 0;
- v_406 := gvar_9;
- v_406.SHAPE := v_405;
- v_407 := 0;
- v_408 := gvar_9;
- v_408.STYLE := v_407;
- v_410 := WIZARDFORM();
- v_409 := v_410;
- v_411 := gvar_9;
- v_411.PARENT := v_409;
- v_413 := WIZARDFORM();
- v_412 := v_413;
- v_414 := 31;
- gvar_10 := v_414.CREATE(v_412);
- v_416 := gvar_9;
- v_415 := v_416.HEIGHT;
- v_418 := 10;
- v_417 := SCALEY(v_418);
- v_415 := v_415 - v_417;
- v_420 := gvar_9;
- v_419 := v_420.WIDTH;
- v_419 := v_419 / 2;
- v_422 := 8;
- v_421 := SCALEX(v_422);
- v_419 := v_419 - v_421;
- v_424 := gvar_9;
- v_423 := v_424.TOP;
- v_426 := 5;
- v_425 := SCALEY(v_426);
- v_423 := v_423 + v_425;
- v_428 := gvar_9;
- v_427 := v_428.LEFT;
- v_430 := 5;
- v_429 := SCALEX(v_430);
- v_427 := v_427 + v_429;
- v_431 := gvar_10;
- v_431.SETBOUNDS(v_427, v_423, v_419, v_415);
- v_432 := 0;
- v_433 := gvar_10;
- v_433.SHAPE := v_432;
- v_434 := 0;
- v_435 := gvar_10;
- v_435.STYLE := v_434;
- v_437 := WIZARDFORM();
- v_436 := v_437;
- v_438 := gvar_10;
- v_438.PARENT := v_436;
- v_440 := WIZARDFORM();
- v_439 := v_440;
- v_441 := 31;
- gvar_11 := v_441.CREATE(v_439);
- v_443 := gvar_9;
- v_442 := v_443.HEIGHT;
- v_445 := 10;
- v_444 := SCALEY(v_445);
- v_442 := v_442 - v_444;
- v_447 := gvar_9;
- v_446 := v_447.WIDTH;
- v_446 := v_446 / 2;
- v_449 := 8;
- v_448 := SCALEX(v_449);
- v_446 := v_446 - v_448;
- v_451 := gvar_9;
- v_450 := v_451.TOP;
- v_453 := 5;
- v_452 := SCALEY(v_453);
- v_450 := v_450 + v_452;
- v_455 := gvar_10;
- v_454 := v_455.LEFT;
- v_457 := gvar_10;
- v_456 := v_457.WIDTH;
- v_454 := v_454 + v_456;
- v_459 := 6;
- v_458 := SCALEX(v_459);
- v_454 := v_454 + v_458;
- v_460 := gvar_11;
- v_460.SETBOUNDS(v_454, v_450, v_446, v_442);
- v_461 := 0;
- v_462 := gvar_11;
- v_462.SHAPE := v_461;
- v_463 := 0;
- v_464 := gvar_11;
- v_464.STYLE := v_463;
- v_466 := WIZARDFORM();
- v_465 := v_466;
- v_467 := gvar_11;
- v_467.PARENT := v_465;
- v_469 := 0;
- v_468 := SCALEY(v_469);
- v_471 := 0;
- v_470 := SCALEX(v_471);
- v_473 := WIZARDFORM();
- v_472 := v_473.TOP;
- v_475 := 500;
- v_474 := SCALEY(v_475);
- v_472 := v_472 - v_474;
- v_477 := WIZARDFORM();
- v_476 := v_477.LEFT;
- v_479 := 500;
- v_478 := SCALEX(v_479);
- v_476 := v_476 - v_478;
- v_481 := WIZARDFORM();
- v_480 := v_481.CANCELBUTTON;
- v_480.SETBOUNDS(v_476, v_472, v_470, v_468);
- v_483 := 1;
- v_482 := SCALEY(v_483);
- v_485 := 1;
- v_484 := SCALEX(v_485);
- v_487 := WIZARDFORM();
- v_486 := v_487.TOP;
- v_489 := 500;
- v_488 := SCALEY(v_489);
- v_486 := v_486 - v_488;
- v_491 := WIZARDFORM();
- v_490 := v_491.LEFT;
- v_493 := 500;
- v_492 := SCALEX(v_493);
- v_490 := v_490 - v_492;
- v_495 := WIZARDFORM();
- v_494 := v_495.NEXTBUTTON;
- v_494.SETBOUNDS(v_490, v_486, v_484, v_482);
- v_497 := IsThemeActive();
- v_496 := v_497;
- flag := not v_496;
- if flag then goto label_80699;
- label_80626:
- v_499 := WIZARDFORM();
- v_498 := v_499;
- v_500 := 35;
- gvar_44 := v_500.CREATE(v_498);
- goto label_80784;
- label_80699:
- v_849 := WIZARDFORM();
- v_848 := v_849;
- v_850 := 59;
- v_847 := v_850.CREATE(v_848);
- gvar_44 := v_847;
- label_80784:
- v_502 := gvar_10;
- v_501 := v_502.HEIGHT;
- v_504 := 10;
- v_503 := SCALEY(v_504);
- v_501 := v_501 - v_503;
- v_506 := gvar_10;
- v_505 := v_506.WIDTH;
- v_508 := 10;
- v_507 := SCALEX(v_508);
- v_505 := v_505 - v_507;
- v_510 := gvar_10;
- v_509 := v_510.TOP;
- v_512 := 5;
- v_511 := SCALEY(v_512);
- v_509 := v_509 + v_511;
- v_514 := gvar_10;
- v_513 := v_514.LEFT;
- v_516 := 5;
- v_515 := SCALEX(v_516);
- v_513 := v_513 + v_515;
- v_517 := gvar_44;
- v_517.SETBOUNDS(v_513, v_509, v_505, v_501);
- v_521 := WIZARDFORM();
- v_520 := v_521.DIREDIT;
- v_519 := v_520.FONT;
- v_518 := v_519.NAME;
- v_523 := gvar_44;
- v_522 := v_523.FONT;
- v_522.NAME := v_518;
- v_524 := 8;
- v_526 := gvar_44;
- v_525 := v_526.FONT;
- v_525.SIZE := v_524;
- v_528 := WIZARDFORM();
- v_527 := v_528;
- v_529 := gvar_44;
- v_529.PARENT := v_527;
- v_530 := procedure DUBLEONCLICK(Arg0: TOBJECT);;
- v_531 := gvar_44;
- v_531.ONCLICK := v_530;
- v_533 := IsThemeActive();
- v_532 := v_533;
- flag := not v_532;
- if flag then goto label_81543;
- label_81470:
- v_535 := WIZARDFORM();
- v_534 := v_535;
- v_536 := 35;
- gvar_45 := v_536.CREATE(v_534);
- goto label_81628;
- label_81543:
- v_845 := WIZARDFORM();
- v_844 := v_845;
- v_846 := 59;
- v_843 := v_846.CREATE(v_844);
- gvar_45 := v_843;
- label_81628:
- v_538 := gvar_10;
- v_537 := v_538.HEIGHT;
- v_540 := 10;
- v_539 := SCALEY(v_540);
- v_537 := v_537 - v_539;
- v_542 := gvar_10;
- v_541 := v_542.WIDTH;
- v_544 := 10;
- v_543 := SCALEX(v_544);
- v_541 := v_541 - v_543;
- v_546 := gvar_10;
- v_545 := v_546.TOP;
- v_548 := 5;
- v_547 := SCALEY(v_548);
- v_545 := v_545 + v_547;
- v_550 := gvar_11;
- v_549 := v_550.LEFT;
- v_552 := 5;
- v_551 := SCALEX(v_552);
- v_549 := v_549 + v_551;
- v_553 := gvar_45;
- v_553.SETBOUNDS(v_549, v_545, v_541, v_537);
- v_557 := WIZARDFORM();
- v_556 := v_557.DIREDIT;
- v_555 := v_556.FONT;
- v_554 := v_555.NAME;
- v_559 := gvar_45;
- v_558 := v_559.FONT;
- v_558.NAME := v_554;
- v_560 := 8;
- v_562 := gvar_45;
- v_561 := v_562.FONT;
- v_561.SIZE := v_560;
- v_564 := WIZARDFORM();
- v_563 := v_564;
- v_565 := gvar_45;
- v_565.PARENT := v_563;
- v_566 := procedure DUBLEONCLICK(Arg0: TOBJECT);;
- v_567 := gvar_45;
- v_567.ONCLICK := v_566;
- v_569 := WIZARDFORM();
- v_568 := v_569;
- v_570 := 31;
- gvar_12 := v_570.CREATE(v_568);
- v_572 := WIZARDFORM();
- v_571 := v_572.CLIENTHEIGHT;
- v_574 := gvar_9;
- v_573 := v_574.TOP;
- v_571 := v_571 - v_573;
- v_576 := gvar_9;
- v_575 := v_576.HEIGHT;
- v_571 := v_571 - v_575;
- v_578 := 20;
- v_577 := SCALEY(v_578);
- v_571 := v_571 - v_577;
- v_580 := gvar_7;
- v_579 := v_580.WIDTH;
- v_582 := gvar_9;
- v_581 := v_582.TOP;
- v_584 := gvar_9;
- v_583 := v_584.HEIGHT;
- v_581 := v_581 + v_583;
- v_586 := 10;
- v_585 := SCALEY(v_586);
- v_581 := v_581 + v_585;
- v_588 := gvar_7;
- v_587 := v_588.LEFT;
- v_589 := gvar_12;
- v_589.SETBOUNDS(v_587, v_581, v_579, v_571);
- v_590 := 0;
- v_591 := gvar_12;
- v_591.SHAPE := v_590;
- v_592 := 0;
- v_593 := gvar_12;
- v_593.STYLE := v_592;
- v_595 := WIZARDFORM();
- v_594 := v_595;
- v_596 := gvar_12;
- v_596.PARENT := v_594;
- v_598 := WIZARDFORM();
- v_597 := v_598;
- v_599 := 31;
- gvar_13 := v_599.CREATE(v_597);
- v_601 := gvar_12;
- v_600 := v_601.HEIGHT;
- v_603 := 20;
- v_602 := SCALEY(v_603);
- v_600 := v_600 - v_602;
- v_605 := gvar_12;
- v_604 := v_605.WIDTH;
- v_607 := 20;
- v_606 := SCALEX(v_607);
- v_604 := v_604 - v_606;
- v_609 := gvar_12;
- v_608 := v_609.TOP;
- v_611 := 10;
- v_610 := SCALEY(v_611);
- v_608 := v_608 + v_610;
- v_613 := gvar_12;
- v_612 := v_613.LEFT;
- v_615 := 10;
- v_614 := SCALEX(v_615);
- v_612 := v_612 + v_614;
- v_616 := gvar_13;
- v_616.SETBOUNDS(v_612, v_608, v_604, v_600);
- v_617 := 0;
- v_618 := gvar_13;
- v_618.SHAPE := v_617;
- v_619 := 0;
- v_620 := gvar_13;
- v_620.STYLE := v_619;
- v_622 := WIZARDFORM();
- v_621 := v_622;
- v_623 := gvar_13;
- v_623.PARENT := v_621;
- v_625 := WIZARDFORM();
- v_624 := v_625;
- v_627 := WIZARDFORM();
- v_626 := v_627.PROGRESSGAUGE;
- v_626.PARENT := v_624;
- v_629 := 15;
- v_628 := SCALEY(v_629);
- v_631 := gvar_13;
- v_630 := v_631.WIDTH;
- v_633 := 20;
- v_632 := SCALEX(v_633);
- v_630 := v_630 - v_632;
- v_635 := gvar_13;
- v_634 := v_635.TOP;
- v_637 := 10;
- v_636 := SCALEY(v_637);
- v_634 := v_634 + v_636;
- v_639 := gvar_13;
- v_638 := v_639.LEFT;
- v_641 := 10;
- v_640 := SCALEX(v_641);
- v_638 := v_638 + v_640;
- v_643 := WIZARDFORM();
- v_642 := v_643.PROGRESSGAUGE;
- v_642.SETBOUNDS(v_638, v_634, v_630, v_628);
- v_644 := 1000;
- v_646 := WIZARDFORM();
- v_645 := v_646.PROGRESSGAUGE;
- v_645.MAX := v_644;
- v_648 := WIZARDFORM();
- v_647 := v_648;
- v_649 := 34;
- gvar_20 := v_649.CREATE(v_647);
- v_651 := gvar_13;
- v_650 := v_651.HEIGHT;
- v_654 := WIZARDFORM();
- v_653 := v_654.PROGRESSGAUGE;
- v_652 := v_653.HEIGHT;
- v_650 := v_650 - v_652;
- v_656 := 25;
- v_655 := SCALEY(v_656);
- v_650 := v_650 - v_655;
- v_659 := WIZARDFORM();
- v_658 := v_659.PROGRESSGAUGE;
- v_657 := v_658.WIDTH;
- v_661 := 2;
- v_660 := SCALEX(v_661);
- v_657 := v_657 - v_660;
- v_664 := WIZARDFORM();
- v_663 := v_664.PROGRESSGAUGE;
- v_662 := v_663.TOP;
- v_667 := WIZARDFORM();
- v_666 := v_667.PROGRESSGAUGE;
- v_665 := v_666.HEIGHT;
- v_662 := v_662 + v_665;
- v_669 := 5;
- v_668 := SCALEY(v_669);
- v_662 := v_662 + v_668;
- v_672 := WIZARDFORM();
- v_671 := v_672.PROGRESSGAUGE;
- v_670 := v_671.LEFT;
- v_674 := 1;
- v_673 := SCALEX(v_674);
- v_670 := v_670 + v_673;
- v_675 := gvar_20;
- v_675.SETBOUNDS(v_670, v_662, v_657, v_650);
- v_676 := 0;
- v_677 := gvar_20;
- v_677.WORDWRAP := v_676;
- v_679 := WIZARDFORM();
- v_678 := v_679;
- v_680 := gvar_20;
- v_680.PARENT := v_678;
- v_681 := 2;
- v_682 := gvar_20;
- v_682.SCROLLBARS := v_681;
- v_683 := 1;
- v_684 := gvar_20;
- v_684.READONLY := v_683;
- v_685 := gvar_20;
- v_685.CLEAR();
- v_688 := '{cm:MemoReady}';
- v_687 := EXPANDCONSTANT(v_688);
- v_690 := gvar_20;
- v_689 := v_690.LINES;
- v_686 := v_689.ADD(v_687);
- v_692 := WIZARDFORM();
- v_691 := v_692;
- v_693 := 30;
- gvar_5 := v_693.CREATE(v_691);
- v_695 := WIZARDFORM();
- v_694 := v_695;
- v_696 := gvar_5;
- v_696.PARENT := v_694;
- v_698 := 30;
- v_697 := SCALEY(v_698);
- v_700 := WIZARDFORM();
- v_699 := v_700.CLIENTWIDTH;
- v_702 := gvar_12;
- v_701 := v_702.TOP;
- v_704 := gvar_12;
- v_703 := v_704.HEIGHT;
- v_701 := v_701 + v_703;
- v_706 := 5;
- v_705 := SCALEY(v_706);
- v_701 := v_701 + v_705;
- v_708 := 0;
- v_707 := SCALEX(v_708);
- v_709 := gvar_5;
- v_709.SETBOUNDS(v_707, v_701, v_699, v_697);
- v_710 := 1;
- v_711 := gvar_5;
- v_711.TRANSPARENT := v_710;
- v_712 := 0;
- v_713 := gvar_5;
- v_713.WORDWRAP := v_712;
- v_714 := 1;
- v_715 := gvar_5;
- v_715.AUTOSIZE := v_714;
- v_716 := 'Tahoma';
- v_718 := gvar_5;
- v_717 := v_718.FONT;
- v_717.NAME := v_716;
- v_719 := [1];
- v_721 := gvar_5;
- v_720 := v_721.FONT;
- v_720.STYLE := v_719;
- v_722 := 14;
- v_724 := gvar_5;
- v_723 := v_724.FONT;
- v_723.SIZE := v_722;
- v_725 := gvar_5;
- v_725.HIDE();
- v_727 := IsThemeActive();
- v_726 := v_727;
- flag := not v_726;
- if flag then goto label_85695;
- label_85622:
- v_729 := WIZARDFORM();
- v_728 := v_729;
- v_730 := 35;
- gvar_40 := v_730.CREATE(v_728);
- goto label_85780;
- label_85695:
- v_841 := WIZARDFORM();
- v_840 := v_841;
- v_842 := 59;
- v_839 := v_842.CREATE(v_840);
- gvar_40 := v_839;
- label_85780:
- v_732 := gvar_45;
- v_731 := v_732.HEIGHT;
- v_734 := gvar_45;
- v_733 := v_734.WIDTH;
- v_736 := gvar_45;
- v_735 := v_736.TOP;
- v_738 := gvar_45;
- v_737 := v_738.LEFT;
- v_739 := gvar_40;
- v_739.SETBOUNDS(v_737, v_735, v_733, v_731);
- v_743 := WIZARDFORM();
- v_742 := v_743.DIREDIT;
- v_741 := v_742.FONT;
- v_740 := v_741.NAME;
- v_745 := gvar_40;
- v_744 := v_745.FONT;
- v_744.NAME := v_740;
- v_746 := 8;
- v_748 := gvar_40;
- v_747 := v_748.FONT;
- v_747.SIZE := v_746;
- v_750 := WIZARDFORM();
- v_749 := v_750;
- v_751 := gvar_40;
- v_751.PARENT := v_749;
- v_752 := 'Pause';
- v_753 := gvar_40;
- v_753.CAPTION := v_752;
- v_754 := procedure PAUSEBTNCLICK(Arg0: TOBJECT);;
- v_755 := gvar_40;
- v_755.ONCLICK := v_754;
- v_756 := gvar_40;
- v_756.HIDE();
- v_758 := IsThemeActive();
- v_757 := v_758;
- flag := not v_757;
- if flag then goto label_86405;
- label_86332:
- v_760 := WIZARDFORM();
- v_759 := v_760;
- v_761 := 35;
- gvar_41 := v_761.CREATE(v_759);
- goto label_86490;
- label_86405:
- v_837 := WIZARDFORM();
- v_836 := v_837;
- v_838 := 59;
- v_835 := v_838.CREATE(v_836);
- gvar_41 := v_835;
- label_86490:
- v_763 := gvar_44;
- v_762 := v_763.HEIGHT;
- v_765 := gvar_44;
- v_764 := v_765.WIDTH;
- v_767 := gvar_44;
- v_766 := v_767.TOP;
- v_769 := gvar_44;
- v_768 := v_769.LEFT;
- v_770 := gvar_41;
- v_770.SETBOUNDS(v_768, v_766, v_764, v_762);
- v_774 := WIZARDFORM();
- v_773 := v_774.DIREDIT;
- v_772 := v_773.FONT;
- v_771 := v_772.NAME;
- v_776 := gvar_41;
- v_775 := v_776.FONT;
- v_775.NAME := v_771;
- v_777 := 8;
- v_779 := gvar_41;
- v_778 := v_779.FONT;
- v_778.SIZE := v_777;
- v_781 := WIZARDFORM();
- v_780 := v_781;
- v_782 := gvar_41;
- v_782.PARENT := v_780;
- v_783 := 'Retry';
- v_784 := gvar_41;
- v_784.CAPTION := v_783;
- v_785 := procedure AGAINONCLICK(Arg0: TOBJECT);;
- v_786 := gvar_41;
- v_786.ONCLICK := v_785;
- v_787 := gvar_41;
- v_787.HIDE();
- v_789 := IsThemeActive();
- v_788 := v_789;
- flag := not v_788;
- if flag then goto label_87115;
- label_87042:
- v_791 := WIZARDFORM();
- v_790 := v_791;
- v_792 := 35;
- gvar_42 := v_792.CREATE(v_790);
- goto label_87200;
- label_87115:
- v_833 := WIZARDFORM();
- v_832 := v_833;
- v_834 := 59;
- v_831 := v_834.CREATE(v_832);
- gvar_42 := v_831;
- label_87200:
- v_794 := gvar_44;
- v_793 := v_794.HEIGHT;
- v_796 := gvar_44;
- v_795 := v_796.WIDTH;
- v_798 := gvar_44;
- v_797 := v_798.TOP;
- v_800 := gvar_44;
- v_799 := v_800.LEFT;
- v_801 := gvar_42;
- v_801.SETBOUNDS(v_799, v_797, v_795, v_793);
- v_805 := WIZARDFORM();
- v_804 := v_805.DIREDIT;
- v_803 := v_804.FONT;
- v_802 := v_803.NAME;
- v_807 := gvar_42;
- v_806 := v_807.FONT;
- v_806.NAME := v_802;
- v_808 := 8;
- v_810 := gvar_42;
- v_809 := v_810.FONT;
- v_809.SIZE := v_808;
- v_812 := WIZARDFORM();
- v_811 := v_812;
- v_813 := gvar_42;
- v_813.PARENT := v_811;
- v_814 := 'Run';
- v_815 := gvar_42;
- v_815.CAPTION := v_814;
- v_816 := procedure RUNONCLICK(Arg0: TOBJECT);;
- v_817 := gvar_42;
- v_817.ONCLICK := v_816;
- v_818 := 0;
- v_819 := gvar_42;
- v_819.ENABLED := v_818;
- v_820 := gvar_42;
- v_820.HIDE();
- v_821 := procedure DIREDITONCHANGE(Arg0: TOBJECT);;
- v_823 := WIZARDFORM();
- v_822 := v_823.DIREDIT;
- v_822.ONCHANGE := v_821;
- gvar_23 := 0;
- gvar_53 := 0;
- gvar_54 := 0;
- v_826 := 4;
- v_827 := function MYPROC(Arg0: Integer; Arg1: Integer; Arg2: Integer; Arg3: Integer): Integer;;
- v_825 := wrapcallback(v_827, v_826);
- v_824 := v_825;
- v_828 := -4;
- v_830 := WIZARDFORM();
- v_829 := v_830.HANDLE;
- gvar_53 := SetWindowLongA(v_829, v_828, v_824);
- gvar_29 := 1;
- exit;
- end;
- function SHOULDSKIPPAGE(Arg0: Integer): BOOLEAN;
- var
- v_1, v_2, v_3, v_4, v_5, v_6, v_7, v_8, v_9, v_10, v_11: BOOLEAN;
- begin
- label_88009:
- v_1 := Arg0 = 3;
- if v_1 then goto label_88084;
- label_88045:
- v_2 := Arg0 = 1;
- v_1 := v_1 or v_2;
- label_88084:
- if v_1 then goto label_88133;
- label_88094:
- v_3 := Arg0 = 2;
- v_1 := v_1 or v_3;
- label_88133:
- if v_1 then goto label_88182;
- label_88143:
- v_4 := Arg0 = 4;
- v_1 := v_1 or v_4;
- label_88182:
- if v_1 then goto label_88231;
- label_88192:
- v_5 := Arg0 = 5;
- v_1 := v_1 or v_5;
- label_88231:
- if v_1 then goto label_88280;
- label_88241:
- v_6 := Arg0 = 10;
- v_1 := v_1 or v_6;
- label_88280:
- if v_1 then goto label_88329;
- label_88290:
- v_7 := Arg0 = 7;
- v_1 := v_1 or v_7;
- label_88329:
- if v_1 then goto label_88378;
- label_88339:
- v_8 := Arg0 = 8;
- v_1 := v_1 or v_8;
- label_88378:
- if v_1 then goto label_88427;
- label_88388:
- v_9 := Arg0 = 9;
- v_1 := v_1 or v_9;
- label_88427:
- if v_1 then goto label_88476;
- label_88437:
- v_10 := Arg0 = 11;
- v_1 := v_1 or v_10;
- label_88476:
- if v_1 then goto label_88525;
- label_88486:
- v_11 := Arg0 = 13;
- v_1 := v_1 or v_11;
- label_88525:
- flag := not v_1;
- if flag then goto label_88550;
- label_88538:
- result := 1;
- label_88550:
- exit;
- end;
- procedure CURPAGECHANGED(Arg0: Integer);
- var
- v_1, v_2, v_14, v_17, v_21, v_23, v_26, v_28, v_31, v_32, v_56, v_58, v_59, v_66: BOOLEAN;
- v_3, v_18, v_60: TWINCONTROL;
- v_4, v_16, v_19, v_25, v_30, v_50, v_54, v_61, v_65, v_68: TWIZARDFORM;
- v_5, v_8, v_9, v_48, v_52: UnicodeString;
- v_6: TSETUPMESSAGEID;
- v_7, v_10, v_20, v_27, v_51, v_55, v_57: TBUTTON;
- v_11, v_12: TOBJECT;
- v_13: Pointer;
- v_15, v_49, v_53, v_67: TNEWBUTTON;
- v_22: TNEWCOMBOBOX;
- v_24: TEDIT;
- v_29: TNEWEDIT;
- v_33, v_35: TCHECKBOX;
- v_34, v_38, v_41, v_43, v_45, v_47: Integer;
- v_36: TNOTIFYEVENT;
- v_37, v_39: TLABEL;
- v_40, v_42: String;
- v_44: Cardinal;
- v_46: TNEWICON;
- v_62, v_64: UnicodeString;
- v_63: TAPPLICATION;
- begin
- label_88551:
- v_1 := Arg0 = 6;
- flag := not v_1;
- if flag then goto label_88908;
- label_88590:
- v_2 := LOADTASKBAR();
- LOADSOUNDBUTTON();
- v_3 := gvar_45;
- v_4 := WIZARDFORM();
- v_4.ACTIVECONTROL := v_3;
- gvar_22 := 1;
- v_6 := 16;
- v_5 := SETUPMESSAGE(v_6);
- v_7 := gvar_45;
- v_7.CAPTION := v_5;
- v_9 := '{cm:ExitBtn}';
- v_8 := EXPANDCONSTANT(v_9);
- v_10 := gvar_44;
- v_10.CAPTION := v_8;
- v_13 := &v_12;
- Proc363();
- v_11 := v_12;
- DIREDITONCHANGE(v_11);
- v_14 := 0;
- v_16 := WIZARDFORM();
- v_15 := v_16.BACKBUTTON;
- v_15.VISIBLE := v_14;
- label_88908:
- v_17 := Arg0 = 12;
- flag := not v_17;
- if flag then goto label_89787;
- label_88947:
- v_18 := gvar_44;
- v_19 := WIZARDFORM();
- v_19.ACTIVECONTROL := v_18;
- gvar_22 := 2;
- v_20 := gvar_40;
- v_20.SHOW();
- v_21 := 0;
- v_22 := gvar_15;
- v_22.ENABLED := v_21;
- v_23 := 0;
- v_25 := WIZARDFORM();
- v_24 := v_25.DIREDIT;
- v_24.ENABLED := v_23;
- v_26 := 0;
- v_27 := gvar_43;
- v_27.ENABLED := v_26;
- v_28 := 0;
- v_30 := WIZARDFORM();
- v_29 := v_30.GROUPEDIT;
- v_29.ENABLED := v_28;
- v_31 := gvar_34;
- flag := not v_31;
- if flag then goto label_89420;
- label_89251:
- v_32 := 0;
- v_33 := gvar_14;
- v_33.ENABLED := v_32;
- v_34 := -2;
- v_35 := gvar_14;
- v_35.CURSOR := v_34;
- v_36 := procedure NULLONCLICK(Arg0: TOBJECT);;
- v_37 := gvar_4;
- v_37.ONCLICK := v_36;
- v_38 := -2;
- v_39 := gvar_4;
- v_39.CURSOR := v_38;
- label_89420:
- v_40 := 'Cancel';
- v_41 := gvar_26;
- TaskBarButtonToolTip(v_41, v_40);
- v_42 := 'Pause';
- v_43 := gvar_25;
- TaskBarButtonToolTip(v_43, v_42);
- v_46 := gvar_60[1];
- v_45 := v_46.HANDLE;
- v_44 := v_45;
- v_47 := gvar_25;
- TaskBarButtonIcon(v_47, v_44);
- v_50 := WIZARDFORM();
- v_49 := v_50.CANCELBUTTON;
- v_48 := v_49.CAPTION;
- v_51 := gvar_44;
- v_51.CAPTION := v_48;
- v_54 := WIZARDFORM();
- v_53 := v_54.NEXTBUTTON;
- v_52 := v_53.CAPTION;
- v_55 := gvar_45;
- v_55.CAPTION := v_52;
- v_56 := 0;
- v_57 := gvar_45;
- v_57.VISIBLE := v_56;
- label_89787:
- v_58 := Arg0 = 14;
- flag := not v_58;
- if flag then goto label_90055;
- label_89826:
- gvar_22 := 3;
- v_59 := FINISHEDDONE();
- v_60 := gvar_45;
- v_61 := WIZARDFORM();
- v_61.ACTIVECONTROL := v_60;
- v_62 := 'Assassins Creed Syndicate Update 1';
- v_63 := APPLICATION();
- v_63.TITLE := v_62;
- v_64 := 'Assassins Creed Syndicate Update 1';
- v_65 := WIZARDFORM();
- v_65.CAPTION := v_64;
- label_90055:
- v_66 := 0;
- v_68 := WIZARDFORM();
- v_67 := v_68.BACKBUTTON;
- v_67.VISIBLE := v_66;
- exit;
- end;
- procedure CURSTEPCHANGED(Arg0: TSETUPSTEP);
- var
- v_1, v_2, v_3, v_18, v_19, v_20, v_21, v_122: Cardinal;
- v_4, v_5, v_6, v_15, v_16, v_47, v_49, v_60, v_61, v_62, v_63, v_64, v_94, v_101: Integer;
- v_7, v_8: PChar;
- v_9, v_10, v_13, v_25, v_26, v_28, v_29, v_30, v_34, v_36, v_38, v_41, v_44, v_46, v_48, v_50, v_55, v_57, v_72, v_73, v_78, v_79, v_80, v_82, v_91, v_92, v_106, v_107, v_113: BOOLEAN;
- v_11, v_12, v_23, v_24, v_51, v_65, v_76, v_77, v_84, v_85, v_88, v_89, v_90, v_93, v_99, v_102, v_109, v_110, v_116, v_117, v_119, v_120: UnicodeString;
- v_14: ProcPtr46;
- v_17: TMAINFORM;
- v_22, v_27, v_74, v_75, v_83, v_86, v_108, v_111, v_112, v_114, v_115, v_118: String;
- v_31, v_69: TNEWPROGRESSBARSTYLE;
- v_32, v_70: TNEWPROGRESSBAR;
- v_33, v_40, v_43, v_53, v_71: TWIZARDFORM;
- v_35, v_37, v_45, v_54, v_56, v_58, v_59, v_123: TBUTTON;
- v_39, v_42, v_52: TNEWBUTTON;
- v_66, v_100, v_103: TSETUPMESSAGEID;
- v_67, v_95, v_97, v_104: TSTRINGS;
- v_68, v_96, v_98, v_105: TNEWMEMO;
- v_81: TCHECKBOX;
- v_87: WideString;
- v_121: Double;
- begin
- label_90115:
- v_10 := Arg0 = 1;
- flag := not v_10;
- if flag then goto label_91505;
- label_90196:
- gvar_21 := 0;
- v_11 := 'English.ini';
- EXTRACTTEMPORARYFILE(v_11);
- v_12 := 'unarc.dll';
- EXTRACTTEMPORARYFILE(v_12);
- gvar_32 := 0;
- gvar_28 := 1;
- v_14 := function PROGRESSCALLBACK(Arg0: Integer; Arg1: Integer; Arg2: PChar; Arg3: PChar; Arg4: PChar; Arg5: PChar): Cardinal;;
- v_15 := 10;
- v_17 := MAINFORM();
- v_16 := v_17.HANDLE;
- v_18 := v_3;
- v_19 := v_2;
- v_20 := v_1;
- v_21 := 0;
- v_24 := '{src}\records.inf';
- v_23 := EXPANDCONSTANT(v_24);
- v_22 := v_23;
- v_13 := ISDoneInit(v_22, v_21, v_20, v_19, v_18, v_16, v_15, v_14);
- flag := not v_13;
- if flag then goto label_91128;
- label_90560:
- label_90565:
- v_27 := 'English';
- v_26 := ChangeLanguage(v_27);
- v_29 := 0;
- v_28 := FileSearchInit(v_29);
- v_28 := not v_28;
- flag := not v_28;
- if flag then goto label_90670;
- label_90665:
- goto label_91109;
- label_90670:
- v_107 := 0;
- v_110 := '{app}';
- v_109 := EXPANDCONSTANT(v_110);
- v_108 := v_109;
- v_111 := '';
- v_112 := '';
- v_113 := 0;
- v_114 := '';
- v_117 := '{app}';
- v_116 := EXPANDCONSTANT(v_117);
- v_115 := v_116;
- v_120 := '{src}\setup-1.bin';
- v_119 := EXPANDCONSTANT(v_120);
- v_118 := FILESEACH(v_119);
- v_121 := 100;
- v_122 := 0;
- v_106 := ISArcExtract(v_122, v_121, v_118, v_115, v_114, v_113, v_112, v_111, v_108, v_107);
- v_106 := not v_106;
- flag := not v_106;
- if flag then goto label_91048;
- label_91043:
- goto label_91109;
- label_91048:
- DELOLDFILES();
- gvar_28 := 0;
- v_123 := gvar_42;
- v_123.SHOW();
- v_25 := 1;
- if not v_25 then goto label_90565;
- label_91109:
- v_30 := ISDoneStop();
- label_91128:
- v_31 := 1;
- v_33 := WIZARDFORM();
- v_32 := v_33.PROGRESSGAUGE;
- v_32.STYLE := v_31;
- v_34 := 1;
- v_35 := gvar_44;
- v_35.VISIBLE := v_34;
- v_36 := 0;
- v_37 := gvar_44;
- v_37.ENABLED := v_36;
- v_38 := 1;
- v_40 := WIZARDFORM();
- v_39 := v_40.CANCELBUTTON;
- v_39.VISIBLE := v_38;
- v_41 := 0;
- v_43 := WIZARDFORM();
- v_42 := v_43.CANCELBUTTON;
- v_42.ENABLED := v_41;
- v_44 := 0;
- v_45 := gvar_40;
- v_45.ENABLED := v_44;
- v_46 := 0;
- v_47 := gvar_25;
- TaskBarButtonEnabled(v_47, v_46);
- v_48 := 0;
- v_49 := gvar_26;
- TaskBarButtonEnabled(v_49, v_48);
- label_91505:
- v_50 := Arg0 = 2;
- if not v_50 then goto label_91550;
- label_91538:
- v_50 := v_50 and gvar_28;
- label_91550:
- flag := not v_50;
- if flag then goto label_92126;
- label_91563:
- v_53 := WIZARDFORM();
- v_52 := v_53.NEXTBUTTON;
- v_51 := v_52.CAPTION;
- v_54 := gvar_45;
- v_54.CAPTION := v_51;
- v_55 := 1;
- v_56 := gvar_45;
- v_56.VISIBLE := v_55;
- v_57 := 0;
- v_58 := gvar_41;
- v_58.ENABLED := v_57;
- v_59 := gvar_41;
- v_59.SHOW();
- v_60 := 4;
- v_61 := 0;
- SetTaskBarProgressState(v_61, v_60);
- v_62 := 100;
- v_63 := 0;
- SetTaskBarProgressValue(v_63, v_62);
- v_66 := 177;
- v_65 := SETUPMESSAGE(v_66);
- v_68 := gvar_20;
- v_67 := v_68.LINES;
- v_64 := v_67.ADD(v_65);
- v_69 := 1;
- v_71 := WIZARDFORM();
- v_70 := v_71.PROGRESSGAUGE;
- v_70.STYLE := v_69;
- v_73 := 0;
- v_74 := '/VERYSILENT';
- v_77 := '{uninstallexe}';
- v_76 := EXPANDCONSTANT(v_77);
- v_75 := v_76;
- v_72 := Exec2(v_75, v_74, v_73);
- goto label_92453;
- label_92126:
- v_91 := gvar_28;
- v_91 := not v_91;
- if not v_91 then goto label_92351;
- label_92158:
- v_96 := gvar_20;
- v_95 := v_96.LINES;
- v_94 := v_95.COUNT;
- v_94 := v_94 - 1;
- v_98 := gvar_20;
- v_97 := v_98.LINES;
- v_93 := v_97.STRINGS[v_94];
- v_100 := 179;
- v_99 := SETUPMESSAGE(v_100);
- v_92 := v_93 <> v_99;
- v_91 := v_91 and v_92;
- label_92351:
- flag := not v_91;
- if flag then goto label_92453;
- label_92364:
- v_103 := 179;
- v_102 := SETUPMESSAGE(v_103);
- v_105 := gvar_20;
- v_104 := v_105.LINES;
- v_101 := v_104.ADD(v_102);
- label_92453:
- v_78 := gvar_34;
- flag := not v_78;
- if flag then goto label_92803;
- label_92482:
- v_79 := Arg0 = 2;
- if not v_79 then goto label_92562;
- label_92515:
- v_81 := gvar_14;
- v_80 := v_81.CHECKED;
- v_79 := v_79 and v_80;
- label_92562:
- if not v_79 then goto label_92607;
- label_92572:
- v_82 := gvar_28;
- v_82 := not v_82;
- v_79 := v_79 and v_82;
- label_92607:
- flag := not v_79;
- if flag then goto label_92803;
- label_92620:
- v_85 := '{app}';
- v_84 := EXPANDCONSTANT(v_85);
- v_83 := v_84;
- v_90 := '{src}';
- v_89 := EXPANDCONSTANT(v_90);
- v_88 := EXTRACTFILEPATH(v_89);
- v_87 := v_88;
- v_87 := v_87 + 'CODEX';
- v_86 := v_87;
- COPYCRACK(v_86, v_83);
- label_92803:
- exit;
- end;
- procedure DEINITIALIZESETUP();
- var
- v_1, v_3, v_4, v_5: Integer;
- v_2, v_7, v_11, v_12: BOOLEAN;
- v_6: TWIZARDFORM;
- v_8: Single;
- v_9, v_10: Cardinal;
- v_13: TMEMORYSTREAM;
- begin
- label_92804:
- v_2 := gvar_29;
- flag := not v_2;
- if flag then goto label_93064;
- label_92838:
- v_4 := 0;
- v_6 := WIZARDFORM();
- v_5 := v_6.HANDLE;
- v_3 := ShowWindow(v_5, v_4);
- v_8 := 0.05;
- v_9 := 2;
- v_10 := gvar_52;
- v_7 := BASS_ChannelSetAttribute(v_10, v_9, v_8);
- v_11 := BASS_Stop();
- v_12 := BASS_Free();
- v_13 := gvar_51;
- v_13.FREE();
- UnLoadVCLStyles();
- TaskBarDestroy();
- label_93064:
- exit;
- end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement