Strategien und Systeme für Binäre Optionen – Das haben wir ...

Been using a version of this with normal buttons for a long time but recently decided I wanted to make it a little better looking. Figured I'd share it with you guys, feel free to make recommendations of course :)

#NOTRAYICON Folder := A_temp "\power icons" If !FileExist( Folder ) { FileCreateDir, %Folder% } If !FileExist( Folder "\hibernate.png" ) { Extract_hibernatepng( Folder "\hibernate.png" ) while !FileExist( Folder "\hibernate.png" ) Sleep, 500 } If !FileExist( Folder "\logoff.png" ) { Extract_logoffpng( Folder "\logoff.png" ) while !FileExist( Folder "\logoff.png" ) Sleep, 500 } If !FileExist( Folder "\power.png" ) { Extract_powerpng( Folder "\power.png" ) while !FileExist( Folder "\power.png" ) Sleep, 500 } If !FileExist( Folder "\reboot.png" ) { Extract_rebootpng( Folder "\reboot.png" ) while !FileExist( Folder "\reboot.png" ) Sleep, 500 } If !FileExist( Folder "\sleep.png" ) { Extract_sleeppng( Folder "\sleep.png" ) while !FileExist( Folder "\sleep.png" ) Sleep, 500 } Gui,+AlwaysOnTop -Caption Gui +LastFound DllCall("uxtheme\SetWindowThemeAttribute", "ptr", WinExist() , "int", 1, "int64*", 6 | 6<<32, "uint", 8) SysGet, Mon1, Monitor, 1 x = % Mon1Left + (Mon1Right*.33) y = % Mon1Bottom *.33 Gui, Show, X%x% Y%y% w640 h128, Power Control textcolor = black WinSet, TransColor, F0F0F0 ;Gui, Add, Button, x9 y0 w100 h30 , Log Off Gui, Add, Picture, x0 y0 w128 h128 +BackgroundTrans vT1, %Folder%\logoff.png Gui, Add, Text, x0 y0 w128 h128 c%textcolor% gtxtbutton1, ;Gui, Add, Button, x129 y0 w100 h30 , Reboot Gui, Add, Picture, x128 y0 w128 h128 +BackgroundTrans vT2, %Folder%\reboot.png Gui, Add, Text, x128 y0 w128 h128 c%textcolor% gtxtbutton2, ;Gui, Add, Button, x249 y0 w100 h30 , Sleep Gui, Add, Picture, x256 y0 w128 h128 +BackgroundTrans vT3, %Folder%\sleep.png Gui, Add, Text, x256 y0 w128 h128 c%textcolor% gtxtbutton3, ;Gui, Add, Button, x369 y0 w100 h30 , Hibernate Gui, Add, Picture, x384 y0 w128 h128 +BackgroundTrans vT4, %Folder%\hibernate.png Gui, Add, Text, x384 y0 w128 h128 c%textcolor% gtxtbutton4, ;Gui, Add, Button, x489 y0 w100 h30 , Shut Down Gui, Add, Picture, x512 y0 w128 h128 +BackgroundTrans vT5, %Folder%\power.png Gui, Add, Text, x512 y0 w128 h128 c%textcolor% gtxtbutton5, Return escape:: GuiClose: ExitApp txtbutton1: buttonLogOff: shutdown, 0 RETURN txtbutton2: buttonReboot: shutdown, 2 RETURN txtbutton3: buttonSleep: DllCall("PowrProf\SetSuspendState", "int", 0, "int", 0, "int", 0) RETURN txtbutton4: buttonHibernate: DllCall("PowrProf\SetSuspendState", "int", 1, "int", 0, "int", 0) Return txtbutton5: buttonShutDown: shutdown, 9 RETURN hibernatepng_Get(_What) { Static Size = 3042, Name = "hibernate.png", Extension = "png", Directory = "" , Options = "Size,Name,Extension,Directory" ;This function returns the size(in bytes), name, filename, extension or directory of the file stored depending on what you ask for. If (InStr("," Options ",", "," _What ",")) Return %_What% } Extract_hibernatepng(_Filename, _DumpData = 0) { ;This function "extracts" the file to the location+name you pass to it. Static HasData = 1, Out_Data, Ptr Static 1 = "iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAACXBIWXMAAAsTAAALEwEAmpwYAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAALWElEQVR42uxdf2xVVx3/9PFWXp+3j7Yrz1qhdNh00EHpkB+TLVhZNxHrxLktE6POZikViVkIWQghy0KWhSxmfxBDGmwqIThxMlYJQTJLh4iE1co6UgqWiqUtXYH6qI/L6+Xx2vrHdzftJg7H+Z57z73vfJKXBcjOu++ez/me7+9vxpal4+PQSFsE9CvQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDQBNDwC4J++BEhA8jOB2bOA2YvAk4dBC608X7H6s1AKknrftgFjMQBy9QEcHXTcwqAkoeA+VXA50uAK9mrPH+L/vvoVA3gxg6VMTRDjTAvS0A4lh75LBcwQw8oBZFcDi1XTaM25ziY2l+L83aU16aZlA6TL6pJJEhPcPAZc6vUeEoFdOe2YYKKsElv+QxL0yLzATWLCSPgPngGO7STqMxDUBWJCdDzywAni0loigMgrnAM++ClztAZrriQiqS4Sgyqd+9iLgGy/QXe8lTC8GvrcNuNgOvLMDuHJBXSIEVdz4SBR4fB1w/yPe1rBnVQDP1wMn9tInfkX7Ae64+WWVQF2j9zffRkYAeHgNsLaBLAnVrjFlCJBTAHzrReA7W4B7Qv5zuESiQM0OMiOzIvoK+Nipz5tBylNuIXyPqjqgqBw4+HPg2kCaS4CQMXFPpsPm2yhdBvz4F0B0tvtXQsDNzS+rBL7/mj9F/p2QWwjUNrhPgoBbm79gJd33GWkcjpoaBp7bTv4Dt0gQcGvzqzdCAyT9fvA68IVSd0gQcHrzyyr15v+XJp5JJJhe7DwJAk5uflE5hVU1bi8JfrTd+TiHYwTILST3qBN3fjCTf82wA7b71DCw5jVnSeAIASJR2nwZG/NJ9J6mYAw3juwEhnrlP39+EbDyZ85dBdIdQSED+Pp6uXb++BjwwWGgdT9tvozAy6mDlGgyo4xcu19aIu/3lD9OgaTT78gPIgVlb/79j9APkoUzLRSDj/XLf1kjceD8SaCvg0y3x9YRIWRg1Qagv5NyDGQiQ2afwOnFwE92yXH0DA8CB7bRZrgVas2KkFXzzQ1yfuNgN/Cr9ZRy5jkdIGTQCZHxYlr3A7+spdPoZpx9JE4SqL6GdA9uFJQAD66Sqw9II8B9C4G5y3nXHE0Bb78C/HGHOrF1y6SEjz0b6SriRlWdXKtACgGMPH5nz80EsPsFoPOomtk1I3Hgz7uB32/jN2kra+RJAXYChAzK4YtEeTe/cR0pRCrn2Fkm0NEMvLmFLBMuzK8ifcoTBMgMk9jiwi0L2LXeGS2fiwTnTwL7XmbU1APypAA7AeYu53vQ0RTdrUO93sq3t0yg6wQlfXChdJkcKcBKACMP+OpzfOsd2Ka+2P80EnxwGGhr4lvzoWf4pQArAWbO49NY/3ZAXYXvs5DgyE4+1/QDK/gtAjYChAxg8ZM8a5kxoKXBH8WXZoz0gVGGcrUpQX7Tmo0A2flUyMGBt19RM4f+bhHrB4428qzFnVXMRoDZiyaqc0Vw9pgcr5rbV0FbE49LNxLlVQZZCGCneXFo/e/6RPTf7ir4w3Y+i0ApAhh5FB0TxZkWNXLlZaHrBHB9iEcZ5LoGWAhQOIdH/L+3z5+n30ZiGPjTLvF17p3BZw2wEKCoXHyNgXMUVPE7/n6cvJsiyAhQFrESBMiK8GTH/LXJ36d/skLYeVR8Ha5EFGEChAzxdK/RFKVApQMsk3QdURQv5NEDhAmQUyB+/1/u5lGOvIIPu6i3kKgewJFsI0yAvBk82nE6iP/JUqCvQ2yNe0JkfblOAI5sX9mJjyoSgOPKmxb1AQHGx4B/9SPtwBEg4jAFA26zMGl5p6UaJ4YHfUKAcI7Y/399SFwh8iISw+IRQtetgHCO+ENcH0pPCZC0xDuaciSHCEsA0Xo/mUUPKiOVFJcAHLWWQgQIBMSrfdNNsQlQCBoAISQBQZemKBqxB6/WNj4ixOxwZRtvQUPcGiQSVhAoyPiYtwDm+WJwkQFHehc1yfQgQYiQM3BJW4aVG1Omc6halhcQnAYT0J38A3YuK27NRw+hEgO19cAihBANEULq6ghtfAEUPhiKAKE4DDpXlvUfoRgCOjRwkCcCRxcqSUeQkcWVTjY8C/ryhAgBhDJK+sMr0Uwex8SugQQdLi8aIKEyA+JG6PGnnUHi1dUFQu7gAb7FLADASAZIInoaN0mfpDoTgQMoAKhiIaroFUwgSwTOCfp8QfZOlTzjSSdBs5BTw6T38nz/OweOJ72nkUo1kV/j/9D1bzBNC4Ss5ZCHC1h8cvXVnjb2UwK0ITT0XR18GXQ8FCgGQCOHdcfJ2CEqC4wr+nf9FqnuDXmRa+LGoWAnAVOwDUIlU0zUxV0+/hNeLrjKZ4J6OzReP7OqidG4eStLDaXxZByKAO4BwFtL2neYto2AiQTADth3jWqqrzzxSxkDExaZwDbU28RTRsBLBMPgJMCQJPb/VHkCgS5ZuScjPBY3JLIQBA/fy4HnB6MUkCL18F2fk0EJMr6+n4Hh5rSxoBLJMekgtffgJY8qQ3SZAVoX7JXP18Ukk5AyTYUzL7Ovi8VAC1nJ9X5S0SZEVo+nlZJd+aJ9+Uk0LPToCRONBcz7vmtzdREyovkMDe/EWr+da8ZclroCElKftSJ5V8c6J6o5xWqTIUPs7NB6hppqwCGikEsEwa6sDRHXMyHq0FntjE24qey9QrKKExsJxiHyCbv/2QvP4J0soyhgep5x835lcBaxtoIokK0iBkAHOW0yBoGd2839pKPQZlQRoBLJMaPsuYtReJAjU7gK89Tw4jN4gQMiiv7+mtwHdfklPg0tZE16lMSC3MMmPAWy/zXwU2lj0L/HQPKYiRqDNECBl00itrgLWNvF07Pyn6322U3zpH6tg4+4U5MS3cMmlmz9lj9PK4X5y98QtWkn9CZvLKaIrGxTnROU365FB7cMLMeTz9hD9tgx5bB6yoJQuko5lS1W4M333sPCtClUuzKujZZ85z5no59Dp1TnMCQSe+xDKBw9uB6Gy+Dpf/C3ZP/bnL6SRd7aHw6eVuUkzNGNnVqeTEYCe7Ti9kkPs2t5Da35YsoT87WcHcut+ZkbGOEsDWB/ZuBuoancv6mRIk86yg5OPidXxs4r8AbfCUj0jgZrn6+ZM0YcTJlnmO/tzEMI1/48gbECFFMJPqEUMGfaaG6e/c3Pz+TqDpVec7pjj6ky2TxPCu9fxRLS9jsBv47WZ3pqQ4znnLJN+A25JAFfR3AeyFNj6QkCTCZBQ62/ZgN9VnSdAH6zyb3Nd40ANgkGu4GGOv/NCPp/8N4+mibm9gFwvUXTtQE6BSf2psfGj6ZowHRzvRr9EZXo0WXGKHD0u5f8rRxeGyDdp6NZne7oyjRps+ft1tfwJz6qgNb9E9edSq3xgyq9JMukzxsvUlx91Qbv9w8a6qUh0pc61ZyJEFTxpdlzdXraga88Q5XDXmsoeTMBtOwkt67MeL4vCTBZGhzZCbx/iMqq5lepT4RbFim0pw6SV0/1SSjSw8FcCBk0nmZhNX1U6zA6EqeU+I4Wb2y88hLgdhJh4Bz1JPrLG9RkafFqii66JRVGU8A/Winzqa+DTXZh8F4THYV0NbE1Uk5xbS4OqySr4JpncS8d2tNADyYjvd714eeBWEhzESp8/AOSKEkUc5B18sA2aVAwWlQGbo7iXEaAq4aZK//mI7jXu7fIEKYf0y5SwIn8CWDEO9ZEGEDArxhnMoqWNalErPP5c38W82McZStNmJYUonGx6kHnw3YkAi7u+hFkG//jD7hJqx9JhJfLfQ4xo0ATQ0ATQ0ATQ0ATQ0ATQ0ATQ0ATQ0ATQ0ATQ0ATQ0ATT8jf8MAKEbvYx1o2bFAAAAAElFTkSuQmCC" If (!HasData) Return -1 If (!Out_Data){ Ptr := A_IsUnicode ? "Ptr" : "UInt" , VarSetCapacity(TD, 4168 * (A_IsUnicode ? 2 : 1)) Loop, 1 TD .= %A_Index%, %A_Index% := "" VarSetCapacity(Out_Data, Bytes := 3042, 0) , DllCall("Crypt32.dll\CryptStringToBinary" (A_IsUnicode ? "W" : "A"), Ptr, &TD, "UInt", 0, "UInt", 1, Ptr, &Out_Data, A_IsUnicode ? "UIntP" : "UInt*", Bytes, "Int", 0, "Int", 0, "CDECL Int") , TD := "" } IfExist, %_Filename% FileDelete, %_Filename% h := DllCall("CreateFile", Ptr, &_Filename, "Uint", 0x40000000, "Uint", 0, "UInt", 0, "UInt", 4, "Uint", 0, "UInt", 0) , DllCall("WriteFile", Ptr, h, Ptr, &Out_Data, "UInt", 3042, "UInt", 0, "UInt", 0) , DllCall("CloseHandle", Ptr, h) If (_DumpData) VarSetCapacity(Out_Data, 3042, 0) , VarSetCapacity(Out_Data, 0) , HasData := 0 } logoffpng_Get(_What) { Static Size = 4435, Name = "logoff.png", Extension = "png", Directory = "" , Options = "Size,Name,Extension,Directory" ;This function returns the size(in bytes), name, filename, extension or directory of the file stored depending on what you ask for. If (InStr("," Options ",", "," _What ",")) Return %_What% } Extract_logoffpng(_Filename, _DumpData = 0) { ;This function "extracts" the file to the location+name you pass to it. Static HasData = 1, Out_Data, Ptr Static 1 = "iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAACXBIWXMAAAsTAAALEwEAmpwYAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAAQyUlEQVR42uxdf2Qd2R7/zJm590VEVURURURFVFWttfIqKqrWs6pWrbWe53lWrbXWelZVVa2qiqhYVU9V1VpVq9aqqqqnatWzqqqqqmpVVEVFRERVVcSdmXPeH9/vvTl3cu+dM3N/zMyde7iiN7e5M/P5fH9/z/dYau2vCr0VsgRgFQFrCLDGARQBMQFYY/w7QT/Ln4UEVIl+ymeAWuH3FgC1BKi11NyZ0wO3zrL6AWsHIMYBsZvAtoYBa4v22ET437GnCHxIQL0D1CognwJyHsAKIJ8zWRK6zZ4GCII+CogPAXuaQe9noFmym9UkgEaINSbDY8B/QIRQXo8AndfwI4DYB4iPALGLpVwHq42mpfwdaoXMhXwM+PcB9bZHgI4Ab38MiI8BMaqpdpnExfD3eoD8E/D/S1pBvekRoG3A258A1nYGXmrgi6QvEEAJkC8A7wbg/942UuaLAJYDiCnAOQKIHQHg07gcAGuAfxfwbpFm6BEgrlCNAvbngHMIQF/Kga/hJ6hVwPsF8O9QNNEjQIRlTwPOlxS7x1q1zIJo8Lng52WLiFAC/D8A79eWaYPuJ4Dzd8D5isO5uGDoYHKCR3nkuavlOs4cKG8gRrQwsrgRAjZDBLUAuBcpWugRoN6dDZCtd76IGcPrsf86J3DmKUyTL8k2q/ec5at3DYOcPBoCxB56WaNMxmIThHTIDHiXAf82oNZ7BKi+q+1A4Qh5+ZHBdzbCMbXCcfldQC7VkPao17UFwABlFu1JQEwTUSvXKCMStAR4VwHvWmwSdB8BrG1A4SinYKOAX3a21gD5CJAPAf9hYwlv2jf5CBAfAGK/loeISgKPnEPvaiwSdBcBrG1A4RiDb6pey6p+HfAfA/4NIkAnU7LWFtJWzuecl4hKXEmOofdz5EJT9xDA6gMKJynB0/Dh6Q+3XLlbArzrlH1T7xMOVT8D7INsGqKQ2GNz8EskTdA9BCh8TxJkLD380ORToDTbvH1vqWmYBJx/A2Isuk/gnge8m7HimwyHeocD4IfdlkOS7l5KH/gA4D8C3BOU9IFnCJOkBJfzNfkVuSGAPQ043xpIvta0od4A7hx7z8vpvC+5yNd4nUlg0rrhUehZOEqhZ9cTwNoGOP/i8EqXfFlfSuQroHSUCywpX6oEeJfIuYOpc+dRxtM5Qn5R1xLAcijLJ3axhDQCnrWDfAG4p+hnVpbyAPcqUDpDNt5IE0iqeYj9XUwAMUW239ThU4uAOwPIhQzerAT8/wHuFQpXQ2GTAIqUDBMjXUgAa5hUP/oMPsxpU/dCRsHXncNrVBY2cnQ9Sjvbn3chAexpQOzUVH+j21sHvIuU3Mn6Uh7gXSFtYBoZOJ8C9oddRABrGLAPG9hCvjX/LsXFCXbetpYEb6gIJF9WRzY1zYAE0E/Pq45DmD0C2AeoVbuiBhu81ALgXkbXLfmatBpKqN6PUOslWWPu6QICWEPs+MEg5l+nRI9aRVcu+YiaQ+rCqOdF+gD7bxQ5ZZoA4kNybGqCH3jPfwDIBykhbj/3Bgy02B/4ieoYdWHU3hf7AGukloucFenv436+eune8vvcSOn92vFNFptAt/cD9iHOyvWTylaviZz+vea1k3xNXcOFb0JkWQLWVjKf8kqVsGSIAGOc45bhYZB/D1B/JqipJoDCd7TRpIqcgsq9YhJwPiP/xL/XZGh4lzz9uppRv64DgHW9qqk0OybA3ouNnrqwsO9mctIv9gDF8xr4unnSun6sUaB4msvXzZiCFa7+yRDfyKPqYqAxNhsEsPoAsTfg7dYhgP8YUAmleq0hoHiC7L1Ri1cRKJzgqKZJh1CthYSEghS+mMwiAbZz4scg8SHvJSf9zmHaUWxcwvW4efWfTWqBBUA9N4NUTFY5o9kggNgNo80c6g3gP02IpIPUyRNZviSBIkabjAjKvQNoEBJKMgNaNJARDTBmwhLea59Qfb/c/h1pbyF/ztoCWBPNfb98ojl3skFI2Mfb4rJCAKuf4n8TdSrvIztbvoLgNAvFWy5zG/wdLSuYAQ2whRo/jOz/ArK7moRClcz9AGtbJSuYfgKIEXZaQsI/tcxZsaTWehOzf2Rrrl0+p2RTqFYdBbA1KxpgCEb5KrnY9mEKjb9/gdrKI28KFdSZrOZbcA2L3BIelhUcpsxgNnyAYcMPrirf5NUO9eRCcw5q6ezasE4L3Zd2aGAGK72Q3J58lfq3wNuOewUaYVBuD/RG3gLVnvDesLgjVr6gkgAAyaRQBJ7uipupTb1M6t3qG6Lh/w+Mttat7V1n23WqekUJi/AVHRACkvBkmj1ubULe82bSV3vuAt4ZoWU6u08dS71R6tZSoIPC8hA9XAjM6ylPNAaYYkTYyzJntHrVzqTRvzFSIPTzdDS72lAlVK8wkZ6ghqVOnqrepIwNC8ZoMA0hBo0cO+7BAbaSYvI0/N2Lv3ethr8b3p88qA2Lw1c2Va2XCZWfAdTvMa5gyyoQEMGyetXT0CYMBgWzgPxuC0efoJIF8ZEmCohz+KMEucoVJ86h4NIEYj2L8uXWIHJ3jCOqfWK80j2SBAJa3aSAOMRigcdasPMGoGqZrPkA+AFcNZfaI65ZpHB9B0NpCcr2yWzYAG8AzavLnAYe/LsfhvMeicLs9Iehl8J+XLf6hdbr0XuOV5MJ/4i50BExisRIqN+F8rQmWDAOolzFqdhnhmUB4JMIX6o2Y1mOVClUnNCAEW+Zg1EzPwcc1t0N0N/iht/274bJgYlV1EmSKARzV0k2VP8+6cPBHgI21UXgisgc2oGdkZtJPHwoQ5OOWRKIeQm+KQNcD3C4Tum1Sv6JUpAoidQPFCtEyfcyjinN0sS/8+w32ToE6lQOt6ugkgPgD+ctEsu1VlMt7mIxqwhnljaRiMvG1e/tHIPUwh+MUzpNLN/xMPhJzrcBdOIg+IBmRXBmaFhdJ3aN9AUFmm8972AMUfDXYEBSV/mcF/1P3SLyZ4QrrJknVHyIt0Sv6sVt8XDZwbjRxqCXDP5gN8qx8ofKtpx5Bn4/9eN4xOFwHEbqB4VttmbaAGK+DPaRnDLl/OEW3SR9hz4mlidT6XHgKIPQz+VkRq71JLgPtjfsC3D2iqX4YLh3eVdizV41J6Qr2z2mwdw9Oz8qT2AToMq3gKG0OyRfjz8a6Z6NCkbf45DXxhZtdyB/5+EpKGE9IDg6ncmdCm2mQ1gNgNFGdqgG9q8/MC/gGWfH1MnqgBvvae9yvgPwl3J5K1+XNs8yWMZ+vkzubvo3mClaNmTaK+lzRR3MSfTAb8XSz5W1E99ds0zs8B+FY/H3x9RPOJTJ5TCXDPGE8r6TwBxG6WfBO1r6m7PNl8MU7A2wciuGv8+9IJg9J5UgQQOznJMxgxzs9Jhs8aoLq+81VAQAzNoztDg6ijpBQ6C/65COAjP0kei0e4Ol9pHU2meyLL4J+nal/E1RkCiN1U2KlU6EQE8Dvs8JVP9JZPAPmsvWNnra00A9k5xLP7ioYqP6AR3P+Q1x9jOZ2LkIoZ5Mzubbe+kAamsYgMeHTtxnIiy2hgxWP5/mtZePjZ+IkI6p4Qi6c3RmQNzLaevh0RVvfzuM2pUqkC9iwp8ANEVe8B+ZgOe5B/MhlWOMkSko61hvg1SmCLnazm+zY7upGWB5R+4BPEkEICiHGam7+psBOWvlwG3NkOgz8JFH7QwNevNai1JIVa6h1pKbWIqgOa4PDLo6HM1jaubBbrRDiITgC1wH7Rk+YVUlsIIHay5I8YqrUEQz17EiicTnkHkUZC/y45fC0aitl6H0BMcDOH6eRsPdTrNPhTrPYHUw68ALAGlOYA+XtLHVOn9ZI/G6GejwTBL9v8NG8rZ7Pi3QC8X9oyCt9preTPag6fMCNBojY/5TMF5HM6Ot5v3/F3rSGA2MX1/KAHbVCvTsTmpwn8YBQgaXi0d5WHSK+39dubJ4AYZ4dvOIban+1s927F5qdJ8svAr1Pvnn+Xge/MWcfNEaDSybMN0dO7ZzsM/mTKwPfoJZ9SLO8/TOS4G6c5yT+jgS8iSH4Sav9UPPD9W+R12+Wt532I10jFA63VKh1pq16zpC8nesJpPAJUQr1hRCvpJuHwTdHZfHHAL52mDRUA4BUBDFFdwyoCGOA9+ds50aM9SlUC8IayhXKeE0dvKaWMd8keads0AcR4wOEztHFqJSHwj8eYHSQ503YnAOoS4C+hm5YTHfxzTTh8nVb7x6KbKEie438TeVhONPBnNWkyLFcmnts3CEf1vIV3ObSVOn8EqKj9kYgO30rCJd2IoZh7HvB+Q56WYwb+jAa+4QNVy1zS7WSot4/Vfox5ge7Z3Kh9cwKIsYDkI4Lkdxh8q0h75SPbfADuxVyC39g4inHu5BnRPtpol67UbP5M5/fnqxKXSRexuX4vGzh8s609uKkrCFCNEYan82ue5d+QIoHQ+cwinCiZPjtfnpiB2a5MsQCdLBX0oW/AoJXgGloxoJZAOtJWjLlXOwRwD61yiHerrkG+xGSSK925AEC7RBQq2ifllaa/cqnKL5grkmgBhjyR8zsPnQbP5KOi0+XNMwlWNLAb9OEVZ2gHbi4JIEbY5o8ZqvxgqJfSHTvyOVA6pWmCAHmDq3iWBk3mjgDO1xHBL6v9M+nfriWfAu6pgDmopdU8jQRTeTMBJgOZguDPtqQtuSPLf8LDEpYb+ATOxjMozlFGMT8E8AzCprLNX8qG5G8iwUNK+JiEhnCo6GV/kuNEUN1QbyY7kh9cVl9jH6BWiNhwCnduCMAPzPstu+A7h6g3wNx5oMfjHEY3D54WkT4mn3buyuz95mfghIL/KVUIdTsfRnYI2gdYOoNuPp/YiWYJOtTKZE9vSGvpKKV4Y9/hQf5bwlzqKyHkCfNj67rfB4jx8Vjg7wMKR6kB0xokj9x0HHqo5Jtq/2dcU+hu8GMg2mZVaE8F2rgk1faLc9SMGdnmn4DZ0EltSpl8xpL/BnlYoiPAGqv9Eww+qvMRFRIYHgjlHKSWMKOhk9oGTPmYJT8f4HdIp0dR+8P1gbIGKUsXpgmcTxl8k1vXiC8fAqWT1L6doyXSAf4xTfIbAGUNU7VS1DkUyjnMaj+KwycA/z6D/w55W8kSwJ5iya+3tazG+BRrGHC+o9J15T0HcD4L8fbrVAL9B4B72niwYs7DwFbb/GMhrduiNojlYo07R+Ve+x9A4ZsIks9/2/8j1+ADSY2Ktacb2HxDu21PAdZJKvDYB2E2iSQI/qm2b7/uEaCuzTfZVxgixZVTMxBR8u/xPN18g995Amzq248DflxzVbb5d6h9rQd+HAI0kQq2DwCF7+Nt2mhq6RO2brPfUOohH4sA1jhglQBLAEpufsB1wZ8EnC9jgi+bkHod/Js0djZFW7OzR4DiSVademuVQRbR2opIU6/LS600qTHK/S43AO9cD/zmTUA/H+PagbSDe55m5hSOa42aMbSBfxfwzvfAb7FH1d7lXqDp12qV28/uR7hc/cDEW9wL2LP52SGAe5GGIlbMwHsigXxoCH7Q5vfAzw4BvMu1N2qqdzSvRz6rLembbP51wD3XA9+cAEmWg8v9hpcA9+cGDuFbKthUkaAWia6xze+BnxENIBj8KwZRwSrt9JEvakcg3lXAu9hz+DJFAPeCGfgVEiyzJgiQwPsZcC/1wI9HgITOj/QuVTt8xiRY4vr9K9YglwH3Mrq5e7e9eQD1ClDlLeHtJoPHoN2MB36QBNYExfq9FWv9fwDQNppc8+bVeAAAAABJRU5ErkJggg==" If (!HasData) Return -1 If (!Out_Data){ Ptr := A_IsUnicode ? "Ptr" : "UInt" , VarSetCapacity(TD, 6076 * (A_IsUnicode ? 2 : 1)) Loop, 1 TD .= %A_Index%, %A_Index% := "" VarSetCapacity(Out_Data, Bytes := 4435, 0) , DllCall("Crypt32.dll\CryptStringToBinary" (A_IsUnicode ? "W" : "A"), Ptr, &TD, "UInt", 0, "UInt", 1, Ptr, &Out_Data, A_IsUnicode ? "UIntP" : "UInt*", Bytes, "Int", 0, "Int", 0, "CDECL Int") , TD := "" } IfExist, %_Filename% FileDelete, %_Filename% h := DllCall("CreateFile", Ptr, &_Filename, "Uint", 0x40000000, "Uint", 0, "UInt", 0, "UInt", 4, "Uint", 0, "UInt", 0) , DllCall("WriteFile", Ptr, h, Ptr, &Out_Data, "UInt", 4435, "UInt", 0, "UInt", 0) , DllCall("CloseHandle", Ptr, h) If (_DumpData) VarSetCapacity(Out_Data, 4435, 0) , VarSetCapacity(Out_Data, 0) , HasData := 0 } powerpng_Get(_What) { Static Size = 2896, Name = "power.png", Extension = "png", Directory = "" , Options = "Size,Name,Extension,Directory" ;This function returns the size(in bytes), name, filename, extension or directory of the file stored depending on what you ask for. If (InStr("," Options ",", "," _What ",")) Return %_What% } Extract_powerpng(_Filename, _DumpData = 0) { ;This function "extracts" the file to the location+name you pass to it. Static HasData = 1, Out_Data, Ptr Static 1 = "iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAACXBIWXMAAAsTAAALEwEAmpwYAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAAKxklEQVR42uxdf2RcWRt+dkREjOuKGGNMI6oiqmJFRERVVFXUiIiIiBVRq2qtqoiKqqqqVRVr1VpVa61RUSuqIqJqVUStFVFjVFSsqBUVETGuMUaMdP94jM5X3a/tnvfce+6d8zA0pGdu7nnO+/u87xdvjxx5C4u6Rcy+AksAC0sAC0sAC0sAC0sAC0sAC0sAC0sAC0sAC0sAC0sAi0ijoW7+0uFh4JtvgIOD//97hQIwPQ3s7loCRArt7UBn58d/r1IBGurntdSPCvjYya8lwOGhJYCFJYCFJYCFJYCF9QKMh+MAiQTQ3Q309wO//Qb88Yfsd9y5Q0Py+XNgY4PuoudZAgS66ek0cOoUkMkAx4+/c9+ePpX/vr4+upKTk0C5DPz5J7C0BKytAfv7oSVD+AiQSAA9PcDEBHDyJBCLfdiVk0a5/O7fTU3AwAA/5TKwvAwsLAD5fOiI0BCa0x6PA4ODwMWLQDJpzrM1NQEjI/zk88BPP1H9FAqWAGInPpNheNZxzH7Wri7g3j1gcxOYmyMRDJcIDUaf+v5+4Pp16vowoaMDuH+f9sHt2ySEoUSIGbnxHR3ADz/wJYZt82vR20vb4NIls9SWsQRwHOr5pSXgzJmIRFpiwIULwOIiPQnD1Jg5BEilgO++o+5saopexCWZZHxiagpwXUuA/zn1J07w5QwNIfKYmaF6M0S1xQLf/N5e4NEjoK0NdYPTp0n4jo7AVUIs0M0fHAR+/jmaIv9jSKeBx48DJ0EssM0fGaG+j9VxPioeB+bnqQIDIkEskM0fHgZu3oQFKP2yWeYyAiBBzPfNHxwEbt2yG1+LxkaS4Ngx30kQ83Xzu7uZVrX4sCR48ICh70gSIJ1mZM8Pna/DqPTDd4/HaRT7SAJ/CJBM+mftr68z9i6NuTng9Wv9z3/0KHDtmm+qQD8BHId/kM7Ax+EhY+7Dw4y0vXol/x3VQNVXXwGrq3rf2fAwv8sHEjRo3/wzZ/RG+JaWmIP/+2/9GbdCgZufyzH1e+UK8OWXer7rxg1+z8uXIZYAiQTToTqwvc3TODvLl+RnutXzWBs4OUkS1FYLSXoG338PtLSElACOw83RofezWQaSVleDzbMXCiwHy2Roe0ijsxMYHdWqCvQRoK8POHtWds1KhcmUO3eAnR0z3DfPo9F5/jxVkTSuXNHqFeghQGurfLCnVKLIf/LEzOqaQoEEmJ2VVwWXLmmTAvIEcBzg3DnZCphiERgb81/X/xdpsLQEfPut7AXToSFGCUNBgOZmii3Jkz8+Th88DCXXngesrPDUiu1SDLh8WYsUkCfA2bNyD1qpULeGZfPfJ8H163JrDgxokQKyBGhtpfiTQhAuniQJHj1iulcKU1PiUkCWAN3dcr4UNzDb7PIcHcHPDXXzLrZTLiHoEcARyHVroE9vYYBInA5Uvs7VF/S1xXa2gQd63lCJBI8K6eBKanzfHzJfD6NQtBJTA5KZqZlCNAf79Mc6WnT4EXLxApeB5V2v6++lqplKgxKEOAao2fhNUfFdH/PnZ35YJjAwOGEaClhdkxVSwtMckTVTx7JqPaMhkxNSBDgK4uGfGfzUbz9Fexvw/8+KP6Ou3tYt6ADAF6etTXyOf1VPKYht9/V08fx2IsJTeCAK7LNi2qmJ/Xe/obGz/d1dJZt1gsMoWsCqFCFHW5Xe3Vo2r8ra3pPXmbm+zr8zF/3PP0tJipXX95Wd1o7uvj4VPsRKJOgFTq00/Xv2FjQ39z5uVlmZMngZcvqQZUimXa20WKbdRlXXu7jHUcZePvQ2ogl1Nbo6lJxBBUJ4BEta/mwkfj4HkyKk8g76JOANVr3YeH/tTbmwYJj8cICZBKqf3/Uik0LdVE8eZNRCSAatny7u6n9/KPEvb21L0NgWhgTHnzVR9id7c+JUC5rE78eNwACaDqAu7toS5xcKAuAVTfvTIBYjH1qFk9iv8qQk8ACcTsyIJAX7+yC6fK4ubmOn3zMfUMqsCdRHUCqD5Ea2t9EqCxUV2EB06AQkHdgk+ljOqc6RvicXUJIOA9qStg1SSO69anGmhtVSeAQP5EnQCqJVxCSY3QQaIzqkB5mToBJEKaR4/WHwGOH48IASQSOd3d9bX5ElVUh4cRIsC5c/VlCCYS6nUUpZLIPQMZI1DCFawnNdDTox4A29gQiaKqE6BUYkWvKgYGzB8KJQGpSzTPnxviBXiezJTOqSmR2LbxSKflyugFIBOIl+iQ5bocHhH10z86qi7+y2WxK+cyBNjcpCpQxeXL0TYGXVfmCv2LF2I1FDIEKJV440UVnZ3RlQKOw3G3En0Tl5fFqqhlCFC97CCBGze0d8cMBMkk8PXX6utUKqKT0eWS8bmcjBpIp9kSLkoegeMAV6/KGLnr66KXaOQIUCyyY7cEZmbCPTH0/c0/fZofCTx4IHqJRo4AnidHgMZGXqOOQq1AMik3JaVY5P1GQcjWY21tyT3gsWNsOBlmVZBIsH2sVMPs+/fFO5PLEsDzZBsmj4/TbQojCVyXLWE6OmTWOzjgnEHhO5TyFZm5nPrFx1rMzrIlSphI4Lp87sFBuTV/+UWmyZR2AhQKbI4oidu3OUYlDCSobv7EhNya5bK2Bhp6arJzOV75lsStW1papWox+CQ3H2DnNA2nHwC+eHvkyFstK3d2MjjUIDyWaHGRY+YlKpEkXb10Grh7V07nV7Gzw3oJTTeo9N3KePNGrjtmLYaG2IS5r88MaeA4bN9aHQQtjZkZrdfn9BHA86i3trbk106lOMZteprFlUEQwXFY13f3LkW0jtlI8/OyBrWvKqCKri6ejgZNE+qKRerdJ08YitbdasZx6N+Pj3OWga6/a2eH0k5zz2T9BKhOC9c9MNrzgHv3SITdXXkiOA7L1kZHmavQOQW1UiHBdHdO84UA1Zd386ZMKdSnBExWVth2Np+n9fxfc+euS3XT20sS+1W9fPUqjV0fGmf5QwCAYjOblamH/xwybG0xfbqxwUsse3tUFQcH7wY7NTQw/xCP8znb2qi6Tp3iz37eYM5mqdJ86prmHwEAlkIvLgZb9VOpvPvUEqD6CfK6+soKq6I0+fzBE6DqLy8siLQ3iRRyOeDCBd8HZfhLd8+jGB4flykeiQpevQIuXgxkSo8s7zeJtobIwunD35DHEHFNkMRuFVSTAyEq3ZQJ+LZ88o9gMMawdn8XgeRd/oqJ7J26bj119p8AV8APw1Av8N1YGT589Hf+MrFeDaNcYpDGiQbQYBqh7CwABrCXRG2YLE9jZnCm9uGtMd3ZwebdV5u5mMeOGjEchmafOsrxvVGt8cCfC+NBgc5CWRsMcLtrYo8vN5I2cimEmAKglaWmgXTE6Gr6FkqUR19vix0e1wzSVALRHa2uguDQ2ZT4RymeXbCwsM6Ro+CcV8ArxPhLExRhJNMxQLBaajl5dDsfHhI0AtEVyXg6onJjg/LyipcHDATh0PH/LKdrkcutlH4SNALVyXyaWTJ2k0njihv8tIuQysrvI6/Noa9XuIB16FmwAfMho7OzlUsaeHtQfNzf9dQlQq3Nxcju5bPs/OHMViZKacRYcAHyJEUxOlRDLJTyrFqKPrUlJUiVGpUJzv7/NEb28zPl8tLfMxP28JYOEr7LQGSwALSwALSwALSwALSwALSwALSwALSwALSwALSwALSwCLaOOfAQCTA7YdF49HOwAAAABJRU5ErkJggg==" If (!HasData) Return -1 If (!Out_Data){ Ptr := A_IsUnicode ? "Ptr" : "UInt" , VarSetCapacity(TD, 3968 * (A_IsUnicode ? 2 : 1)) Loop, 1 TD .= %A_Index%, %A_Index% := "" VarSetCapacity(Out_Data, Bytes := 2896, 0) , DllCall("Crypt32.dll\CryptStringToBinary" (A_IsUnicode ? "W" : "A"), Ptr, &TD, "UInt", 0, "UInt", 1, Ptr, &Out_Data, A_IsUnicode ? "UIntP" : "UInt*", Bytes, "Int", 0, "Int", 0, "CDECL Int") , TD := "" } IfExist, %_Filename% FileDelete, %_Filename% h := DllCall("CreateFile", Ptr, &_Filename, "Uint", 0x40000000, "Uint", 0, "UInt", 0, "UInt", 4, "Uint", 0, "UInt", 0) , DllCall("WriteFile", Ptr, h, Ptr, &Out_Data, "UInt", 2896, "UInt", 0, "UInt", 0) , DllCall("CloseHandle", Ptr, h) If (_DumpData) VarSetCapacity(Out_Data, 2896, 0) , VarSetCapacity(Out_Data, 0) , HasData := 0 } rebootpng_Get(_What) { Static Size = 5628, Name = "reboot.png", Extension = "png", Directory = "" , Options = "Size,Name,Extension,Directory" ;This function returns the size(in bytes), name, filename, extension or directory of the file stored depending on what you ask for. If (InStr("," Options ",", "," _What ",")) Return %_What% } Extract_rebootpng(_Filename, _DumpData = 0) { ;This function "extracts" the file to the location+name you pass to it. Static HasData = 1, Out_Data, Ptr Static 1 = "iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAACXBIWXMAAAsTAAALEwEAmpwYAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAAVcklEQVR42uxdaXhV1bl+1x7OOTnzORlJIBBmUBBQBgWLVYQ6VKheh2oVGluROhRvtdXHtrc+rbXWq60itCgXpVVqpfSiVpHKpCJyRZFRIGaezzzPe7g/EqKBEDKsfYac8+bJ85DksPbe63v3t7611rfej0zau0JGDlkLbig/HNFw0Gm0sLJ6WDgdJFmGidPCxGqhZzRgCQMNUYEhBDEpgbAUQ1ROwCOE4BYC4AkHnxiGXfAhFolCToiAnCNAGloaYPRqaBge4zWluEg3BsN4C0p5C0p4Cwo5I7SMChpG1a9mo1IcISmGtoQH9oQPbQkP6uJ2HAjVojHuRDQRgxRO5AiQEpvzLIoMVpSrCjBLNw4LjFMxRl0MjrDUrqHpJE0+ZwDyuv9NkEUciTRih/8IDkcaUBuzwe33AKKcI4CSLj0/z4RvGCZjkXEaJuaVoZAzpqbjCIvp2gpM11YAAFoTHpyINGOb/yA+CHwBfzgIOS7mCEDDvetNRlyin4BrTDOwwDgVBCTtbrO0c8i53DgFgiziHd8BbPV9jn2hKsT84bSNHUi6zgKIikWJPh83WS/B9ZY5KXvTBwMZMprjLmz27MMW7yew+1xpN0SkHQEIz2KCeQRuz5+PJZZZafm2DwSCLGKjew/+7v4I9b62jhlFjgDdDT/OPBz3F12N+YbzwBJmSE5NBVnEW95PscaxDS1eW8o9QuoJwBIMMxVieeFC3Gi9eMi88eeCKEvY4NqNFx3vwefzpSxGSCkB1CYtbrN+AyuLr6E6fcsk+MUwfte+BW+6PoEUimcHAQjPYrp1LB4tvQGTNMORA/BJqBqPtb6OOldzUr1B0gnAG/Nwb9FV+GHhgpzVe5g1/Hf7m9hg35U0b5C8dQACjMkfgWfLKzFaXZyzdo9dRPBQyWJcqp+Eh1tegd3jVNwbJCXUJjyLa4bPweaxD+WM3wfM0Y/Hm2MfxuziyQBLMpsArFGDn4++GU8NvwMqwuWs20cYWS1eqrgX3y9fCKJSLkBW1CIGsxHPjFiGufqJOYsOEA+VLEaFugiPtW6C6I9mDgGGWYuwdtTdGKsuyVlxkPgPy8Uo5Ix4qPmvCHr96T8EVBQMx6ujV6ad8eWvfYmy1OP31z+TTphvOA/rRq2AyWxK72ng+MKR+EvFfTCy2pR3WkiK4US0BfUxO5yCHw7Bj/qYAw7Bj7AUQ0xKQITUMT0lLFSEg57RoJg3Y7S6GPmcAQWcAaPURZioKUuLGKYq2orK+jVwe9zpR4BxhSPxSsX9MLB5KekcQRZxMtqKbf6D2B+qhj3hg1MIIBGIDHw6xRJo9FoUcSYUcAZcrJ+ARaZpGKUqTNnq5cloKyrrV8Pj8aQPAcrzS7Fx9EpYOX3S3fre4Els9x/GB4Ev0B52Q44Kiq5nMHk8yrVFuFQ/CVcYp2KWbmzSSXA40oAf1P9p0DEBFQJYLVa8OvrHGKkqTFoHeMUQNrk/xmbPPjRHHCnLzWMMalSoi3CLdS6WWGZDx6iTdu33A8dwf+N6JPyR1BFAY9Lh5Yp7MTVvZFIeujXhwTrHdvzL9xmCgUD6JFiwBBajGUvMs3BnwRVJ84SbPfvwy9pXB5x+xhbeOfNXA2aPhsNvym/FNwyTFX9QvxjGU7Y38FjrJhywnUQ8GkuvNCsZiEajOBioxabg/yEkRTFNO0rxOGFy3nAEmTgOBWoH1B8D9wAsQWX5IjxYcp3iY/xG14dY49gGj9eTOXn5BCiyFOCB4m9jsXmm4n20rO557G8/njwCzCyZhA0V9yn6YHUxOx5ufgVHXDUZl27d1cE8izkFk/B42a0o4c2KesjF1U/C5nYovxBksVjwzIhlinbceudOXF/zexyxV2es8QFAToj4uO0orqv+Hd7w7lfsOkZWiyfKbgOj69/hl37HAETD4bfl38MUrTJBX1wWsLLpJWxs2Q0hHMdQQTwaw87gUbRLXnzTeL4iqW/DVfnwSWEc9tYq5wG+VXAhFpmmKdJJDXEHllQ/iR0tn6VN1ixVbxAVsLnxQ9xW+yy8YkiRazw87DsYUzBCGQIUWQvwX6U3KnLj+4JVuKXmGdQ7WzDUcdBWhRtrnkZ1rF2B2JPgF6U3gtHydAlAeBb3FV2tyBTv8KjxRfi8PmQLWlztWFb3PI5Fmqi3PUs3FtcVzEZfRpk+E+DC/PG4wTKH+s2+5z+EB5peRtQXQrbB7XHjB/VrcDTSSL3tR0q+A4PJSIcArFGjyHz/w8Bx/LT5r4Naysx0+Lw+3N3wAupidqrtGtg83FV45TlTyvpEgCuMU6gv9R6LNOEnzRsQ84WR7XB73Fje8GcERLovQmXB5RhuLh4cAdQmLX5asoTqjbmEAO5pfJF6dksmo9nVjhUNL0CUJaoB4fLChb16gXMS4CrTDJTyFqoP++PG9bC7nTmrn4YD9pP4Tds/qLa52DyzVy/AnOvtryy4nOoNPdH2TxxwVuWs3eNCAfC6bQ/+5f2UWpMcYfG9/Pln9QK9EmCObjzVvL5PQtV41f5+Ri/tKs6BqIDH2zbDJQSotXmb9VJYjZb+EYCoWKwoWkTtJgRZxKMtGzNeVClZM4NHWzZSa48lDJaYZ/W4LnBWAkwwjcCUvHJqN/FU+xtocbfnrNvXKbLzKLb5DlJr7wbLHLAGTR8JwBJca76I2oZFVbQVr7k/GnIae4oOBXERv2/fAkGmsydSoS7qMXexRwJo9Tp81zqP2sM83rY5qxd7Boo2nwPrnDuotXeVafoZwWCPBJimrUBeP0UVz+rKAsfxqffLnDUHAlHGK64PEJHobIsvMc+C3mA4BwFYglusc6k9w4vO7cqmaQ9xuL1ubHDtpjYlvFA7uncCaPU6nE8p+DsWacJnubd/0GsDr7n3UIsFrjHN6DYMnEGAKXnl1HLXnrdvzb39FOAIeKilk03RjoRGrz0LAUjH+E8DLiGAz8K1OevRcAIJEa+591Bpa6SqEOPUw3omAJPHY6HpAioX2uL9BEFfbrOHFk5EW3E82kylrcl5w3smgFltwERNGZWLbPV9npv305wQ+KPY6T9Kpa25+okgPHsmASZoSqks/jgEP05GW3NWo4z3/IeotHOxfgKYPP5MAtBK+tjq+xxiIJqzGGXUxGxUNom0jAplvPU0ArCk29gwGOzwH865fyWGgVAMuwKDHwYICMZoSroTgNd1KGMM+iZlCY3xXLKHMgyQsSd4gkpT49SnEcDA5nW5hcHgcKQBjpgvZyyFUE8peXSEqqBD7OLULyysrqM2ziBRG7NBiub2/JVCW8IDhzD46XURZwJRc18RgJagQUPckcv4URChRJRKCrmV00OtVn/NA1AiQFVu+qcopGiCykyggDMgnzN0HwJoBIBOirlsOfQcCNIYAvRsHnTMKQ9A6A0B9kQuAFQatoSXylpASIp1EoAhMDCD1/YTISEsxXIWUhg0EkQICLSnPABhGSoxgCRLXcqbOSgHn0jnOB1Bp1i0LErYEzyOsBQDCwYSZPCEhbpTGlXN8NAyakiyDJYwUDM8RFlCTEqA71TBUjM8/GIYCSG3/680EjK9PuZOBRZvN+3D29jXP/owX20cEaZjNBmKyh5DFQzIIOTiZXSb78tizvBJMxylmooSZDC57sw8GBgNRS+QQ8ZBS0mPOColcgTIRJgo6DTFZQFqhs8RIONAgGEU9BqCYhSCLOYIkHH251kUcMZBt+MVQ/CKoRwBMg2qPDUK+MFv2/vEMIJiNEeATEMBZ+yW1z9Q2BM+CJF4jgCZhlLeQqUGgU3wQU6ICtUN/NoqIWGYrp8Jy4BlWbCEAQMCljDgCQeOMCAgCEsx8IQDAwKesOAJ1/kZFmrCQ83w4AkLDaOCnlFDw6hgZfVwi0Fsang/KwhA69zmqdQy7utG0xh10DJqcJ2GUREOWkYFNeGhZdVQEx4qwiGPUUHD8EjIImJSosswPOG6jKU69W/mq/+jZdTQdLal6TSopsuwHDSEB9vPVa64LOD+xv/JjgBQxeJK49RBtyNDxoloS3cCEI7Fr0pvwrdM0xEUo+AIA5awYEG6LT0ynQdHCAgYQhSRPe/7QkYc369fjUO27DiBbNTqMYXC2Q1JllHTKVTdzQMUcEaoCJf00m8DQUSK446653DMnj0HUGfrx/fbQ/aE5oQLoUT0NA/As9RUQZRGQIzg9rrnUOVoyJ7ojyVYYJhCpakd/iOQOotxdBGA57iMKO/uFoJYWrcKNc4mZBOsRgsWUBj/AWB/qLrr5FaXxTWEp7bJoBQcgh9L61ZlRVGJ0zFXPwEaCh5akMVumdtfEYBRQZvGQ4At4cXtdc+h2ZV9WoOMTtUh+kwBhyINaA+7zySAntGkbQzQHHdhad0qtLntyEbMMIzBaHUxlbb2Bk90k+3pIoCBzQObomrYvaEuZkdl/ep+18MbSnN/moLd2/1Huv3cRYCELEBD+LR6+OpYOyrrVsPpcSFbMdUyGpcZzqP2MtXGbD0ToGOmkT5bA0cjjbi74QW4Pe6sNT7RcHiwZDG19v7m3nOGcEcXAdJpBnA00ogf1v8pq6qI9YQr8i84Q9hxMNH/B4EvzhDu+CoIZPPS4qH3h6pxb+M6BLK8nIzWpMdDFN/+j4In0OS3nfH7r3kAVVoY/57GdblaQizBvUVXdYg4UMLLzl09ntlImyHgw8BxPND0EsK+ILIdFxVOxNKCy6jOpD49i2hnt3WAVGF34Bj+M0uLR54Oi8WCp0cspbrLutbxb4j+aC8EIIAxRTHANt/BrC8eeQqMlsevSm9CIYWkz1NoT3g7RDvPdk2gIxfAwiZ/C/hN7/6c8U9N+XgWy4ctwpXGC6i2u9q+FYlApHcCgCWwcLqkPnBUiucqiXRZH/h2yWzcV3Q11WbrYna86f20V83GDg/AEJjZ5BJAw6iwsvjaPpc5H8r4ZukMPDH8NurtPmN765wvWKcHYKgcN+ovvmudhwfLloBouKw1/rzSqXi+/E7qqXV7gyex03VubeEOAogSjCkgAAAsK/gmfjHyZjA6VXZZniW4ouxC/Kn8LurGlyHjyfYtfSrWwQAAy3HQpXAd4BbrXDxefht4Y15W2J6oWCwpm4tV5Xcqsv+yxr4NX7ob+/RZroOMHbIvqcRi80yU8hY80PTykN4AYnQq3DfsamoJHqejKtqKdc7tfRbrZAB05vSnPhdgpm4s/jHmQVxQPK7XkueZGulbLVasHX23YsaXIePRlo2I+fouIsUASKtMoBLejI2jV+L75QuHTFxAeBYXl5yPN8b+DHP1ExW7zu/a/hfHHP1Lk+cApF0yKAHBQyWLscA4FT9v+RvqPC0Zqz9sMBvxk+LrcJP1EkWvs91/GK86Puh3nQYGQEoDwN4wXVuBN8b+DCtGXQOtSZ9Rhme0PK4aPhvvjHtUcePbEl78ouVvkEL9F5DkAMCU5EWgft0gYXFf0dW4xToPf7D9C1t9B/o1xqXC8DOMY/HTksXUDnL2BlGWsLxh7YCTZzgAyM+Ao2CFnBG/LbsVPyxYgPXOHdjq+xzhYCg9hgbSUXJvnnky7si/DJfoJyTt0vc3rUeVc+AnpDgAg14GjstCh+hgEmYSFeoi/Lrsu1hZfC02eT7GFs8naI46B+T+aAR3hQYL5uknobLgclSoi5J6WPax1texq31w5fk4oKNWwEBvXIaMHzeuh1cM4aVR91A5vdIX5HMG3F24EMsLr8Te4EnsChzFnsAJNEcckCIJxYpWERULs86IObrxmG+YjCuNF6RkFrXa/i5eb/1w0B6QAwauPStDxv2N6/F+20FABu4ia/HSqHuSml1MQDBXPxFz9RMRLxHQHHfhPf8h7A2ehFMIwCn4EQyHOtKh+ttXLAGv06BMZYWOUWOGdjQWmqZhsmY4NAyfsqPxax3/xprGt6nI8pJJe1fID4+/GXfkz++38Vc0vIAP2g5169iLh52PtSOXJ2U4OBcEWURtzIaGuAP2hA8BKQqn4Edz3AW/GEG0U3Zdggw14WFg81DAGVCmskLLqFHMmVCmysd4TWnazJRedGzHHxvfgBynI83LgaDfB0IEWcTyhrX4uP3oGW/Vx21HsUx6HutGrUjacNDbDGK8phTjNaXdiNtXz5JueNb2Nl5oepeqIDcDhkDTj32AuCygsn5Nj8Y/hQO2k7ix5mkqlS2UGDL68pVu+K/Wv1M3PgAwhGX6HMREpDiW1T2PT9uPn3M8rXE24ebaZ3Askl3n+GkjJMVwV8OfsanxfUWk+BnCMdAQVZ9upLJ+NQ7aq/rcuN3txO11z+FN7/6cJQeA5rgLt9b+EXvalCvFy7AcBy3be4DjF8O4vfbZDjGmft5I1BfCI3V/xW/b/tnn8TeHjmzp62uewpeOBkXrMHMd5WDO7gHcQhCV9asHtdokRwW80rQDRyINeHrEMpRSEDseqhBlCY+3bcbrjj2QwspXYGU0hD/roRCXEMDSulUdYkzyoJ8Mh2xf4rovn8Br7o9ylu4BxyJNWFL9JF5r3JUU4wMAp2XU0PVAgPaEF5X1q6nr8YR9Qfw68hp2Bo7gkZLrUaEuynrDR6Q4VtvfxQbX7rOe4FGQAKozsoFaEx4srVuFFoX0eOS4iD2th3FDqAZL8y/DPUXfSouFo1Rgu/8wft++Bc1eW0o2tjgJcrd8wIa4A5V1q5OixxP1hbA2+A62+j7Hj4oW4TrzzKxy98/Y3sI+13Fqq3oDIkBcFrr0AWtjNlTWr4bd7Uxm1INGVyse8f8F6807sbL4Wlyqn5RWaiU0URez4w+2t7ArcCzp7r5HApxaBq6N2XBH3aqUZeTKCRFVjgbc4/szzjdX4CbrJVhinjVkiPB5uA4bXLux3XcYUiB9yutyPOHgEgIpNf7p8cERezWOeuqwxvAubrHOw7fNF6GEN2ec0QNiBHuCJ/CycxeOhRpTkrNwLpDLTvxSBpC+MmydMvazdeNwlWk6rjFdmPZe4XCkAZvce7E3eBJtPkdaJ7SSSR+vyJgFulPJGPMN52GBYQrGa0oxXJWf8vvyi2F8EWnGvlAV3vEdQGvUnZZve88E2LsiM9dnWQKr0YJRqkJcoB2F+YbzME07KimC14IsoiZmw+7AUewP1aAh7kBrwJHSaD77CHAaGC0PFa9CGW/FeXkjMEZdgjKVFYWcEUW8CRZWBxXhoO5DJk9cFpCQRbiFAJxCAC4hgLaEB81xFw5HGlATsyGciHZIrmd47w2Zc9lSOIEoEqhBCDVo6vISrE4NE6uFhdXBwOZBlCVoGL6z7I0KDAhisgCxs/xNQIpCRTiEpRjcQhA+MQwhEh+yVdGH9sF8UYboj8KNKNzIXsXRXj1nrguyG/8/APvHUJnbLxMzAAAAAElFTkSuQmCC" If (!HasData) Return -1 If (!Out_Data){ Ptr := A_IsUnicode ? "Ptr" : "UInt" , VarSetCapacity(TD, 7711 * (A_IsUnicode ? 2 : 1)) Loop, 1 TD .= %A_Index%, %A_Index% := "" VarSetCapacity(Out_Data, Bytes := 5628, 0) , DllCall("Crypt32.dll\CryptStringToBinary" (A_IsUnicode ? "W" : "A"), Ptr, &TD, "UInt", 0, "UInt", 1, Ptr, &Out_Data, A_IsUnicode ? "UIntP" : "UInt*", Bytes, "Int", 0, "Int", 0, "CDECL Int") , TD := "" } IfExist, %_Filename% FileDelete, %_Filename% h := DllCall("CreateFile", Ptr, &_Filename, "Uint", 0x40000000, "Uint", 0, "UInt", 0, "UInt", 4, "Uint", 0, "UInt", 0) , DllCall("WriteFile", Ptr, h, Ptr, &Out_Data, "UInt", 5628, "UInt", 0, "UInt", 0) , DllCall("CloseHandle", Ptr, h) If (_DumpData) VarSetCapacity(Out_Data, 5628, 0) , VarSetCapacity(Out_Data, 0) , HasData := 0 } sleeppng_Get(_What) { Static Size = 2708, Name = "sleep.png", Extension = "png", Directory = "" , Options = "Size,Name,Extension,Directory" ;This function returns the size(in bytes), name, filename, extension or directory of the file stored depending on what you ask for. If (InStr("," Options ",", "," _What ",")) Return %_What% } Extract_sleeppng(_Filename, _DumpData = 0) { ;This function "extracts" the file to the location+name you pass to it. Static HasData = 1, Out_Data, Ptr Static 1 = "iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAACXBIWXMAAAsTAAALEwEAmpwYAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6JQAAgIMAAPn/AACA6QAAdTAAAOpgAAA6mAAAF2+SX8VGAAAKCklEQVR42uxdf2yUZx3/3Nt3l45irVAZdLW0cF66EzpkDZvLsjFG0CjZmq1MxwirExsliFvTMEIarIQ0pnEMcGFzIk6Mio06xybBjhBljF9pKtauY7VYbGq5lbarR1vO4+6tf3z7egXuvfd97+79ce/7/SSkwPs+7z19v597nu/vx7P4qclJMAxDhQ+YO5v+Lk0CuV76v0gU6LwIRGOA4InfH40B5aVAwUzgn/8GBj8GxJwbrxcWAL5iIDQOdPXeeF2apOctWggcPgH09Cefn4cJYBwCZcDWZ0ho0yELXFJ482rXtdwj5gBjE8DG5uRzFFlMxkEQgCV+6z7/3Psa5shicjlJ+RUwARgGQpKs3YKYABZCzNEmBMMI4GECWE4A3gJcjMh1az//ZvOTzUCTMREGWs8SEQRPfDtQEoy8YkgS2ffRGDDzdmDZ54D8PGN0ACaAgejpB+r3pLeF+EuAsWvAikr9JBgJ8RaQ1YjGyB0883b9wh+4ArzcwgTIauR6gaaNwMpl+sYFh4EtPwIuXWYCZLUFkYrwh0aBrS8DHT1sBWQ1Nq3RL/zQOLBtH9D+IZuBWY3aKuDZWNCUeAhleAM53sB8hqrP8y8K0n9I/b9Uvgz+0pmIr8yu2DJ1cCm7+q34O4/03g0DupfSYTwCaoXgHUrwO8t+kb9/rb2sw9JoCNUXkXCT/Xq2/coVZg96+TZw4xAWyOBXeSuTcjV9+4P/wF+MHP0xM+4GBXcPN3bvxGZTTswB2i8AB95KfY4ldwC76+JJo1px7BzQ+Fr6wnc0AWblUxDFSHT1pj62qBDY9TxQOk/fuI4eYOeBzAjf0VuAGYkY0Whq4+bOJuH7S/QTrn6PtiAP6wA2hVekPT9Qpm9cdx9Q9xL5+TP6RXHqi7YyFy+ZLrHz26T160FfEHhuFzAwZMCc+DtpnvAba4EvfUHfuKFRYPOLQP+gMfNyrBIoCJSRI68GySpo5HvCEbIcZs7IvPC3PgNUPaRv3EQYaP4F5QQYBccSYMteQBRJwJKknIYle95C46SRP/cUUD4/cyQQPEDd08DXVukbFxonO//oaWPfk2MJMPQf/WM6esiztut5dQKMhLQFXzZWU4BHB3HjBe+KwDJPAdbN8AzPlU8vtGr5KAuvuS31c6D1j7Rf3zCA5TCtisfON/Z04KnSb8fS+o2+ZjE0DT6+SN0/LMVLYSfwlFBit8tIWJ4pQeo2DZiOKtfglBIJ1m+4+ZAJoEtbtO3TYPTty+k4o/wl+h1FN6P9Am8BmoT/w++ql3FLEiVdHH5X+7OzoTDE1QQQPEDjN7U5Zvb+Rn/ShTRpT4cUE2AK274OLL9H/b7DJ4CDR1L3RzABbIi6taRoqeHIe6Txa1lOs3IVdKPwN60Balar39d6FtjxU1L+HLsNuk34tVXAhsfU7zt5nkwo2Z3sVLjKDHz8YfLMqe3LbR9QaVW6wpckMsUSbyHJSUREEgJTWZIpnsGYKgbdtyTZu4ZQFgb7167t2ly0BtU+bj7rwFWIglfqB5s7rw+weptMotwncFAQJllCCq5lcPDpPwOy+6zBfi5F+ufD55+dSybkdCVFF7vtt9FpFjCVA8h5b94jnqwq97SV9FLRMgS2x9LSnX/YNAYAFQ+El3EsCxZmBhgbb7Knz0s6gwcV2eUnMnMYfyAX71JyaAZninPk2OXyvFuAVh2kuPJr6eSe9chS9OBD149fe8AuhCwzfIHk+3qiUaA6pfoJ77inubjQtDXL0FFH06/Wdcupy50ii3w1QlUEvv2kzB7nF4tgIY7rUCkgUp5DQqvfXySjqAvBKkWh6udN3qTuBZSYDX3qDMGkmKv8BojP4tCED4v6Qj1Kwm/70SCQSP+nbS9DMy6wSBnh+5fqPA5M+UTb9E+XuSFH9GNDp1wJMQn8PoGBNAF/o+0nbP2DXK1VPKij3TmdwCANRPy2LYVAeYkUtJG0rCP9WRXlMkhs0JUP+0cqJmVy81Q3TC0ssESIDaKqD6kcTXRkJA88HUav4YWUCAxx9W7pA5NgHs2O/eiJ3jCVA+P3mHzH2/A463sbAcSYDSeRS3V8rYaTkGtLzDgnIkAfLzKF1LKW5/5D3a9yNRFpTjCCDmAA3P0knZidB5kSpyWPgOJIDgAbbVKDdM6gsCjT8hhxDDgQR4cqWyuTd6FWh4Vb37BiNLCbDqXmqalAiR68C+37ozO9cVBKjw0b6fqC165DoFi1qOsVAcS4DqR4CCTyS+Fo4AlQHgvsXxSJ8c9ZP/iDlTUUQPCy5jyrjZyl8ykzBQRsWbm9bcGmv/PymmQsjrv8cWQtYRQC2PLz9PW3Yu5wQ6wA/AYAKktZXoPVmLYQMCZEp5m144wsgiHaDlGHDklHL/PLkMS0t3b6e3bnEkAbQeaMxgHYDBBGAwARhMAAYTgMEEYDABGEwABhOAwQRgMAEYTAAGE4CRAWQ8GijmUHuXokKq+vF95tYDDfuCVOvfPwh0/INz+xxBgEAZVfo8cDdQfEfi1G8Z91fQz2gMGLhCXT9az9LpGpzrZy7SPjEkUEZNnZbfk1zoaojGgDN/p967pzqYCLYnwIxcqumveij9lm43E+F4G3X5GgmxgGy5BfiKgcba1Bosa9EhVt1LTaJ27KcDnBg2sgKW+OmUbSOEPx2l8+hA5xWVLCTbEMBfQg0d1I5gyRTy84CmjcDypSwoywmQ6wW2bzBP+NN1jfp17j3RwzYEqFtLKvhJK5dNYAF4VaRIBFC4FHH7R2osuXAiuXscAsIUDN6syaeilNVADWfyU9XwMjBQJU+IAHP2+PyVb4eBUwnQCr7rPXt06pjzDDAAJ4ReD+xfaacOVd6sfAMjJEgKXlQGmRvSY8K5+cUQwTCDB3tj3r8H3FLDhTCBAos+ekAwtYcKYQwG7Lv4wFd7I5aAoB7HoypnyAE8MEM9CO4GQRlxOAYRIB7NqIiYNCJhGgL2jPSfcPsg5gCgG6eu056c6LLDhTCGDXpMzBj1lwphDg3PvUl9dOGL1KR8cyTCBAOAKcPG+vCZ/vBoLDLDjTzMCjp5U7e1oBPj/QZAJ09AAn/mqPyXb1UgkZw0QCAFSuFY5YP9mDf+QewZYQoO0D4O13rV/6j55mgVlCAADYfci6o9yCw3SCKMcALCRAaBxoeMV8G1w+OXxgiIVlKQEA4MK/gC17gaFRcyYXGqcTRE/+jQVlCwIAQPuHwOYXjd8OBq4A9XtY67cdAQDyxdd8HzjUmnnrIBqjU8PXbWePnxlIu0PIooXAhseoeCSdBFJJotXlwGFe8rOKAADF55eWU9HGA3cDxXMA723avu3BYYo5HG+j1jAc5s1CAkyHV6S8/cICoOKz1FMgGovnF4oi0P8R+fRHQvStZ+eOgwggIz+PVoIlfsrg7e6jLWLsGmn3Q6PcA8gO+N8Ae+QBaQVK0iYAAAAASUVORK5CYII=" If (!HasData) Return -1 If (!Out_Data){ Ptr := A_IsUnicode ? "Ptr" : "UInt" , VarSetCapacity(TD, 3710 * (A_IsUnicode ? 2 : 1)) Loop, 1 TD .= %A_Index%, %A_Index% := "" VarSetCapacity(Out_Data, Bytes := 2708, 0) , DllCall("Crypt32.dll\CryptStringToBinary" (A_IsUnicode ? "W" : "A"), Ptr, &TD, "UInt", 0, "UInt", 1, Ptr, &Out_Data, A_IsUnicode ? "UIntP" : "UInt*", Bytes, "Int", 0, "Int", 0, "CDECL Int") , TD := "" } IfExist, %_Filename% FileDelete, %_Filename% h := DllCall("CreateFile", Ptr, &_Filename, "Uint", 0x40000000, "Uint", 0, "UInt", 0, "UInt", 4, "Uint", 0, "UInt", 0) , DllCall("WriteFile", Ptr, h, Ptr, &Out_Data, "UInt", 2708, "UInt", 0, "UInt", 0) , DllCall("CloseHandle", Ptr, h) If (_DumpData) VarSetCapacity(Out_Data, 2708, 0) , VarSetCapacity(Out_Data, 0) , HasData := 0 }