Jump to content

Perforated image in GUI

GreenCan

By GreenCan,
in AutoIt Example Scripts

 Share

Recommended Posts

GreenCan Universalist

GreenCan

Posted
  • Author
Posted

wow.

ok for complex images, but for simple ones ? ;)

this question can be understood as stupid but i've sub-question.

can i put over a running program (eg: skype) a perforated GUI that let see

only what I want ? (both gui must move in same directions)

thank you for reply, and maybe some example code.

m.

Hi myspacee,

I like valuater's solution, but I would be you, I would not trust it (he's got a perforation in his head :P)

Martin's example will bring you somewhere, I'm sure.

You can also play it differently. why not hide the whole window and just show what you want?

You can indeed perforate any window, as far as you don't resize it, the perforation will remain active.

This is an example using an excel spreadsheet.

So open any Excel spreadsheet and make small enough so that you can move it arround.

Run the attached script.

the example is again using a perforated image but the code in line 756 to 765 gives you the solution.

You can hide the complete window including the resize and close buttons and show only the square that you need.

GreenCan

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.2.12.1
 Author:         GreenCan

 Script Function:
    Create a window with my perforated image

#ce ----------------------------------------------------------------------------

msgbox(0,"GreenCan Perforator","Please open Excel" & @CR & "Make the Excel Window small enough to move around over your desktop" & @CR & "and press OK")
_make_hole()
msgbox(0,"GreenCan Perforator","OK" & @CR & "Now move the Excel Window around over your desktop, use a dark background for a better effect" & @CR & "When you change the size of the Excel window, the effect will be gone!" & @CR& " press OK")

Exit
#FUNCTION# ==============================================================
Func _make_hole()
    AutoItSetOption("WinTitleMatchMode", 2)

    ; Try It Withy Notepad or any application
    ;$handle = WinGetHandle("classname=Notepad", "this one")
    $handle = WinGetHandle("Microsoft Excel")   



    If @error Then
        MsgBox(4096, "Error", "Could not find the correct window")
        Exit
    Else
        Local $_Left_pos, $_Top_pos, $_GUI_NAME
        $_Left_pos = 50
        $_Top_pos = 200
        $_GUI_NAME = $handle
        _GuiImageHole($handle, $_Left_pos, $_Top_pos, 100, 100)
    EndIf
EndFunc
#FUNCTION# ==============================================================
#comments-start
    The lines below will generate the perforated image (bewteen start and end)
    Move these lines into your GUI code, usually just before GUISetState()
    Don't forget to fill in the correct coordinates for $Left_pos, $Top_pos
    and enter the GUI Window Handle in the last line

# ==> Start
Local $_Left_pos, $_Top_pos, $_GUI_NAME
$_Left_pos = 10 ; Replace with correct position
$_Top_pos =  _WinAPI_GetSystemMetrics(4) ; Just below the title bar (Must #include <WinAPI.au3> if using this function!!!)
$_GUI_NAME = 'The name of your GUI window'
_GuiImageHole($_GUI_NAME, $_Left_pos, $_Top_pos, 100, 100)
# <== End

#comments-end

#FUNCTION# ==============================================================
Func _GuiImageHole($window_handle, $pos_x, $pos_y,$Image_Width ,$Image_Height)
    Local $aClassList, $aM_Mask, $aMask
#Region picture array
Local $PictArray[688]
$PictArray[0] = '1,1,32,1'
$PictArray[1] = '67,1,100,1'
$PictArray[2] = '1,2,30,2'
$PictArray[3] = '70,2,100,2'
$PictArray[4] = '1,3,27,3'
$PictArray[5] = '45,3,57,3'
$PictArray[6] = '72,3,100,3'
$PictArray[7] = '1,4,26,4'
$PictArray[8] = '39,4,62,4'
$PictArray[9] = '74,4,100,4'
$PictArray[10] = '1,5,24,5'
$PictArray[11] = '36,5,65,5'
$PictArray[12] = '76,5,100,5'
$PictArray[13] = '1,6,22,6'
$PictArray[14] = '33,6,67,6'
$PictArray[15] = '77,6,100,6'
$PictArray[16] = '1,7,21,7'
$PictArray[17] = '31,7,51,7'
$PictArray[18] = '53,7,69,7'
$PictArray[19] = '79,7,100,7'
$PictArray[20] = '1,8,20,8'
$PictArray[21] = '29,8,45,8'
$PictArray[22] = '47,8,48,8'
$PictArray[23] = '51,8,53,8'
$PictArray[24] = '55,8,71,8'
$PictArray[25] = '81,8,100,8'
$PictArray[26] = '1,9,18,9'
$PictArray[27] = '27,9,43,9'
$PictArray[28] = '46,9,55,9'
$PictArray[29] = '57,9,73,9'
$PictArray[30] = '82,9,100,9'
$PictArray[31] = '1,10,17,10'
$PictArray[32] = '26,10,40,10'
$PictArray[33] = '42,10,45,10'
$PictArray[34] = '47,10,47,10'
$PictArray[35] = '49,10,49,10'
$PictArray[36] = '51,10,52,10'
$PictArray[37] = '54,10,56,10'
$PictArray[38] = '58,10,58,10'
$PictArray[39] = '60,10,74,10'
$PictArray[40] = '83,10,100,10'
$PictArray[41] = '1,11,16,11'
$PictArray[42] = '24,11,38,11'
$PictArray[43] = '40,11,42,11'
$PictArray[44] = '44,11,45,11'
$PictArray[45] = '47,11,49,11'
$PictArray[46] = '51,11,52,11'
$PictArray[47] = '54,11,54,11'
$PictArray[48] = '56,11,59,11'
$PictArray[49] = '61,11,62,11'
$PictArray[50] = '64,11,76,11'
$PictArray[51] = '84,11,100,11'
$PictArray[52] = '1,12,15,12'
$PictArray[53] = '23,12,42,12'
$PictArray[54] = '44,12,45,12'
$PictArray[55] = '47,12,48,12'
$PictArray[56] = '51,12,52,12'
$PictArray[57] = '54,12,55,12'
$PictArray[58] = '57,12,77,12'
$PictArray[59] = '85,12,100,12'
$PictArray[60] = '1,13,14,13'
$PictArray[61] = '21,13,29,13'
$PictArray[62] = '33,13,39,13'
$PictArray[63] = '42,13,42,13'
$PictArray[64] = '45,13,46,13'
$PictArray[65] = '48,13,48,13'
$PictArray[66] = '50,13,51,13'
$PictArray[67] = '54,13,54,13'
$PictArray[68] = '56,13,78,13'
$PictArray[69] = '86,13,100,13'
$PictArray[70] = '1,14,13,14'
$PictArray[71] = '20,14,27,14'
$PictArray[72] = '32,14,32,14'
$PictArray[73] = '34,14,36,14'
$PictArray[74] = '38,14,38,14'
$PictArray[75] = '40,14,41,14'
$PictArray[76] = '50,14,52,14'
$PictArray[77] = '56,14,57,14'
$PictArray[78] = '59,14,60,14'
$PictArray[79] = '62,14,64,14'
$PictArray[80] = '66,14,79,14'
$PictArray[81] = '87,14,100,14'
$PictArray[82] = '1,15,12,15'
$PictArray[83] = '19,15,26,15'
$PictArray[84] = '31,15,38,15'
$PictArray[85] = '40,15,42,15'
$PictArray[86] = '44,15,48,15'
$PictArray[87] = '50,15,51,15'
$PictArray[88] = '55,15,57,15'
$PictArray[89] = '59,15,59,15'
$PictArray[90] = '62,15,62,15'
$PictArray[91] = '64,15,66,15'
$PictArray[92] = '68,15,80,15'
$PictArray[93] = '88,15,100,15'
$PictArray[94] = '1,16,11,16'
$PictArray[95] = '18,16,26,16'
$PictArray[96] = '32,16,33,16'
$PictArray[97] = '35,16,36,16'
$PictArray[98] = '38,16,38,16'
$PictArray[99] = '40,16,40,16'
$PictArray[100] = '42,16,48,16'
$PictArray[101] = '50,16,51,16'
$PictArray[102] = '54,16,58,16'
$PictArray[103] = '63,16,64,16'
$PictArray[104] = '67,16,67,16'
$PictArray[105] = '69,16,81,16'
$PictArray[106] = '89,16,100,16'
$PictArray[107] = '1,17,10,17'
$PictArray[108] = '17,17,26,17'
$PictArray[109] = '28,17,29,17'
$PictArray[110] = '32,17,38,17'
$PictArray[111] = '40,17,43,17'
$PictArray[112] = '45,17,48,17'
$PictArray[113] = '50,17,50,17'
$PictArray[114] = '53,17,58,17'
$PictArray[115] = '62,17,63,17'
$PictArray[116] = '65,17,82,17'
$PictArray[117] = '89,17,100,17'
$PictArray[118] = '1,18,10,18'
$PictArray[119] = '16,18,26,18'
$PictArray[120] = '28,18,29,18'
$PictArray[121] = '31,18,33,18'
$PictArray[122] = '35,18,38,18'
$PictArray[123] = '40,18,41,18'
$PictArray[124] = '43,18,44,18'
$PictArray[125] = '47,18,48,18'
$PictArray[126] = '54,18,56,18'
$PictArray[127] = '60,18,64,18'
$PictArray[128] = '66,18,83,18'
$PictArray[129] = '90,18,100,18'
$PictArray[130] = '1,19,9,19'
$PictArray[131] = '15,19,33,19'
$PictArray[132] = '35,19,39,19'
$PictArray[133] = '41,19,42,19'
$PictArray[134] = '44,19,45,19'
$PictArray[135] = '53,19,53,19'
$PictArray[136] = '55,19,56,19'
$PictArray[137] = '58,19,60,19'
$PictArray[138] = '62,19,64,19'
$PictArray[139] = '67,19,70,19'
$PictArray[140] = '72,19,84,19'
$PictArray[141] = '91,19,100,19'
$PictArray[142] = '1,20,8,20'
$PictArray[143] = '15,20,31,20'
$PictArray[144] = '38,20,42,20'
$PictArray[145] = '51,20,53,20'
$PictArray[146] = '58,20,58,20'
$PictArray[147] = '60,20,70,20'
$PictArray[148] = '72,20,85,20'
$PictArray[149] = '92,20,100,20'
$PictArray[150] = '1,21,8,21'
$PictArray[151] = '14,21,33,21'
$PictArray[152] = '35,21,38,21'
$PictArray[153] = '42,21,42,21'
$PictArray[154] = '44,21,45,21'
$PictArray[155] = '51,21,55,21'
$PictArray[156] = '58,21,63,21'
$PictArray[157] = '65,21,85,21'
$PictArray[158] = '92,21,100,21'
$PictArray[159] = '1,22,7,22'
$PictArray[160] = '13,22,35,22'
$PictArray[161] = '37,22,39,22'
$PictArray[162] = '41,22,42,22'
$PictArray[163] = '44,22,46,22'
$PictArray[164] = '51,22,55,22'
$PictArray[165] = '58,22,62,22'
$PictArray[166] = '65,22,67,22'
$PictArray[167] = '69,22,71,22'
$PictArray[168] = '73,22,86,22'
$PictArray[169] = '93,22,100,22'
$PictArray[170] = '1,23,6,23'
$PictArray[171] = '12,23,29,23'
$PictArray[172] = '32,23,35,23'
$PictArray[173] = '37,23,39,23'
$PictArray[174] = '41,23,43,23'
$PictArray[175] = '45,23,47,23'
$PictArray[176] = '51,23,56,23'
$PictArray[177] = '58,23,60,23'
$PictArray[178] = '65,23,65,23'
$PictArray[179] = '67,23,87,23'
$PictArray[180] = '93,23,100,23'
$PictArray[181] = '1,24,6,24'
$PictArray[182] = '12,24,31,24'
$PictArray[183] = '33,24,39,24'
$PictArray[184] = '42,24,45,24'
$PictArray[185] = '47,24,47,24'
$PictArray[186] = '51,24,56,24'
$PictArray[187] = '64,24,65,24'
$PictArray[188] = '67,24,68,24'
$PictArray[189] = '70,24,87,24'
$PictArray[190] = '94,24,100,24'
$PictArray[191] = '1,25,5,25'
$PictArray[192] = '11,25,37,25'
$PictArray[193] = '39,25,40,25'
$PictArray[194] = '43,25,48,25'
$PictArray[195] = '52,25,55,25'
$PictArray[196] = '61,25,62,25'
$PictArray[197] = '64,25,65,25'
$PictArray[198] = '67,25,71,25'
$PictArray[199] = '73,25,88,25'
$PictArray[200] = '95,25,100,25'
$PictArray[201] = '1,26,5,26'
$PictArray[202] = '11,26,28,26'
$PictArray[203] = '30,26,30,26'
$PictArray[204] = '35,26,38,26'
$PictArray[205] = '40,26,41,26'
$PictArray[206] = '44,26,48,26'
$PictArray[207] = '53,26,54,26'
$PictArray[208] = '59,26,63,26'
$PictArray[209] = '67,26,69,26'
$PictArray[210] = '71,26,88,26'
$PictArray[211] = '95,26,100,26'
$PictArray[212] = '1,27,4,27'
$PictArray[213] = '10,27,34,27'
$PictArray[214] = '37,27,41,27'
$PictArray[215] = '46,27,49,27'
$PictArray[216] = '57,27,63,27'
$PictArray[217] = '65,27,66,27'
$PictArray[218] = '69,27,69,27'
$PictArray[219] = '72,27,89,27'
$PictArray[220] = '95,27,100,27'
$PictArray[221] = '1,28,4,28'
$PictArray[222] = '10,28,28,28'
$PictArray[223] = '30,28,35,28'
$PictArray[224] = '38,28,39,28'
$PictArray[225] = '41,28,41,28'
$PictArray[226] = '44,28,46,28'
$PictArray[227] = '49,28,49,28'
$PictArray[228] = '57,28,61,28'
$PictArray[229] = '65,28,67,28'
$PictArray[230] = '69,28,89,28'
$PictArray[231] = '96,28,100,28'
$PictArray[232] = '1,29,3,29'
$PictArray[233] = '9,29,29,29'
$PictArray[234] = '31,29,35,29'
$PictArray[235] = '38,29,41,29'
$PictArray[236] = '44,29,47,29'
$PictArray[237] = '50,29,50,29'
$PictArray[238] = '56,29,56,29'
$PictArray[239] = '58,29,60,29'
$PictArray[240] = '63,29,65,29'
$PictArray[241] = '68,29,69,29'
$PictArray[242] = '71,29,71,29'
$PictArray[243] = '73,29,90,29'
$PictArray[244] = '96,29,100,29'
$PictArray[245] = '1,30,3,30'
$PictArray[246] = '9,30,29,30'
$PictArray[247] = '38,30,42,30'
$PictArray[248] = '44,30,44,30'
$PictArray[249] = '46,30,47,30'
$PictArray[250] = '55,30,59,30'
$PictArray[251] = '62,30,65,30'
$PictArray[252] = '67,30,68,30'
$PictArray[253] = '70,30,90,30'
$PictArray[254] = '97,30,100,30'
$PictArray[255] = '1,31,3,31'
$PictArray[256] = '8,31,31,31'
$PictArray[257] = '33,31,36,31'
$PictArray[258] = '39,31,41,31'
$PictArray[259] = '44,31,48,31'
$PictArray[260] = '57,31,58,31'
$PictArray[261] = '61,31,67,31'
$PictArray[262] = '69,31,69,31'
$PictArray[263] = '71,31,71,31'
$PictArray[264] = '73,31,90,31'
$PictArray[265] = '97,31,100,31'
$PictArray[266] = '1,32,2,32'
$PictArray[267] = '8,32,35,32'
$PictArray[268] = '40,32,41,32'
$PictArray[269] = '44,32,49,32'
$PictArray[270] = '56,32,58,32'
$PictArray[271] = '60,32,64,32'
$PictArray[272] = '66,32,67,32'
$PictArray[273] = '71,32,71,32'
$PictArray[274] = '73,32,91,32'
$PictArray[275] = '97,32,100,32'
$PictArray[276] = '1,33,2,33'
$PictArray[277] = '7,33,30,33'
$PictArray[278] = '36,33,37,33'
$PictArray[279] = '45,33,49,33'
$PictArray[280] = '56,33,57,33'
$PictArray[281] = '60,33,63,33'
$PictArray[282] = '65,33,66,33'
$PictArray[283] = '69,33,91,33'
$PictArray[284] = '98,33,100,33'
$PictArray[285] = '1,34,2,34'
$PictArray[286] = '7,34,29,34'
$PictArray[287] = '31,34,33,34'
$PictArray[288] = '35,34,35,34'
$PictArray[289] = '40,34,40,34'
$PictArray[290] = '45,34,49,34'
$PictArray[291] = '61,34,62,34'
$PictArray[292] = '68,34,70,34'
$PictArray[293] = '72,34,91,34'
$PictArray[294] = '98,34,100,34'
$PictArray[295] = '1,35,2,35'
$PictArray[296] = '7,35,32,35'
$PictArray[297] = '35,35,38,35'
$PictArray[298] = '40,35,41,35'
$PictArray[299] = '47,35,49,35'
$PictArray[300] = '67,35,68,35'
$PictArray[301] = '70,35,92,35'
$PictArray[302] = '98,35,100,35'
$PictArray[303] = '1,36,1,36'
$PictArray[304] = '7,36,32,36'
$PictArray[305] = '34,36,34,36'
$PictArray[306] = '36,36,36,36'
$PictArray[307] = '38,36,41,36'
$PictArray[308] = '48,36,48,36'
$PictArray[309] = '66,36,68,36'
$PictArray[310] = '70,36,92,36'
$PictArray[311] = '98,36,100,36'
$PictArray[312] = '1,37,1,37'
$PictArray[313] = '6,37,43,37'
$PictArray[314] = '60,37,66,37'
$PictArray[315] = '68,37,92,37'
$PictArray[316] = '99,37,100,37'
$PictArray[317] = '1,38,1,38'
$PictArray[318] = '6,38,45,38'
$PictArray[319] = '56,38,59,38'
$PictArray[320] = '65,38,68,38'
$PictArray[321] = '70,38,92,38'
$PictArray[322] = '99,38,100,38'
$PictArray[323] = '1,39,1,39'
$PictArray[324] = '6,39,46,39'
$PictArray[325] = '58,39,92,39'
$PictArray[326] = '98,39,100,39'
$PictArray[327] = '6,40,47,40'
$PictArray[328] = '57,40,93,40'
$PictArray[329] = '98,40,100,40'
$PictArray[330] = '6,41,15,41'
$PictArray[331] = '20,41,29,41'
$PictArray[332] = '32,41,47,41'
$PictArray[333] = '56,41,93,41'
$PictArray[334] = '97,41,100,41'
$PictArray[335] = '6,42,12,42'
$PictArray[336] = '15,42,32,42'
$PictArray[337] = '35,42,47,42'
$PictArray[338] = '55,42,93,42'
$PictArray[339] = '96,42,100,42'
$PictArray[340] = '6,43,10,43'
$PictArray[341] = '13,43,19,43'
$PictArray[342] = '30,43,35,43'
$PictArray[343] = '37,43,47,43'
$PictArray[344] = '55,43,93,43'
$PictArray[345] = '95,43,97,43'
$PictArray[346] = '100,43,100,43'
$PictArray[347] = '5,44,7,44'
$PictArray[348] = '10,44,14,44'
$PictArray[349] = '34,44,48,44'
$PictArray[350] = '55,44,92,44'
$PictArray[351] = '94,44,96,44'
$PictArray[352] = '99,44,100,44'
$PictArray[353] = '7,45,11,45'
$PictArray[354] = '37,45,38,45'
$PictArray[355] = '40,45,48,45'
$PictArray[356] = '55,45,91,45'
$PictArray[357] = '93,45,96,45'
$PictArray[358] = '98,45,100,45'
$PictArray[359] = '5,46,8,46'
$PictArray[360] = '20,46,20,46'
$PictArray[361] = '27,46,34,46'
$PictArray[362] = '39,46,48,46'
$PictArray[363] = '55,46,90,46'
$PictArray[364] = '92,46,95,46'
$PictArray[365] = '98,46,100,46'
$PictArray[366] = '3,47,6,47'
$PictArray[367] = '17,47,20,47'
$PictArray[368] = '23,47,36,47'
$PictArray[369] = '40,47,41,47'
$PictArray[370] = '43,47,48,47'
$PictArray[371] = '54,47,89,47'
$PictArray[372] = '91,47,94,47'
$PictArray[373] = '97,47,98,47'
$PictArray[374] = '100,47,100,47'
$PictArray[375] = '2,48,5,48'
$PictArray[376] = '15,48,18,48'
$PictArray[377] = '20,48,28,48'
$PictArray[378] = '33,48,38,48'
$PictArray[379] = '41,48,42,48'
$PictArray[380] = '44,48,48,48'
$PictArray[381] = '54,48,88,48'
$PictArray[382] = '90,48,91,48'
$PictArray[383] = '93,48,93,48'
$PictArray[384] = '96,48,97,48'
$PictArray[385] = '100,48,100,48'
$PictArray[386] = '1,49,3,49'
$PictArray[387] = '12,49,15,49'
$PictArray[388] = '17,49,22,49'
$PictArray[389] = '37,49,40,49'
$PictArray[390] = '43,49,43,49'
$PictArray[391] = '45,49,48,49'
$PictArray[392] = '54,49,90,49'
$PictArray[393] = '95,49,96,49'
$PictArray[394] = '100,49,100,49'
$PictArray[395] = '1,50,2,50'
$PictArray[396] = '10,50,13,50'
$PictArray[397] = '16,50,18,50'
$PictArray[398] = '39,50,42,50'
$PictArray[399] = '44,50,45,50'
$PictArray[400] = '47,50,48,50'
$PictArray[401] = '54,50,85,50'
$PictArray[402] = '87,50,89,50'
$PictArray[403] = '94,50,95,50'
$PictArray[404] = '100,50,100,50'
$PictArray[405] = '8,51,11,51'
$PictArray[406] = '41,51,43,51'
$PictArray[407] = '46,51,46,51'
$PictArray[408] = '48,51,48,51'
$PictArray[409] = '54,51,88,51'
$PictArray[410] = '93,51,94,51'
$PictArray[411] = '100,51,100,51'
$PictArray[412] = '6,52,9,52'
$PictArray[413] = '43,52,44,52'
$PictArray[414] = '47,52,48,52'
$PictArray[415] = '55,52,82,52'
$PictArray[416] = '84,52,87,52'
$PictArray[417] = '92,52,93,52'
$PictArray[418] = '100,52,100,52'
$PictArray[419] = '1,53,1,53'
$PictArray[420] = '5,53,7,53'
$PictArray[421] = '44,53,46,53'
$PictArray[422] = '50,53,51,53'
$PictArray[423] = '55,53,80,53'
$PictArray[424] = '82,53,86,53'
$PictArray[425] = '91,53,92,53'
$PictArray[426] = '100,53,100,53'
$PictArray[427] = '1,54,1,54'
$PictArray[428] = '3,54,5,54'
$PictArray[429] = '46,54,47,54'
$PictArray[430] = '50,54,53,54'
$PictArray[431] = '56,54,78,54'
$PictArray[432] = '80,54,84,54'
$PictArray[433] = '90,54,91,54'
$PictArray[434] = '100,54,100,54'
$PictArray[435] = '1,55,4,55'
$PictArray[436] = '48,55,53,55'
$PictArray[437] = '55,55,56,55'
$PictArray[438] = '59,55,75,55'
$PictArray[439] = '78,55,82,55'
$PictArray[440] = '89,55,90,55'
$PictArray[441] = '99,55,100,55'
$PictArray[442] = '1,56,2,56'
$PictArray[443] = '50,56,53,56'
$PictArray[444] = '57,56,59,56'
$PictArray[445] = '62,56,71,56'
$PictArray[446] = '74,56,80,56'
$PictArray[447] = '85,56,86,56'
$PictArray[448] = '88,56,89,56'
$PictArray[449] = '99,56,100,56'
$PictArray[450] = '1,57,1,57'
$PictArray[451] = '50,57,50,57'
$PictArray[452] = '52,57,53,57'
$PictArray[453] = '60,57,63,57'
$PictArray[454] = '69,57,78,57'
$PictArray[455] = '83,57,88,57'
$PictArray[456] = '99,57,100,57'
$PictArray[457] = '1,58,1,58'
$PictArray[458] = '50,58,52,58'
$PictArray[459] = '55,58,56,58'
$PictArray[460] = '63,58,74,58'
$PictArray[461] = '81,58,87,58'
$PictArray[462] = '99,58,100,58'
$PictArray[463] = '1,59,1,59'
$PictArray[464] = '42,59,43,59'
$PictArray[465] = '50,59,53,59'
$PictArray[466] = '56,59,59,59'
$PictArray[467] = '78,59,81,59'
$PictArray[468] = '84,59,85,59'
$PictArray[469] = '98,59,100,59'
$PictArray[470] = '1,60,2,60'
$PictArray[471] = '44,60,45,60'
$PictArray[472] = '49,60,53,60'
$PictArray[473] = '59,60,63,60'
$PictArray[474] = '74,60,79,60'
$PictArray[475] = '83,60,84,60'
$PictArray[476] = '98,60,100,60'
$PictArray[477] = '1,61,2,61'
$PictArray[478] = '40,61,54,61'
$PictArray[479] = '63,61,76,61'
$PictArray[480] = '98,61,100,61'
$PictArray[481] = '1,62,2,62'
$PictArray[482] = '36,62,43,62'
$PictArray[483] = '48,62,56,62'
$PictArray[484] = '98,62,100,62'
$PictArray[485] = '1,63,3,63'
$PictArray[486] = '36,63,37,63'
$PictArray[487] = '41,63,42,63'
$PictArray[488] = '48,63,62,63'
$PictArray[489] = '97,63,100,63'
$PictArray[490] = '1,64,3,64'
$PictArray[491] = '35,64,36,64'
$PictArray[492] = '41,64,42,64'
$PictArray[493] = '48,64,57,64'
$PictArray[494] = '62,64,63,64'
$PictArray[495] = '97,64,100,64'
$PictArray[496] = '1,65,4,65'
$PictArray[497] = '32,65,35,65'
$PictArray[498] = '41,65,44,65'
$PictArray[499] = '47,65,49,65'
$PictArray[500] = '51,65,53,65'
$PictArray[501] = '63,65,64,65'
$PictArray[502] = '97,65,100,65'
$PictArray[503] = '1,66,4,66'
$PictArray[504] = '31,66,31,66'
$PictArray[505] = '35,66,35,66'
$PictArray[506] = '40,66,40,66'
$PictArray[507] = '42,66,42,66'
$PictArray[508] = '46,66,48,66'
$PictArray[509] = '51,66,53,66'
$PictArray[510] = '58,66,58,66'
$PictArray[511] = '65,66,65,66'
$PictArray[512] = '96,66,100,66'
$PictArray[513] = '1,67,4,67'
$PictArray[514] = '35,67,35,67'
$PictArray[515] = '42,67,42,67'
$PictArray[516] = '46,67,48,67'
$PictArray[517] = '51,67,54,67'
$PictArray[518] = '58,67,58,67'
$PictArray[519] = '62,67,62,67'
$PictArray[520] = '65,67,65,67'
$PictArray[521] = '96,67,100,67'
$PictArray[522] = '1,68,5,68'
$PictArray[523] = '35,68,35,68'
$PictArray[524] = '38,68,38,68'
$PictArray[525] = '42,68,42,68'
$PictArray[526] = '46,68,61,68'
$PictArray[527] = '68,68,68,68'
$PictArray[528] = '95,68,100,68'
$PictArray[529] = '1,69,6,69'
$PictArray[530] = '38,69,38,69'
$PictArray[531] = '40,69,41,69'
$PictArray[532] = '45,69,47,69'
$PictArray[533] = '49,69,54,69'
$PictArray[534] = '61,69,63,69'
$PictArray[535] = '66,69,66,69'
$PictArray[536] = '95,69,100,69'
$PictArray[537] = '1,70,6,70'
$PictArray[538] = '33,70,33,70'
$PictArray[539] = '38,70,46,70'
$PictArray[540] = '49,70,50,70'
$PictArray[541] = '53,70,54,70'
$PictArray[542] = '62,70,62,70'
$PictArray[543] = '64,70,66,70'
$PictArray[544] = '94,70,100,70'
$PictArray[545] = '1,71,7,71'
$PictArray[546] = '32,71,32,71'
$PictArray[547] = '37,71,46,71'
$PictArray[548] = '49,71,49,71'
$PictArray[549] = '53,71,58,71'
$PictArray[550] = '62,71,62,71'
$PictArray[551] = '66,71,67,71'
$PictArray[552] = '94,71,100,71'
$PictArray[553] = '1,72,7,72'
$PictArray[554] = '34,72,39,72'
$PictArray[555] = '46,72,46,72'
$PictArray[556] = '49,72,62,72'
$PictArray[557] = '66,72,66,72'
$PictArray[558] = '68,72,70,72'
$PictArray[559] = '93,72,100,72'
$PictArray[560] = '1,73,8,73'
$PictArray[561] = '37,73,37,73'
$PictArray[562] = '49,73,50,73'
$PictArray[563] = '53,73,54,73'
$PictArray[564] = '60,73,63,73'
$PictArray[565] = '65,73,65,73'
$PictArray[566] = '68,73,68,73'
$PictArray[567] = '70,73,70,73'
$PictArray[568] = '93,73,100,73'
$PictArray[569] = '1,74,9,74'
$PictArray[570] = '37,74,37,74'
$PictArray[571] = '44,74,49,74'
$PictArray[572] = '53,74,54,74'
$PictArray[573] = '61,74,61,74'
$PictArray[574] = '63,74,65,74'
$PictArray[575] = '68,74,68,74'
$PictArray[576] = '92,74,100,74'
$PictArray[577] = '1,75,9,75'
$PictArray[578] = '31,75,37,75'
$PictArray[579] = '47,75,48,75'
$PictArray[580] = '54,75,55,75'
$PictArray[581] = '60,75,60,75'
$PictArray[582] = '62,75,62,75'
$PictArray[583] = '65,75,68,75'
$PictArray[584] = '91,75,100,75'
$PictArray[585] = '1,76,10,76'
$PictArray[586] = '37,76,38,76'
$PictArray[587] = '42,76,43,76'
$PictArray[588] = '45,76,47,76'
$PictArray[589] = '52,76,56,76'
$PictArray[590] = '58,76,58,76'
$PictArray[591] = '60,76,60,76'
$PictArray[592] = '62,76,63,76'
$PictArray[593] = '67,76,67,76'
$PictArray[594] = '91,76,100,76'
$PictArray[595] = '1,77,11,77'
$PictArray[596] = '37,77,41,77'
$PictArray[597] = '44,77,48,77'
$PictArray[598] = '54,77,55,77'
$PictArray[599] = '62,77,64,77'
$PictArray[600] = '90,77,100,77'
$PictArray[601] = '1,78,12,78'
$PictArray[602] = '36,78,40,78'
$PictArray[603] = '44,78,44,78'
$PictArray[604] = '48,78,49,78'
$PictArray[605] = '55,78,58,78'
$PictArray[606] = '61,78,61,78'
$PictArray[607] = '64,78,64,78'
$PictArray[608] = '89,78,100,78'
$PictArray[609] = '1,79,13,79'
$PictArray[610] = '40,79,40,79'
$PictArray[611] = '44,79,44,79'
$PictArray[612] = '49,79,49,79'
$PictArray[613] = '53,79,55,79'
$PictArray[614] = '58,79,58,79'
$PictArray[615] = '66,79,66,79'
$PictArray[616] = '88,79,100,79'
$PictArray[617] = '1,80,14,80'
$PictArray[618] = '35,80,35,80'
$PictArray[619] = '40,80,40,80'
$PictArray[620] = '44,80,44,80'
$PictArray[621] = '49,80,49,80'
$PictArray[622] = '52,80,52,80'
$PictArray[623] = '55,80,56,80'
$PictArray[624] = '61,80,63,80'
$PictArray[625] = '66,80,66,80'
$PictArray[626] = '87,80,100,80'
$PictArray[627] = '1,81,15,81'
$PictArray[628] = '41,81,42,81'
$PictArray[629] = '44,81,45,81'
$PictArray[630] = '49,81,50,81'
$PictArray[631] = '54,81,56,81'
$PictArray[632] = '59,81,59,81'
$PictArray[633] = '61,81,61,81'
$PictArray[634] = '63,81,63,81'
$PictArray[635] = '86,81,100,81'
$PictArray[636] = '1,82,16,82'
$PictArray[637] = '40,82,40,82'
$PictArray[638] = '42,82,42,82'
$PictArray[639] = '46,82,46,82'
$PictArray[640] = '50,82,51,82'
$PictArray[641] = '54,82,54,82'
$PictArray[642] = '56,82,57,82'
$PictArray[643] = '64,82,64,82'
$PictArray[644] = '85,82,100,82'
$PictArray[645] = '1,83,17,83'
$PictArray[646] = '43,83,43,83'
$PictArray[647] = '48,83,48,83'
$PictArray[648] = '50,83,50,83'
$PictArray[649] = '52,83,52,83'
$PictArray[650] = '56,83,56,83'
$PictArray[651] = '58,83,58,83'
$PictArray[652] = '84,83,100,83'
$PictArray[653] = '1,84,18,84'
$PictArray[654] = '43,84,43,84'
$PictArray[655] = '46,84,46,84'
$PictArray[656] = '50,84,50,84'
$PictArray[657] = '52,84,53,84'
$PictArray[658] = '56,84,56,84'
$PictArray[659] = '82,84,100,84'
$PictArray[660] = '1,85,19,85'
$PictArray[661] = '46,85,46,85'
$PictArray[662] = '49,85,50,85'
$PictArray[663] = '53,85,53,85'
$PictArray[664] = '56,85,56,85'
$PictArray[665] = '81,85,100,85'
$PictArray[666] = '1,86,21,86'
$PictArray[667] = '55,86,55,86'
$PictArray[668] = '80,86,100,86'
$PictArray[669] = '1,87,22,87'
$PictArray[670] = '78,87,100,87'
$PictArray[671] = '1,88,24,88'
$PictArray[672] = '77,88,100,88'
$PictArray[673] = '1,89,25,89'
$PictArray[674] = '75,89,100,89'
$PictArray[675] = '1,90,27,90'
$PictArray[676] = '74,90,100,90'
$PictArray[677] = '1,91,29,91'
$PictArray[678] = '71,91,100,91'
$PictArray[679] = '1,92,32,92'
$PictArray[680] = '69,92,100,92'
$PictArray[681] = '1,93,34,93'
$PictArray[682] = '67,93,100,93'
$PictArray[683] = '1,94,38,94'
$PictArray[684] = '63,94,100,94'
$PictArray[685] = '1,95,43,95'
$PictArray[686] = '58,95,100,95'
$PictArray[687] = '1,96,100,96'
#EndRegion picture array

    ; get the size of the active window
    $size = WinGetClientSize($window_handle)
    $Window_width = $size[0]
    $Window_height = $size[1] + 40 ; include height of title bar up to 30 dots
    ; First hide the window
    $aClassList = StringSplit(_WinGetClassListEx($window_handle), @LF)
    $aM_Mask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', 0, 'long', 0, 'long', 0, 'long', 0)
    ; rectangle A - left side
    $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', 0, 'long', 0, 'long', $pos_x, 'long', $Window_height)
    DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
    ; rectangle B - Top
    $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', 0, 'long', 0, 'long', $Window_width, 'long', $pos_y)
    DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
    ; rectangle C - Right side
    $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', $pos_x  + $Image_Width , 'long', 0 , 'long', $Window_width + 30, 'long', $Window_height)
    DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
    ; rectangle D - Bottom
    $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', 0 , 'long', $pos_y + $Image_Height, 'long', $Window_width, 'long', $Window_height)
    DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
    ; now unhide all regions as defined  in array $PictArray
    For $i = 0 To (UBound($PictArray) - 1)
        $Block_value = StringSplit($PictArray[$i],',')
        $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', $pos_x + $Block_value[1] - 1 , 'long', $pos_y + $Block_value[2], 'long', $pos_x + $Block_value[3], 'long', $pos_y + $Block_value[4] -1)
        DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
    Next
    DllCall('user32.dll', 'long', 'SetWindowRgn', 'hwnd', $window_handle, 'long', $aM_Mask[0], 'int', 1)
    $PictArray='' ; empty array
EndFunc  ;==>_GuiImageHole
#FUNCTION# ==============================================================
Func _WinGetClassListEx($sTitle)
    Local $sClassList = WinGetClassList($sTitle)
    Local $aClassList = StringSplit($sClassList, @LF)
    Local $sRetClassList = '', $sHold_List = '|'
    Local $aiInHold, $iInHold
    For $i = 1 To UBound($aClassList) - 1
        If $aClassList[$i] = '' Then ContinueLoop
        If StringRegExp($sHold_List, '\|' & $aClassList[$i] & '~(\d+)\|') Then
            $aiInHold = StringRegExp($sHold_List, '.*\|' & $aClassList[$i] & '~(\d+)\|.*', 1)
            $iInHold = Number($aiInHold[UBound($aiInHold)-1])
            If $iInHold = 0 Then $iInHold += 1
            $aClassList[$i] &= '~' & $iInHold + 1
            $sHold_List &= $aClassList[$i] & '|'
            $sRetClassList &= $aClassList[$i] & @LF
        Else
            $aClassList[$i] &= '~1'
            $sHold_List &= $aClassList[$i] & '|'
            $sRetClassList &= $aClassList[$i] & @LF
        EndIf
    Next
    Return StringReplace(StringStripWS($sRetClassList, 3), '~', '')
EndFunc ;==>_WinGetClassListEx
#FUNCTION# ==============================================================

Contributions

CheckUpdate - SelfUpdating script ------- Self updating script

Dynamic input validation ------------------- Use a Input masks can make your life easier and Validation can be as simple

MsgBox with CountDown ------------------- MsgBox with visual countdown

Display Multiline text cells in ListView ---- Example of pop-up or ToolTip for multiline text items in ListView

Presentation Manager ---------------------- Program to display and refresh different Border-less GUI's on a Display (large screen TV)

USB Drive Tools ------------------------------ Tool to help you with your USB drive management

Input Period udf ------------------------------ GUI for a period input

Excel ColorPicker ---------------------------- Color pickup tool will allow you to select a color from the standard Excel color palette

Excel Chart UDF ----------------------------- Collaboration project with water 

GetDateInString ------------------------------ Find date/time in a string using a date format notation like DD Mon YYYY hh:mm

TaskListAllDetailed --------------------------- List All Scheduled Tasks

Computer Info --------------------------------- A collection of information for helpdesk

Shared memory Demo ----------------------- Demo: Two applications communicate with each other through means of a memory share (using Nomad function, 32bit only)

Universal Date Format Conversion -------- Universal date converter from your PC local date format to any format

Disable Windows DetailsPane -------------- Disable Windows Explorer Details Pane

Oracle SQL Report Generator -------------  Oracle Report generator using SQL

SQLite Report Generator -------------------  SQLite Report generator using SQL

SQLite ListView and BLOB demo ---------- Demo: shows how binary (image) objects can be recognized natively in a database BLOB field

DSN-Less Database connection demo --- Demo: ActiveX Data Objects DSN-Less Database access

Animated animals ----------------------------- Fun: Moving animated objects

Perforated image in GUI --------------------- Fun: Perforate your image with image objects

UEZ's Perforator major update ------------- Fun: Pro version of Perforator by UEZ

Visual Crop Tool (GUI) ----------------------- Easy to use Visual Image Crop tool

Visual Image effect (GUI) -------------------- Visually apply effects on an image

 

 

 

Link to comment
Share on other sites
  • Replies 50
  • Created
  • Last Reply

Top Posters In This Topic

Top Posters In This Topic

Posted Images

myspacee Universalist

myspacee

Posted
Posted (edited)

thank you GreenCan as usual.

Valuter is one of my hero so his words don't offend me :)

your idea/script explain use of martin job applied on windows, thank you.

Now i'm studing diferent ideas to solve my task:

- 1 is related to 'assemble' a GUI with 4 or more little gui, that 'glue' each others with given coordinates.

- other idea is to study well HOLE GUI stuff and modify for my use.

Surprising that idea to HIDE part of window is not scripted yet.

Find usefull hide some function to user, and let him use only part of given program.

(can't find anything in forum)

Thank all!

m.

Edited by myspacee
Link to comment
Share on other sites
martin Universalist

martin

Posted
Posted (edited)

@ myspacee

Here is a suggestion for an easy way to make a mask of the type I think you want.

#include <GUIConstantsEx.au3>
#include <windowsconstants.au3>
#include <staticconstants.au3>

#region - GUI Create
;OPt("GUIEventOptions",0)
$gui = GUICreate("trans", 300, 400, -1, -1, BitOr($WS_POPUP,$WS_SIZEBOX), $WS_EX_LAYERED)

GUICtrlCreateButton("",50,50,100,100,$WS_SIZEBOX)

GUICtrlSetBkColor(-1,0xABCDEF)
_API_SetLayeredWindowAttributes($gui,0xABCDEF)
GUISetState()

While GUIGetMsg() <> -3
   sleep(100)
WEnd
#endregion


;===============================================================================
;
; Function Name:   _API_SetLayeredWindowAttributes
; Description:: Sets Layered Window Attributes:) See MSDN for more informaion
; Parameter(s):   
;                 $hwnd - Handle of GUI to work on
;                 $i_transcolor - Transparent color
;                 $Transparency - Set Transparancy of GUI
;                 $isColorRef - If True, $i_transcolor is a COLORREF-Strucure, else an RGB-Color
; Requirement(s):  Layered Windows
; Return Value(s): Success: 1
;                 Error: 0
;                  @error: 1 to 3 - Error from DllCall
;                  @error: 4 - Function did not succeed - use
;                              _WinAPI_GetLastErrorMessage or _WinAPI_GetLastError to get more information
; Author(s):       Prog@ndy
;
;===============================================================================
;
Func _API_SetLayeredWindowAttributes($hwnd, $i_transcolor, $Transparency = 255, $isColorRef = False)
   
Local Const $AC_SRC_ALPHA = 1
Local Const $ULW_ALPHA = 2
Local Const $LWA_ALPHA = 0x2
Local Const $LWA_COLORKEY = 0x1
    If Not $isColorRef Then
        $i_transcolor = Hex(String($i_transcolor), 6)
        $i_transcolor = Execute('0x00' & StringMid($i_transcolor, 5, 2) & StringMid($i_transcolor, 3, 2) & StringMid($i_transcolor, 1, 2))
    EndIf
    Local $Ret = DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hwnd, "long", $i_transcolor, "byte", $Transparency, "long", $LWA_COLORKEY + $LWA_ALPHA)
    Select
        Case @error
            Return SetError(@error,0,0)
        Case $ret[0] = 0
            Return SetError(4,0,0)
        Case Else
            Return 1
    EndSelect
EndFunc ;==>_API_SetLayeredWindowAttributes

You need to add to it to make it useful. It's a stripped down version of a script which ProgAndy posted here and changed a bit.

If you put back the control window you could add features and have a button to save the details once you have made the window mask the way you want it.

Edit:Commented out the Opt line which was doing nothing.

Edited by martin
Serial port communications UDF Includes functions for binary transmission and reception.printing UDF Useful for graphs, forms, labels, reports etc.Add User Call Tips to SciTE for functions in UDFs not included with AutoIt and for your own scripts.Functions with parameters in OnEvent mode and for Hot Keys One function replaces GuiSetOnEvent, GuiCtrlSetOnEvent and HotKeySet.UDF IsConnected2 for notification of status of connected state of many urls or IPs, without slowing the script.
Link to comment
Share on other sites
martin Universalist

martin

Posted
Posted

thank you martin,

BIG step forward in direction i propose. Try to read it :)

thank you again,

m.

NP. The Opt line doesn't do anything so just remove it. I was trying to see if I could stop the button being resized when the window is resized. I think it needs a couple of message handlers to do that.
Serial port communications UDF Includes functions for binary transmission and reception.printing UDF Useful for graphs, forms, labels, reports etc.Add User Call Tips to SciTE for functions in UDFs not included with AutoIt and for your own scripts.Functions with parameters in OnEvent mode and for Hot Keys One function replaces GuiSetOnEvent, GuiCtrlSetOnEvent and HotKeySet.UDF IsConnected2 for notification of status of connected state of many urls or IPs, without slowing the script.
Link to comment
Share on other sites
  • 3 months later...
BinaryBrother Universalist

BinaryBrother

Posted
Posted

Simply Sweet... ;)

Just think of the ideas...

#Region Perforated Image

#include <WinAPI.au3>
$GUI = guicreate("The name of your GUI window",800,800)
Local $_Left_pos, $_Top_pos, $_GUI_NAME
$_Left_pos = 10 ; Replace with correct position
$_Top_pos = _WinAPI_GetSystemMetrics(4)+20 ; Just below the title bar (Must #include <WinAPI.au3> if using this function!!!)
$_GUI_NAME = 'The name of your GUI window'
GUICtrlCreateButton("",10,_WinAPI_GetSystemMetrics(4),267,90)
_GuiImageHole($GUI, $_Left_pos, $_Top_pos, 267, 90)
GUISetState()
Sleep(20000)

#FUNCTION# ==============================================================
Func _GuiImageHole($window_handle, $pos_x, $pos_y,$Image_Width ,$Image_Height)
    Local $aClassList, $aM_Mask, $aMask
#Region picture array
Local $PictArray[778]
$PictArray[0] = '1,1,268,1'
$PictArray[1] = '1,2,268,2'
$PictArray[2] = '1,3,268,3'
$PictArray[3] = '1,4,268,4'
$PictArray[4] = '1,5,268,5'
$PictArray[5] = '1,6,268,6'
$PictArray[6] = '1,7,268,7'
$PictArray[7] = '1,8,268,8'
$PictArray[8] = '1,9,268,9'
$PictArray[9] = '1,10,268,10'
$PictArray[10] = '1,11,268,11'
$PictArray[11] = '1,12,268,12'
$PictArray[12] = '1,13,87,13'
$PictArray[13] = '102,13,268,13'
$PictArray[14] = '1,14,84,14'
$PictArray[15] = '104,14,268,14'
$PictArray[16] = '1,15,79,15'
$PictArray[17] = '106,15,268,15'
$PictArray[18] = '1,16,76,16'
$PictArray[19] = '101,16,102,16'
$PictArray[20] = '106,16,268,16'
$PictArray[21] = '1,17,73,17'
$PictArray[22] = '100,17,102,17'
$PictArray[23] = '107,17,268,17'
$PictArray[24] = '1,18,70,18'
$PictArray[25] = '100,18,102,18'
$PictArray[26] = '107,18,268,18'
$PictArray[27] = '1,19,67,19'
$PictArray[28] = '81,19,98,19'
$PictArray[29] = '107,19,268,19'
$PictArray[30] = '1,20,65,20'
$PictArray[31] = '77,20,87,20'
$PictArray[32] = '88,20,100,20'
$PictArray[33] = '107,20,268,20'
$PictArray[34] = '1,21,63,21'
$PictArray[35] = '73,21,101,21'
$PictArray[36] = '107,21,268,21'
$PictArray[37] = '1,22,61,22'
$PictArray[38] = '69,22,101,22'
$PictArray[39] = '107,22,268,22'
$PictArray[40] = '1,23,58,23'
$PictArray[41] = '66,23,70,23'
$PictArray[42] = '72,23,102,23'
$PictArray[43] = '109,23,268,23'
$PictArray[44] = '1,24,57,24'
$PictArray[45] = '64,24,102,24'
$PictArray[46] = '106,24,107,24'
$PictArray[47] = '109,24,268,24'
$PictArray[48] = '1,25,54,25'
$PictArray[49] = '61,25,102,25'
$PictArray[50] = '106,25,107,25'
$PictArray[51] = '109,25,268,25'
$PictArray[52] = '1,26,52,26'
$PictArray[53] = '59,26,102,26'
$PictArray[54] = '105,26,107,26'
$PictArray[55] = '109,26,268,26'
$PictArray[56] = '1,27,50,27'
$PictArray[57] = '56,27,102,27'
$PictArray[58] = '104,27,107,27'
$PictArray[59] = '108,27,268,27'
$PictArray[60] = '1,28,49,28'
$PictArray[61] = '55,28,96,28'
$PictArray[62] = '97,28,102,28'
$PictArray[63] = '104,28,106,28'
$PictArray[64] = '108,28,268,28'
$PictArray[65] = '1,29,47,29'
$PictArray[66] = '52,29,99,29'
$PictArray[67] = '100,29,101,29'
$PictArray[68] = '103,29,106,29'
$PictArray[69] = '108,29,268,29'
$PictArray[70] = '1,30,42,30'
$PictArray[71] = '43,30,44,30'
$PictArray[72] = '51,30,97,30'
$PictArray[73] = '103,30,107,30'
$PictArray[74] = '109,30,268,30'
$PictArray[75] = '1,31,40,31'
$PictArray[76] = '41,31,43,31'
$PictArray[77] = '49,31,97,31'
$PictArray[78] = '103,31,105,31'
$PictArray[79] = '106,31,108,31'
$PictArray[80] = '109,31,268,31'
$PictArray[81] = '1,32,42,32'
$PictArray[82] = '47,32,96,32'
$PictArray[83] = '103,32,105,32'
$PictArray[84] = '106,32,108,32'
$PictArray[85] = '109,32,268,32'
$PictArray[86] = '1,33,37,33'
$PictArray[87] = '38,33,40,33'
$PictArray[88] = '45,33,48,33'
$PictArray[89] = '51,33,97,33'
$PictArray[90] = '103,33,104,33'
$PictArray[91] = '106,33,109,33'
$PictArray[92] = '110,33,268,33'
$PictArray[93] = '1,34,39,34'
$PictArray[94] = '43,34,97,34'
$PictArray[95] = '103,34,104,34'
$PictArray[96] = '106,34,268,34'
$PictArray[97] = '1,35,37,35'
$PictArray[98] = '41,35,98,35'
$PictArray[99] = '101,35,102,35'
$PictArray[100] = '105,35,268,35'
$PictArray[101] = '1,36,36,36'
$PictArray[102] = '40,36,102,36'
$PictArray[103] = '103,36,268,36'
$PictArray[104] = '1,37,34,37'
$PictArray[105] = '38,37,101,37'
$PictArray[106] = '103,37,268,37'
$PictArray[107] = '1,38,32,38'
$PictArray[108] = '37,38,38,38'
$PictArray[109] = '39,38,40,38'
$PictArray[110] = '41,38,66,38'
$PictArray[111] = '68,38,69,38'
$PictArray[112] = '71,38,98,38'
$PictArray[113] = '100,38,102,38'
$PictArray[114] = '103,38,164,38'
$PictArray[115] = '185,38,230,38'
$PictArray[116] = '232,38,268,38'
$PictArray[117] = '1,39,31,39'
$PictArray[118] = '35,39,98,39'
$PictArray[119] = '99,39,102,39'
$PictArray[120] = '103,39,160,39'
$PictArray[121] = '186,39,229,39'
$PictArray[122] = '236,39,268,39'
$PictArray[123] = '1,40,29,40'
$PictArray[124] = '34,40,58,40'
$PictArray[125] = '59,40,101,40'
$PictArray[126] = '103,40,159,40'
$PictArray[127] = '186,40,229,40'
$PictArray[128] = '236,40,237,40'
$PictArray[129] = '238,40,268,40'
$PictArray[130] = '1,41,28,41'
$PictArray[131] = '32,41,58,41'
$PictArray[132] = '59,41,73,41'
$PictArray[133] = '74,41,86,41'
$PictArray[134] = '87,41,97,41'
$PictArray[135] = '103,41,155,41'
$PictArray[136] = '156,41,158,41'
$PictArray[137] = '185,41,186,41'
$PictArray[138] = '187,41,229,41'
$PictArray[139] = '237,41,239,41'
$PictArray[140] = '240,41,268,41'
$PictArray[141] = '1,42,27,42'
$PictArray[142] = '31,42,32,42'
$PictArray[143] = '34,42,53,42'
$PictArray[144] = '55,42,57,42'
$PictArray[145] = '59,42,67,42'
$PictArray[146] = '68,42,70,42'
$PictArray[147] = '71,42,72,42'
$PictArray[148] = '74,42,77,42'
$PictArray[149] = '78,42,79,42'
$PictArray[150] = '80,42,85,42'
$PictArray[151] = '91,42,94,42'
$PictArray[152] = '103,42,105,42'
$PictArray[153] = '108,42,127,42'
$PictArray[154] = '128,42,141,42'
$PictArray[155] = '142,42,157,42'
$PictArray[156] = '158,42,159,42'
$PictArray[157] = '185,42,229,42'
$PictArray[158] = '235,42,236,42'
$PictArray[159] = '237,42,238,42'
$PictArray[160] = '240,42,268,42'
$PictArray[161] = '1,43,26,43'
$PictArray[162] = '29,43,31,43'
$PictArray[163] = '35,43,55,43'
$PictArray[164] = '60,43,65,43'
$PictArray[165] = '66,43,67,43'
$PictArray[166] = '69,43,70,43'
$PictArray[167] = '77,43,80,43'
$PictArray[168] = '81,43,82,43'
$PictArray[169] = '84,43,85,43'
$PictArray[170] = '92,43,93,43'
$PictArray[171] = '103,43,106,43'
$PictArray[172] = '109,43,120,43'
$PictArray[173] = '121,43,127,43'
$PictArray[174] = '129,43,138,43'
$PictArray[175] = '140,43,141,43'
$PictArray[176] = '142,43,152,43'
$PictArray[177] = '155,43,158,43'
$PictArray[178] = '186,43,199,43'
$PictArray[179] = '201,43,224,43'
$PictArray[180] = '225,43,226,43'
$PictArray[181] = '228,43,229,43'
$PictArray[182] = '235,43,268,43'
$PictArray[183] = '1,44,20,44'
$PictArray[184] = '21,44,25,44'
$PictArray[185] = '28,44,51,44'
$PictArray[186] = '53,44,54,44'
$PictArray[187] = '63,44,64,44'
$PictArray[188] = '65,44,66,44'
$PictArray[189] = '67,44,69,44'
$PictArray[190] = '78,44,80,44'
$PictArray[191] = '81,44,83,44'
$PictArray[192] = '84,44,86,44'
$PictArray[193] = '92,44,95,44'
$PictArray[194] = '103,44,105,44'
$PictArray[195] = '108,44,110,44'
$PictArray[196] = '112,44,113,44'
$PictArray[197] = '115,44,116,44'
$PictArray[198] = '117,44,119,44'
$PictArray[199] = '120,44,122,44'
$PictArray[200] = '126,44,137,44'
$PictArray[201] = '138,44,139,44'
$PictArray[202] = '140,44,149,44'
$PictArray[203] = '150,44,156,44'
$PictArray[204] = '158,44,159,44'
$PictArray[205] = '185,44,196,44'
$PictArray[206] = '198,44,203,44'
$PictArray[207] = '204,44,223,44'
$PictArray[208] = '224,44,228,44'
$PictArray[209] = '235,44,236,44'
$PictArray[210] = '239,44,241,44'
$PictArray[211] = '242,44,268,44'
$PictArray[212] = '1,45,20,45'
$PictArray[213] = '21,45,24,45'
$PictArray[214] = '26,45,52,45'
$PictArray[215] = '61,45,66,45'
$PictArray[216] = '68,45,69,45'
$PictArray[217] = '80,45,81,45'
$PictArray[218] = '82,45,83,45'
$PictArray[219] = '92,45,98,45'
$PictArray[220] = '103,45,105,45'
$PictArray[221] = '107,45,110,45'
$PictArray[222] = '114,45,116,45'
$PictArray[223] = '118,45,125,45'
$PictArray[224] = '128,45,129,45'
$PictArray[225] = '130,45,139,45'
$PictArray[226] = '141,45,151,45'
$PictArray[227] = '156,45,158,45'
$PictArray[228] = '159,45,161,45'
$PictArray[229] = '162,45,163,45'
$PictArray[230] = '164,45,167,45'
$PictArray[231] = '175,45,185,45'
$PictArray[232] = '186,45,199,45'
$PictArray[233] = '200,45,202,45'
$PictArray[234] = '203,45,204,45'
$PictArray[235] = '205,45,207,45'
$PictArray[236] = '209,45,225,45'
$PictArray[237] = '236,45,268,45'
$PictArray[238] = '1,46,18,46'
$PictArray[239] = '20,46,23,46'
$PictArray[240] = '25,46,27,46'
$PictArray[241] = '28,46,39,46'
$PictArray[242] = '40,46,53,46'
$PictArray[243] = '54,46,55,46'
$PictArray[244] = '62,46,63,46'
$PictArray[245] = '64,46,65,46'
$PictArray[246] = '66,46,67,46'
$PictArray[247] = '77,46,80,46'
$PictArray[248] = '84,46,85,46'
$PictArray[249] = '91,46,93,46'
$PictArray[250] = '94,46,98,46'
$PictArray[251] = '100,46,101,46'
$PictArray[252] = '103,46,104,46'
$PictArray[253] = '106,46,110,46'
$PictArray[254] = '113,46,115,46'
$PictArray[255] = '118,46,119,46'
$PictArray[256] = '120,46,128,46'
$PictArray[257] = '130,46,131,46'
$PictArray[258] = '133,46,136,46'
$PictArray[259] = '139,46,142,46'
$PictArray[260] = '143,46,155,46'
$PictArray[261] = '156,46,157,46'
$PictArray[262] = '158,46,161,46'
$PictArray[263] = '162,46,165,46'
$PictArray[264] = '166,46,167,46'
$PictArray[265] = '175,46,185,46'
$PictArray[266] = '186,46,187,46'
$PictArray[267] = '188,46,197,46'
$PictArray[268] = '198,46,202,46'
$PictArray[269] = '205,46,207,46'
$PictArray[270] = '208,46,209,46'
$PictArray[271] = '211,46,212,46'
$PictArray[272] = '214,46,217,46'
$PictArray[273] = '219,46,221,46'
$PictArray[274] = '223,46,224,46'
$PictArray[275] = '225,46,228,46'
$PictArray[276] = '235,46,236,46'
$PictArray[277] = '239,46,241,46'
$PictArray[278] = '243,46,268,46'
$PictArray[279] = '1,47,18,47'
$PictArray[280] = '19,47,21,47'
$PictArray[281] = '24,47,39,47'
$PictArray[282] = '40,47,53,47'
$PictArray[283] = '61,47,63,47'
$PictArray[284] = '64,47,65,47'
$PictArray[285] = '67,47,68,47'
$PictArray[286] = '77,47,78,47'
$PictArray[287] = '83,47,84,47'
$PictArray[288] = '92,47,95,47'
$PictArray[289] = '97,47,98,47'
$PictArray[290] = '100,47,101,47'
$PictArray[291] = '103,47,104,47'
$PictArray[292] = '106,47,110,47'
$PictArray[293] = '116,47,117,47'
$PictArray[294] = '136,47,138,47'
$PictArray[295] = '142,47,143,47'
$PictArray[296] = '159,47,161,47'
$PictArray[297] = '162,47,163,47'
$PictArray[298] = '166,47,167,47'
$PictArray[299] = '176,47,184,47'
$PictArray[300] = '185,47,188,47'
$PictArray[301] = '206,47,207,47'
$PictArray[302] = '210,47,212,47'
$PictArray[303] = '227,47,228,47'
$PictArray[304] = '245,47,268,47'
$PictArray[305] = '1,48,20,48'
$PictArray[306] = '23,48,54,48'
$PictArray[307] = '62,48,67,48'
$PictArray[308] = '77,48,79,48'
$PictArray[309] = '83,48,84,48'
$PictArray[310] = '97,48,98,48'
$PictArray[311] = '103,48,111,48'
$PictArray[312] = '112,48,114,48'
$PictArray[313] = '115,48,116,48'
$PictArray[314] = '135,48,136,48'
$PictArray[315] = '137,48,141,48'
$PictArray[316] = '158,48,159,48'
$PictArray[317] = '160,48,167,48'
$PictArray[318] = '176,48,186,48'
$PictArray[319] = '205,48,207,48'
$PictArray[320] = '208,48,209,48'
$PictArray[321] = '226,48,227,48'
$PictArray[322] = '245,48,268,48'
$PictArray[323] = '1,49,19,49'
$PictArray[324] = '22,49,24,49'
$PictArray[325] = '25,49,55,49'
$PictArray[326] = '61,49,65,49'
$PictArray[327] = '66,49,67,49'
$PictArray[328] = '77,49,78,49'
$PictArray[329] = '79,49,80,49'
$PictArray[330] = '89,49,90,49'
$PictArray[331] = '94,49,95,49'
$PictArray[332] = '97,49,98,49'
$PictArray[333] = '103,49,112,49'
$PictArray[334] = '135,49,137,49'
$PictArray[335] = '138,49,139,49'
$PictArray[336] = '158,49,162,49'
$PictArray[337] = '163,49,165,49'
$PictArray[338] = '175,49,185,49'
$PictArray[339] = '204,49,205,49'
$PictArray[340] = '207,49,208,49'
$PictArray[341] = '225,49,226,49'
$PictArray[342] = '246,49,268,49'
$PictArray[343] = '1,50,12,50'
$PictArray[344] = '13,50,18,50'
$PictArray[345] = '20,50,54,50'
$PictArray[346] = '61,50,62,50'
$PictArray[347] = '63,50,66,50'
$PictArray[348] = '78,50,80,50'
$PictArray[349] = '81,50,83,50'
$PictArray[350] = '91,50,95,50'
$PictArray[351] = '97,50,98,50'
$PictArray[352] = '103,50,109,50'
$PictArray[353] = '110,50,114,50'
$PictArray[354] = '136,50,139,50'
$PictArray[355] = '160,50,163,50'
$PictArray[356] = '164,50,166,50'
$PictArray[357] = '176,50,183,50'
$PictArray[358] = '184,50,186,50'
$PictArray[359] = '205,50,206,50'
$PictArray[360] = '225,50,227,50'
$PictArray[361] = '247,50,268,50'
$PictArray[362] = '1,51,11,51'
$PictArray[363] = '12,51,15,51'
$PictArray[364] = '16,51,18,51'
$PictArray[365] = '20,51,55,51'
$PictArray[366] = '61,51,62,51'
$PictArray[367] = '63,51,65,51'
$PictArray[368] = '77,51,78,51'
$PictArray[369] = '80,51,82,51'
$PictArray[370] = '90,51,96,51'
$PictArray[371] = '97,51,98,51'
$PictArray[372] = '103,51,105,51'
$PictArray[373] = '106,51,108,51'
$PictArray[374] = '110,51,112,51'
$PictArray[375] = '113,51,114,51'
$PictArray[376] = '137,51,138,51'
$PictArray[377] = '158,51,166,51'
$PictArray[378] = '173,51,174,51'
$PictArray[379] = '175,51,182,51'
$PictArray[380] = '184,51,185,51'
$PictArray[381] = '205,51,206,51'
$PictArray[382] = '225,51,227,51'
$PictArray[383] = '247,51,268,51'
$PictArray[384] = '1,52,16,52'
$PictArray[385] = '18,52,55,52'
$PictArray[386] = '61,52,65,52'
$PictArray[387] = '77,52,80,52'
$PictArray[388] = '89,52,96,52'
$PictArray[389] = '97,52,98,52'
$PictArray[390] = '103,52,105,52'
$PictArray[391] = '106,52,108,52'
$PictArray[392] = '110,52,114,52'
$PictArray[393] = '122,52,129,52'
$PictArray[394] = '133,52,138,52'
$PictArray[395] = '146,52,151,52'
$PictArray[396] = '152,52,154,52'
$PictArray[397] = '155,52,157,52'
$PictArray[398] = '158,52,159,52'
$PictArray[399] = '160,52,165,52'
$PictArray[400] = '173,52,182,52'
$PictArray[401] = '183,52,184,52'
$PictArray[402] = '192,52,198,52'
$PictArray[403] = '200,52,201,52'
$PictArray[404] = '202,52,203,52'
$PictArray[405] = '214,52,216,52'
$PictArray[406] = '219,52,220,52'
$PictArray[407] = '221,52,225,52'
$PictArray[408] = '234,52,237,52'
$PictArray[409] = '238,52,239,52'
$PictArray[410] = '247,52,268,52'
$PictArray[411] = '1,53,11,53'
$PictArray[412] = '17,53,18,53'
$PictArray[413] = '19,53,54,53'
$PictArray[414] = '61,53,64,53'
$PictArray[415] = '71,53,72,53'
$PictArray[416] = '77,53,80,53'
$PictArray[417] = '89,53,98,53'
$PictArray[418] = '103,53,114,53'
$PictArray[419] = '121,53,137,53'
$PictArray[420] = '146,53,165,53'
$PictArray[421] = '174,53,182,53'
$PictArray[422] = '191,53,192,53'
$PictArray[423] = '203,53,204,53'
$PictArray[424] = '218,53,225,53'
$PictArray[425] = '248,53,268,53'
$PictArray[426] = '1,54,15,54'
$PictArray[427] = '16,54,55,54'
$PictArray[428] = '61,54,64,54'
$PictArray[429] = '70,54,71,54'
$PictArray[430] = '77,54,79,54'
$PictArray[431] = '88,54,98,54'
$PictArray[432] = '103,54,109,54'
$PictArray[433] = '110,54,113,54'
$PictArray[434] = '120,54,131,54'
$PictArray[435] = '132,54,135,54'
$PictArray[436] = '136,54,137,54'
$PictArray[437] = '144,54,145,54'
$PictArray[438] = '147,54,153,54'
$PictArray[439] = '154,54,165,54'
$PictArray[440] = '173,54,183,54'
$PictArray[441] = '190,54,191,54'
$PictArray[442] = '192,54,200,54'
$PictArray[443] = '202,54,203,54'
$PictArray[444] = '204,54,205,54'
$PictArray[445] = '212,54,214,54'
$PictArray[446] = '215,54,216,54'
$PictArray[447] = '218,54,226,54'
$PictArray[448] = '233,54,235,54'
$PictArray[449] = '236,54,237,54'
$PictArray[450] = '239,54,240,54'
$PictArray[451] = '248,54,268,54'
$PictArray[452] = '1,55,14,55'
$PictArray[453] = '16,55,56,55'
$PictArray[454] = '61,55,64,55'
$PictArray[455] = '70,55,72,55'
$PictArray[456] = '78,55,80,55'
$PictArray[457] = '86,55,87,55'
$PictArray[458] = '88,55,98,55'
$PictArray[459] = '103,55,105,55'
$PictArray[460] = '106,55,108,55'
$PictArray[461] = '111,55,113,55'
$PictArray[462] = '132,55,133,55'
$PictArray[463] = '135,55,137,55'
$PictArray[464] = '157,55,162,55'
$PictArray[465] = '163,55,164,55'
$PictArray[466] = '172,55,183,55'
$PictArray[467] = '211,55,220,55'
$PictArray[468] = '221,55,226,55'
$PictArray[469] = '234,55,238,55'
$PictArray[470] = '239,55,240,55'
$PictArray[471] = '247,55,268,55'
$PictArray[472] = '1,56,10,56'
$PictArray[473] = '11,56,13,56'
$PictArray[474] = '14,56,56,56'
$PictArray[475] = '61,56,63,56'
$PictArray[476] = '69,56,71,56'
$PictArray[477] = '78,56,79,56'
$PictArray[478] = '85,56,86,56'
$PictArray[479] = '88,56,98,56'
$PictArray[480] = '103,56,105,56'
$PictArray[481] = '106,56,108,56'
$PictArray[482] = '110,56,112,56'
$PictArray[483] = '133,56,136,56'
$PictArray[484] = '157,56,165,56'
$PictArray[485] = '172,56,182,56'
$PictArray[486] = '203,56,204,56'
$PictArray[487] = '211,56,212,56'
$PictArray[488] = '214,56,215,56'
$PictArray[489] = '218,56,225,56'
$PictArray[490] = '234,56,236,56'
$PictArray[491] = '237,56,239,56'
$PictArray[492] = '247,56,268,56'
$PictArray[493] = '1,57,12,57'
$PictArray[494] = '13,57,54,57'
$PictArray[495] = '55,57,56,57'
$PictArray[496] = '61,57,62,57'
$PictArray[497] = '69,57,72,57'
$PictArray[498] = '77,57,78,57'
$PictArray[499] = '86,57,98,57'
$PictArray[500] = '103,57,105,57'
$PictArray[501] = '106,57,108,57'
$PictArray[502] = '110,57,113,57'
$PictArray[503] = '133,57,136,57'
$PictArray[504] = '156,57,161,57'
$PictArray[505] = '163,57,164,57'
$PictArray[506] = '172,57,181,57'
$PictArray[507] = '202,57,203,57'
$PictArray[508] = '211,57,214,57'
$PictArray[509] = '215,57,220,57'
$PictArray[510] = '221,57,225,57'
$PictArray[511] = '233,57,236,57'
$PictArray[512] = '237,57,239,57'
$PictArray[513] = '246,57,268,57'
$PictArray[514] = '1,58,56,58'
$PictArray[515] = '61,58,62,58'
$PictArray[516] = '68,58,69,58'
$PictArray[517] = '71,58,72,58'
$PictArray[518] = '77,58,78,58'
$PictArray[519] = '85,58,96,58'
$PictArray[520] = '97,58,98,58'
$PictArray[521] = '103,58,105,58'
$PictArray[522] = '107,58,108,58'
$PictArray[523] = '110,58,114,58'
$PictArray[524] = '133,58,134,58'
$PictArray[525] = '156,58,157,58'
$PictArray[526] = '159,58,163,58'
$PictArray[527] = '172,58,182,58'
$PictArray[528] = '211,58,212,58'
$PictArray[529] = '213,58,217,58'
$PictArray[530] = '218,58,220,58'
$PictArray[531] = '221,58,222,58'
$PictArray[532] = '231,58,232,58'
$PictArray[533] = '233,58,238,58'
$PictArray[534] = '246,58,268,58'
$PictArray[535] = '1,59,56,59'
$PictArray[536] = '70,59,72,59'
$PictArray[537] = '84,59,96,59'
$PictArray[538] = '97,59,98,59'
$PictArray[539] = '103,59,105,59'
$PictArray[540] = '107,59,108,59'
$PictArray[541] = '110,59,112,59'
$PictArray[542] = '113,59,115,59'
$PictArray[543] = '135,59,136,59'
$PictArray[544] = '158,59,164,59'
$PictArray[545] = '171,59,181,59'
$PictArray[546] = '202,59,203,59'
$PictArray[547] = '210,59,211,59'
$PictArray[548] = '212,59,214,59'
$PictArray[549] = '215,59,220,59'
$PictArray[550] = '221,59,222,59'
$PictArray[551] = '223,59,224,59'
$PictArray[552] = '231,59,232,59'
$PictArray[553] = '234,59,235,59'
$PictArray[554] = '236,59,239,59'
$PictArray[555] = '245,59,268,59'
$PictArray[556] = '1,60,56,60'
$PictArray[557] = '67,60,72,60'
$PictArray[558] = '83,60,96,60'
$PictArray[559] = '97,60,98,60'
$PictArray[560] = '103,60,105,60'
$PictArray[561] = '106,60,108,60'
$PictArray[562] = '111,60,113,60'
$PictArray[563] = '119,60,121,60'
$PictArray[564] = '123,60,125,60'
$PictArray[565] = '133,60,134,60'
$PictArray[566] = '135,60,136,60'
$PictArray[567] = '142,60,143,60'
$PictArray[568] = '146,60,150,60'
$PictArray[569] = '151,60,152,60'
$PictArray[570] = '153,60,154,60'
$PictArray[571] = '155,60,162,60'
$PictArray[572] = '163,60,164,60'
$PictArray[573] = '171,60,182,60'
$PictArray[574] = '190,60,196,60'
$PictArray[575] = '197,60,200,60'
$PictArray[576] = '201,60,203,60'
$PictArray[577] = '210,60,211,60'
$PictArray[578] = '212,60,214,60'
$PictArray[579] = '215,60,216,60'
$PictArray[580] = '217,60,224,60'
$PictArray[581] = '231,60,232,60'
$PictArray[582] = '233,60,237,60'
$PictArray[583] = '238,60,239,60'
$PictArray[584] = '245,60,268,60'
$PictArray[585] = '1,61,56,61'
$PictArray[586] = '68,61,70,61'
$PictArray[587] = '71,61,72,61'
$PictArray[588] = '84,61,96,61'
$PictArray[589] = '97,61,98,61'
$PictArray[590] = '103,61,105,61'
$PictArray[591] = '106,61,108,61'
$PictArray[592] = '111,61,114,61'
$PictArray[593] = '117,61,118,61'
$PictArray[594] = '119,61,120,61'
$PictArray[595] = '121,61,122,61'
$PictArray[596] = '124,61,125,61'
$PictArray[597] = '133,61,135,61'
$PictArray[598] = '142,61,144,61'
$PictArray[599] = '148,61,150,61'
$PictArray[600] = '151,61,153,61'
$PictArray[601] = '155,61,156,61'
$PictArray[602] = '157,61,158,61'
$PictArray[603] = '159,61,163,61'
$PictArray[604] = '172,61,182,61'
$PictArray[605] = '188,61,189,61'
$PictArray[606] = '192,61,193,61'
$PictArray[607] = '197,61,203,61'
$PictArray[608] = '211,61,213,61'
$PictArray[609] = '215,61,219,61'
$PictArray[610] = '220,61,221,61'
$PictArray[611] = '223,61,224,61'
$PictArray[612] = '231,61,237,61'
$PictArray[613] = '245,61,268,61'
$PictArray[614] = '1,62,56,62'
$PictArray[615] = '67,62,68,62'
$PictArray[616] = '69,62,72,62'
$PictArray[617] = '82,62,96,62'
$PictArray[618] = '97,62,98,62'
$PictArray[619] = '103,62,105,62'
$PictArray[620] = '106,62,109,62'
$PictArray[621] = '110,62,113,62'
$PictArray[622] = '114,62,116,62'
$PictArray[623] = '118,62,119,62'
$PictArray[624] = '120,62,121,62'
$PictArray[625] = '122,62,123,62'
$PictArray[626] = '125,62,126,62'
$PictArray[627] = '134,62,136,62'
$PictArray[628] = '142,62,143,62'
$PictArray[629] = '144,62,145,62'
$PictArray[630] = '148,62,150,62'
$PictArray[631] = '151,62,153,62'
$PictArray[632] = '154,62,155,62'
$PictArray[633] = '156,62,161,62'
$PictArray[634] = '162,62,163,62'
$PictArray[635] = '171,62,181,62'
$PictArray[636] = '190,62,198,62'
$PictArray[637] = '213,62,215,62'
$PictArray[638] = '218,62,224,62'
$PictArray[639] = '231,62,238,62'
$PictArray[640] = '246,62,268,62'
$PictArray[641] = '1,63,56,63'
$PictArray[642] = '66,63,67,63'
$PictArray[643] = '69,63,72,63'
$PictArray[644] = '82,63,98,63'
$PictArray[645] = '103,63,105,63'
$PictArray[646] = '106,63,109,63'
$PictArray[647] = '110,63,111,63'
$PictArray[648] = '133,63,134,63'
$PictArray[649] = '135,63,136,63'
$PictArray[650] = '154,63,155,63'
$PictArray[651] = '156,63,161,63'
$PictArray[652] = '162,63,163,63'
$PictArray[653] = '171,63,182,63'
$PictArray[654] = '200,63,201,63'
$PictArray[655] = '222,63,223,63'
$PictArray[656] = '230,63,238,63'
$PictArray[657] = '244,63,245,63'
$PictArray[658] = '246,63,268,63'
$PictArray[659] = '1,64,56,64'
$PictArray[660] = '66,64,67,64'
$PictArray[661] = '69,64,70,64'
$PictArray[662] = '71,64,72,64'
$PictArray[663] = '81,64,98,64'
$PictArray[664] = '103,64,109,64'
$PictArray[665] = '110,64,111,64'
$PictArray[666] = '133,64,135,64'
$PictArray[667] = '155,64,161,64'
$PictArray[668] = '162,64,163,64'
$PictArray[669] = '171,64,172,64'
$PictArray[670] = '173,64,182,64'
$PictArray[671] = '201,64,203,64'
$PictArray[672] = '222,64,223,64'
$PictArray[673] = '230,64,238,64'
$PictArray[674] = '244,64,268,64'
$PictArray[675] = '1,65,56,65'
$PictArray[676] = '65,65,66,65'
$PictArray[677] = '67,65,68,65'
$PictArray[678] = '69,65,71,65'
$PictArray[679] = '80,65,98,65'
$PictArray[680] = '104,65,111,65'
$PictArray[681] = '132,65,133,65'
$PictArray[682] = '134,65,135,65'
$PictArray[683] = '154,65,156,65'
$PictArray[684] = '157,65,162,65'
$PictArray[685] = '170,65,181,65'
$PictArray[686] = '182,65,183,65'
$PictArray[687] = '200,65,201,65'
$PictArray[688] = '202,65,203,65'
$PictArray[689] = '222,65,223,65'
$PictArray[690] = '230,65,238,65'
$PictArray[691] = '244,65,268,65'
$PictArray[692] = '1,66,56,66'
$PictArray[693] = '64,66,72,66'
$PictArray[694] = '80,66,94,66'
$PictArray[695] = '95,66,97,66'
$PictArray[696] = '105,66,111,66'
$PictArray[697] = '132,66,137,66'
$PictArray[698] = '155,66,160,66'
$PictArray[699] = '161,66,162,66'
$PictArray[700] = '169,66,184,66'
$PictArray[701] = '200,66,202,66'
$PictArray[702] = '204,66,205,66'
$PictArray[703] = '222,66,223,66'
$PictArray[704] = '230,66,237,66'
$PictArray[705] = '245,66,268,66'
$PictArray[706] = '1,67,56,67'
$PictArray[707] = '64,67,72,67'
$PictArray[708] = '80,67,93,67'
$PictArray[709] = '108,67,109,67'
$PictArray[710] = '130,67,131,67'
$PictArray[711] = '132,67,135,67'
$PictArray[712] = '137,67,138,67'
$PictArray[713] = '156,67,161,67'
$PictArray[714] = '170,67,183,67'
$PictArray[715] = '230,67,237,67'
$PictArray[716] = '245,67,268,67'
$PictArray[717] = '1,68,61,68'
$PictArray[718] = '62,68,72,68'
$PictArray[719] = '75,68,76,68'
$PictArray[720] = '78,68,94,68'
$PictArray[721] = '98,68,105,68'
$PictArray[722] = '108,68,109,68'
$PictArray[723] = '129,68,139,68'
$PictArray[724] = '153,68,162,68'
$PictArray[725] = '169,68,187,68'
$PictArray[726] = '199,68,201,68'
$PictArray[727] = '203,68,204,68'
$PictArray[728] = '206,68,207,68'
$PictArray[729] = '221,68,223,68'
$PictArray[730] = '229,68,237,68'
$PictArray[731] = '243,68,268,68'
$PictArray[732] = '1,69,61,69'
$PictArray[733] = '62,69,63,69'
$PictArray[734] = '64,69,73,69'
$PictArray[735] = '75,69,76,69'
$PictArray[736] = '77,69,79,69'
$PictArray[737] = '80,69,122,69'
$PictArray[738] = '123,69,125,69'
$PictArray[739] = '127,69,142,69'
$PictArray[740] = '143,69,164,69'
$PictArray[741] = '165,69,169,69'
$PictArray[742] = '170,69,184,69'
$PictArray[743] = '185,69,188,69'
$PictArray[744] = '190,69,194,69'
$PictArray[745] = '195,69,198,69'
$PictArray[746] = '200,69,202,69'
$PictArray[747] = '204,69,205,69'
$PictArray[748] = '206,69,218,69'
$PictArray[749] = '219,69,229,69'
$PictArray[750] = '231,69,268,69'
$PictArray[751] = '1,70,73,70'
$PictArray[752] = '74,70,96,70'
$PictArray[753] = '100,70,127,70'
$PictArray[754] = '128,70,229,70'
$PictArray[755] = '231,70,268,70'
$PictArray[756] = '1,71,229,71'
$PictArray[757] = '231,71,268,71'
$PictArray[758] = '1,72,229,72'
$PictArray[759] = '230,72,268,72'
$PictArray[760] = '1,73,268,73'
$PictArray[761] = '1,74,268,74'
$PictArray[762] = '1,75,268,75'
$PictArray[763] = '1,76,268,76'
$PictArray[764] = '1,77,268,77'
$PictArray[765] = '1,78,268,78'
$PictArray[766] = '1,79,268,79'
$PictArray[767] = '1,80,268,80'
$PictArray[768] = '1,81,268,81'
$PictArray[769] = '1,82,268,82'
$PictArray[770] = '1,83,268,83'
$PictArray[771] = '1,84,268,84'
$PictArray[772] = '1,85,268,85'
$PictArray[773] = '1,86,268,86'
$PictArray[774] = '1,87,268,87'
$PictArray[775] = '1,88,268,88'
$PictArray[776] = '1,89,268,89'
$PictArray[777] = '1,90,268,90'
#EndRegion picture array

   ; get the size of the active window
   $size = WinGetClientSize($window_handle)
   $Window_width = $size[0]
   $Window_height = $size[1] + 40 ; include height of title bar up to 30 dots
   ; First hide the window
   $aClassList = StringSplit(_WinGetClassListEx($window_handle), @LF)
   $aM_Mask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', 0, 'long', 0, 'long', 0, 'long', 0)
   ; rectangle A - left side
   $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', 0, 'long', 0, 'long', $pos_x, 'long', $Window_height)
   DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
   ; rectangle B - Top
   $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', 0, 'long', 0, 'long', $Window_width, 'long', $pos_y)
   DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
   ; rectangle C - Right side
   $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', $pos_x  + $Image_Width , 'long', 0 , 'long', $Window_width + 30, 'long', $Window_height)
   DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
   ; rectangle D - Bottom
   $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', 0 , 'long', $pos_y + $Image_Height, 'long', $Window_width, 'long', $Window_height)
   DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
   ; now unhide all regions as defined  in array $PictArray
   For $i = 0 To (UBound($PictArray) - 1)
      $Block_value = StringSplit($PictArray[$i],',')
      $aMask = DllCall('gdi32.dll', 'long', 'CreateRectRgn', 'long', $pos_x + $Block_value[1] - 2 , 'long', $pos_y + $Block_value[2], 'long', $pos_x + $Block_value[3], 'long', $pos_y + $Block_value[4] -1)
      DllCall('gdi32.dll', 'long', 'CombineRgn', 'long', $aM_Mask[0], 'long', $aMask[0], 'long', $aM_Mask[0], 'int', 2)
   Next
   DllCall('user32.dll', 'long', 'SetWindowRgn', 'hwnd', $window_handle, 'long', $aM_Mask[0], 'int', 1)
   $PictArray='' ; empty array
EndFunc  ;==>_GuiImageHole
#FUNCTION# ==============================================================
Func _WinGetClassListEx($sTitle)
    Local $sClassList = WinGetClassList($sTitle)
    Local $aClassList = StringSplit($sClassList, @LF)
    Local $sRetClassList = '', $sHold_List = '|'
    Local $aiInHold, $iInHold
    For $i = 1 To UBound($aClassList) - 1
        If $aClassList[$i] = '' Then ContinueLoop
        If StringRegExp($sHold_List, '\|' & $aClassList[$i] & '~(\d+)\|') Then
            $aiInHold = StringRegExp($sHold_List, '.*\|' & $aClassList[$i] & '~(\d+)\|.*', 1)
            $iInHold = Number($aiInHold[UBound($aiInHold)-1])
            If $iInHold = 0 Then $iInHold += 1
            $aClassList[$i] &= '~' & $iInHold + 1
            $sHold_List &= $aClassList[$i] & '|'
            $sRetClassList &= $aClassList[$i] & @LF
        Else
            $aClassList[$i] &= '~1'
            $sHold_List &= $aClassList[$i] & '|'
            $sRetClassList &= $aClassList[$i] & @LF
        EndIf
    Next
    Return StringReplace(StringStripWS($sRetClassList, 3), '~', '')
EndFunc ;==>_WinGetClassListEx
#FUNCTION# ==============================================================
#EndRegion Perforated Image

SIGNATURE_0X800007D NOT FOUND

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...