char Md5[32];
string Hash_Images[3] =
{"7330666d94ccf730d332fcf311e09eea",
"33042642b0f9d1c13db4b3a43c540613",
"6aec253fda23825e879ac87cf822037a"};
int Verify_Image[3];

for (int gh=0; gh<sizearray(Hash_Images); gh++)
{
int Status = HashMD5(temp_fold+"Image_"+format(gh)+".bmp", address(#Md5[0]));//ловим (открылся или нет) и получаем хеш в любом случаи

if (Status == 1)//если открылся
{
if(format(#Md5[0]) == Hash_Images[gh])//сравниваем хеш
{
Verify_Image[gh] = 1;//удачно
}
else
{
Verify_Image[gh] = 0;//не подходит
}
}
else//не открылся 0
{
Verify_Image[gh] = 0;//пишем
}
}

function Set_Loading()
{
char BLENDFUNCTION[4] = {0, 0, 20, 0}
int ftn = codhexi(#BLENDFUNCTION[0], 4);
int Display_Color, Display_Width, Display_Height;
getdisplay(Display_Color, Display_Width, Display_Height);
int font = CreateFont(14, 0, 0, 0, 100, 0, 0, 0, RUSSIAN_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, CLEARTYPE_QUALITY, FF_DONTCARE, "Arial");
double Speed = 0.01;
char Md5[32];
string Hash_Images[3] =
{"7330666d94ccf730d332fcf311e09eea",
"33042642b0f9d1c13db4b3a43c540613",
"6aec253fda23825e879ac87cf822037a"};
int Verify_Image[3];
int coord_rectangle[4] = {Display_Width/2-160, Display_Height/2-100, 300, 130};
int hdc, DC, bitmapDC;
hdc = GetDC(0);
DC = CreateCompatibleDC(hdc);
bitmapDC = CreateCompatibleBitmap(hdc, coord_rectangle[2], coord_rectangle[3]);
SelectObject(DC, bitmapDC);

int Select_Pen1, Select_Brush1;
int Object_Pen1, Object_Brush1;

string temp_fold = tempfolder();
string path_fold = pathfolder();

char TRIVERTEX[64];
int coord[8] = {20, 55, 280, 65, 20, 55, 280, 65};
int color[4] = {3329330, 0, 9470064, 65539};
int rect[4] = {0, 1, 2, 3};
int num = 33;//100 ïðîöåíòîâ äåëèì íà 3 èçîáðàæåíèÿ

Object_Pen1 = CreatePen(PS_INSIDEFRAME, 2, 6908265);
Object_Brush1 = CreateSolidBrush(16777215);

for (int gh=0; gh<sizearray(Hash_Images); gh++)//проверка на открытость и хеш изображения
{
int Status = HashMD5(temp_fold+"Image_"+format(gh)+".bmp", address(#Md5[0]));

if (Status == 1)
{
if(format(#Md5[0]) == Hash_Images[gh])
{
Verify_Image[gh] = 1;
}
else
{
Verify_Image[gh] = 0;
}
}
else
{
Verify_Image[gh] = 0;
}
}




for(int i=0; i<=coord[2]-coord[0]; i=i+(coord[2]-coord[0])/100)
{
int percent = i/(coord[2]-coord[0])*100;
coord[4] = coord[0]+i;

for(int s=0; s<2; s++)
{
codhex(coord[s*4], #TRIVERTEX[s*32]);
codhex(coord[s*4+1], #TRIVERTEX[s*32+4]);
codhex(rvalue(color[s*2]) * 256, #TRIVERTEX[s*32+8]);
codhex(gvalue(color[s*2]) * 256, #TRIVERTEX[s*32+10]);
codhex(bvalue(color[s*2]) * 256, #TRIVERTEX[s*32+12]);

codhex(coord[s*4+2], #TRIVERTEX[s*32+16]);
codhex(coord[s*4+3], #TRIVERTEX[s*32+20]);
codhex(rvalue(color[s*2+1]) * 256, #TRIVERTEX[s*32+24]);
codhex(gvalue(color[s*2+1]) * 256, #TRIVERTEX[s*32+26]);
codhex(bvalue(color[s*2+1]) * 256, #TRIVERTEX[s*32+28]);
}

for (int g=percent; g>=num; g++)//вывод текста на прямоугольник, так же распаковка изображений
{
string Text_Loading = "Unpack: C:\...\Temp\Image_"+format(percent/33-1);
num = num+33;
TextOut(DC, 20, 70, Text_Loading, size(Text_Loading)+1);
unpack (path_fold+"\Image_"+format(percent/33-1)+".bmp", temp_fold+"Image_"+format(percent/33-1)+".bmp", 0);
loadimage (#Image_1[0][0], temp_fold+"Image_"+format(percent/33-1)+".bmp");
break;
}

Select_Pen1 = SelectObject(DC, Object_Pen1);
Select_Brush1 = SelectObject(DC, Object_Brush1);
Rectangle(DC, 0, 0, coord_rectangle[2], coord_rectangle[3]);
SetTextColor(DC, 255);
SetBkMode(DC, 1);
TextOut(DC, 120, 10, "prog", 8);
TextOut(DC, 240, 70, format(percent)+"%", size(format(percent))+1);
int old_font = SelectObject (DC, font);

if (percent < 100)
{
TextOut(DC, 20, 70, Text_Loading, size(Text_Loading)+1);
}

SelectObject (DC, old_font);
GradientFill(DC, address(#TRIVERTEX[0]), 4, address(#rect[0]), 2, GRADIENT_FILL_RECT_V);

if(i == 0)
{
looptime(4000)
{
AlphaBlend(hdc, coord_rectangle[0], coord_rectangle[1], coord_rectangle[2], coord_rectangle[3],
DC, 0, 0, coord_rectangle[2], coord_rectangle[3], ftn);
sleep(1);
}
}

looptime(10)
{
BitBlt(hdc, coord_rectangle[0], coord_rectangle[1], coord_rectangle[2], coord_rectangle[3], DC, 0, 0, SRCCOPY);
sleep(1);
}

if(percent == 100)
{

looptime(4000)
{
BitBlt(hdc, coord_rectangle[0], coord_rectangle[1], coord_rectangle[2], coord_rectangle[3], DC, 0, 0, SRCCOPY);
sleep(1);
}
SelectObject(DC, Select_Pen1);
SelectObject(DC, Select_Brush1);
DeleteDC(DC);
DeleteObject(bitmapDC);
ReleaseDC(0, hdc);
resettextout(1);
}
sleep(100*Speed);
}
}

function getmessage(1, WM_CREATE)
{
SecondaryWindow = formatiw(gethwnd(1));

Style1 = GetWindowLong(gethwnd(1), -16);
SetWindowLong(gethwnd(1), -16, Style1 + WS_MINIMIZEBOX);

Object_Font1 = CreateFont(-13, 0, 0, 0, 400, 0, 0, 0, 0, 0, 0, 0, 0, "Times New Roman");
Object_Group1 = CreateWindow(0, "BUTTON", "Настройки программы", BS_GROUPBOX | WS_CHILD | WS_VISIBLE | BS_CENTER, 10, 10, 320, 130, gethwnd(1), 0, 0, 0);//130

for (int a=0; a<sizearray(Object_Checkbox); a++)
{
if (a < sizearray(Object_Checkbox)-2)//вычесть при добавлении галочки!!!
{
Object_Checkbox[a] = CreateWindow(0, "BUTTON", Text_Checkbox[a], BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE, 10, 20+step, 300-step, 20, Object_Group1, 0, 0, 0);
SendMessage(Object_Checkbox[a], WM_SETFONT, Object_Font1, 1);
step = step+20;
}
}

Object_Checkbox[5] = CreateWindow(0, "BUTTON", Text_Checkbox[5], BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE, 10, 20+130, 300, 20, gethwnd(1), 0, 0, 0);
Object_Checkbox[6] = CreateWindow(0, "BUTTON", Text_Checkbox[6], BS_AUTOCHECKBOX | WS_CHILD | WS_VISIBLE, 10, 20+150, 300, 20, gethwnd(1), 0, 0, 0);
}