Loader build 5.au3

#NoTrayIcon
#RequireAdmin
#Region
    #AutoIt3Wrapper_Icon=..\A1a - Opus one\images\Logo.ico
    #AutoIt3Wrapper_UseUpx=y
#EndRegion
Global Const $bs_groupbox = 7
Global Const $bs_bottom = 2048
Global Const $bs_center = 768
Global Const $bs_defpushbutton = 1
Global Const $bs_left = 256
Global Const $bs_multiline = 8192
Global Const $bs_pushbox = 10
Global Const $bs_pushlike = 4096
Global Const $bs_right = 512
Global Const $bs_rightbutton = 32
Global Const $bs_top = 1024
Global Const $bs_vcenter = 3072
Global Const $bs_flat = 32768
Global Const $bs_icon = 64
Global Const $bs_bitmap = 128
Global Const $bs_notify = 16384
Global Const $bs_splitbutton = 12
Global Const $bs_defsplitbutton = 13
Global Const $bs_commandlink = 14
Global Const $bs_defcommandlink = 15
Global Const $bcsif_glyph = 1
Global Const $bcsif_image = 2
Global Const $bcsif_style = 4
Global Const $bcsif_size = 8
Global Const $bcss_nosplit = 1
Global Const $bcss_stretch = 2
Global Const $bcss_alignleft = 4
Global Const $bcss_image = 8
Global Const $button_imagelist_align_left = 0
Global Const $button_imagelist_align_right = 1
Global Const $button_imagelist_align_top = 2
Global Const $button_imagelist_align_bottom = 3
Global Const $button_imagelist_align_center = 4
Global Const $bs_3state = 5
Global Const $bs_auto3state = 6
Global Const $bs_autocheckbox = 3
Global Const $bs_checkbox = 2
Global Const $bs_radiobutton = 4
Global Const $bs_autoradiobutton = 9
Global Const $bs_ownerdraw = 11
Global Const $gui_ss_default_button = 0
Global Const $gui_ss_default_checkbox = 0
Global Const $gui_ss_default_group = 0
Global Const $gui_ss_default_radio = 0
Global Const $bcm_first = 5632
Global Const $bcm_getidealsize = ($bcm_first + 1)
Global Const $bcm_getimagelist = ($bcm_first + 3)
Global Const $bcm_getnote = ($bcm_first + 10)
Global Const $bcm_getnotelength = ($bcm_first + 11)
Global Const $bcm_getsplitinfo = ($bcm_first + 8)
Global Const $bcm_gettextmargin = ($bcm_first + 5)
Global Const $bcm_setdropdownstate = ($bcm_first + 6)
Global Const $bcm_setimagelist = ($bcm_first + 2)
Global Const $bcm_setnote = ($bcm_first + 9)
Global Const $bcm_setshield = ($bcm_first + 12)
Global Const $bcm_setsplitinfo = ($bcm_first + 7)
Global Const $bcm_settextmargin = ($bcm_first + 4)
Global Const $bm_click = 245
Global Const $bm_getcheck = 240
Global Const $bm_getimage = 246
Global Const $bm_getstate = 242
Global Const $bm_setcheck = 241
Global Const $bm_setdontclick = 248
Global Const $bm_setimage = 247
Global Const $bm_setstate = 243
Global Const $bm_setstyle = 244
Global Const $bcn_first = -1250
Global Const $bcn_dropdown = ($bcn_first + 2)
Global Const $bcn_hotitemchange = ($bcn_first + 1)
Global Const $bn_clicked = 0
Global Const $bn_paint = 1
Global Const $bn_hilite = 2
Global Const $bn_unhilite = 3
Global Const $bn_disable = 4
Global Const $bn_doubleclicked = 5
Global Const $bn_setfocus = 6
Global Const $bn_killfocus = 7
Global Const $bn_pushed = $bn_hilite
Global Const $bn_unpushed = $bn_unhilite
Global Const $bn_dblclk = $bn_doubleclicked
Global Const $bst_checked = 1
Global Const $bst_indeterminate = 2
Global Const $bst_unchecked = 0
Global Const $bst_focus = 8
Global Const $bst_pushed = 4
Global Const $bst_dontclick = 128
Global Const $es_left = 0
Global Const $es_center = 1
Global Const $es_right = 2
Global Const $es_multiline = 4
Global Const $es_uppercase = 8
Global Const $es_lowercase = 16
Global Const $es_password = 32
Global Const $es_autovscroll = 64
Global Const $es_autohscroll = 128
Global Const $es_nohidesel = 256
Global Const $es_oemconvert = 1024
Global Const $es_readonly = 2048
Global Const $es_wantreturn = 4096
Global Const $es_number = 8192
Global Const $ec_err = -1
Global Const $ecm_first = 5376
Global Const $em_canundo = 198
Global Const $em_charfrompos = 215
Global Const $em_emptyundobuffer = 205
Global Const $em_fmtlines = 200
Global Const $em_getcuebanner = ($ecm_first + 2)
Global Const $em_getfirstvisibleline = 206
Global Const $em_gethandle = 189
Global Const $em_getimestatus = 217
Global Const $em_getlimittext = 213
Global Const $em_getline = 196
Global Const $em_getlinecount = 186
Global Const $em_getmargins = 212
Global Const $em_getmodify = 184
Global Const $em_getpasswordchar = 210
Global Const $em_getrect = 178
Global Const $em_getsel = 176
Global Const $em_getthumb = 190
Global Const $em_getwordbreakproc = 209
Global Const $em_hideballoontip = ($ecm_first + 4)
Global Const $em_limittext = 197
Global Const $em_linefromchar = 201
Global Const $em_lineindex = 187
Global Const $em_linelength = 193
Global Const $em_linescroll = 182
Global Const $em_posfromchar = 214
Global Const $em_replacesel = 194
Global Const $em_scroll = 181
Global Const $em_scrollcaret = 183
Global Const $em_setcuebanner = ($ecm_first + 1)
Global Const $em_sethandle = 188
Global Const $em_setimestatus = 216
Global Const $em_setlimittext = $em_limittext
Global Const $em_setmargins = 211
Global Const $em_setmodify = 185
Global Const $em_setpasswordchar = 204
Global Const $em_setreadonly = 207
Global Const $em_setrect = 179
Global Const $em_setrectnp = 180
Global Const $em_setsel = 177
Global Const $em_settabstops = 203
Global Const $em_setwordbreakproc = 208
Global Const $em_showballoontip = ($ecm_first + 3)
Global Const $em_undo = 199
Global Const $ec_leftmargin = 1
Global Const $ec_rightmargin = 2
Global Const $ec_usefontinfo = 65535
Global Const $emsis_compositionstring = 1
Global Const $eimes_getcompstratonce = 1
Global Const $eimes_cancelcompstrinfocus = 2
Global Const $eimes_completecompstrkillfocus = 4
Global Const $en_align_ltr_ec = 1792
Global Const $en_align_rtl_ec = 1793
Global Const $en_change = 768
Global Const $en_errspace = 1280
Global Const $en_hscroll = 1537
Global Const $en_killfocus = 512
Global Const $en_maxtext = 1281
Global Const $en_setfocus = 256
Global Const $en_update = 1024
Global Const $en_vscroll = 1538
Global Const $gui_ss_default_edit = 3150016
Global Const $gui_ss_default_input = 128
Global Const $gui_event_single = 0
Global Const $gui_event_array = 1
Global Const $gui_event_none = 0
Global Const $gui_event_close = -3
Global Const $gui_event_minimize = -4
Global Const $gui_event_restore = -5
Global Const $gui_event_maximize = -6
Global Const $gui_event_primarydown = -7
Global Const $gui_event_primaryup = -8
Global Const $gui_event_secondarydown = -9
Global Const $gui_event_secondaryup = -10
Global Const $gui_event_mousemove = -11
Global Const $gui_event_resized = -12
Global Const $gui_event_dropped = -13
Global Const $gui_rundefmsg = "GUI_RUNDEFMSG"
Global Const $gui_avistop = 0
Global Const $gui_avistart = 1
Global Const $gui_aviclose = 2
Global Const $gui_checked = 1
Global Const $gui_indeterminate = 2
Global Const $gui_unchecked = 4
Global Const $gui_dropaccepted = 8
Global Const $gui_nodropaccepted = 4096
Global Const $gui_acceptfiles = $gui_dropaccepted
Global Const $gui_show = 16
Global Const $gui_hide = 32
Global Const $gui_enable = 64
Global Const $gui_disable = 128
Global Const $gui_focus = 256
Global Const $gui_nofocus = 8192
Global Const $gui_defbutton = 512
Global Const $gui_expand = 1024
Global Const $gui_ontop = 2048
Global Const $gui_fontnormal = 0
Global Const $gui_fontitalic = 2
Global Const $gui_fontunder = 4
Global Const $gui_fontstrike = 8
Global Const $gui_dockauto = 1
Global Const $gui_dockleft = 2
Global Const $gui_dockright = 4
Global Const $gui_dockhcenter = 8
Global Const $gui_docktop = 32
Global Const $gui_dockbottom = 64
Global Const $gui_dockvcenter = 128
Global Const $gui_dockwidth = 256
Global Const $gui_dockheight = 512
Global Const $gui_docksize = 768
Global Const $gui_dockmenubar = 544
Global Const $gui_dockstatebar = 576
Global Const $gui_dockall = 802
Global Const $gui_dockborders = 102
Global Const $gui_gr_close = 1
Global Const $gui_gr_line = 2
Global Const $gui_gr_bezier = 4
Global Const $gui_gr_move = 6
Global Const $gui_gr_color = 8
Global Const $gui_gr_rect = 10
Global Const $gui_gr_ellipse = 12
Global Const $gui_gr_pie = 14
Global Const $gui_gr_dot = 16
Global Const $gui_gr_pixel = 18
Global Const $gui_gr_hint = 20
Global Const $gui_gr_refresh = 22
Global Const $gui_gr_pensize = 24
Global Const $gui_gr_nobkcolor = -2
Global Const $gui_bkcolor_default = -1
Global Const $gui_bkcolor_transparent = -2
Global Const $gui_bkcolor_lv_alternate = -33554432
Global Const $gui_read_default = 0
Global Const $gui_read_extended = 1
Global Const $gui_cursor_nooverride = 0
Global Const $gui_cursor_override = 1
Global Const $gui_ws_ex_parentdrag = 1048576
Global Const $gmem_fixed = 0
Global Const $gmem_moveable = 2
Global Const $gmem_nocompact = 16
Global Const $gmem_nodiscard = 32
Global Const $gmem_zeroinit = 64
Global Const $gmem_modify = 128
Global Const $gmem_discardable = 256
Global Const $gmem_not_banked = 4096
Global Const $gmem_share = 8192
Global Const $gmem_ddeshare = 8192
Global Const $gmem_notify = 16384
Global Const $gmem_lower = 4096
Global Const $gmem_valid_flags = 32626
Global Const $gmem_invalid_handle = 32768
Global Const $gptr = BitOR($gmem_fixed, $gmem_zeroinit)
Global Const $ghnd = BitOR($gmem_moveable, $gmem_zeroinit)
Global Const $mem_commit = 4096
Global Const $mem_reserve = 8192
Global Const $mem_top_down = 1048576
Global Const $mem_shared = 134217728
Global Const $page_noaccess = 1
Global Const $page_readonly = 2
Global Const $page_readwrite = 4
Global Const $page_execute = 16
Global Const $page_execute_read = 32
Global Const $page_execute_readwrite = 64
Global Const $page_execute_writecopy = 128
Global Const $page_guard = 256
Global Const $page_nocache = 512
Global Const $page_writecombine = 1024
Global Const $page_writecopy = 8
Global Const $mem_decommit = 16384
Global Const $mem_release = 32768
Global Const $process_terminate = 1
Global Const $process_create_thread = 2
Global Const $process_set_sessionid = 4
Global Const $process_vm_operation = 8
Global Const $process_vm_read = 16
Global Const $process_vm_write = 32
Global Const $process_dup_handle = 64
Global Const $process_create_process = 128
Global Const $process_set_quota = 256
Global Const $process_set_information = 512
Global Const $process_query_information = 1024
Global Const $process_query_limited_information = 4096
Global Const $process_suspend_resume = 2048
Global Const $process_all_access = 2035711
Global Const $se_assignprimarytoken_name = "SeAssignPrimaryTokenPrivilege"
Global Const $se_audit_name = "SeAuditPrivilege"
Global Const $se_backup_name = "SeBackupPrivilege"
Global Const $se_change_notify_name = "SeChangeNotifyPrivilege"
Global Const $se_create_global_name = "SeCreateGlobalPrivilege"
Global Const $se_create_pagefile_name = "SeCreatePagefilePrivilege"
Global Const $se_create_permanent_name = "SeCreatePermanentPrivilege"
Global Const $se_create_symbolic_link_name = "SeCreateSymbolicLinkPrivilege"
Global Const $se_create_token_name = "SeCreateTokenPrivilege"
Global Const $se_debug_name = "SeDebugPrivilege"
Global Const $se_enable_delegation_name = "SeEnableDelegationPrivilege"
Global Const $se_impersonate_name = "SeImpersonatePrivilege"
Global Const $se_inc_base_priority_name = "SeIncreaseBasePriorityPrivilege"
Global Const $se_inc_working_set_name = "SeIncreaseWorkingSetPrivilege"
Global Const $se_increase_quota_name = "SeIncreaseQuotaPrivilege"
Global Const $se_load_driver_name = "SeLoadDriverPrivilege"
Global Const $se_lock_memory_name = "SeLockMemoryPrivilege"
Global Const $se_machine_account_name = "SeMachineAccountPrivilege"
Global Const $se_manage_volume_name = "SeManageVolumePrivilege"
Global Const $se_prof_single_process_name = "SeProfileSingleProcessPrivilege"
Global Const $se_relabel_name = "SeRelabelPrivilege"
Global Const $se_remote_shutdown_name = "SeRemoteShutdownPrivilege"
Global Const $se_restore_name = "SeRestorePrivilege"
Global Const $se_security_name = "SeSecurityPrivilege"
Global Const $se_shutdown_name = "SeShutdownPrivilege"
Global Const $se_sync_agent_name = "SeSyncAgentPrivilege"
Global Const $se_system_environment_name = "SeSystemEnvironmentPrivilege"
Global Const $se_system_profile_name = "SeSystemProfilePrivilege"
Global Const $se_systemtime_name = "SeSystemtimePrivilege"
Global Const $se_take_ownership_name = "SeTakeOwnershipPrivilege"
Global Const $se_tcb_name = "SeTcbPrivilege"
Global Const $se_time_zone_name = "SeTimeZonePrivilege"
Global Const $se_trusted_credman_access_name = "SeTrustedCredManAccessPrivilege"
Global Const $se_unsolicited_input_name = "SeUnsolicitedInputPrivilege"
Global Const $se_undock_name = "SeUndockPrivilege"
Global Const $se_privilege_enabled_by_default = 1
Global Const $se_privilege_enabled = 2
Global Const $se_privilege_removed = 4
Global Const $se_privilege_used_for_access = -2147483648
Global Const $se_group_mandatory = 1
Global Const $se_group_enabled_by_default = 2
Global Const $se_group_enabled = 4
Global Const $se_group_owner = 8
Global Const $se_group_use_for_deny_only = 16
Global Const $se_group_integrity = 32
Global Const $se_group_integrity_enabled = 64
Global Const $se_group_resource = 536870912
Global Const $se_group_logon_id = -1073741824
Global Enum $tokenprimary = 1, $tokenimpersonation
Global Enum $securityanonymous = 0, $securityidentification, $securityimpersonation, $securitydelegation
Global Enum $tokenuser = 1, $tokengroups, $tokenprivileges, $tokenowner, $tokenprimarygroup, $tokendefaultdacl, $tokensource, $tokentype, $tokenimpersonationlevel, $tokenstatistics, $tokenrestrictedsids, $tokensessionid, $tokengroupsandprivileges, $tokensessionreference, $tokensandboxinert, $tokenauditpolicy, $tokenorigin, $tokenelevationtype, $tokenlinkedtoken, $tokenelevation, $tokenhasrestrictions, $tokenaccessinformation, $tokenvirtualizationallowed, $tokenvirtualizationenabled, $tokenintegritylevel, $tokenuiaccess, $tokenmandatorypolicy, $tokenlogonsid
Global Const $token_assign_primary = 1
Global Const $token_duplicate = 2
Global Const $token_impersonate = 4
Global Const $token_query = 8
Global Const $token_query_source = 16
Global Const $token_adjust_privileges = 32
Global Const $token_adjust_groups = 64
Global Const $token_adjust_default = 128
Global Const $token_adjust_sessionid = 256
Global Const $token_all_access = 983551
Global Const $token_read = 131080
Global Const $token_write = 131296
Global Const $token_execute = 131072
Global Const $token_has_traverse_privilege = 1
Global Const $token_has_backup_privilege = 2
Global Const $token_has_restore_privilege = 4
Global Const $token_has_admin_group = 8
Global Const $token_is_restricted = 16
Global Const $token_session_not_referenced = 32
Global Const $token_sandbox_inert = 64
Global Const $token_has_impersonate_privilege = 128
Global Const $rights_delete = 65536
Global Const $read_control = 131072
Global Const $write_dac = 262144
Global Const $write_owner = 524288
Global Const $synchronize = 1048576
Global Const $access_system_security = 16777216
Global Const $standard_rights_required = 983040
Global Const $standard_rights_read = $read_control
Global Const $standard_rights_write = $read_control
Global Const $standard_rights_execute = $read_control
Global Const $standard_rights_all = 2031616
Global Const $specific_rights_all = 65535
Global Enum $not_used_access = 0, $grant_access, $set_access, $deny_access, $revoke_access, $set_audit_success, $set_audit_failure
Global Enum $trustee_is_unknown = 0, $trustee_is_user, $trustee_is_group, $trustee_is_domain, $trustee_is_alias, $trustee_is_well_known_group, $trustee_is_deleted, $trustee_is_invalid, $trustee_is_computer
Global Const $logon_with_profile = 1
Global Const $logon_netcredentials_only = 2
Global Enum $sidtypeuser = 1, $sidtypegroup, $sidtypedomain, $sidtypealias, $sidtypewellknowngroup, $sidtypedeletedaccount, $sidtypeinvalid, $sidtypeunknown, $sidtypecomputer, $sidtypelabel
Global Const $sid_administrators = "S-1-5-32-544"
Global Const $sid_users = "S-1-5-32-545"
Global Const $sid_guests = "S-1-5-32-546"
Global Const $sid_account_operators = "S-1-5-32-548"
Global Const $sid_server_operators = "S-1-5-32-549"
Global Const $sid_print_operators = "S-1-5-32-550"
Global Const $sid_backup_operators = "S-1-5-32-551"
Global Const $sid_replicator = "S-1-5-32-552"
Global Const $sid_owner = "S-1-3-0"
Global Const $sid_everyone = "S-1-1-0"
Global Const $sid_network = "S-1-5-2"
Global Const $sid_interactive = "S-1-5-4"
Global Const $sid_system = "S-1-5-18"
Global Const $sid_authenticated_users = "S-1-5-11"
Global Const $sid_schannel_authentication = "S-1-5-64-14"
Global Const $sid_digest_authentication = "S-1-5-64-21"
Global Const $sid_nt_service = "S-1-5-80"
Global Const $sid_untrusted_mandatory_level = "S-1-16-0"
Global Const $sid_low_mandatory_level = "S-1-16-4096"
Global Const $sid_medium_mandatory_level = "S-1-16-8192"
Global Const $sid_medium_plus_mandatory_level = "S-1-16-8448"
Global Const $sid_high_mandatory_level = "S-1-16-12288"
Global Const $sid_system_mandatory_level = "S-1-16-16384"
Global Const $sid_protected_process_mandatory_level = "S-1-16-20480"
Global Const $sid_secure_process_mandatory_level = "S-1-16-28672"
Global Const $sid_all_services = "S-1-5-80-0"

Func _winapi_getlasterror(Const $_icurrenterror = @error, Const $_icurrentextended = @extended)
    Local $aresult = DllCall("kernel32.dll", "dword", "GetLastError")
    Return SetError($_icurrenterror, $_icurrentextended, $aresult[0])
EndFunc

Func _winapi_setlasterror($ierrorcode, Const $_icurrenterror = @error, Const $_icurrentextended = @extended)
    DllCall("kernel32.dll", "none", "SetLastError", "dword", $ierrorcode)
    Return SetError($_icurrenterror, $_icurrentextended, NULL )
EndFunc

Func __comerrorformating($ocomerror, $sprefix = @TAB)
    Local Const $str_striptrailing = 2
    Local $serror = "COM Error encountered in " & @ScriptName & " (" & $ocomerror.scriptline & ") :" & @CRLF & $sprefix & "Number        " & @TAB & "= 0x" & Hex($ocomerror.number, 8) & " (" & $ocomerror.number & ")" & @CRLF & $sprefix & "WinDescription" & @TAB & "= " & StringStripWS($ocomerror.windescription, $str_striptrailing) & @CRLF & $sprefix & "Description   " & @TAB & "= " & StringStripWS($ocomerror.description, $str_striptrailing) & @CRLF & $sprefix & "Source        " & @TAB & "= " & $ocomerror.source & @CRLF & $sprefix & "HelpFile      " & @TAB & "= " & $ocomerror.helpfile & @CRLF & $sprefix & "HelpContext   " & @TAB & "= " & $ocomerror.helpcontext & @CRLF & $sprefix & "LastDllError  " & @TAB & "= " & $ocomerror.lastdllerror & @CRLF & $sprefix & "Retcode       " & @TAB & "= 0x" & Hex($ocomerror.retcode)
    Return $serror
EndFunc

Func _security__adjusttokenprivileges($htoken, $bdisableall, $tnewstate, $ibufferlen, $tprevstate = 0, $prequired = 0)
    Local $acall = DllCall("advapi32.dll", "bool", "AdjustTokenPrivileges", "handle", $htoken, "bool", $bdisableall, "struct*", $tnewstate, "dword", $ibufferlen, "struct*", $tprevstate, "struct*", $prequired)
    If @error Then Return SetError(@error, @extended, False)
    Return NOT ($acall[0] = 0)
EndFunc

Func _security__createprocesswithtoken($htoken, $ilogonflags, $scommandline, $icreationflags, $scurdir, $tstartupinfo, $tprocess_information)
    Local $acall = DllCall("advapi32.dll", "bool", "CreateProcessWithTokenW", "handle", $htoken, "dword", $ilogonflags, "ptr", 0, "wstr", $scommandline, "dword", $icreationflags, "struct*", 0, "wstr", $scurdir, "struct*", $tstartupinfo, "struct*", $tprocess_information)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, False)
    Return True
EndFunc

Func _security__duplicatetokenex($hexistingtoken, $idesiredaccess, $iimpersonationlevel, $itokentype)
    Local $acall = DllCall("advapi32.dll", "bool", "DuplicateTokenEx", "handle", $hexistingtoken, "dword", $idesiredaccess, "struct*", 0, "int", $iimpersonationlevel, "int", $itokentype, "handle*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, 0)
    Return $acall[6]
EndFunc

Func _security__getaccountsid($saccount, $ssystem = "")
    Local $aacct = _security__lookupaccountname($saccount, $ssystem)
    If @error Then Return SetError(@error, @extended, 0)
    If IsArray($aacct) Then Return _security__stringsidtosid($aacct[0])
    Return ""
EndFunc

Func _security__getlengthsid($psid)
    If NOT _security__isvalidsid($psid) Then Return SetError(@error + 10, @extended, 0)
    Local $acall = DllCall("advapi32.dll", "dword", "GetLengthSid", "struct*", $psid)
    If @error Then Return SetError(@error, @extended, 0)
    Return $acall[0]
EndFunc

Func _security__gettokeninformation($htoken, $iclass)
    Local $acall = DllCall("advapi32.dll", "bool", "GetTokenInformation", "handle", $htoken, "int", $iclass, "struct*", 0, "dword", 0, "dword*", 0)
    If @error OR NOT $acall[5] Then Return SetError(@error + 10, @extended, 0)
    Local $ilen = $acall[5]
    Local $tbuffer = DllStructCreate("byte[" & $ilen & "]")
    $acall = DllCall("advapi32.dll", "bool", "GetTokenInformation", "handle", $htoken, "int", $iclass, "struct*", $tbuffer, "dword", DllStructGetSize($tbuffer), "dword*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, 0)
    Return $tbuffer
EndFunc

Func _security__impersonateself($ilevel = $securityimpersonation)
    Local $acall = DllCall("advapi32.dll", "bool", "ImpersonateSelf", "int", $ilevel)
    If @error Then Return SetError(@error, @extended, False)
    Return NOT ($acall[0] = 0)
EndFunc

Func _security__isvalidsid($psid)
    Local $acall = DllCall("advapi32.dll", "bool", "IsValidSid", "struct*", $psid)
    If @error Then Return SetError(@error, @extended, False)
    Return NOT ($acall[0] = 0)
EndFunc

Func _security__lookupaccountname($saccount, $ssystem = "")
    Local $tdata = DllStructCreate("byte SID[256]")
    Local $acall = DllCall("advapi32.dll", "bool", "LookupAccountNameW", "wstr", $ssystem, "wstr", $saccount, "struct*", $tdata, "dword*", DllStructGetSize($tdata), "wstr", "", "dword*", DllStructGetSize($tdata), "int*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, 0)
    Local $aacct[3]
    $aacct[0] = _security__sidtostringsid(DllStructGetPtr($tdata, "SID"))
    $aacct[1] = $acall[5]
    $aacct[2] = $acall[7]
    Return $aacct
EndFunc

Func _security__lookupaccountsid($vsid, $ssystem = "")
    Local $psid, $aacct[3]
    If IsString($vsid) Then
        $psid = _security__stringsidtosid($vsid)
    Else
        $psid = $vsid
    EndIf
    If NOT _security__isvalidsid($psid) Then Return SetError(@error + 10, @extended, 0)
    Local $stypesystem = "ptr"
    If $ssystem Then $stypesystem = "wstr"
    Local $acall = DllCall("advapi32.dll", "bool", "LookupAccountSidW", $stypesystem, $ssystem, "struct*", $psid, "wstr", "", "dword*", 65536, "wstr", "", "dword*", 65536, "int*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, 0)
    Local $aacct[3]
    $aacct[0] = $acall[3]
    $aacct[1] = $acall[5]
    $aacct[2] = $acall[7]
    Return $aacct
EndFunc

Func _security__lookupprivilegevalue($ssystem, $sname)
    Local $acall = DllCall("advapi32.dll", "bool", "LookupPrivilegeValueW", "wstr", $ssystem, "wstr", $sname, "int64*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, 0)
    Return $acall[3]
EndFunc

Func _security__openprocesstoken($hprocess, $iaccess)
    Local $acall = DllCall("advapi32.dll", "bool", "OpenProcessToken", "handle", $hprocess, "dword", $iaccess, "handle*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, 0)
    Return $acall[3]
EndFunc

Func _security__openthreadtoken($iaccess, $hthread = 0, $bopenasself = False)
    If $hthread = 0 Then
        Local $aresult = DllCall("kernel32.dll", "handle", "GetCurrentThread")
        If @error Then Return SetError(@error + 10, @extended, 0)
        $hthread = $aresult[0]
    EndIf
    Local $acall = DllCall("advapi32.dll", "bool", "OpenThreadToken", "handle", $hthread, "dword", $iaccess, "bool", $bopenasself, "handle*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, 0)
    Return $acall[4]
EndFunc

Func _security__openthreadtokenex($iaccess, $hthread = 0, $bopenasself = False)
    Local $htoken = _security__openthreadtoken($iaccess, $hthread, $bopenasself)
    If $htoken = 0 Then
        Local Const $error_no_token = 1008
        If _winapi_getlasterror() <> $error_no_token Then Return SetError(20, _winapi_getlasterror(), 0)
        If NOT _security__impersonateself() Then Return SetError(@error + 10, _winapi_getlasterror(), 0)
        $htoken = _security__openthreadtoken($iaccess, $hthread, $bopenasself)
        If $htoken = 0 Then Return SetError(@error, _winapi_getlasterror(), 0)
    EndIf
    Return $htoken
EndFunc

Func _security__setprivilege($htoken, $sprivilege, $benable)
    Local $iluid = _security__lookupprivilegevalue("", $sprivilege)
    If $iluid = 0 Then Return SetError(@error + 10, @extended, False)
    Local Const $tagtoken_privileges = "dword Count;align 4;int64 LUID;dword Attributes"
    Local $tcurrstate = DllStructCreate($tagtoken_privileges)
    Local $icurrstate = DllStructGetSize($tcurrstate)
    Local $tprevstate = DllStructCreate($tagtoken_privileges)
    Local $iprevstate = DllStructGetSize($tprevstate)
    Local $trequired = DllStructCreate("int Data")
    DllStructSetData($tcurrstate, "Count", 1)
    DllStructSetData($tcurrstate, "LUID", $iluid)
    If NOT _security__adjusttokenprivileges($htoken, False, $tcurrstate, $icurrstate, $tprevstate, $trequired) Then Return SetError(2, @error, False)
    DllStructSetData($tprevstate, "Count", 1)
    DllStructSetData($tprevstate, "LUID", $iluid)
    Local $iattributes = DllStructGetData($tprevstate, "Attributes")
    If $benable Then
        $iattributes = BitOR($iattributes, $se_privilege_enabled)
    Else
        $iattributes = BitAND($iattributes, BitNOT($se_privilege_enabled))
    EndIf
    DllStructSetData($tprevstate, "Attributes", $iattributes)
    If NOT _security__adjusttokenprivileges($htoken, False, $tprevstate, $iprevstate, $tcurrstate, $trequired) Then Return SetError(3, @error, False)
    Return True
EndFunc

Func _security__settokeninformation($htoken, $itokeninformation, $vtokeninformation, $itokeninformationlength)
    Local $acall = DllCall("advapi32.dll", "bool", "SetTokenInformation", "handle", $htoken, "int", $itokeninformation, "struct*", $vtokeninformation, "dword", $itokeninformationlength)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, False)
    Return True
EndFunc

Func _security__sidtostringsid($psid)
    If NOT _security__isvalidsid($psid) Then Return SetError(@error + 10, 0, "")
    Local $acall = DllCall("advapi32.dll", "bool", "ConvertSidToStringSidW", "struct*", $psid, "ptr*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, "")
    Local $pstringsid = $acall[2]
    Local $alen = DllCall("kernel32.dll", "int", "lstrlenW", "struct*", $pstringsid)
    Local $ssid = DllStructGetData(DllStructCreate("wchar Text[" & $alen[0] + 1 & "]", $pstringsid), "Text")
    DllCall("kernel32.dll", "handle", "LocalFree", "handle", $pstringsid)
    Return $ssid
EndFunc

Func _security__sidtypestr($itype)
    Switch $itype
        Case $sidtypeuser
            Return "User"
        Case $sidtypegroup
            Return "Group"
        Case $sidtypedomain
            Return "Domain"
        Case $sidtypealias
            Return "Alias"
        Case $sidtypewellknowngroup
            Return "Well Known Group"
        Case $sidtypedeletedaccount
            Return "Deleted Account"
        Case $sidtypeinvalid
            Return "Invalid"
        Case $sidtypeunknown
            Return "Unknown Type"
        Case $sidtypecomputer
            Return "Computer"
        Case $sidtypelabel
            Return "A mandatory integrity label SID"
        Case Else
            Return "Unknown SID Type"
    EndSwitch
EndFunc

Func _security__stringsidtosid($ssid)
    Local $acall = DllCall("advapi32.dll", "bool", "ConvertStringSidToSidW", "wstr", $ssid, "ptr*", 0)
    If @error OR NOT $acall[0] Then Return SetError(@error, @extended, 0)
    Local $psid = $acall[2]
    Local $tbuffer = DllStructCreate("byte Data[" & _security__getlengthsid($psid) & "]", $psid)
    Local $tsid = DllStructCreate("byte Data[" & DllStructGetSize($tbuffer) & "]")
    DllStructSetData($tsid, "Data", DllStructGetData($tbuffer, "Data"))
    DllCall("kernel32.dll", "handle", "LocalFree", "handle", $psid)
    Return $tsid
EndFunc

Global Const $tagpoint = "struct;long X;long Y;endstruct"
Global Const $tagrect = "struct;long Left;long Top;long Right;long Bottom;endstruct"
Global Const $tagsize = "struct;long X;long Y;endstruct"
Global Const $tagmargins = "int cxLeftWidth;int cxRightWidth;int cyTopHeight;int cyBottomHeight"
Global Const $tagfiletime = "struct;dword Lo;dword Hi;endstruct"
Global Const $tagsystemtime = "struct;word Year;word Month;word Dow;word Day;word Hour;word Minute;word Second;word MSeconds;endstruct"
Global Const $tagtime_zone_information = "struct;long Bias;wchar StdName[32];word StdDate[8];long StdBias;wchar DayName[32];word DayDate[8];long DayBias;endstruct"
Global Const $tagnmhdr = "struct;hwnd hWndFrom;uint_ptr IDFrom;INT Code;endstruct"
Global Const $tagcomboboxexitem = "uint Mask;int_ptr Item;ptr Text;int TextMax;int Image;int SelectedImage;int OverlayImage;" & "int Indent;lparam Param"
Global Const $tagnmcbedragbegin = $tagnmhdr & ";int ItemID;wchar szText[260]"
Global Const $tagnmcbeendedit = $tagnmhdr & ";bool fChanged;int NewSelection;wchar szText[260];int Why"
Global Const $tagnmcomboboxex = $tagnmhdr & ";uint Mask;int_ptr Item;ptr Text;int TextMax;int Image;" & "int SelectedImage;int OverlayImage;int Indent;lparam Param"
Global Const $tagdtprange = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;" & "word MinSecond;word MinMSecond;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;" & "word MaxMinute;word MaxSecond;word MaxMSecond;bool MinValid;bool MaxValid"
Global Const $tagnmdatetimechange = $tagnmhdr & ";dword Flag;" & $tagsystemtime
Global Const $tagnmdatetimeformat = $tagnmhdr & ";ptr Format;" & $tagsystemtime & ";ptr pDisplay;wchar Display[64]"
Global Const $tagnmdatetimeformatquery = $tagnmhdr & ";ptr Format;struct;long SizeX;long SizeY;endstruct"
Global Const $tagnmdatetimekeydown = $tagnmhdr & ";int VirtKey;ptr Format;" & $tagsystemtime
Global Const $tagnmdatetimestring = $tagnmhdr & ";ptr UserString;" & $tagsystemtime & ";dword Flags"
Global Const $tageventlogrecord = "dword Length;dword Reserved;dword RecordNumber;dword TimeGenerated;dword TimeWritten;dword EventID;" & "word EventType;word NumStrings;word EventCategory;word ReservedFlags;dword ClosingRecordNumber;dword StringOffset;" & "dword UserSidLength;dword UserSidOffset;dword DataLength;dword DataOffset"
Global Const $taggdip_effectparams_blur = "float Radius; bool ExpandEdge"
Global Const $taggdip_effectparams_brightnesscontrast = "int BrightnessLevel; int ContrastLevel"
Global Const $taggdip_effectparams_colorbalance = "int CyanRed; int MagentaGreen; int YellowBlue"
Global Const $taggdip_effectparams_colorcurve = "int Adjustment; int Channel; int AdjustValue"
Global Const $taggdip_effectparams_colorlut = "byte LutB[256]; byte LutG[256]; byte LutR[256]; byte LutA[256]"
Global Const $taggdip_effectparams_huesaturationlightness = "int HueLevel; int SaturationLevel; int LightnessLevel"
Global Const $taggdip_effectparams_levels = "int Highlight; int Midtone; int Shadow"
Global Const $taggdip_effectparams_redeyecorrection = "uint NumberOfAreas; ptr Areas"
Global Const $taggdip_effectparams_sharpen = "float Radius; float Amount"
Global Const $taggdip_effectparams_tint = "int Hue; int Amount"
Global Const $taggdipbitmapdata = "uint Width;uint Height;int Stride;int Format;ptr Scan0;uint_ptr Reserved"
Global Const $taggdipcolormatrix = "float m[25]"
Global Const $taggdipencoderparam = "struct;byte GUID[16];ulong NumberOfValues;ulong Type;ptr Values;endstruct"
Global Const $taggdipencoderparams = "uint Count;" & $taggdipencoderparam
Global Const $taggdiprectf = "struct;float X;float Y;float Width;float Height;endstruct"
Global Const $taggdipstartupinput = "uint Version;ptr Callback;bool NoThread;bool NoCodecs"
Global Const $taggdipstartupoutput = "ptr HookProc;ptr UnhookProc"
Global Const $taggdipimagecodecinfo = "byte CLSID[16];byte FormatID[16];ptr CodecName;ptr DllName;ptr FormatDesc;ptr FileExt;" & "ptr MimeType;dword Flags;dword Version;dword SigCount;dword SigSize;ptr SigPattern;ptr SigMask"
Global Const $taggdippencoderparams = "uint Count;byte Params[1]"
Global Const $taghditem = "uint Mask;int XY;ptr Text;handle hBMP;int TextMax;int Fmt;lparam Param;int Image;int Order;uint Type;ptr pFilter;uint State"
Global Const $tagnmhddispinfo = $tagnmhdr & ";int Item;uint Mask;ptr Text;int TextMax;int Image;lparam lParam"
Global Const $tagnmhdfilterbtnclick = $tagnmhdr & ";int Item;" & $tagrect
Global Const $tagnmheader = $tagnmhdr & ";int Item;int Button;ptr pItem"
Global Const $taggetipaddress = "byte Field4;byte Field3;byte Field2;byte Field1"
Global Const $tagnmipaddress = $tagnmhdr & ";int Field;int Value"
Global Const $taglvfindinfo = "struct;uint Flags;ptr Text;lparam Param;" & $tagpoint & ";uint Direction;endstruct"
Global Const $taglvhittestinfo = $tagpoint & ";uint Flags;int Item;int SubItem;int iGroup"
Global Const $taglvitem = "struct;uint Mask;int Item;int SubItem;uint State;uint StateMask;ptr Text;int TextMax;int Image;lparam Param;" & "int Indent;int GroupID;uint Columns;ptr pColumns;ptr piColFmt;int iGroup;endstruct"
Global Const $tagnmlistview = $tagnmhdr & ";int Item;int SubItem;uint NewState;uint OldState;uint Changed;" & "struct;long ActionX;long ActionY;endstruct;lparam Param"
Global Const $tagnmlvcustomdraw = "struct;" & $tagnmhdr & ";dword dwDrawStage;handle hdc;" & $tagrect & ";dword_ptr dwItemSpec;uint uItemState;lparam lItemlParam;endstruct" & ";dword clrText;dword clrTextBk;int iSubItem;dword dwItemType;dword clrFace;int iIconEffect;" & "int iIconPhase;int iPartID;int iStateID;struct;long TextLeft;long TextTop;long TextRight;long TextBottom;endstruct;uint uAlign"
Global Const $tagnmlvdispinfo = $tagnmhdr & ";" & $taglvitem
Global Const $tagnmlvfinditem = $tagnmhdr & ";int Start;" & $taglvfindinfo
Global Const $tagnmlvgetinfotip = $tagnmhdr & ";dword Flags;ptr Text;int TextMax;int Item;int SubItem;lparam lParam"
Global Const $tagnmitemactivate = $tagnmhdr & ";int Index;int SubItem;uint NewState;uint OldState;uint Changed;" & $tagpoint & ";lparam lParam;uint KeyFlags"
Global Const $tagnmlvkeydown = "align 1;" & $tagnmhdr & ";word VKey;uint Flags"
Global Const $tagnmlvscroll = $tagnmhdr & ";int DX;int DY"
Global Const $tagmchittestinfo = "uint Size;" & $tagpoint & ";uint Hit;" & $tagsystemtime & ";" & $tagrect & ";int iOffset;int iRow;int iCol"
Global Const $tagmcmonthrange = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds;short Span"
Global Const $tagmcrange = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds;short MinSet;short MaxSet"
Global Const $tagmcselrange = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds"
Global Const $tagnmdaystate = $tagnmhdr & ";" & $tagsystemtime & ";int DayState;ptr pDayState"
Global Const $tagnmselchange = $tagnmhdr & ";struct;word BegYear;word BegMonth;word BegDOW;word BegDay;word BegHour;word BegMinute;word BegSecond;word BegMSeconds;endstruct;" & "struct;word EndYear;word EndMonth;word EndDOW;word EndDay;word EndHour;word EndMinute;word EndSecond;word EndMSeconds;endstruct"
Global Const $tagnmobjectnotify = $tagnmhdr & ";int Item;ptr piid;ptr pObject;long Result;dword dwFlags"
Global Const $tagnmtckeydown = "align 1;" & $tagnmhdr & ";word VKey;uint Flags"
Global Const $tagtvitem = "struct;uint Mask;handle hItem;uint State;uint StateMask;ptr Text;int TextMax;int Image;int SelectedImage;" & "int Children;lparam Param;endstruct"
Global Const $tagtvitemex = "struct;" & $tagtvitem & ";int Integral;uint uStateEx;hwnd hwnd;int iExpandedImage;int iReserved;endstruct"
Global Const $tagnmtreeview = $tagnmhdr & ";uint Action;" & "struct;uint OldMask;handle OldhItem;uint OldState;uint OldStateMask;" & "ptr OldText;int OldTextMax;int OldImage;int OldSelectedImage;int OldChildren;lparam OldParam;endstruct;" & "struct;uint NewMask;handle NewhItem;uint NewState;uint NewStateMask;" & "ptr NewText;int NewTextMax;int NewImage;int NewSelectedImage;int NewChildren;lparam NewParam;endstruct;" & "struct;long PointX;long PointY;endstruct"
Global Const $tagnmtvcustomdraw = "struct;" & $tagnmhdr & ";dword DrawStage;handle HDC;" & $tagrect & ";dword_ptr ItemSpec;uint ItemState;lparam ItemParam;endstruct" & ";dword ClrText;dword ClrTextBk;int Level"
Global Const $tagnmtvdispinfo = $tagnmhdr & ";" & $tagtvitem
Global Const $tagnmtvgetinfotip = $tagnmhdr & ";ptr Text;int TextMax;handle hItem;lparam lParam"
Global Const $tagnmtvitemchange = $tagnmhdr & ";uint Changed;handle hItem;uint StateNew;uint StateOld;lparam lParam;"
Global Const $tagtvhittestinfo = $tagpoint & ";uint Flags;handle Item"
Global Const $tagnmtvkeydown = "align 1;" & $tagnmhdr & ";word VKey;uint Flags"
Global Const $tagnmmouse = $tagnmhdr & ";dword_ptr ItemSpec;dword_ptr ItemData;" & $tagpoint & ";lparam HitInfo"
Global Const $tagtoken_privileges = "dword Count;align 4;int64 LUID;dword Attributes"
Global Const $tagimageinfo = "handle hBitmap;handle hMask;int Unused1;int Unused2;" & $tagrect
Global Const $tagmenuinfo = "dword Size;INT Mask;dword Style;uint YMax;handle hBack;dword ContextHelpID;ulong_ptr MenuData"
Global Const $tagmenuiteminfo = "uint Size;uint Mask;uint Type;uint State;uint ID;handle SubMenu;handle BmpChecked;handle BmpUnchecked;" & "ulong_ptr ItemData;ptr TypeData;uint CCH;handle BmpItem"
Global Const $tagrebarbandinfo = "uint cbSize;uint fMask;uint fStyle;dword clrFore;dword clrBack;ptr lpText;uint cch;" & "int iImage;hwnd hwndChild;uint cxMinChild;uint cyMinChild;uint cx;handle hbmBack;uint wID;uint cyChild;uint cyMaxChild;" & "uint cyIntegral;uint cxIdeal;lparam lParam;uint cxHeader" & ((@OSVersion = "WIN_XP") ? "" : ";" & $tagrect & ";uint uChevronState")
Global Const $tagnmrebarautobreak = $tagnmhdr & ";uint uBand;uint wID;lparam lParam;uint uMsg;uint fStyleCurrent;bool fAutoBreak"
Global Const $tagnmrbautosize = $tagnmhdr & ";bool fChanged;" & "struct;long TargetLeft;long TargetTop;long TargetRight;long TargetBottom;endstruct;" & "struct;long ActualLeft;long ActualTop;long ActualRight;long ActualBottom;endstruct"
Global Const $tagnmrebar = $tagnmhdr & ";dword dwMask;uint uBand;uint fStyle;uint wID;lparam lParam"
Global Const $tagnmrebarchevron = $tagnmhdr & ";uint uBand;uint wID;lparam lParam;" & $tagrect & ";lparam lParamNM"
Global Const $tagnmrebarchildsize = $tagnmhdr & ";uint uBand;uint wID;" & "struct;long CLeft;long CTop;long CRight;long CBottom;endstruct;" & "struct;long BLeft;long BTop;long BRight;long BBottom;endstruct"
Global Const $tagcolorscheme = "dword Size;dword BtnHighlight;dword BtnShadow"
Global Const $tagnmtoolbar = $tagnmhdr & ";int iItem;" & "struct;int iBitmap;int idCommand;byte fsState;byte fsStyle;dword_ptr dwData;int_ptr iString;endstruct" & ";int cchText;ptr pszText;" & $tagrect
Global Const $tagnmtbhotitem = $tagnmhdr & ";int idOld;int idNew;dword dwFlags"
Global Const $tagtbbutton = "int Bitmap;int Command;byte State;byte Style;dword_ptr Param;int_ptr String"
Global Const $tagtbbuttoninfo = "uint Size;dword Mask;int Command;int Image;byte State;byte Style;word CX;dword_ptr Param;ptr Text;int TextMax"
Global Const $tagnetresource = "dword Scope;dword Type;dword DisplayType;dword Usage;ptr LocalName;ptr RemoteName;ptr Comment;ptr Provider"
Global Const $tagoverlapped = "ulong_ptr Internal;ulong_ptr InternalHigh;struct;dword Offset;dword OffsetHigh;endstruct;handle hEvent"
Global Const $tagopenfilename = "dword StructSize;hwnd hwndOwner;handle hInstance;ptr lpstrFilter;ptr lpstrCustomFilter;" & "dword nMaxCustFilter;dword nFilterIndex;ptr lpstrFile;dword nMaxFile;ptr lpstrFileTitle;dword nMaxFileTitle;" & "ptr lpstrInitialDir;ptr lpstrTitle;dword Flags;word nFileOffset;word nFileExtension;ptr lpstrDefExt;lparam lCustData;" & "ptr lpfnHook;ptr lpTemplateName;ptr pvReserved;dword dwReserved;dword FlagsEx"
Global Const $tagbitmapinfoheader = "struct;dword biSize;long biWidth;long biHeight;word biPlanes;word biBitCount;" & "dword biCompression;dword biSizeImage;long biXPelsPerMeter;long biYPelsPerMeter;dword biClrUsed;dword biClrImportant;endstruct"
Global Const $tagbitmapinfo = $tagbitmapinfoheader & ";dword biRGBQuad[1]"
Global Const $tagblendfunction = "byte Op;byte Flags;byte Alpha;byte Format"
Global Const $tagguid = "struct;ulong Data1;ushort Data2;ushort Data3;byte Data4[8];endstruct"
Global Const $tagwindowplacement = "uint length;uint flags;uint showCmd;long ptMinPosition[2];long ptMaxPosition[2];long rcNormalPosition[4]"
Global Const $tagwindowpos = "hwnd hWnd;hwnd InsertAfter;int X;int Y;int CX;int CY;uint Flags"
Global Const $tagscrollinfo = "uint cbSize;uint fMask;int nMin;int nMax;uint nPage;int nPos;int nTrackPos"
Global Const $tagscrollbarinfo = "dword cbSize;" & $tagrect & ";int dxyLineButton;int xyThumbTop;" & "int xyThumbBottom;int reserved;dword rgstate[6]"
Global Const $taglogfont = "struct;long Height;long Width;long Escapement;long Orientation;long Weight;byte Italic;byte Underline;" & "byte Strikeout;byte CharSet;byte OutPrecision;byte ClipPrecision;byte Quality;byte PitchAndFamily;wchar FaceName[32];endstruct"
Global Const $tagkbdllhookstruct = "dword vkCode;dword scanCode;dword flags;dword time;ulong_ptr dwExtraInfo"
Global Const $tagprocess_information = "handle hProcess;handle hThread;dword ProcessID;dword ThreadID"
Global Const $tagstartupinfo = "dword Size;ptr Reserved1;ptr Desktop;ptr Title;dword X;dword Y;dword XSize;dword YSize;dword XCountChars;" & "dword YCountChars;dword FillAttribute;dword Flags;word ShowWindow;word Reserved2;ptr Reserved3;handle StdInput;" & "handle StdOutput;handle StdError"
Global Const $tagsecurity_attributes = "dword Length;ptr Descriptor;bool InheritHandle"
Global Const $tagwin32_find_data = "dword dwFileAttributes;dword ftCreationTime[2];dword ftLastAccessTime[2];dword ftLastWriteTime[2];dword nFileSizeHigh;dword nFileSizeLow;dword dwReserved0;dword dwReserved1;wchar cFileName[260];wchar cAlternateFileName[14]"
Global Const $tagtextmetric = "long tmHeight;long tmAscent;long tmDescent;long tmInternalLeading;long tmExternalLeading;" & "long tmAveCharWidth;long tmMaxCharWidth;long tmWeight;long tmOverhang;long tmDigitizedAspectX;long tmDigitizedAspectY;" & "wchar tmFirstChar;wchar tmLastChar;wchar tmDefaultChar;wchar tmBreakChar;byte tmItalic;byte tmUnderlined;byte tmStruckOut;" & "byte tmPitchAndFamily;byte tmCharSet"
Global Const $tagmemmap = "handle hProc;ulong_ptr Size;ptr Mem"

Func _memfree(ByRef $tmemmap)
    Local $pmemory = DllStructGetData($tmemmap, "Mem")
    Local $hprocess = DllStructGetData($tmemmap, "hProc")
    Local $bresult = _memvirtualfreeex($hprocess, $pmemory, 0, $mem_release)
    DllCall("kernel32.dll", "bool", "CloseHandle", "handle", $hprocess)
    If @error Then Return SetError(@error, @extended, False)
    Return $bresult
EndFunc

Func _memglobalalloc($ibytes, $iflags = 0)
    Local $aresult = DllCall("kernel32.dll", "handle", "GlobalAlloc", "uint", $iflags, "ulong_ptr", $ibytes)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _memglobalfree($hmemory)
    Local $aresult = DllCall("kernel32.dll", "ptr", "GlobalFree", "handle", $hmemory)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _memgloballock($hmemory)
    Local $aresult = DllCall("kernel32.dll", "ptr", "GlobalLock", "handle", $hmemory)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _memglobalsize($hmemory)
    Local $aresult = DllCall("kernel32.dll", "ulong_ptr", "GlobalSize", "handle", $hmemory)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _memglobalunlock($hmemory)
    Local $aresult = DllCall("kernel32.dll", "bool", "GlobalUnlock", "handle", $hmemory)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _meminit($hwnd, $isize, ByRef $tmemmap)
    Local $aresult = DllCall("user32.dll", "dword", "GetWindowThreadProcessId", "hwnd", $hwnd, "dword*", 0)
    If @error Then Return SetError(@error + 10, @extended, 0)
    Local $iprocessid = $aresult[2]
    If $iprocessid = 0 Then Return SetError(1, 0, 0)
    Local $iaccess = BitOR($process_vm_operation, $process_vm_read, $process_vm_write)
    Local $hprocess = __mem_openprocess($iaccess, False, $iprocessid, True)
    Local $ialloc = BitOR($mem_reserve, $mem_commit)
    Local $pmemory = _memvirtualallocex($hprocess, 0, $isize, $ialloc, $page_readwrite)
    If $pmemory = 0 Then Return SetError(2, 0, 0)
    $tmemmap = DllStructCreate($tagmemmap)
    DllStructSetData($tmemmap, "hProc", $hprocess)
    DllStructSetData($tmemmap, "Size", $isize)
    DllStructSetData($tmemmap, "Mem", $pmemory)
    Return $pmemory
EndFunc

Func _memmovememory($psource, $pdest, $ilength)
    DllCall("kernel32.dll", "none", "RtlMoveMemory", "struct*", $pdest, "struct*", $psource, "ulong_ptr", $ilength)
    If @error Then Return SetError(@error, @extended)
EndFunc

Func _memread(ByRef $tmemmap, $psrce, $pdest, $isize)
    Local $aresult = DllCall("kernel32.dll", "bool", "ReadProcessMemory", "handle", DllStructGetData($tmemmap, "hProc"), "ptr", $psrce, "struct*", $pdest, "ulong_ptr", $isize, "ulong_ptr*", 0)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _memwrite(ByRef $tmemmap, $psrce, $pdest = 0, $isize = 0, $ssrce = "struct*")
    If $pdest = 0 Then $pdest = DllStructGetData($tmemmap, "Mem")
    If $isize = 0 Then $isize = DllStructGetData($tmemmap, "Size")
    Local $aresult = DllCall("kernel32.dll", "bool", "WriteProcessMemory", "handle", DllStructGetData($tmemmap, "hProc"), "ptr", $pdest, $ssrce, $psrce, "ulong_ptr", $isize, "ulong_ptr*", 0)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _memvirtualalloc($paddress, $isize, $iallocation, $iprotect)
    Local $aresult = DllCall("kernel32.dll", "ptr", "VirtualAlloc", "ptr", $paddress, "ulong_ptr", $isize, "dword", $iallocation, "dword", $iprotect)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _memvirtualallocex($hprocess, $paddress, $isize, $iallocation, $iprotect)
    Local $aresult = DllCall("kernel32.dll", "ptr", "VirtualAllocEx", "handle", $hprocess, "ptr", $paddress, "ulong_ptr", $isize, "dword", $iallocation, "dword", $iprotect)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _memvirtualfree($paddress, $isize, $ifreetype)
    Local $aresult = DllCall("kernel32.dll", "bool", "VirtualFree", "ptr", $paddress, "ulong_ptr", $isize, "dword", $ifreetype)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _memvirtualfreeex($hprocess, $paddress, $isize, $ifreetype)
    Local $aresult = DllCall("kernel32.dll", "bool", "VirtualFreeEx", "handle", $hprocess, "ptr", $paddress, "ulong_ptr", $isize, "dword", $ifreetype)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func __mem_openprocess($iaccess, $binherit, $iprocessid, $bdebugpriv = False)
    Local $aresult = DllCall("kernel32.dll", "handle", "OpenProcess", "dword", $iaccess, "bool", $binherit, "dword", $iprocessid)
    If @error Then Return SetError(@error + 10, @extended, 0)
    If $aresult[0] Then Return $aresult[0]
    If NOT $bdebugpriv Then Return 0
    Local $htoken = _security__openthreadtokenex(BitOR($token_adjust_privileges, $token_query))
    If @error Then Return SetError(@error + 20, @extended, 0)
    _security__setprivilege($htoken, "SeDebugPrivilege", True)
    Local $ierror = @error
    Local $ilasterror = @extended
    Local $iret = 0
    If NOT @error Then
        $aresult = DllCall("kernel32.dll", "handle", "OpenProcess", "dword", $iaccess, "bool", $binherit, "dword", $iprocessid)
        $ierror = @error
        $ilasterror = @extended
        If $aresult[0] Then $iret = $aresult[0]
        _security__setprivilege($htoken, "SeDebugPrivilege", False)
        If @error Then
            $ierror = @error + 30
            $ilasterror = @extended
        EndIf
    Else
        $ierror = @error + 40
    EndIf
    DllCall("kernel32.dll", "bool", "CloseHandle", "handle", $htoken)
    Return SetError($ierror, $ilasterror, $iret)
EndFunc

Func _sendmessage($hwnd, $imsg, $wparam = 0, $lparam = 0, $ireturn = 0, $wparamtype = "wparam", $lparamtype = "lparam", $sreturntype = "lresult")
    Local $aresult = DllCall("user32.dll", $sreturntype, "SendMessageW", "hwnd", $hwnd, "uint", $imsg, $wparamtype, $wparam, $lparamtype, $lparam)
    If @error Then Return SetError(@error, @extended, "")
    If $ireturn >= 0 AND $ireturn <= 4 Then Return $aresult[$ireturn]
    Return $aresult
EndFunc

Func _sendmessagea($hwnd, $imsg, $wparam = 0, $lparam = 0, $ireturn = 0, $wparamtype = "wparam", $lparamtype = "lparam", $sreturntype = "lresult")
    Local $aresult = DllCall("user32.dll", $sreturntype, "SendMessageA", "hwnd", $hwnd, "uint", $imsg, $wparamtype, $wparam, $lparamtype, $lparam)
    If @error Then Return SetError(@error, @extended, "")
    If $ireturn >= 0 AND $ireturn <= 4 Then Return $aresult[$ireturn]
    Return $aresult
EndFunc

Global Const $sbars_sizegrip = 256
Global Const $sbt_tooltips = 2048
Global Const $sbars_tooltips = 2048
Global Const $sbt_sunken = 0
Global Const $sbt_noborders = 256
Global Const $sbt_popout = 512
Global Const $sbt_rtlreading = 1024
Global Const $sbt_notabparsing = 2048
Global Const $sbt_ownerdraw = 4096
Global Const $__statusbarconstant_wm_user = 1024
Global Const $sb_getborders = ($__statusbarconstant_wm_user + 7)
Global Const $sb_geticon = ($__statusbarconstant_wm_user + 20)
Global Const $sb_getparts = ($__statusbarconstant_wm_user + 6)
Global Const $sb_getrect = ($__statusbarconstant_wm_user + 10)
Global Const $sb_gettexta = ($__statusbarconstant_wm_user + 2)
Global Const $sb_gettextw = ($__statusbarconstant_wm_user + 13)
Global Const $sb_gettext = $sb_gettexta
Global Const $sb_gettextlengtha = ($__statusbarconstant_wm_user + 3)
Global Const $sb_gettextlengthw = ($__statusbarconstant_wm_user + 12)
Global Const $sb_gettextlength = $sb_gettextlengtha
Global Const $sb_gettiptexta = ($__statusbarconstant_wm_user + 18)
Global Const $sb_gettiptextw = ($__statusbarconstant_wm_user + 19)
Global Const $sb_getunicodeformat = 8192 + 6
Global Const $sb_issimple = ($__statusbarconstant_wm_user + 14)
Global Const $sb_setbkcolor = 8192 + 1
Global Const $sb_seticon = ($__statusbarconstant_wm_user + 15)
Global Const $sb_setminheight = ($__statusbarconstant_wm_user + 8)
Global Const $sb_setparts = ($__statusbarconstant_wm_user + 4)
Global Const $sb_settexta = ($__statusbarconstant_wm_user + 1)
Global Const $sb_settextw = ($__statusbarconstant_wm_user + 11)
Global Const $sb_settext = $sb_settexta
Global Const $sb_settiptexta = ($__statusbarconstant_wm_user + 16)
Global Const $sb_settiptextw = ($__statusbarconstant_wm_user + 17)
Global Const $sb_setunicodeformat = 8192 + 5
Global Const $sb_simple = ($__statusbarconstant_wm_user + 9)
Global Const $sb_simpleid = 255
Global Const $sbn_first = -880
Global Const $sbn_simplemodechange = $sbn_first + 0
Global Const $opt_coordsrelative = 0
Global Const $opt_coordsabsolute = 1
Global Const $opt_coordsclient = 2
Global Const $opt_errorsilent = 0
Global Const $opt_errorfatal = 1
Global Const $opt_capsnostore = 0
Global Const $opt_capsstore = 1
Global Const $opt_matchstart = 1
Global Const $opt_matchany = 2
Global Const $opt_matchexact = 3
Global Const $opt_matchadvanced = 4
Global Const $ccs_top = 1
Global Const $ccs_nomovey = 2
Global Const $ccs_bottom = 3
Global Const $ccs_noresize = 4
Global Const $ccs_noparentalign = 8
Global Const $ccs_nohilite = 16
Global Const $ccs_adjustable = 32
Global Const $ccs_nodivider = 64
Global Const $ccs_vert = 128
Global Const $ccs_left = 129
Global Const $ccs_nomovex = 130
Global Const $ccs_right = 131
Global Const $dt_drivetype = 1
Global Const $dt_ssdstatus = 2
Global Const $dt_bustype = 3
Global Const $proxy_ie = 0
Global Const $proxy_none = 1
Global Const $proxy_specified = 2
Global Const $objid_window = 0
Global Const $objid_titlebar = -2
Global Const $objid_sizegrip = -7
Global Const $objid_caret = -8
Global Const $objid_cursor = -9
Global Const $objid_alert = -10
Global Const $objid_sound = -11
Global Const $dlg_centerontop = 0
Global Const $dlg_notitle = 1
Global Const $dlg_notontop = 2
Global Const $dlg_textleft = 4
Global Const $dlg_textright = 8
Global Const $dlg_moveable = 16
Global Const $dlg_textvcenter = 32
Global Const $idc_unknown = 0
Global Const $idc_appstarting = 1
Global Const $idc_arrow = 2
Global Const $idc_cross = 3
Global Const $idc_hand = 32649
Global Const $idc_help = 4
Global Const $idc_ibeam = 5
Global Const $idc_icon = 6
Global Const $idc_no = 7
Global Const $idc_size = 8
Global Const $idc_sizeall = 9
Global Const $idc_sizenesw = 10
Global Const $idc_sizens = 11
Global Const $idc_sizenwse = 12
Global Const $idc_sizewe = 13
Global Const $idc_uparrow = 14
Global Const $idc_wait = 15
Global Const $idi_application = 32512
Global Const $idi_asterisk = 32516
Global Const $idi_exclamation = 32515
Global Const $idi_hand = 32513
Global Const $idi_question = 32514
Global Const $idi_winlogo = 32517
Global Const $idi_shield = 32518
Global Const $idi_error = $idi_hand
Global Const $idi_information = $idi_asterisk
Global Const $idi_warning = $idi_exclamation
Global Const $sd_logoff = 0
Global Const $sd_shutdown = 1
Global Const $sd_reboot = 2
Global Const $sd_force = 4
Global Const $sd_powerdown = 8
Global Const $sd_forcehung = 16
Global Const $sd_standby = 32
Global Const $sd_hibernate = 64
Global Const $stdin_child = 1
Global Const $stdout_child = 2
Global Const $stderr_child = 4
Global Const $stderr_merged = 8
Global Const $stdio_inherit_parent = 16
Global Const $run_create_new_console = 65536
Global Const $ubound_dimensions = 0
Global Const $ubound_rows = 1
Global Const $ubound_columns = 2
Global Const $mouseeventf_absolute = 32768
Global Const $mouseeventf_move = 1
Global Const $mouseeventf_leftdown = 2
Global Const $mouseeventf_leftup = 4
Global Const $mouseeventf_rightdown = 8
Global Const $mouseeventf_rightup = 16
Global Const $mouseeventf_middledown = 32
Global Const $mouseeventf_middleup = 64
Global Const $mouseeventf_wheel = 2048
Global Const $mouseeventf_xdown = 128
Global Const $mouseeventf_xup = 256
Global Const $reg_none = 0
Global Const $reg_sz = 1
Global Const $reg_expand_sz = 2
Global Const $reg_binary = 3
Global Const $reg_dword = 4
Global Const $reg_dword_little_endian = 4
Global Const $reg_dword_big_endian = 5
Global Const $reg_link = 6
Global Const $reg_multi_sz = 7
Global Const $reg_resource_list = 8
Global Const $reg_full_resource_descriptor = 9
Global Const $reg_resource_requirements_list = 10
Global Const $reg_qword = 11
Global Const $reg_qword_little_endian = 11
Global Const $hwnd_bottom = 1
Global Const $hwnd_notopmost = -2
Global Const $hwnd_top = 0
Global Const $hwnd_topmost = -1
Global Const $swp_nosize = 1
Global Const $swp_nomove = 2
Global Const $swp_nozorder = 4
Global Const $swp_noredraw = 8
Global Const $swp_noactivate = 16
Global Const $swp_framechanged = 32
Global Const $swp_drawframe = 32
Global Const $swp_showwindow = 64
Global Const $swp_hidewindow = 128
Global Const $swp_nocopybits = 256
Global Const $swp_noownerzorder = 512
Global Const $swp_noreposition = 512
Global Const $swp_nosendchanging = 1024
Global Const $swp_defererase = 8192
Global Const $swp_asyncwindowpos = 16384
Global Const $keyword_default = 1
Global Const $keyword_null = 2
Global Const $declared_local = -1
Global Const $declared_unknown = 0
Global Const $declared_global = 1
Global Const $assign_create = 0
Global Const $assign_forcelocal = 1
Global Const $assign_forceglobal = 2
Global Const $assign_existfail = 4
Global Const $bi_enable = 0
Global Const $bi_disable = 1
Global Const $break_enable = 1
Global Const $break_disable = 0
Global Const $cdtray_open = "open"
Global Const $cdtray_closed = "closed"
Global Const $send_default = 0
Global Const $send_raw = 1
Global Const $dir_default = 0
Global Const $dir_extended = 1
Global Const $dir_norecurse = 2
Global Const $dir_remove = 1
Global Const $dt_all = "ALL"
Global Const $dt_cdrom = "CDROM"
Global Const $dt_removable = "REMOVABLE"
Global Const $dt_fixed = "FIXED"
Global Const $dt_network = "NETWORK"
Global Const $dt_ramdisk = "RAMDISK"
Global Const $dt_unknown = "UNKNOWN"
Global Const $dt_undefined = 1
Global Const $dt_fat = "FAT"
Global Const $dt_fat32 = "FAT32"
Global Const $dt_exfat = "exFAT"
Global Const $dt_ntfs = "NTFS"
Global Const $dt_nwfs = "NWFS"
Global Const $dt_cdfs = "CDFS"
Global Const $dt_udf = "UDF"
Global Const $dma_default = 0
Global Const $dma_persistent = 1
Global Const $dma_authentication = 8
Global Const $ds_unknown = "UNKNOWN"
Global Const $ds_ready = "READY"
Global Const $ds_notready = "NOTREADY"
Global Const $ds_invalid = "INVALID"
Global Const $mouse_click_left = "left"
Global Const $mouse_click_right = "right"
Global Const $mouse_click_middle = "middle"
Global Const $mouse_click_main = "main"
Global Const $mouse_click_menu = "menu"
Global Const $mouse_click_primary = "primary"
Global Const $mouse_click_secondary = "secondary"
Global Const $mouse_wheel_up = "up"
Global Const $mouse_wheel_down = "down"
Global Const $number_auto = 0
Global Const $number_32bit = 1
Global Const $number_64bit = 2
Global Const $number_double = 3
Global Const $obj_name = 1
Global Const $obj_string = 2
Global Const $obj_progid = 3
Global Const $obj_file = 4
Global Const $obj_module = 5
Global Const $obj_clsid = 6
Global Const $obj_iid = 7
Global Const $exitclose_normal = 0
Global Const $exitclose_byexit = 1
Global Const $exitclose_byclick = 2
Global Const $exitclose_bylogoff = 3
Global Const $exitclose_bysutdown = 4
Global Const $process_stats_memory = 0
Global Const $process_stats_io = 1
Global Const $process_low = 0
Global Const $process_belownormal = 1
Global Const $process_normal = 2
Global Const $process_abovenormal = 3
Global Const $process_high = 4
Global Const $process_realtime = 5
Global Const $run_logon_noprofile = 0
Global Const $run_logon_profile = 1
Global Const $run_logon_network = 2
Global Const $run_logon_inherit = 4
Global Const $sound_nowait = 0
Global Const $sound_wait = 1
Global Const $shex_open = "open"
Global Const $shex_edit = "edit"
Global Const $shex_print = "print"
Global Const $shex_properties = "properties"
Global Const $tcp_data_default = 0
Global Const $tcp_data_binary = 1
Global Const $udp_open_default = 0
Global Const $udp_open_broadcast = 1
Global Const $udp_data_default = 0
Global Const $udp_data_binary = 1
Global Const $udp_data_array = 2
Global Const $tip_noicon = 0
Global Const $tip_infoicon = 1
Global Const $tip_warningicon = 2
Global Const $tip_erroricon = 3
Global Const $tip_balloon = 1
Global Const $tip_center = 2
Global Const $tip_forcevisible = 4
Global Const $windows_noontop = 0
Global Const $windows_ontop = 1
Global Const $fc_nooverwrite = 0
Global Const $fc_overwrite = 1
Global Const $fc_createpath = 8
Global Const $ft_modified = 0
Global Const $ft_created = 1
Global Const $ft_accessed = 2
Global Const $ft_array = 0
Global Const $ft_string = 1
Global Const $fsf_createbutton = 1
Global Const $fsf_newdialog = 2
Global Const $fsf_editcontrol = 4
Global Const $ft_nonrecursive = 0
Global Const $ft_recursive = 1
Global Const $fo_read = 0
Global Const $fo_append = 1
Global Const $fo_overwrite = 2
Global Const $fo_createpath = 8
Global Const $fo_binary = 16
Global Const $fo_unicode = 32
Global Const $fo_utf16_le = 32
Global Const $fo_utf16_be = 64
Global Const $fo_utf8 = 128
Global Const $fo_utf8_nobom = 256
Global Const $fo_ansi = 512
Global Const $fo_utf16_le_nobom = 1024
Global Const $fo_utf16_be_nobom = 2048
Global Const $fo_utf8_full = 16384
Global Const $fo_fullfile_detect = 16384
Global Const $eof = -1
Global Const $fd_filemustexist = 1
Global Const $fd_pathmustexist = 2
Global Const $fd_multiselect = 4
Global Const $fd_promptcreatenew = 8
Global Const $fd_promptoverwrite = 16
Global Const $create_new = 1
Global Const $create_always = 2
Global Const $open_existing = 3
Global Const $open_always = 4
Global Const $truncate_existing = 5
Global Const $invalid_set_file_pointer = -1
Global Const $file_begin = 0
Global Const $file_current = 1
Global Const $file_end = 2
Global Const $file_attribute_readonly = 1
Global Const $file_attribute_hidden = 2
Global Const $file_attribute_system = 4
Global Const $file_attribute_directory = 16
Global Const $file_attribute_archive = 32
Global Const $file_attribute_device = 64
Global Const $file_attribute_normal = 128
Global Const $file_attribute_temporary = 256
Global Const $file_attribute_sparse_file = 512
Global Const $file_attribute_reparse_point = 1024
Global Const $file_attribute_compressed = 2048
Global Const $file_attribute_offline = 4096
Global Const $file_attribute_not_content_indexed = 8192
Global Const $file_attribute_encrypted = 16384
Global Const $file_share_read = 1
Global Const $file_share_write = 2
Global Const $file_share_delete = 4
Global Const $file_share_readwrite = BitOR($file_share_read, $file_share_write)
Global Const $file_share_any = BitOR($file_share_read, $file_share_write, $file_share_delete)
Global Const $generic_all = 268435456
Global Const $generic_execute = 536870912
Global Const $generic_write = 1073741824
Global Const $generic_read = -2147483648
Global Const $generic_readwrite = BitOR($generic_read, $generic_write)
Global Const $file_encoding_utf16le = 32
Global Const $fe_entire_utf8 = 1
Global Const $fe_partialfirst_utf8 = 2
Global Const $fn_fullpath = 0
Global Const $fn_relativepath = 1
Global Const $fv_comments = "Comments"
Global Const $fv_companyname = "CompanyName"
Global Const $fv_filedescription = "FileDescription"
Global Const $fv_fileversion = "FileVersion"
Global Const $fv_internalname = "InternalName"
Global Const $fv_legalcopyright = "LegalCopyright"
Global Const $fv_legaltrademarks = "LegalTrademarks"
Global Const $fv_originalfilename = "OriginalFilename"
Global Const $fv_productname = "ProductName"
Global Const $fv_productversion = "ProductVersion"
Global Const $fv_privatebuild = "PrivateBuild"
Global Const $fv_specialbuild = "SpecialBuild"
Global Const $frta_nocount = 0
Global Const $frta_count = 1
Global Const $frta_intarrays = 2
Global Const $frta_entiresplit = 4
Global Const $flta_filesfolders = 0
Global Const $flta_files = 1
Global Const $flta_folders = 2
Global Const $fltar_filesfolders = 0
Global Const $fltar_files = 1
Global Const $fltar_folders = 2
Global Const $fltar_nohidden = 4
Global Const $fltar_nosystem = 8
Global Const $fltar_nolink = 16
Global Const $fltar_norecur = 0
Global Const $fltar_recur = 1
Global Const $fltar_nosort = 0
Global Const $fltar_sort = 1
Global Const $fltar_fastsort = 2
Global Const $fltar_nopath = 0
Global Const $fltar_relpath = 1
Global Const $fltar_fullpath = 2
Global Const $mb_ok = 0
Global Const $mb_okcancel = 1
Global Const $mb_abortretryignore = 2
Global Const $mb_yesnocancel = 3
Global Const $mb_yesno = 4
Global Const $mb_retrycancel = 5
Global Const $mb_canceltrycontinue = 6
Global Const $mb_help = 16384
Global Const $mb_iconstop = 16
Global Const $mb_iconerror = 16
Global Const $mb_iconhand = 16
Global Const $mb_iconquestion = 32
Global Const $mb_iconexclamation = 48
Global Const $mb_iconwarning = 48
Global Const $mb_iconinformation = 64
Global Const $mb_iconasterisk = 64
Global Const $mb_usericon = 128
Global Const $mb_defbutton1 = 0
Global Const $mb_defbutton2 = 256
Global Const $mb_defbutton3 = 512
Global Const $mb_defbutton4 = 768
Global Const $mb_applmodal = 0
Global Const $mb_systemmodal = 4096
Global Const $mb_taskmodal = 8192
Global Const $mb_default_desktop_only = 131072
Global Const $mb_right = 524288
Global Const $mb_rtlreading = 1048576
Global Const $mb_setforeground = 65536
Global Const $mb_topmost = 262144
Global Const $mb_service_notification = 2097152
Global Const $mb_rightjustified = $mb_right
Global Const $idtimeout = -1
Global Const $idok = 1
Global Const $idcancel = 2
Global Const $idabort = 3
Global Const $idretry = 4
Global Const $idignore = 5
Global Const $idyes = 6
Global Const $idno = 7
Global Const $idclose = 8
Global Const $idhelp = 9
Global Const $idtryagain = 10
Global Const $idcontinue = 11
Global Const $str_nocasesense = 0
Global Const $str_casesense = 1
Global Const $str_nocasesensebasic = 2
Global Const $str_stripleading = 1
Global Const $str_striptrailing = 2
Global Const $str_stripspaces = 4
Global Const $str_stripall = 8
Global Const $str_chrsplit = 0
Global Const $str_entiresplit = 1
Global Const $str_nocount = 2
Global Const $str_regexpmatch = 0
Global Const $str_regexparraymatch = 1
Global Const $str_regexparrayfullmatch = 2
Global Const $str_regexparrayglobalmatch = 3
Global Const $str_regexparrayglobalfullmatch = 4
Global Const $str_endisstart = 0
Global Const $str_endnotstart = 1
Global Const $sb_ansi = 1
Global Const $sb_utf16le = 2
Global Const $sb_utf16be = 3
Global Const $sb_utf8 = 4
Global Const $se_utf16 = 0
Global Const $se_ansi = 1
Global Const $se_utf8 = 2
Global Const $str_utf16 = 0
Global Const $str_ucs2 = 1
Global Const $hgdi_error = Ptr(-1)
Global Const $invalid_handle_value = Ptr(-1)
Global Const $clr_invalid = -1
Global Const $null_brush = 5
Global Const $null_pen = 8
Global Const $black_brush = 4
Global Const $dkgray_brush = 3
Global Const $dc_brush = 18
Global Const $gray_brush = 2
Global Const $hollow_brush = $null_brush
Global Const $ltgray_brush = 1
Global Const $white_brush = 0
Global Const $black_pen = 7
Global Const $dc_pen = 19
Global Const $white_pen = 6
Global Const $ansi_fixed_font = 11
Global Const $ansi_var_font = 12
Global Const $device_default_font = 14
Global Const $default_gui_font = 17
Global Const $oem_fixed_font = 10
Global Const $system_font = 13
Global Const $system_fixed_font = 16
Global Const $default_palette = 15
Global Const $mb_precomposed = 1
Global Const $mb_composite = 2
Global Const $mb_useglyphchars = 4
Global Const $ulw_alpha = 2
Global Const $ulw_colorkey = 1
Global Const $ulw_opaque = 4
Global Const $ulw_ex_noresize = 8
Global Const $wh_callwndproc = 4
Global Const $wh_callwndprocret = 12
Global Const $wh_cbt = 5
Global Const $wh_debug = 9
Global Const $wh_foregroundidle = 11
Global Const $wh_getmessage = 3
Global Const $wh_journalplayback = 1
Global Const $wh_journalrecord = 0
Global Const $wh_keyboard = 2
Global Const $wh_keyboard_ll = 13
Global Const $wh_mouse = 7
Global Const $wh_mouse_ll = 14
Global Const $wh_msgfilter = -1
Global Const $wh_shell = 10
Global Const $wh_sysmsgfilter = 6
Global Const $wpf_asyncwindowplacement = 4
Global Const $wpf_restoretomaximized = 2
Global Const $wpf_setminposition = 1
Global Const $kf_extended = 256
Global Const $kf_altdown = 8192
Global Const $kf_up = 32768
Global Const $llkhf_extended = BitShift($kf_extended, 8)
Global Const $llkhf_injected = 16
Global Const $llkhf_altdown = BitShift($kf_altdown, 8)
Global Const $llkhf_up = BitShift($kf_up, 8)
Global Const $ofn_allowmultiselect = 512
Global Const $ofn_createprompt = 8192
Global Const $ofn_dontaddtorecent = 33554432
Global Const $ofn_enablehook = 32
Global Const $ofn_enableincludenotify = 4194304
Global Const $ofn_enablesizing = 8388608
Global Const $ofn_enabletemplate = 64
Global Const $ofn_enabletemplatehandle = 128
Global Const $ofn_explorer = 524288
Global Const $ofn_extensiondifferent = 1024
Global Const $ofn_filemustexist = 4096
Global Const $ofn_forceshowhidden = 268435456
Global Const $ofn_hidereadonly = 4
Global Const $ofn_longnames = 2097152
Global Const $ofn_nochangedir = 8
Global Const $ofn_nodereferencelinks = 1048576
Global Const $ofn_nolongnames = 262144
Global Const $ofn_nonetworkbutton = 131072
Global Const $ofn_noreadonlyreturn = 32768
Global Const $ofn_notestfilecreate = 65536
Global Const $ofn_novalidate = 256
Global Const $ofn_overwriteprompt = 2
Global Const $ofn_pathmustexist = 2048
Global Const $ofn_readonly = 1
Global Const $ofn_shareaware = 16384
Global Const $ofn_showhelp = 16
Global Const $ofn_ex_noplacesbar = 1
Global Const $tmpf_fixed_pitch = 1
Global Const $tmpf_vector = 2
Global Const $tmpf_truetype = 4
Global Const $tmpf_device = 8
Global Const $duplicate_close_source = 1
Global Const $duplicate_same_access = 2
Global Const $di_mask = 1
Global Const $di_image = 2
Global Const $di_normal = 3
Global Const $di_compat = 4
Global Const $di_defaultsize = 8
Global Const $di_nomirror = 16
Global Const $display_device_attached_to_desktop = 1
Global Const $display_device_multi_driver = 2
Global Const $display_device_primary_device = 4
Global Const $display_device_mirroring_driver = 8
Global Const $display_device_vga_compatible = 16
Global Const $display_device_removable = 32
Global Const $display_device_disconnect = 33554432
Global Const $display_device_remote = 67108864
Global Const $display_device_modespruned = 134217728
Global Const $flashw_caption = 1
Global Const $flashw_tray = 2
Global Const $flashw_timer = 4
Global Const $flashw_timernofg = 12
Global Const $format_message_allocate_buffer = 256
Global Const $format_message_ignore_inserts = 512
Global Const $format_message_from_string = 1024
Global Const $format_message_from_hmodule = 2048
Global Const $format_message_from_system = 4096
Global Const $format_message_argument_array = 8192
Global Const $gw_hwndfirst = 0
Global Const $gw_hwndlast = 1
Global Const $gw_hwndnext = 2
Global Const $gw_hwndprev = 3
Global Const $gw_owner = 4
Global Const $gw_child = 5
Global Const $gw_enabledpopup = 6
Global Const $gwl_wndproc = -4
Global Const $gwl_hinstance = -6
Global Const $gwl_hwndparent = -8
Global Const $gwl_id = -12
Global Const $gwl_style = -16
Global Const $gwl_exstyle = -20
Global Const $gwl_userdata = -21
Global Const $std_cut = 0
Global Const $std_copy = 1
Global Const $std_paste = 2
Global Const $std_undo = 3
Global Const $std_redow = 4
Global Const $std_delete = 5
Global Const $std_filenew = 6
Global Const $std_fileopen = 7
Global Const $std_filesave = 8
Global Const $std_printpre = 9
Global Const $std_properties = 10
Global Const $std_help = 11
Global Const $std_find = 12
Global Const $std_replace = 13
Global Const $std_print = 14
Global Const $image_bitmap = 0
Global Const $image_icon = 1
Global Const $image_cursor = 2
Global Const $image_enhmetafile = 3
Global Const $kb_sendspecial = 0
Global Const $kb_sendraw = 1
Global Const $kb_capsoff = 0
Global Const $kb_capson = 1
Global Const $dont_resolve_dll_references = 1
Global Const $load_library_as_datafile = 2
Global Const $load_with_altered_search_path = 8
Global Const $load_ignore_code_authz_level = 16
Global Const $load_library_as_datafile_exclusive = 64
Global Const $load_library_as_image_resource = 32
Global Const $load_library_search_application_dir = 512
Global Const $load_library_search_default_dirs = 4096
Global Const $load_library_search_dll_load_dir = 256
Global Const $load_library_search_system32 = 2048
Global Const $load_library_search_user_dirs = 1024
Global Const $s_ok = 0
Global Const $e_abort = -2147467260
Global Const $e_accessdenied = -2147024891
Global Const $e_fail = -2147467259
Global Const $e_handle = -2147024890
Global Const $e_invalidarg = -2147024809
Global Const $e_nointerface = -2147467262
Global Const $e_notimpl = -2147467263
Global Const $e_outofmemory = -2147024882
Global Const $e_pointer = -2147467261
Global Const $e_unexpected = -2147418113
Global Const $lr_defaultcolor = 0
Global Const $lr_monochrome = 1
Global Const $lr_color = 2
Global Const $lr_copyreturnorg = 4
Global Const $lr_copydeleteorg = 8
Global Const $lr_loadfromfile = 16
Global Const $lr_loadtransparent = 32
Global Const $lr_defaultsize = 64
Global Const $lr_vgacolor = 128
Global Const $lr_loadmap3dcolors = 4096
Global Const $lr_createdibsection = 8192
Global Const $lr_copyfromresource = 16384
Global Const $lr_shared = 32768
Global Const $obm_trtype = 32732
Global Const $obm_lfarrowi = 32734
Global Const $obm_rgarrowi = 32735
Global Const $obm_dnarrowi = 32736
Global Const $obm_uparrowi = 32737
Global Const $obm_combo = 32738
Global Const $obm_mnarrow = 32739
Global Const $obm_lfarrowd = 32740
Global Const $obm_rgarrowd = 32741
Global Const $obm_dnarrowd = 32742
Global Const $obm_uparrowd = 32743
Global Const $obm_restored = 32744
Global Const $obm_zoomd = 32745
Global Const $obm_reduced = 32746
Global Const $obm_restore = 32747
Global Const $obm_zoom = 32748
Global Const $obm_reduce = 32749
Global Const $obm_lfarrow = 32750
Global Const $obm_rgarrow = 32751
Global Const $obm_dnarrow = 32752
Global Const $obm_uparrow = 32753
Global Const $obm_close = 32754
Global Const $obm_old_restore = 32755
Global Const $obm_old_zoom = 32756
Global Const $obm_old_reduce = 32757
Global Const $obm_btncorners = 32758
Global Const $obm_checkboxes = 32759
Global Const $obm_check = 32760
Global Const $obm_btsize = 32761
Global Const $obm_old_lfarrow = 32762
Global Const $obm_old_rgarrow = 32763
Global Const $obm_old_dnarrow = 32764
Global Const $obm_old_uparrow = 32765
Global Const $obm_size = 32766
Global Const $obm_old_close = 32767
Global Const $oic_sample = 32512
Global Const $oic_hand = 32513
Global Const $oic_ques = 32514
Global Const $oic_bang = 32515
Global Const $oic_note = 32516
Global Const $oic_winlogo = 32517
Global Const $oic_warning = $oic_bang
Global Const $oic_error = $oic_hand
Global Const $oic_information = $oic_note
Global $__g_ainprocess_winapi[64][2] = [[0, 0]]
Global $__g_awinlist_winapi[64][2] = [[0, 0]]
Global Const $__winapiconstant_wm_setfont = 48
Global Const $__winapiconstant_fw_normal = 400
Global Const $__winapiconstant_default_charset = 1
Global Const $__winapiconstant_out_default_precis = 0
Global Const $__winapiconstant_clip_default_precis = 0
Global Const $__winapiconstant_default_quality = 0
Global Const $__winapiconstant_logpixelsx = 88
Global Const $__winapiconstant_logpixelsy = 90
Global Const $tagcursorinfo = "dword Size;dword Flags;handle hCursor;" & $tagpoint
Global Const $tagdisplay_device = "dword Size;wchar Name[32];wchar String[128];dword Flags;wchar ID[128];wchar Key[128]"
Global Const $tagflashwinfo = "uint Size;hwnd hWnd;dword Flags;uint Count;dword TimeOut"
Global Const $tagiconinfo = "bool Icon;dword XHotSpot;dword YHotSpot;handle hMask;handle hColor"
Global Const $tagmemorystatusex = "dword Length;dword MemoryLoad;" & "uint64 TotalPhys;uint64 AvailPhys;uint64 TotalPageFile;uint64 AvailPageFile;" & "uint64 TotalVirtual;uint64 AvailVirtual;uint64 AvailExtendedVirtual"

Func _winapi_attachconsole($ipid = -1)
    Local $aresult = DllCall("kernel32.dll", "bool", "AttachConsole", "dword", $ipid)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_attachthreadinput($iattach, $iattachto, $battach)
    Local $aresult = DllCall("user32.dll", "bool", "AttachThreadInput", "dword", $iattach, "dword", $iattachto, "bool", $battach)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_beep($ifreq = 500, $iduration = 1000)
    Local $aresult = DllCall("kernel32.dll", "bool", "Beep", "dword", $ifreq, "dword", $iduration)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_bitblt($hdestdc, $ixdest, $iydest, $iwidth, $iheight, $hsrcdc, $ixsrc, $iysrc, $irop)
    Local $aresult = DllCall("gdi32.dll", "bool", "BitBlt", "handle", $hdestdc, "int", $ixdest, "int", $iydest, "int", $iwidth, "int", $iheight, "handle", $hsrcdc, "int", $ixsrc, "int", $iysrc, "dword", $irop)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_callnexthookex($hhook, $icode, $wparam, $lparam)
    Local $aresult = DllCall("user32.dll", "lresult", "CallNextHookEx", "handle", $hhook, "int", $icode, "wparam", $wparam, "lparam", $lparam)
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_callwindowproc($pprevwndfunc, $hwnd, $imsg, $wparam, $lparam)
    Local $aresult = DllCall("user32.dll", "lresult", "CallWindowProc", "ptr", $pprevwndfunc, "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_clienttoscreen($hwnd, ByRef $tpoint)
    Local $aret = DllCall("user32.dll", "bool", "ClientToScreen", "hwnd", $hwnd, "struct*", $tpoint)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Return $tpoint
EndFunc

Func _winapi_closehandle($hobject)
    Local $aresult = DllCall("kernel32.dll", "bool", "CloseHandle", "handle", $hobject)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_combinergn($hrgndest, $hrgnsrc1, $hrgnsrc2, $icombinemode)
    Local $aresult = DllCall("gdi32.dll", "int", "CombineRgn", "handle", $hrgndest, "handle", $hrgnsrc1, "handle", $hrgnsrc2, "int", $icombinemode)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_commdlgextendederror()
    Local Const $cderr_dialogfailure = 65535
    Local Const $cderr_findresfailure = 6
    Local Const $cderr_initialization = 2
    Local Const $cderr_loadresfailure = 7
    Local Const $cderr_loadstrfailure = 5
    Local Const $cderr_lockresfailure = 8
    Local Const $cderr_memallocfailure = 9
    Local Const $cderr_memlockfailure = 10
    Local Const $cderr_nohinstance = 4
    Local Const $cderr_nohook = 11
    Local Const $cderr_notemplate = 3
    Local Const $cderr_registermsgfail = 12
    Local Const $cderr_structsize = 1
    Local Const $fnerr_buffertoosmall = 12291
    Local Const $fnerr_invalidfilename = 12290
    Local Const $fnerr_subclassfailure = 12289
    Local $aresult = DllCall("comdlg32.dll", "dword", "CommDlgExtendedError")
    If NOT @error Then
        Switch $aresult[0]
            Case $cderr_dialogfailure
                Return SetError($aresult[0], 0, "The dialog box could not be created." & @LF & "The common dialog box function's call to the DialogBox function failed." & @LF & "For example, this error occurs if the common dialog box call specifies an invalid window handle.")
            Case $cderr_findresfailure
                Return SetError($aresult[0], 0, "The common dialog box function failed to find a specified resource.")
            Case $cderr_initialization
                Return SetError($aresult[0], 0, "The common dialog box function failed during initialization." & @LF & "This error often occurs when sufficient memory is not available.")
            Case $cderr_loadresfailure
                Return SetError($aresult[0], 0, "The common dialog box function failed to load a specified resource.")
            Case $cderr_loadstrfailure
                Return SetError($aresult[0], 0, "The common dialog box function failed to load a specified string.")
            Case $cderr_lockresfailure
                Return SetError($aresult[0], 0, "The common dialog box function failed to lock a specified resource.")
            Case $cderr_memallocfailure
                Return SetError($aresult[0], 0, "The common dialog box function was unable to allocate memory for internal structures.")
            Case $cderr_memlockfailure
                Return SetError($aresult[0], 0, "The common dialog box function was unable to lock the memory associated with a handle.")
            Case $cderr_nohinstance
                Return SetError($aresult[0], 0, "The ENABLETEMPLATE flag was set in the Flags member of the initialization structure for the corresponding common dialog box," & @LF & "but you failed to provide a corresponding instance handle.")
            Case $cderr_nohook
                Return SetError($aresult[0], 0, "The ENABLEHOOK flag was set in the Flags member of the initialization structure for the corresponding common dialog box," & @LF & "but you failed to provide a pointer to a corresponding hook procedure.")
            Case $cderr_notemplate
                Return SetError($aresult[0], 0, "The ENABLETEMPLATE flag was set in the Flags member of the initialization structure for the corresponding common dialog box," & @LF & "but you failed to provide a corresponding template.")
            Case $cderr_registermsgfail
                Return SetError($aresult[0], 0, "The RegisterWindowMessage function returned an error code when it was called by the common dialog box function.")
            Case $cderr_structsize
                Return SetError($aresult[0], 0, "The lStructSize member of the initialization structure for the corresponding common dialog box is invalid")
            Case $fnerr_buffertoosmall
                Return SetError($aresult[0], 0, "The buffer pointed to by the lpstrFile member of the OPENFILENAME structure is too small for the file name specified by the user." & @LF & "The first two bytes of the lpstrFile buffer contain an integer value specifying the size, in TCHARs, required to receive the full name.")
            Case $fnerr_invalidfilename
                Return SetError($aresult[0], 0, "A file name is invalid.")
            Case $fnerr_subclassfailure
                Return SetError($aresult[0], 0, "An attempt to subclass a list box failed because sufficient memory was not available.")
        EndSwitch
    EndIf
    Return SetError(@error, @extended, "0x" & Hex($aresult[0]))
EndFunc

Func _winapi_copyicon($hicon)
    Local $aresult = DllCall("user32.dll", "handle", "CopyIcon", "handle", $hicon)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createbitmap($iwidth, $iheight, $iplanes = 1, $ibitsperpel = 1, $pbits = 0)
    Local $aresult = DllCall("gdi32.dll", "handle", "CreateBitmap", "int", $iwidth, "int", $iheight, "uint", $iplanes, "uint", $ibitsperpel, "struct*", $pbits)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createcompatiblebitmap($hdc, $iwidth, $iheight)
    Local $aresult = DllCall("gdi32.dll", "handle", "CreateCompatibleBitmap", "handle", $hdc, "int", $iwidth, "int", $iheight)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createcompatibledc($hdc)
    Local $aresult = DllCall("gdi32.dll", "handle", "CreateCompatibleDC", "handle", $hdc)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createevent($tattributes = 0, $bmanualreset = True, $binitialstate = True, $sname = "")
    Local $snametype = "wstr"
    If $sname = "" Then
        $sname = 0
        $snametype = "ptr"
    EndIf
    Local $aresult = DllCall("kernel32.dll", "handle", "CreateEventW", "struct*", $tattributes, "bool", $bmanualreset, "bool", $binitialstate, $snametype, $sname)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createfile($sfilename, $icreation, $iaccess = 4, $ishare = 0, $iattributes = 0, $tsecurity = 0)
    Local $ida = 0, $ism = 0, $icd = 0, $ifa = 0
    If BitAND($iaccess, 1) <> 0 Then $ida = BitOR($ida, $generic_execute)
    If BitAND($iaccess, 2) <> 0 Then $ida = BitOR($ida, $generic_read)
    If BitAND($iaccess, 4) <> 0 Then $ida = BitOR($ida, $generic_write)
    If BitAND($ishare, 1) <> 0 Then $ism = BitOR($ism, $file_share_delete)
    If BitAND($ishare, 2) <> 0 Then $ism = BitOR($ism, $file_share_read)
    If BitAND($ishare, 4) <> 0 Then $ism = BitOR($ism, $file_share_write)
    Switch $icreation
        Case 0
            $icd = $create_new
        Case 1
            $icd = $create_always
        Case 2
            $icd = $open_existing
        Case 3
            $icd = $open_always
        Case 4
            $icd = $truncate_existing
    EndSwitch
    If BitAND($iattributes, 1) <> 0 Then $ifa = BitOR($ifa, $file_attribute_archive)
    If BitAND($iattributes, 2) <> 0 Then $ifa = BitOR($ifa, $file_attribute_hidden)
    If BitAND($iattributes, 4) <> 0 Then $ifa = BitOR($ifa, $file_attribute_readonly)
    If BitAND($iattributes, 8) <> 0 Then $ifa = BitOR($ifa, $file_attribute_system)
    Local $aresult = DllCall("kernel32.dll", "handle", "CreateFileW", "wstr", $sfilename, "dword", $ida, "dword", $ism, "struct*", $tsecurity, "dword", $icd, "dword", $ifa, "ptr", 0)
    If @error OR ($aresult[0] = $invalid_handle_value) Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createfont($iheight, $iwidth, $iescape = 0, $iorientn = 0, $iweight = $__winapiconstant_fw_normal, $bitalic = False, $bunderline = False, $bstrikeout = False, $icharset = $__winapiconstant_default_charset, $ioutputprec = $__winapiconstant_out_default_precis, $iclipprec = $__winapiconstant_clip_default_precis, $iquality = $__winapiconstant_default_quality, $ipitch = 0, $sface = "Arial")
    Local $aresult = DllCall("gdi32.dll", "handle", "CreateFontW", "int", $iheight, "int", $iwidth, "int", $iescape, "int", $iorientn, "int", $iweight, "dword", $bitalic, "dword", $bunderline, "dword", $bstrikeout, "dword", $icharset, "dword", $ioutputprec, "dword", $iclipprec, "dword", $iquality, "dword", $ipitch, "wstr", $sface)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createfontindirect($tlogfont)
    Local $aresult = DllCall("gdi32.dll", "handle", "CreateFontIndirectW", "struct*", $tlogfont)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createpen($ipenstyle, $iwidth, $icolor)
    Local $aresult = DllCall("gdi32.dll", "handle", "CreatePen", "int", $ipenstyle, "int", $iwidth, "INT", $icolor)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createprocess($sappname, $scommand, $tsecurity, $tthread, $binherit, $iflags, $penviron, $sdir, $tstartupinfo, $tprocess)
    Local $tcommand = 0
    Local $sappnametype = "wstr", $sdirtype = "wstr"
    If $sappname = "" Then
        $sappnametype = "ptr"
        $sappname = 0
    EndIf
    If $scommand <> "" Then
        $tcommand = DllStructCreate("wchar Text[" & 260 + 1 & "]")
        DllStructSetData($tcommand, "Text", $scommand)
    EndIf
    If $sdir = "" Then
        $sdirtype = "ptr"
        $sdir = 0
    EndIf
    Local $aresult = DllCall("kernel32.dll", "bool", "CreateProcessW", $sappnametype, $sappname, "struct*", $tcommand, "struct*", $tsecurity, "struct*", $tthread, "bool", $binherit, "dword", $iflags, "struct*", $penviron, $sdirtype, $sdir, "struct*", $tstartupinfo, "struct*", $tprocess)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_createrectrgn($ileftrect, $itoprect, $irightrect, $ibottomrect)
    Local $aresult = DllCall("gdi32.dll", "handle", "CreateRectRgn", "int", $ileftrect, "int", $itoprect, "int", $irightrect, "int", $ibottomrect)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createroundrectrgn($ileftrect, $itoprect, $irightrect, $ibottomrect, $iwidthellipse, $iheightellipse)
    Local $aresult = DllCall("gdi32.dll", "handle", "CreateRoundRectRgn", "int", $ileftrect, "int", $itoprect, "int", $irightrect, "int", $ibottomrect, "int", $iwidthellipse, "int", $iheightellipse)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createsolidbitmap($hwnd, $icolor, $iwidth, $iheight, $brgb = 1)
    Local $hdc = _winapi_getdc($hwnd)
    Local $hdestdc = _winapi_createcompatibledc($hdc)
    Local $hbitmap = _winapi_createcompatiblebitmap($hdc, $iwidth, $iheight)
    Local $hold = _winapi_selectobject($hdestdc, $hbitmap)
    Local $trect = DllStructCreate($tagrect)
    DllStructSetData($trect, 1, 0)
    DllStructSetData($trect, 2, 0)
    DllStructSetData($trect, 3, $iwidth)
    DllStructSetData($trect, 4, $iheight)
    If $brgb Then
        $icolor = BitOR(BitAND($icolor, 65280), BitShift(BitAND($icolor, 255), -16), BitShift(BitAND($icolor, 16711680), 16))
    EndIf
    Local $hbrush = _winapi_createsolidbrush($icolor)
    If NOT _winapi_fillrect($hdestdc, $trect, $hbrush) Then
        _winapi_deleteobject($hbitmap)
        $hbitmap = 0
    EndIf
    _winapi_deleteobject($hbrush)
    _winapi_releasedc($hwnd, $hdc)
    _winapi_selectobject($hdestdc, $hold)
    _winapi_deletedc($hdestdc)
    If NOT $hbitmap Then Return SetError(1, 0, 0)
    Return $hbitmap
EndFunc

Func _winapi_createsolidbrush($icolor)
    Local $aresult = DllCall("gdi32.dll", "handle", "CreateSolidBrush", "INT", $icolor)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_createwindowex($iexstyle, $sclass, $sname, $istyle, $ix, $iy, $iwidth, $iheight, $hparent, $hmenu = 0, $hinstance = 0, $pparam = 0)
    If $hinstance = 0 Then $hinstance = _winapi_getmodulehandle("")
    Local $aresult = DllCall("user32.dll", "hwnd", "CreateWindowExW", "dword", $iexstyle, "wstr", $sclass, "wstr", $sname, "dword", $istyle, "int", $ix, "int", $iy, "int", $iwidth, "int", $iheight, "hwnd", $hparent, "handle", $hmenu, "handle", $hinstance, "struct*", $pparam)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_defwindowproc($hwnd, $imsg, $wparam, $lparam)
    Local $aresult = DllCall("user32.dll", "lresult", "DefWindowProc", "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_deletedc($hdc)
    Local $aresult = DllCall("gdi32.dll", "bool", "DeleteDC", "handle", $hdc)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_deleteobject($hobject)
    Local $aresult = DllCall("gdi32.dll", "bool", "DeleteObject", "handle", $hobject)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_destroyicon($hicon)
    Local $aresult = DllCall("user32.dll", "bool", "DestroyIcon", "handle", $hicon)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_destroywindow($hwnd)
    Local $aresult = DllCall("user32.dll", "bool", "DestroyWindow", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_drawedge($hdc, $trect, $iedgetype, $iflags)
    Local $aresult = DllCall("user32.dll", "bool", "DrawEdge", "handle", $hdc, "struct*", $trect, "uint", $iedgetype, "uint", $iflags)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_drawframecontrol($hdc, $trect, $itype, $istate)
    Local $aresult = DllCall("user32.dll", "bool", "DrawFrameControl", "handle", $hdc, "struct*", $trect, "uint", $itype, "uint", $istate)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_drawicon($hdc, $ix, $iy, $hicon)
    Local $aresult = DllCall("user32.dll", "bool", "DrawIcon", "handle", $hdc, "int", $ix, "int", $iy, "handle", $hicon)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_drawiconex($hdc, $ix, $iy, $hicon, $iwidth = 0, $iheight = 0, $istep = 0, $hbrush = 0, $iflags = 3)
    Local $ioptions
    Switch $iflags
        Case 1
            $ioptions = $di_mask
        Case 2
            $ioptions = $di_image
        Case 3
            $ioptions = $di_normal
        Case 4
            $ioptions = $di_compat
        Case 5
            $ioptions = $di_defaultsize
        Case Else
            $ioptions = $di_nomirror
    EndSwitch
    Local $aresult = DllCall("user32.dll", "bool", "DrawIconEx", "handle", $hdc, "int", $ix, "int", $iy, "handle", $hicon, "int", $iwidth, "int", $iheight, "uint", $istep, "handle", $hbrush, "uint", $ioptions)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_drawline($hdc, $ix1, $iy1, $ix2, $iy2)
    _winapi_moveto($hdc, $ix1, $iy1)
    If @error Then Return SetError(@error, @extended, False)
    _winapi_lineto($hdc, $ix2, $iy2)
    If @error Then Return SetError(@error + 10, @extended, False)
    Return True
EndFunc

Func _winapi_drawtext($hdc, $stext, ByRef $trect, $iflags)
    Local $aresult = DllCall("user32.dll", "int", "DrawTextW", "handle", $hdc, "wstr", $stext, "int", -1, "struct*", $trect, "uint", $iflags)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_duplicatehandle($hsourceprocesshandle, $hsourcehandle, $htargetprocesshandle, $idesiredaccess, $iinherithandle, $ioptions)
    Local $aresult = DllCall("kernel32.dll", "bool", "DuplicateHandle", "handle", $hsourceprocesshandle, "handle", $hsourcehandle, "handle", $htargetprocesshandle, "handle*", 0, "dword", $idesiredaccess, "bool", $iinherithandle, "dword", $ioptions)
    If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, 0)
    Return $aresult[4]
EndFunc

Func _winapi_enablewindow($hwnd, $benable = True)
    Local $aresult = DllCall("user32.dll", "bool", "EnableWindow", "hwnd", $hwnd, "bool", $benable)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_enumdisplaydevices($sdevice, $idevnum)
    Local $tname = 0, $iflags = 0, $adevice[5]
    If $sdevice <> "" Then
        $tname = DllStructCreate("wchar Text[" & StringLen($sdevice) + 1 & "]")
        DllStructSetData($tname, "Text", $sdevice)
    EndIf
    Local $tdevice = DllStructCreate($tagdisplay_device)
    Local $idevice = DllStructGetSize($tdevice)
    DllStructSetData($tdevice, "Size", $idevice)
    Local $aret = DllCall("user32.dll", "bool", "EnumDisplayDevicesW", "struct*", $tname, "dword", $idevnum, "struct*", $tdevice, "dword", 1)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Local $in = DllStructGetData($tdevice, "Flags")
    If BitAND($in, $display_device_attached_to_desktop) <> 0 Then $iflags = BitOR($iflags, 1)
    If BitAND($in, $display_device_primary_device) <> 0 Then $iflags = BitOR($iflags, 2)
    If BitAND($in, $display_device_mirroring_driver) <> 0 Then $iflags = BitOR($iflags, 4)
    If BitAND($in, $display_device_vga_compatible) <> 0 Then $iflags = BitOR($iflags, 8)
    If BitAND($in, $display_device_removable) <> 0 Then $iflags = BitOR($iflags, 16)
    If BitAND($in, $display_device_modespruned) <> 0 Then $iflags = BitOR($iflags, 32)
    $adevice[0] = True
    $adevice[1] = DllStructGetData($tdevice, "Name")
    $adevice[2] = DllStructGetData($tdevice, "String")
    $adevice[3] = $iflags
    $adevice[4] = DllStructGetData($tdevice, "ID")
    Return $adevice
EndFunc

Func _winapi_enumwindows($bvisible = True, $hwnd = Default)
    __winapi_enumwindowsinit()
    If $hwnd = Default Then $hwnd = _winapi_getdesktopwindow()
    __winapi_enumwindowschild($hwnd, $bvisible)
    Return $__g_awinlist_winapi
EndFunc

Func __winapi_enumwindowsadd($hwnd, $sclass = "")
    If $sclass = "" Then $sclass = _winapi_getclassname($hwnd)
    $__g_awinlist_winapi[0][0] += 1
    Local $icount = $__g_awinlist_winapi[0][0]
    If $icount >= $__g_awinlist_winapi[0][1] Then
        ReDim $__g_awinlist_winapi[$icount + 64][2]
        $__g_awinlist_winapi[0][1] += 64
    EndIf
    $__g_awinlist_winapi[$icount][0] = $hwnd
    $__g_awinlist_winapi[$icount][1] = $sclass
EndFunc

Func __winapi_enumwindowschild($hwnd, $bvisible = True)
    $hwnd = _winapi_getwindow($hwnd, $gw_child)
    While $hwnd <> 0
        If (NOT $bvisible) OR _winapi_iswindowvisible($hwnd) Then
            __winapi_enumwindowsadd($hwnd)
            __winapi_enumwindowschild($hwnd, $bvisible)
        EndIf
        $hwnd = _winapi_getwindow($hwnd, $gw_hwndnext)
    WEnd
EndFunc

Func __winapi_enumwindowsinit()
    ReDim $__g_awinlist_winapi[64][2]
    $__g_awinlist_winapi[0][0] = 0
    $__g_awinlist_winapi[0][1] = 64
EndFunc

Func _winapi_enumwindowspopup()
    __winapi_enumwindowsinit()
    Local $hwnd = _winapi_getwindow(_winapi_getdesktopwindow(), $gw_child)
    Local $sclass
    While $hwnd <> 0
        If _winapi_iswindowvisible($hwnd) Then
            $sclass = _winapi_getclassname($hwnd)
            If $sclass = "#32768" Then
                __winapi_enumwindowsadd($hwnd)
            ElseIf $sclass = "ToolbarWindow32" Then
                __winapi_enumwindowsadd($hwnd)
            ElseIf $sclass = "ToolTips_Class32" Then
                __winapi_enumwindowsadd($hwnd)
            ElseIf $sclass = "BaseBar" Then
                __winapi_enumwindowschild($hwnd)
            EndIf
        EndIf
        $hwnd = _winapi_getwindow($hwnd, $gw_hwndnext)
    WEnd
    Return $__g_awinlist_winapi
EndFunc

Func _winapi_enumwindowstop()
    __winapi_enumwindowsinit()
    Local $hwnd = _winapi_getwindow(_winapi_getdesktopwindow(), $gw_child)
    While $hwnd <> 0
        If _winapi_iswindowvisible($hwnd) Then __winapi_enumwindowsadd($hwnd)
        $hwnd = _winapi_getwindow($hwnd, $gw_hwndnext)
    WEnd
    Return $__g_awinlist_winapi
EndFunc

Func _winapi_expandenvironmentstrings($sstring)
    Local $aresult = DllCall("kernel32.dll", "dword", "ExpandEnvironmentStringsW", "wstr", $sstring, "wstr", "", "dword", 4096)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, "")
    Return $aresult[2]
EndFunc

Func _winapi_extracticonex($sfilepath, $iindex, $palarge, $pasmall, $iicons)
    Local $aresult = DllCall("shell32.dll", "uint", "ExtractIconExW", "wstr", $sfilepath, "int", $iindex, "struct*", $palarge, "struct*", $pasmall, "uint", $iicons)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_fatalappexit($smessage)
    DllCall("kernel32.dll", "none", "FatalAppExitW", "uint", 0, "wstr", $smessage)
    If @error Then Return SetError(@error, @extended)
EndFunc

Func _winapi_fillrect($hdc, $trect, $hbrush)
    Local $aresult
    If IsPtr($hbrush) Then
        $aresult = DllCall("user32.dll", "int", "FillRect", "handle", $hdc, "struct*", $trect, "handle", $hbrush)
    Else
        $aresult = DllCall("user32.dll", "int", "FillRect", "handle", $hdc, "struct*", $trect, "dword_ptr", $hbrush)
    EndIf
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_findexecutable($sfilename, $sdirectory = "")
    Local $aresult = DllCall("shell32.dll", "INT", "FindExecutableW", "wstr", $sfilename, "wstr", $sdirectory, "wstr", "")
    If @error Then Return SetError(@error, @extended, "")
    If $aresult[0] <= 32 Then Return SetError(10, $aresult[0], "")
    Return SetExtended($aresult[0], $aresult[3])
EndFunc

Func _winapi_findwindow($sclassname, $swindowname)
    Local $aresult = DllCall("user32.dll", "hwnd", "FindWindowW", "wstr", $sclassname, "wstr", $swindowname)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_flashwindow($hwnd, $binvert = True)
    Local $aresult = DllCall("user32.dll", "bool", "FlashWindow", "hwnd", $hwnd, "bool", $binvert)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_flashwindowex($hwnd, $iflags = 3, $icount = 3, $itimeout = 0)
    Local $tflash = DllStructCreate($tagflashwinfo)
    Local $iflash = DllStructGetSize($tflash)
    Local $imode = 0
    If BitAND($iflags, 1) <> 0 Then $imode = BitOR($imode, $flashw_caption)
    If BitAND($iflags, 2) <> 0 Then $imode = BitOR($imode, $flashw_tray)
    If BitAND($iflags, 4) <> 0 Then $imode = BitOR($imode, $flashw_timer)
    If BitAND($iflags, 8) <> 0 Then $imode = BitOR($imode, $flashw_timernofg)
    DllStructSetData($tflash, "Size", $iflash)
    DllStructSetData($tflash, "hWnd", $hwnd)
    DllStructSetData($tflash, "Flags", $imode)
    DllStructSetData($tflash, "Count", $icount)
    DllStructSetData($tflash, "Timeout", $itimeout)
    Local $aresult = DllCall("user32.dll", "bool", "FlashWindowEx", "struct*", $tflash)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_floattoint($nfloat)
    Local $tfloat = DllStructCreate("float")
    Local $tint = DllStructCreate("int", DllStructGetPtr($tfloat))
    DllStructSetData($tfloat, 1, $nfloat)
    Return DllStructGetData($tint, 1)
EndFunc

Func _winapi_flushfilebuffers($hfile)
    Local $aresult = DllCall("kernel32.dll", "bool", "FlushFileBuffers", "handle", $hfile)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_formatmessage($iflags, $psource, $imessageid, $ilanguageid, ByRef $pbuffer, $isize, $varguments)
    Local $sbuffertype = "struct*"
    If IsString($pbuffer) Then $sbuffertype = "wstr"
    Local $aresult = DllCall("kernel32.dll", "dword", "FormatMessageW", "dword", $iflags, "struct*", $psource, "dword", $imessageid, "dword", $ilanguageid, $sbuffertype, $pbuffer, "dword", $isize, "ptr", $varguments)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, 0)
    If $sbuffertype = "wstr" Then $pbuffer = $aresult[5]
    Return $aresult[0]
EndFunc

Func _winapi_framerect($hdc, $trect, $hbrush)
    Local $aresult = DllCall("user32.dll", "int", "FrameRect", "handle", $hdc, "struct*", $trect, "handle", $hbrush)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_freelibrary($hmodule)
    Local $aresult = DllCall("kernel32.dll", "bool", "FreeLibrary", "handle", $hmodule)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_getancestor($hwnd, $iflags = 1)
    Local $aresult = DllCall("user32.dll", "hwnd", "GetAncestor", "hwnd", $hwnd, "uint", $iflags)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getasynckeystate($ikey)
    Local $aresult = DllCall("user32.dll", "short", "GetAsyncKeyState", "int", $ikey)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getbkmode($hdc)
    Local $aresult = DllCall("gdi32.dll", "int", "GetBkMode", "handle", $hdc)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getclassname($hwnd)
    If NOT IsHWnd($hwnd) Then $hwnd = GUICtrlGetHandle($hwnd)
    Local $aresult = DllCall("user32.dll", "int", "GetClassNameW", "hwnd", $hwnd, "wstr", "", "int", 4096)
    If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, "")
    Return SetExtended($aresult[0], $aresult[2])
EndFunc

Func _winapi_getclientheight($hwnd)
    Local $trect = _winapi_getclientrect($hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return DllStructGetData($trect, "Bottom") - DllStructGetData($trect, "Top")
EndFunc

Func _winapi_getclientwidth($hwnd)
    Local $trect = _winapi_getclientrect($hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return DllStructGetData($trect, "Right") - DllStructGetData($trect, "Left")
EndFunc

Func _winapi_getclientrect($hwnd)
    Local $trect = DllStructCreate($tagrect)
    Local $aret = DllCall("user32.dll", "bool", "GetClientRect", "hwnd", $hwnd, "struct*", $trect)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Return $trect
EndFunc

Func _winapi_getcurrentprocess()
    Local $aresult = DllCall("kernel32.dll", "handle", "GetCurrentProcess")
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getcurrentprocessid()
    Local $aresult = DllCall("kernel32.dll", "dword", "GetCurrentProcessId")
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getcurrentthread()
    Local $aresult = DllCall("kernel32.dll", "handle", "GetCurrentThread")
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getcurrentthreadid()
    Local $aresult = DllCall("kernel32.dll", "dword", "GetCurrentThreadId")
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getcursorinfo()
    Local $tcursor = DllStructCreate($tagcursorinfo)
    Local $icursor = DllStructGetSize($tcursor)
    DllStructSetData($tcursor, "Size", $icursor)
    Local $aret = DllCall("user32.dll", "bool", "GetCursorInfo", "struct*", $tcursor)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Local $acursor[5]
    $acursor[0] = True
    $acursor[1] = DllStructGetData($tcursor, "Flags") <> 0
    $acursor[2] = DllStructGetData($tcursor, "hCursor")
    $acursor[3] = DllStructGetData($tcursor, "X")
    $acursor[4] = DllStructGetData($tcursor, "Y")
    Return $acursor
EndFunc

Func _winapi_getdc($hwnd)
    Local $aresult = DllCall("user32.dll", "handle", "GetDC", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getdesktopwindow()
    Local $aresult = DllCall("user32.dll", "hwnd", "GetDesktopWindow")
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getdevicecaps($hdc, $iindex)
    Local $aresult = DllCall("gdi32.dll", "int", "GetDeviceCaps", "handle", $hdc, "int", $iindex)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getdibits($hdc, $hbitmap, $istartscan, $iscanlines, $pbits, $tbi, $iusage)
    Local $aresult = DllCall("gdi32.dll", "int", "GetDIBits", "handle", $hdc, "handle", $hbitmap, "uint", $istartscan, "uint", $iscanlines, "struct*", $pbits, "struct*", $tbi, "uint", $iusage)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_getdlgctrlid($hwnd)
    Local $aresult = DllCall("user32.dll", "int", "GetDlgCtrlID", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getdlgitem($hwnd, $iitemid)
    Local $aresult = DllCall("user32.dll", "hwnd", "GetDlgItem", "hwnd", $hwnd, "int", $iitemid)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getfilesizeex($hfile)
    Local $aresult = DllCall("kernel32.dll", "bool", "GetFileSizeEx", "handle", $hfile, "int64*", 0)
    If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, -1)
    Return $aresult[2]
EndFunc

Func _winapi_getfocus()
    Local $aresult = DllCall("user32.dll", "hwnd", "GetFocus")
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getforegroundwindow()
    Local $aresult = DllCall("user32.dll", "hwnd", "GetForegroundWindow")
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getguiresources($iflag = 0, $hprocess = -1)
    If $hprocess = -1 Then $hprocess = _winapi_getcurrentprocess()
    Local $aresult = DllCall("user32.dll", "dword", "GetGuiResources", "handle", $hprocess, "dword", $iflag)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_geticoninfo($hicon)
    Local $tinfo = DllStructCreate($tagiconinfo)
    Local $aret = DllCall("user32.dll", "bool", "GetIconInfo", "handle", $hicon, "struct*", $tinfo)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Local $aicon[6]
    $aicon[0] = True
    $aicon[1] = DllStructGetData($tinfo, "Icon") <> 0
    $aicon[2] = DllStructGetData($tinfo, "XHotSpot")
    $aicon[3] = DllStructGetData($tinfo, "YHotSpot")
    $aicon[4] = DllStructGetData($tinfo, "hMask")
    $aicon[5] = DllStructGetData($tinfo, "hColor")
    Return $aicon
EndFunc

Func _winapi_getlasterrormessage()
    Local $ilasterror = _winapi_getlasterror()
    Local $tbufferptr = DllStructCreate("ptr")
    Local $ncount = _winapi_formatmessage(BitOR($format_message_allocate_buffer, $format_message_from_system), 0, $ilasterror, 0, $tbufferptr, 0, 0)
    If @error Then Return SetError(@error, 0, "")
    Local $stext = ""
    Local $pbuffer = DllStructGetData($tbufferptr, 1)
    If $pbuffer Then
        If $ncount > 0 Then
            Local $tbuffer = DllStructCreate("wchar[" & ($ncount + 1) & "]", $pbuffer)
            $stext = DllStructGetData($tbuffer, 1)
            If StringRight($stext, 2) = @CRLF Then $stext = StringTrimRight($stext, 2)
        EndIf
        _winapi_localfree($pbuffer)
    EndIf
    Return $stext
EndFunc

Func _winapi_getlayeredwindowattributes($hwnd, ByRef $itranscolor, ByRef $itransgui, $bcolorref = False)
    $itranscolor = -1
    $itransgui = -1
    Local $aresult = DllCall("user32.dll", "bool", "GetLayeredWindowAttributes", "hwnd", $hwnd, "INT*", $itranscolor, "byte*", $itransgui, "dword*", 0)
    If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, 0)
    If NOT $bcolorref Then
        $aresult[2] = Int(BinaryMid($aresult[2], 3, 1) & BinaryMid($aresult[2], 2, 1) & BinaryMid($aresult[2], 1, 1))
    EndIf
    $itranscolor = $aresult[2]
    $itransgui = $aresult[3]
    Return $aresult[4]
EndFunc

Func _winapi_getmodulehandle($smodulename)
    Local $smodulenametype = "wstr"
    If $smodulename = "" Then
        $smodulename = 0
        $smodulenametype = "ptr"
    EndIf
    Local $aresult = DllCall("kernel32.dll", "handle", "GetModuleHandleW", $smodulenametype, $smodulename)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getmousepos($btoclient = False, $hwnd = 0)
    Local $imode = Opt("MouseCoordMode", 1)
    Local $apos = MouseGetPos()
    Opt("MouseCoordMode", $imode)
    Local $tpoint = DllStructCreate($tagpoint)
    DllStructSetData($tpoint, "X", $apos[0])
    DllStructSetData($tpoint, "Y", $apos[1])
    If $btoclient AND NOT _winapi_screentoclient($hwnd, $tpoint) Then Return SetError(@error + 20, @extended, 0)
    Return $tpoint
EndFunc

Func _winapi_getmouseposx($btoclient = False, $hwnd = 0)
    Local $tpoint = _winapi_getmousepos($btoclient, $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return DllStructGetData($tpoint, "X")
EndFunc

Func _winapi_getmouseposy($btoclient = False, $hwnd = 0)
    Local $tpoint = _winapi_getmousepos($btoclient, $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return DllStructGetData($tpoint, "Y")
EndFunc

Func _winapi_getobject($hobject, $isize, $pobject)
    Local $aresult = DllCall("gdi32.dll", "int", "GetObjectW", "handle", $hobject, "int", $isize, "struct*", $pobject)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getopenfilename($stitle = "", $sfilter = "All files (*.*)", $sinitaldir = ".", $sdefaultfile = "", $sdefaultext = "", $ifilterindex = 1, $iflags = 0, $iflagsex = 0, $hwndowner = 0)
    Local $ipathlen = 4096
    Local $inulls = 0
    Local $tofn = DllStructCreate($tagopenfilename)
    Local $afiles[1] = [0]
    Local $iflag = $iflags
    Local $asflines = StringSplit($sfilter, "|")
    Local $asfilter[$asflines[0] * 2 + 1]
    Local $istart, $ifinal, $tagfilter
    $asfilter[0] = $asflines[0] * 2
    For $i = 1 To $asflines[0]
        $istart = StringInStr($asflines[$i], "(", 0, 1)
        $ifinal = StringInStr($asflines[$i], ")", 0, -1)
        $asfilter[$i * 2 - 1] = StringStripWS(StringLeft($asflines[$i], $istart - 1), $str_stripleading + $str_striptrailing)
        $asfilter[$i * 2] = StringStripWS(StringTrimRight(StringTrimLeft($asflines[$i], $istart), StringLen($asflines[$i]) - $ifinal + 1), $str_stripleading + $str_striptrailing)
        $tagfilter &= "wchar[" & StringLen($asfilter[$i * 2 - 1]) + 1 & "];wchar[" & StringLen($asfilter[$i * 2]) + 1 & "];"
    Next
    Local $ttitle = DllStructCreate("wchar Title[" & StringLen($stitle) + 1 & "]")
    Local $tinitialdir = DllStructCreate("wchar InitDir[" & StringLen($sinitaldir) + 1 & "]")
    Local $tfilter = DllStructCreate($tagfilter & "wchar")
    Local $tpath = DllStructCreate("wchar Path[" & $ipathlen & "]")
    Local $textn = DllStructCreate("wchar Extension[" & StringLen($sdefaultext) + 1 & "]")
    For $i = 1 To $asfilter[0]
        DllStructSetData($tfilter, $i, $asfilter[$i])
    Next
    DllStructSetData($ttitle, "Title", $stitle)
    DllStructSetData($tinitialdir, "InitDir", $sinitaldir)
    DllStructSetData($tpath, "Path", $sdefaultfile)
    DllStructSetData($textn, "Extension", $sdefaultext)
    DllStructSetData($tofn, "StructSize", DllStructGetSize($tofn))
    DllStructSetData($tofn, "hwndOwner", $hwndowner)
    DllStructSetData($tofn, "lpstrFilter", DllStructGetPtr($tfilter))
    DllStructSetData($tofn, "nFilterIndex", $ifilterindex)
    DllStructSetData($tofn, "lpstrFile", DllStructGetPtr($tpath))
    DllStructSetData($tofn, "nMaxFile", $ipathlen)
    DllStructSetData($tofn, "lpstrInitialDir", DllStructGetPtr($tinitialdir))
    DllStructSetData($tofn, "lpstrTitle", DllStructGetPtr($ttitle))
    DllStructSetData($tofn, "Flags", $iflag)
    DllStructSetData($tofn, "lpstrDefExt", DllStructGetPtr($textn))
    DllStructSetData($tofn, "FlagsEx", $iflagsex)
    Local $ares = DllCall("comdlg32.dll", "bool", "GetOpenFileNameW", "struct*", $tofn)
    If @error OR NOT $ares[0] Then Return SetError(@error + 10, @extended, $afiles)
    If BitAND($iflags, $ofn_allowmultiselect) = $ofn_allowmultiselect AND BitAND($iflags, $ofn_explorer) = $ofn_explorer Then
        For $x = 1 To $ipathlen
            If DllStructGetData($tpath, "Path", $x) = Chr(0) Then
                DllStructSetData($tpath, "Path", "|", $x)
                $inulls += 1
            Else
                $inulls = 0
            EndIf
            If $inulls = 2 Then ExitLoop
        Next
        DllStructSetData($tpath, "Path", Chr(0), $x - 1)
        $afiles = StringSplit(DllStructGetData($tpath, "Path"), "|")
        If $afiles[0] = 1 Then Return __winapi_parsefiledialogpath(DllStructGetData($tpath, "Path"))
        Return StringSplit(DllStructGetData($tpath, "Path"), "|")
    ElseIf BitAND($iflags, $ofn_allowmultiselect) = $ofn_allowmultiselect Then
        $afiles = StringSplit(DllStructGetData($tpath, "Path"), " ")
        If $afiles[0] = 1 Then Return __winapi_parsefiledialogpath(DllStructGetData($tpath, "Path"))
        Return StringSplit(StringReplace(DllStructGetData($tpath, "Path"), " ", "|"), "|")
    Else
        Return __winapi_parsefiledialogpath(DllStructGetData($tpath, "Path"))
    EndIf
EndFunc

Func _winapi_getoverlappedresult($hfile, $toverlapped, ByRef $ibytes, $bwait = False)
    Local $aresult = DllCall("kernel32.dll", "bool", "GetOverlappedResult", "handle", $hfile, "struct*", $toverlapped, "dword*", 0, "bool", $bwait)
    If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, False)
    $ibytes = $aresult[3]
    Return $aresult[0]
EndFunc

Func _winapi_getparent($hwnd)
    Local $aresult = DllCall("user32.dll", "hwnd", "GetParent", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getprocaddress($hmodule, $vname)
    Local $stype = "str"
    If IsNumber($vname) Then $stype = "word"
    Local $aresult = DllCall("kernel32.dll", "ptr", "GetProcAddress", "handle", $hmodule, $stype, $vname)
    If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getprocessaffinitymask($hprocess)
    Local $aresult = DllCall("kernel32.dll", "bool", "GetProcessAffinityMask", "handle", $hprocess, "dword_ptr*", 0, "dword_ptr*", 0)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, 0)
    Local $amask[3]
    $amask[0] = True
    $amask[1] = $aresult[2]
    $amask[2] = $aresult[3]
    Return $amask
EndFunc

Func _winapi_getsavefilename($stitle = "", $sfilter = "All files (*.*)", $sinitaldir = ".", $sdefaultfile = "", $sdefaultext = "", $ifilterindex = 1, $iflags = 0, $iflagsex = 0, $hwndowner = 0)
    Local $ipathlen = 4096
    Local $tofn = DllStructCreate($tagopenfilename)
    Local $afiles[1] = [0]
    Local $iflag = $iflags
    Local $asflines = StringSplit($sfilter, "|")
    Local $asfilter[$asflines[0] * 2 + 1]
    Local $istart, $ifinal, $tagfilter
    $asfilter[0] = $asflines[0] * 2
    For $i = 1 To $asflines[0]
        $istart = StringInStr($asflines[$i], "(", 0, 1)
        $ifinal = StringInStr($asflines[$i], ")", 0, -1)
        $asfilter[$i * 2 - 1] = StringStripWS(StringLeft($asflines[$i], $istart - 1), $str_stripleading + $str_striptrailing)
        $asfilter[$i * 2] = StringStripWS(StringTrimRight(StringTrimLeft($asflines[$i], $istart), StringLen($asflines[$i]) - $ifinal + 1), $str_stripleading + $str_striptrailing)
        $tagfilter &= "wchar[" & StringLen($asfilter[$i * 2 - 1]) + 1 & "];wchar[" & StringLen($asfilter[$i * 2]) + 1 & "];"
    Next
    Local $ttitle = DllStructCreate("wchar Title[" & StringLen($stitle) + 1 & "]")
    Local $tinitialdir = DllStructCreate("wchar InitDir[" & StringLen($sinitaldir) + 1 & "]")
    Local $tfilter = DllStructCreate($tagfilter & "wchar")
    Local $tpath = DllStructCreate("wchar Path[" & $ipathlen & "]")
    Local $textn = DllStructCreate("wchar Extension[" & StringLen($sdefaultext) + 1 & "]")
    For $i = 1 To $asfilter[0]
        DllStructSetData($tfilter, $i, $asfilter[$i])
    Next
    DllStructSetData($ttitle, "Title", $stitle)
    DllStructSetData($tinitialdir, "InitDir", $sinitaldir)
    DllStructSetData($tpath, "Path", $sdefaultfile)
    DllStructSetData($textn, "Extension", $sdefaultext)
    DllStructSetData($tofn, "StructSize", DllStructGetSize($tofn))
    DllStructSetData($tofn, "hwndOwner", $hwndowner)
    DllStructSetData($tofn, "lpstrFilter", DllStructGetPtr($tfilter))
    DllStructSetData($tofn, "nFilterIndex", $ifilterindex)
    DllStructSetData($tofn, "lpstrFile", DllStructGetPtr($tpath))
    DllStructSetData($tofn, "nMaxFile", $ipathlen)
    DllStructSetData($tofn, "lpstrInitialDir", DllStructGetPtr($tinitialdir))
    DllStructSetData($tofn, "lpstrTitle", DllStructGetPtr($ttitle))
    DllStructSetData($tofn, "Flags", $iflag)
    DllStructSetData($tofn, "lpstrDefExt", DllStructGetPtr($textn))
    DllStructSetData($tofn, "FlagsEx", $iflagsex)
    Local $ares = DllCall("comdlg32.dll", "bool", "GetSaveFileNameW", "struct*", $tofn)
    If @error OR NOT $ares[0] Then Return SetError(@error + 10, @extended, $afiles)
    Return __winapi_parsefiledialogpath(DllStructGetData($tpath, "Path"))
EndFunc

Func _winapi_getstockobject($iobject)
    Local $aresult = DllCall("gdi32.dll", "handle", "GetStockObject", "int", $iobject)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getstdhandle($istdhandle)
    If $istdhandle < 0 OR $istdhandle > 2 Then Return SetError(2, 0, -1)
    Local Const $ahandle[3] = [-10, -11, -12]
    Local $aresult = DllCall("kernel32.dll", "handle", "GetStdHandle", "dword", $ahandle[$istdhandle])
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_getsyscolor($iindex)
    Local $aresult = DllCall("user32.dll", "INT", "GetSysColor", "int", $iindex)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getsyscolorbrush($iindex)
    Local $aresult = DllCall("user32.dll", "handle", "GetSysColorBrush", "int", $iindex)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getsystemmetrics($iindex)
    Local $aresult = DllCall("user32.dll", "int", "GetSystemMetrics", "int", $iindex)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_gettextextentpoint32($hdc, $stext)
    Local $tsize = DllStructCreate($tagsize)
    Local $isize = StringLen($stext)
    Local $aret = DllCall("gdi32.dll", "bool", "GetTextExtentPoint32W", "handle", $hdc, "wstr", $stext, "int", $isize, "struct*", $tsize)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Return $tsize
EndFunc

Func _winapi_gettextmetrics($hdc)
    Local $ttextmetric = DllStructCreate($tagtextmetric)
    Local $aret = DllCall("gdi32.dll", "bool", "GetTextMetricsW", "handle", $hdc, "struct*", $ttextmetric)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Return $ttextmetric
EndFunc

Func _winapi_getwindow($hwnd, $icmd)
    Local $aresult = DllCall("user32.dll", "hwnd", "GetWindow", "hwnd", $hwnd, "uint", $icmd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getwindowdc($hwnd)
    Local $aresult = DllCall("user32.dll", "handle", "GetWindowDC", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getwindowheight($hwnd)
    Local $trect = _winapi_getwindowrect($hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return DllStructGetData($trect, "Bottom") - DllStructGetData($trect, "Top")
EndFunc

Func _winapi_getwindowlong($hwnd, $iindex)
    Local $sfuncname = "GetWindowLongW"
    If @AutoItX64 Then $sfuncname = "GetWindowLongPtrW"
    Local $aresult = DllCall("user32.dll", "long_ptr", $sfuncname, "hwnd", $hwnd, "int", $iindex)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getwindowplacement($hwnd)
    Local $twindowplacement = DllStructCreate($tagwindowplacement)
    DllStructSetData($twindowplacement, "length", DllStructGetSize($twindowplacement))
    Local $aret = DllCall("user32.dll", "bool", "GetWindowPlacement", "hwnd", $hwnd, "struct*", $twindowplacement)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Return $twindowplacement
EndFunc

Func _winapi_getwindowrect($hwnd)
    Local $trect = DllStructCreate($tagrect)
    Local $aret = DllCall("user32.dll", "bool", "GetWindowRect", "hwnd", $hwnd, "struct*", $trect)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Return $trect
EndFunc

Func _winapi_getwindowrgn($hwnd, $hrgn)
    Local $aresult = DllCall("user32.dll", "int", "GetWindowRgn", "hwnd", $hwnd, "handle", $hrgn)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_getwindowtext($hwnd)
    Local $aresult = DllCall("user32.dll", "int", "GetWindowTextW", "hwnd", $hwnd, "wstr", "", "int", 4096)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, "")
    Return SetExtended($aresult[0], $aresult[2])
EndFunc

Func _winapi_getwindowthreadprocessid($hwnd, ByRef $ipid)
    Local $aresult = DllCall("user32.dll", "dword", "GetWindowThreadProcessId", "hwnd", $hwnd, "dword*", 0)
    If @error Then Return SetError(@error, @extended, 0)
    $ipid = $aresult[2]
    Return $aresult[0]
EndFunc

Func _winapi_getwindowwidth($hwnd)
    Local $trect = _winapi_getwindowrect($hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return DllStructGetData($trect, "Right") - DllStructGetData($trect, "Left")
EndFunc

Func _winapi_getxyfrompoint(ByRef $tpoint, ByRef $ix, ByRef $iy)
    $ix = DllStructGetData($tpoint, "X")
    $iy = DllStructGetData($tpoint, "Y")
EndFunc

Func _winapi_globalmemorystatus()
    Local $tmem = DllStructCreate($tagmemorystatusex)
    DllStructSetData($tmem, 1, DllStructGetSize($tmem))
    Local $aret = DllCall("kernel32.dll", "bool", "GlobalMemoryStatusEx", "struct*", $tmem)
    If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
    Local $amem[7]
    $amem[0] = DllStructGetData($tmem, 2)
    $amem[1] = DllStructGetData($tmem, 3)
    $amem[2] = DllStructGetData($tmem, 4)
    $amem[3] = DllStructGetData($tmem, 5)
    $amem[4] = DllStructGetData($tmem, 6)
    $amem[5] = DllStructGetData($tmem, 7)
    $amem[6] = DllStructGetData($tmem, 8)
    Return $amem
EndFunc

Func _winapi_guidfromstring($sguid)
    Local $tguid = DllStructCreate($tagguid)
    _winapi_guidfromstringex($sguid, $tguid)
    If @error Then Return SetError(@error + 10, @extended, 0)
    Return $tguid
EndFunc

Func _winapi_guidfromstringex($sguid, $tguid)
    Local $aresult = DllCall("ole32.dll", "long", "CLSIDFromString", "wstr", $sguid, "struct*", $tguid)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_hiword($ilong)
    Return BitShift($ilong, 16)
EndFunc

Func _winapi_inprocess($hwnd, ByRef $hlastwnd)
    If $hwnd = $hlastwnd Then Return True
    For $ii = $__g_ainprocess_winapi[0][0] To 1 Step -1
        If $hwnd = $__g_ainprocess_winapi[$ii][0] Then
            If $__g_ainprocess_winapi[$ii][1] Then
                $hlastwnd = $hwnd
                Return True
            Else
                Return False
            EndIf
        EndIf
    Next
    Local $ipid
    _winapi_getwindowthreadprocessid($hwnd, $ipid)
    Local $icount = $__g_ainprocess_winapi[0][0] + 1
    If $icount >= 64 Then $icount = 1
    $__g_ainprocess_winapi[0][0] = $icount
    $__g_ainprocess_winapi[$icount][0] = $hwnd
    $__g_ainprocess_winapi[$icount][1] = ($ipid = @AutoItPID)
    Return $__g_ainprocess_winapi[$icount][1]
EndFunc

Func _winapi_inttofloat($iint)
    Local $tint = DllStructCreate("int")
    Local $tfloat = DllStructCreate("float", DllStructGetPtr($tint))
    DllStructSetData($tint, 1, $iint)
    Return DllStructGetData($tfloat, 1)
EndFunc

Func _winapi_isclassname($hwnd, $sclassname)
    Local $sseparator = Opt("GUIDataSeparatorChar")
    Local $aclassname = StringSplit($sclassname, $sseparator)
    If NOT IsHWnd($hwnd) Then $hwnd = GUICtrlGetHandle($hwnd)
    Local $sclasscheck = _winapi_getclassname($hwnd)
    For $x = 1 To UBound($aclassname) - 1
        If StringUpper(StringMid($sclasscheck, 1, StringLen($aclassname[$x]))) = StringUpper($aclassname[$x]) Then Return True
    Next
    Return False
EndFunc

Func _winapi_iswindow($hwnd)
    Local $aresult = DllCall("user32.dll", "bool", "IsWindow", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_iswindowvisible($hwnd)
    Local $aresult = DllCall("user32.dll", "bool", "IsWindowVisible", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_invalidaterect($hwnd, $trect = 0, $berase = True)
    Local $aresult = DllCall("user32.dll", "bool", "InvalidateRect", "hwnd", $hwnd, "struct*", $trect, "bool", $berase)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_lineto($hdc, $ix, $iy)
    Local $aresult = DllCall("gdi32.dll", "bool", "LineTo", "handle", $hdc, "int", $ix, "int", $iy)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_loadbitmap($hinstance, $sbitmap)
    Local $sbitmaptype = "int"
    If IsString($sbitmap) Then $sbitmaptype = "wstr"
    Local $aresult = DllCall("user32.dll", "handle", "LoadBitmapW", "handle", $hinstance, $sbitmaptype, $sbitmap)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_loadimage($hinstance, $simage, $itype, $ixdesired, $iydesired, $iload)
    Local $aresult, $simagetype = "int"
    If IsString($simage) Then $simagetype = "wstr"
    $aresult = DllCall("user32.dll", "handle", "LoadImageW", "handle", $hinstance, $simagetype, $simage, "uint", $itype, "int", $ixdesired, "int", $iydesired, "uint", $iload)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_loadlibrary($sfilename)
    Local $aresult = DllCall("kernel32.dll", "handle", "LoadLibraryW", "wstr", $sfilename)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_loadlibraryex($sfilename, $iflags = 0)
    Local $aresult = DllCall("kernel32.dll", "handle", "LoadLibraryExW", "wstr", $sfilename, "ptr", 0, "dword", $iflags)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_loadshell32icon($iiconid)
    Local $ticons = DllStructCreate("ptr Data")
    Local $iicons = _winapi_extracticonex("shell32.dll", $iiconid, 0, $ticons, 1)
    If @error Then Return SetError(@error, @extended, 0)
    If $iicons <= 0 Then Return SetError(10, 0, 0)
    Return DllStructGetData($ticons, "Data")
EndFunc

Func _winapi_loadstring($hinstance, $istringid)
    Local $aresult = DllCall("user32.dll", "int", "LoadStringW", "handle", $hinstance, "uint", $istringid, "wstr", "", "int", 4096)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, "")
    Return SetExtended($aresult[0], $aresult[3])
EndFunc

Func _winapi_localfree($hmemory)
    Local $aresult = DllCall("kernel32.dll", "handle", "LocalFree", "handle", $hmemory)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_loword($ilong)
    Return BitAND($ilong, 65535)
EndFunc

Func _winapi_makelangid($ilngidprimary, $ilngidsub)
    Return BitOR(BitShift($ilngidsub, -10), $ilngidprimary)
EndFunc

Func _winapi_makelcid($ilngid, $isortid)
    Return BitOR(BitShift($isortid, -16), $ilngid)
EndFunc

Func _winapi_makelong($ilo, $ihi)
    Return BitOR(BitShift($ihi, -16), BitAND($ilo, 65535))
EndFunc

Func _winapi_makeqword($ilodword, $ihidword)
    Local $tint64 = DllStructCreate("uint64")
    Local $tdwords = DllStructCreate("dword;dword", DllStructGetPtr($tint64))
    DllStructSetData($tdwords, 1, $ilodword)
    DllStructSetData($tdwords, 2, $ihidword)
    Return DllStructGetData($tint64, 1)
EndFunc

Func _winapi_messagebeep($itype = 1)
    Local $isound
    Switch $itype
        Case 1
            $isound = 0
        Case 2
            $isound = 16
        Case 3
            $isound = 32
        Case 4
            $isound = 48
        Case 5
            $isound = 64
        Case Else
            $isound = -1
    EndSwitch
    Local $aresult = DllCall("user32.dll", "bool", "MessageBeep", "uint", $isound)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_msgbox($iflags, $stitle, $stext)
    BlockInput(0)
    MsgBox($iflags, $stitle, $stext & "      ")
EndFunc

Func _winapi_mouse_event($iflags, $ix = 0, $iy = 0, $idata = 0, $iextrainfo = 0)
    DllCall("user32.dll", "none", "mouse_event", "dword", $iflags, "dword", $ix, "dword", $iy, "dword", $idata, "ulong_ptr", $iextrainfo)
    If @error Then Return SetError(@error, @extended)
EndFunc

Func _winapi_moveto($hdc, $ix, $iy)
    Local $aresult = DllCall("gdi32.dll", "bool", "MoveToEx", "handle", $hdc, "int", $ix, "int", $iy, "ptr", 0)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_movewindow($hwnd, $ix, $iy, $iwidth, $iheight, $brepaint = True)
    Local $aresult = DllCall("user32.dll", "bool", "MoveWindow", "hwnd", $hwnd, "int", $ix, "int", $iy, "int", $iwidth, "int", $iheight, "bool", $brepaint)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_muldiv($inumber, $inumerator, $idenominator)
    Local $aresult = DllCall("kernel32.dll", "int", "MulDiv", "int", $inumber, "int", $inumerator, "int", $idenominator)
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_multibytetowidechar($vtext, $icodepage = 0, $iflags = 0, $bretstring = False)
    Local $stexttype = "str"
    If NOT IsString($vtext) Then $stexttype = "struct*"
    Local $aresult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $icodepage, "dword", $iflags, $stexttype, $vtext, "int", -1, "ptr", 0, "int", 0)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, 0)
    Local $iout = $aresult[0]
    Local $tout = DllStructCreate("wchar[" & $iout & "]")
    $aresult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $icodepage, "dword", $iflags, $stexttype, $vtext, "int", -1, "struct*", $tout, "int", $iout)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 20, @extended, 0)
    If $bretstring Then Return DllStructGetData($tout, 1)
    Return $tout
EndFunc

Func _winapi_multibytetowidecharex($stext, $ptext, $icodepage = 0, $iflags = 0)
    Local $aresult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $icodepage, "dword", $iflags, "STR", $stext, "int", -1, "struct*", $ptext, "int", (StringLen($stext) + 1) * 2)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_openprocess($iaccess, $binherit, $ipid, $bdebugpriv = False)
    Local $aresult = DllCall("kernel32.dll", "handle", "OpenProcess", "dword", $iaccess, "bool", $binherit, "dword", $ipid)
    If @error Then Return SetError(@error, @extended, 0)
    If $aresult[0] Then Return $aresult[0]
    If NOT $bdebugpriv Then Return SetError(100, 0, 0)
    Local $htoken = _security__openthreadtokenex(BitOR($token_adjust_privileges, $token_query))
    If @error Then Return SetError(@error + 10, @extended, 0)
    _security__setprivilege($htoken, "SeDebugPrivilege", True)
    Local $ierror = @error
    Local $iextended = @extended
    Local $iret = 0
    If NOT @error Then
        $aresult = DllCall("kernel32.dll", "handle", "OpenProcess", "dword", $iaccess, "bool", $binherit, "dword", $ipid)
        $ierror = @error
        $iextended = @extended
        If $aresult[0] Then $iret = $aresult[0]
        _security__setprivilege($htoken, "SeDebugPrivilege", False)
        If @error Then
            $ierror = @error + 20
            $iextended = @extended
        EndIf
    Else
        $ierror = @error + 30
    EndIf
    _winapi_closehandle($htoken)
    Return SetError($ierror, $iextended, $iret)
EndFunc

Func __winapi_parsefiledialogpath($spath)
    Local $afiles[3]
    $afiles[0] = 2
    Local $stemp = StringMid($spath, 1, StringInStr($spath, "\", 0, -1) - 1)
    $afiles[1] = $stemp
    $afiles[2] = StringMid($spath, StringInStr($spath, "\", 0, -1) + 1)
    Return $afiles
EndFunc

Func _winapi_pathfindonpath(Const $sfilepath, $aextrapaths = "", Const $spathdelimiter = @LF)
    Local $iextracount = 0
    If IsString($aextrapaths) Then
        If StringLen($aextrapaths) Then
            $aextrapaths = StringSplit($aextrapaths, $spathdelimiter, $str_entiresplit + $str_nocount)
            $iextracount = UBound($aextrapaths, $ubound_rows)
        EndIf
    ElseIf IsArray($aextrapaths) Then
        $iextracount = UBound($aextrapaths)
    EndIf
    Local $tpaths, $tpathptrs
    If $iextracount Then
        Local $tagstruct = ""
        For $path In $aextrapaths
            $tagstruct &= "wchar[" & StringLen($path) + 1 & "];"
        Next
        $tpaths = DllStructCreate($tagstruct)
        $tpathptrs = DllStructCreate("ptr[" & $iextracount + 1 & "]")
        For $i = 1 To $iextracount
            DllStructSetData($tpaths, $i, $aextrapaths[$i - 1])
            DllStructSetData($tpathptrs, 1, DllStructGetPtr($tpaths, $i), $i)
        Next
        DllStructSetData($tpathptrs, 1, Ptr(0), $iextracount + 1)
    EndIf
    Local $aresult = DllCall("shlwapi.dll", "bool", "PathFindOnPathW", "wstr", $sfilepath, "struct*", $tpathptrs)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, $sfilepath)
    Return $aresult[1]
EndFunc

Func _winapi_pointfromrect(ByRef $trect, $bcenter = True)
    Local $ix1 = DllStructGetData($trect, "Left")
    Local $iy1 = DllStructGetData($trect, "Top")
    Local $ix2 = DllStructGetData($trect, "Right")
    Local $iy2 = DllStructGetData($trect, "Bottom")
    If $bcenter Then
        $ix1 = $ix1 + (($ix2 - $ix1) / 2)
        $iy1 = $iy1 + (($iy2 - $iy1) / 2)
    EndIf
    Local $tpoint = DllStructCreate($tagpoint)
    DllStructSetData($tpoint, "X", $ix1)
    DllStructSetData($tpoint, "Y", $iy1)
    Return $tpoint
EndFunc

Func _winapi_postmessage($hwnd, $imsg, $wparam, $lparam)
    Local $aresult = DllCall("user32.dll", "bool", "PostMessage", "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_primarylangid($ilngid)
    Return BitAND($ilngid, 1023)
EndFunc

Func _winapi_ptinrect(ByRef $trect, ByRef $tpoint)
    Local $aresult = DllCall("user32.dll", "bool", "PtInRect", "struct*", $trect, "struct", $tpoint)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_readfile($hfile, $pbuffer, $itoread, ByRef $iread, $toverlapped = 0)
    Local $aresult = DllCall("kernel32.dll", "bool", "ReadFile", "handle", $hfile, "struct*", $pbuffer, "dword", $itoread, "dword*", 0, "struct*", $toverlapped)
    If @error Then Return SetError(@error, @extended, False)
    $iread = $aresult[4]
    Return $aresult[0]
EndFunc

Func _winapi_readprocessmemory($hprocess, $pbaseaddress, $pbuffer, $isize, ByRef $iread)
    Local $aresult = DllCall("kernel32.dll", "bool", "ReadProcessMemory", "handle", $hprocess, "ptr", $pbaseaddress, "struct*", $pbuffer, "ulong_ptr", $isize, "ulong_ptr*", 0)
    If @error Then Return SetError(@error, @extended, False)
    $iread = $aresult[5]
    Return $aresult[0]
EndFunc

Func _winapi_rectisempty(ByRef $trect)
    Return (DllStructGetData($trect, "Left") = 0) AND (DllStructGetData($trect, "Top") = 0) AND (DllStructGetData($trect, "Right") = 0) AND (DllStructGetData($trect, "Bottom") = 0)
EndFunc

Func _winapi_redrawwindow($hwnd, $trect = 0, $hregion = 0, $iflags = 5)
    Local $aresult = DllCall("user32.dll", "bool", "RedrawWindow", "hwnd", $hwnd, "struct*", $trect, "handle", $hregion, "uint", $iflags)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_registerwindowmessage($smessage)
    Local $aresult = DllCall("user32.dll", "uint", "RegisterWindowMessageW", "wstr", $smessage)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_releasecapture()
    Local $aresult = DllCall("user32.dll", "bool", "ReleaseCapture")
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_releasedc($hwnd, $hdc)
    Local $aresult = DllCall("user32.dll", "int", "ReleaseDC", "hwnd", $hwnd, "handle", $hdc)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_screentoclient($hwnd, ByRef $tpoint)
    Local $aresult = DllCall("user32.dll", "bool", "ScreenToClient", "hwnd", $hwnd, "struct*", $tpoint)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_selectobject($hdc, $hgdiobj)
    Local $aresult = DllCall("gdi32.dll", "handle", "SelectObject", "handle", $hdc, "handle", $hgdiobj)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setbkcolor($hdc, $icolor)
    Local $aresult = DllCall("gdi32.dll", "INT", "SetBkColor", "handle", $hdc, "INT", $icolor)
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_setbkmode($hdc, $ibkmode)
    Local $aresult = DllCall("gdi32.dll", "int", "SetBkMode", "handle", $hdc, "int", $ibkmode)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_setcapture($hwnd)
    Local $aresult = DllCall("user32.dll", "hwnd", "SetCapture", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_setcursor($hcursor)
    Local $aresult = DllCall("user32.dll", "handle", "SetCursor", "handle", $hcursor)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_setdefaultprinter($sprinter)
    Local $aresult = DllCall("winspool.drv", "bool", "SetDefaultPrinterW", "wstr", $sprinter)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setdibits($hdc, $hbitmap, $istartscan, $iscanlines, $pbits, $tbmi, $icoloruse = 0)
    Local $aresult = DllCall("gdi32.dll", "int", "SetDIBits", "handle", $hdc, "handle", $hbitmap, "uint", $istartscan, "uint", $iscanlines, "struct*", $pbits, "struct*", $tbmi, "INT", $icoloruse)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setendoffile($hfile)
    Local $aresult = DllCall("kernel32.dll", "bool", "SetEndOfFile", "handle", $hfile)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setevent($hevent)
    Local $aresult = DllCall("kernel32.dll", "bool", "SetEvent", "handle", $hevent)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setfilepointer($hfile, $ipos, $imethod = 0)
    Local $aresult = DllCall("kernel32.dll", "INT", "SetFilePointer", "handle", $hfile, "long", $ipos, "ptr", 0, "long", $imethod)
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_setfocus($hwnd)
    Local $aresult = DllCall("user32.dll", "hwnd", "SetFocus", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_setfont($hwnd, $hfont, $bredraw = True)
    _sendmessage($hwnd, $__winapiconstant_wm_setfont, $hfont, $bredraw, 0, "hwnd")
EndFunc

Func _winapi_sethandleinformation($hobject, $imask, $iflags)
    Local $aresult = DllCall("kernel32.dll", "bool", "SetHandleInformation", "handle", $hobject, "dword", $imask, "dword", $iflags)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setlayeredwindowattributes($hwnd, $itranscolor, $itransgui = 255, $iflags = 3, $bcolorref = False)
    If $iflags = Default OR $iflags = "" OR $iflags < 0 Then $iflags = 3
    If NOT $bcolorref Then
        $itranscolor = Int(BinaryMid($itranscolor, 3, 1) & BinaryMid($itranscolor, 2, 1) & BinaryMid($itranscolor, 1, 1))
    EndIf
    Local $aresult = DllCall("user32.dll", "bool", "SetLayeredWindowAttributes", "hwnd", $hwnd, "INT", $itranscolor, "byte", $itransgui, "dword", $iflags)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setparent($hwndchild, $hwndparent)
    Local $aresult = DllCall("user32.dll", "hwnd", "SetParent", "hwnd", $hwndchild, "hwnd", $hwndparent)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_setprocessaffinitymask($hprocess, $imask)
    Local $aresult = DllCall("kernel32.dll", "bool", "SetProcessAffinityMask", "handle", $hprocess, "ulong_ptr", $imask)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setsyscolors($velements, $vcolors)
    Local $bisearray = IsArray($velements), $biscarray = IsArray($vcolors)
    Local $ielementnum
    If NOT $biscarray AND NOT $bisearray Then
        $ielementnum = 1
    ElseIf $biscarray OR $bisearray Then
        If NOT $biscarray OR NOT $bisearray Then Return SetError(-1, -1, False)
        If UBound($velements) <> UBound($vcolors) Then Return SetError(-1, -1, False)
        $ielementnum = UBound($velements)
    EndIf
    Local $telements = DllStructCreate("int Element[" & $ielementnum & "]")
    Local $tcolors = DllStructCreate("INT NewColor[" & $ielementnum & "]")
    If NOT $bisearray Then
        DllStructSetData($telements, "Element", $velements, 1)
    Else
        For $x = 0 To $ielementnum - 1
            DllStructSetData($telements, "Element", $velements[$x], $x + 1)
        Next
    EndIf
    If NOT $biscarray Then
        DllStructSetData($tcolors, "NewColor", $vcolors, 1)
    Else
        For $x = 0 To $ielementnum - 1
            DllStructSetData($tcolors, "NewColor", $vcolors[$x], $x + 1)
        Next
    EndIf
    Local $aresult = DllCall("user32.dll", "bool", "SetSysColors", "int", $ielementnum, "struct*", $telements, "struct*", $tcolors)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_settextcolor($hdc, $icolor)
    Local $aresult = DllCall("gdi32.dll", "INT", "SetTextColor", "handle", $hdc, "INT", $icolor)
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_setwindowlong($hwnd, $iindex, $ivalue)
    _winapi_setlasterror(0)
    Local $sfuncname = "SetWindowLongW"
    If @AutoItX64 Then $sfuncname = "SetWindowLongPtrW"
    Local $aresult = DllCall("user32.dll", "long_ptr", $sfuncname, "hwnd", $hwnd, "int", $iindex, "long_ptr", $ivalue)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_setwindowplacement($hwnd, $twindowplacement)
    Local $aresult = DllCall("user32.dll", "bool", "SetWindowPlacement", "hwnd", $hwnd, "struct*", $twindowplacement)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setwindowpos($hwnd, $hafter, $ix, $iy, $icx, $icy, $iflags)
    Local $aresult = DllCall("user32.dll", "bool", "SetWindowPos", "hwnd", $hwnd, "hwnd", $hafter, "int", $ix, "int", $iy, "int", $icx, "int", $icy, "uint", $iflags)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setwindowrgn($hwnd, $hrgn, $bredraw = True)
    Local $aresult = DllCall("user32.dll", "int", "SetWindowRgn", "hwnd", $hwnd, "handle", $hrgn, "bool", $bredraw)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_setwindowshookex($ihook, $pproc, $hdll, $ithreadid = 0)
    Local $aresult = DllCall("user32.dll", "handle", "SetWindowsHookEx", "int", $ihook, "ptr", $pproc, "handle", $hdll, "dword", $ithreadid)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_setwindowtext($hwnd, $stext)
    Local $aresult = DllCall("user32.dll", "bool", "SetWindowTextW", "hwnd", $hwnd, "wstr", $stext)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_showcursor($bshow)
    Local $aresult = DllCall("user32.dll", "int", "ShowCursor", "bool", $bshow)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_showerror($stext, $bexit = True)
    _winapi_msgbox($mb_systemmodal, "Error", $stext)
    If $bexit Then Exit
EndFunc

Func _winapi_showmsg($stext)
    _winapi_msgbox($mb_systemmodal, "Information", $stext)
EndFunc

Func _winapi_showwindow($hwnd, $icmdshow = 5)
    Local $aresult = DllCall("user32.dll", "bool", "ShowWindow", "hwnd", $hwnd, "int", $icmdshow)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_stringfromguid($tguid)
    Local $aresult = DllCall("ole32.dll", "int", "StringFromGUID2", "struct*", $tguid, "wstr", "", "int", 40)
    If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, "")
    Return SetExtended($aresult[0], $aresult[2])
EndFunc

Func _winapi_stringlena(Const ByRef $tstring)
    Local $aresult = DllCall("kernel32.dll", "int", "lstrlenA", "struct*", $tstring)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_stringlenw(Const ByRef $tstring)
    Local $aresult = DllCall("kernel32.dll", "int", "lstrlenW", "struct*", $tstring)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_sublangid($ilngid)
    Return BitShift($ilngid, 10)
EndFunc

Func _winapi_systemparametersinfo($iaction, $iparam = 0, $vparam = 0, $iwinini = 0)
    Local $aresult = DllCall("user32.dll", "bool", "SystemParametersInfoW", "uint", $iaction, "uint", $iparam, "struct*", $vparam, "uint", $iwinini)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_twipsperpixelx()
    Local $hdc, $itwipsperpixelx
    $hdc = _winapi_getdc(0)
    $itwipsperpixelx = 1440 / _winapi_getdevicecaps($hdc, $__winapiconstant_logpixelsx)
    _winapi_releasedc(0, $hdc)
    Return $itwipsperpixelx
EndFunc

Func _winapi_twipsperpixely()
    Local $hdc, $itwipsperpixely
    $hdc = _winapi_getdc(0)
    $itwipsperpixely = 1440 / _winapi_getdevicecaps($hdc, $__winapiconstant_logpixelsy)
    _winapi_releasedc(0, $hdc)
    Return $itwipsperpixely
EndFunc

Func _winapi_unhookwindowshookex($hhook)
    Local $aresult = DllCall("user32.dll", "bool", "UnhookWindowsHookEx", "handle", $hhook)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_updatelayeredwindow($hwnd, $hdestdc, $tptdest, $tsize, $hsrcdc, $tptsrce, $irgb, $tblend, $iflags)
    Local $aresult = DllCall("user32.dll", "bool", "UpdateLayeredWindow", "hwnd", $hwnd, "handle", $hdestdc, "struct*", $tptdest, "struct*", $tsize, "handle", $hsrcdc, "struct*", $tptsrce, "dword", $irgb, "struct*", $tblend, "dword", $iflags)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_updatewindow($hwnd)
    Local $aresult = DllCall("user32.dll", "bool", "UpdateWindow", "hwnd", $hwnd)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_waitforinputidle($hprocess, $itimeout = -1)
    Local $aresult = DllCall("user32.dll", "dword", "WaitForInputIdle", "handle", $hprocess, "dword", $itimeout)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_waitformultipleobjects($icount, $pahandles, $bwaitall = False, $itimeout = -1)
    Local $aresult = DllCall("kernel32.dll", "INT", "WaitForMultipleObjects", "dword", $icount, "struct*", $pahandles, "bool", $bwaitall, "dword", $itimeout)
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_waitforsingleobject($hhandle, $itimeout = -1)
    Local $aresult = DllCall("kernel32.dll", "INT", "WaitForSingleObject", "handle", $hhandle, "dword", $itimeout)
    If @error Then Return SetError(@error, @extended, -1)
    Return $aresult[0]
EndFunc

Func _winapi_widechartomultibyte($vunicode, $icodepage = 0, $bretstring = True)
    Local $sunicodetype = "wstr"
    If NOT IsString($vunicode) Then $sunicodetype = "struct*"
    Local $aresult = DllCall("kernel32.dll", "int", "WideCharToMultiByte", "uint", $icodepage, "dword", 0, $sunicodetype, $vunicode, "int", -1, "ptr", 0, "int", 0, "ptr", 0, "ptr", 0)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 20, @extended, "")
    Local $tmultibyte = DllStructCreate("char[" & $aresult[0] & "]")
    $aresult = DllCall("kernel32.dll", "int", "WideCharToMultiByte", "uint", $icodepage, "dword", 0, $sunicodetype, $vunicode, "int", -1, "struct*", $tmultibyte, "int", $aresult[0], "ptr", 0, "ptr", 0)
    If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, "")
    If $bretstring Then Return DllStructGetData($tmultibyte, 1)
    Return $tmultibyte
EndFunc

Func _winapi_windowfrompoint(ByRef $tpoint)
    Local $aresult = DllCall("user32.dll", "hwnd", "WindowFromPoint", "struct", $tpoint)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aresult[0]
EndFunc

Func _winapi_writeconsole($hconsole, $stext)
    Local $aresult = DllCall("kernel32.dll", "bool", "WriteConsoleW", "handle", $hconsole, "wstr", $stext, "dword", StringLen($stext), "dword*", 0, "ptr", 0)
    If @error Then Return SetError(@error, @extended, False)
    Return $aresult[0]
EndFunc

Func _winapi_writefile($hfile, $pbuffer, $itowrite, ByRef $iwritten, $toverlapped = 0)
    Local $aresult = DllCall("kernel32.dll", "bool", "WriteFile", "handle", $hfile, "struct*", $pbuffer, "dword", $itowrite, "dword*", 0, "struct*", $toverlapped)
    If @error Then Return SetError(@error, @extended, False)
    $iwritten = $aresult[4]
    Return $aresult[0]
EndFunc

Func _winapi_writeprocessmemory($hprocess, $pbaseaddress, $pbuffer, $isize, ByRef $iwritten, $sbuffer = "ptr")
    Local $aresult = DllCall("kernel32.dll", "bool", "WriteProcessMemory", "handle", $hprocess, "ptr", $pbaseaddress, $sbuffer, $pbuffer, "ulong_ptr", $isize, "ulong_ptr*", 0)
    If @error Then Return SetError(@error, @extended, False)
    $iwritten = $aresult[5]
    Return $aresult[0]
EndFunc

Global Const $_udf_globalids_offset = 2
Global Const $_udf_globalid_max_win = 16
Global Const $_udf_startid = 10000
Global Const $_udf_globalid_max_ids = 55535
Global Const $__udfguiconstant_ws_tabstop = 65536
Global Const $__udfguiconstant_ws_visible = 268435456
Global Const $__udfguiconstant_ws_child = 1073741824
Global $__g_audf_globalids_used[$_udf_globalid_max_win][$_udf_globalid_max_ids + $_udf_globalids_offset + 1]

Func __udf_getnextglobalid($hwnd)
    Local $nctrlid, $iusedindex = -1, $ballused = True
    If NOT WinExists($hwnd) Then Return SetError(-1, -1, 0)
    For $iindex = 0 To $_udf_globalid_max_win - 1
        If $__g_audf_globalids_used[$iindex][0] <> 0 Then
            If NOT WinExists($__g_audf_globalids_used[$iindex][0]) Then
                For $x = 0 To UBound($__g_audf_globalids_used, $ubound_columns) - 1
                    $__g_audf_globalids_used[$iindex][$x] = 0
                Next
                $__g_audf_globalids_used[$iindex][1] = $_udf_startid
                $ballused = False
            EndIf
        EndIf
    Next
    For $iindex = 0 To $_udf_globalid_max_win - 1
        If $__g_audf_globalids_used[$iindex][0] = $hwnd Then
            $iusedindex = $iindex
            ExitLoop
        EndIf
    Next
    If $iusedindex = -1 Then
        For $iindex = 0 To $_udf_globalid_max_win - 1
            If $__g_audf_globalids_used[$iindex][0] = 0 Then
                $__g_audf_globalids_used[$iindex][0] = $hwnd
                $__g_audf_globalids_used[$iindex][1] = $_udf_startid
                $ballused = False
                $iusedindex = $iindex
                ExitLoop
            EndIf
        Next
    EndIf
    If $iusedindex = -1 AND $ballused Then Return SetError(16, 0, 0)
    If $__g_audf_globalids_used[$iusedindex][1] = $_udf_startid + $_udf_globalid_max_ids Then
        For $iidindex = $_udf_globalids_offset To UBound($__g_audf_globalids_used, $ubound_columns) - 1
            If $__g_audf_globalids_used[$iusedindex][$iidindex] = 0 Then
                $nctrlid = ($iidindex - $_udf_globalids_offset) + 10000
                $__g_audf_globalids_used[$iusedindex][$iidindex] = $nctrlid
                Return $nctrlid
            EndIf
        Next
        Return SetError(-1, $_udf_globalid_max_ids, 0)
    EndIf
    $nctrlid = $__g_audf_globalids_used[$iusedindex][1]
    $__g_audf_globalids_used[$iusedindex][1] += 1
    $__g_audf_globalids_used[$iusedindex][($nctrlid - 10000) + $_udf_globalids_offset] = $nctrlid
    Return $nctrlid
EndFunc

Func __udf_freeglobalid($hwnd, $iglobalid)
    If $iglobalid - $_udf_startid < 0 OR $iglobalid - $_udf_startid > $_udf_globalid_max_ids Then Return SetError(-1, 0, False)
    For $iindex = 0 To $_udf_globalid_max_win - 1
        If $__g_audf_globalids_used[$iindex][0] = $hwnd Then
            For $x = $_udf_globalids_offset To UBound($__g_audf_globalids_used, $ubound_columns) - 1
                If $__g_audf_globalids_used[$iindex][$x] = $iglobalid Then
                    $__g_audf_globalids_used[$iindex][$x] = 0
                    Return True
                EndIf
            Next
            Return SetError(-3, 0, False)
        EndIf
    Next
    Return SetError(-2, 0, False)
EndFunc

Global $__g_hsblastwnd
Global Const $__statusbarconstant_classname = "msctls_statusbar32"
Global Const $__statusbarconstant_wm_size = 5
Global Const $__statusbarconstant_clr_default = -16777216
Global Const $tagborders = "int BX;int BY;int RX"

Func _guictrlstatusbar_create($hwnd, $vpartedge = -1, $vparttext = "", $istyles = -1, $iexstyles = 0)
    If NOT IsHWnd($hwnd) Then Return SetError(1, 0, 0)
    Local $istyle = BitOR($__udfguiconstant_ws_child, $__udfguiconstant_ws_visible)
    If $istyles = -1 Then $istyles = 0
    If $iexstyles = -1 Then $iexstyles = 0
    Local $apartwidth[1], $aparttext[1]
    If @NumParams > 1 Then
        If IsArray($vpartedge) Then
            $apartwidth = $vpartedge
        Else
            $apartwidth[0] = $vpartedge
        EndIf
        If @NumParams = 2 Then
            ReDim $aparttext[UBound($apartwidth)]
        Else
            If IsArray($vparttext) Then
                $aparttext = $vparttext
            Else
                $aparttext[0] = $vparttext
            EndIf
            If UBound($apartwidth) <> UBound($aparttext) Then
                Local $ilast
                If UBound($apartwidth) > UBound($aparttext) Then
                    $ilast = UBound($aparttext)
                    ReDim $aparttext[UBound($apartwidth)]
                Else
                    $ilast = UBound($apartwidth)
                    ReDim $apartwidth[UBound($aparttext)]
                    For $x = $ilast To UBound($apartwidth) - 1
                        $apartwidth[$x] = $apartwidth[$x - 1] + 75
                    Next
                    $apartwidth[UBound($aparttext) - 1] = -1
                EndIf
            EndIf
        EndIf
        If NOT IsHWnd($hwnd) Then $hwnd = HWnd($hwnd)
        If @NumParams > 3 Then $istyle = BitOR($istyle, $istyles)
    EndIf
    Local $nctrlid = __udf_getnextglobalid($hwnd)
    If @error Then Return SetError(@error, @extended, 0)
    Local $hwndsbar = _winapi_createwindowex($iexstyles, $__statusbarconstant_classname, "", $istyle, 0, 0, 0, 0, $hwnd, $nctrlid)
    If @error Then Return SetError(@error, @extended, 0)
    If @NumParams > 1 Then
        _guictrlstatusbar_setparts($hwndsbar, UBound($apartwidth), $apartwidth)
        For $x = 0 To UBound($aparttext) - 1
            _guictrlstatusbar_settext($hwndsbar, $aparttext[$x], $x)
        Next
    EndIf
    Return $hwndsbar
EndFunc

Func _guictrlstatusbar_destroy(ByRef $hwnd)
    If NOT _winapi_isclassname($hwnd, $__statusbarconstant_classname) Then Return SetError(2, 2, False)
    Local $idestroyed = 0
    If IsHWnd($hwnd) Then
        If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
            Local $nctrlid = _winapi_getdlgctrlid($hwnd)
            Local $hparent = _winapi_getparent($hwnd)
            $idestroyed = _winapi_destroywindow($hwnd)
            Local $iret = __udf_freeglobalid($hparent, $nctrlid)
            If NOT $iret Then
            EndIf
        Else
            Return SetError(1, 1, False)
        EndIf
    EndIf
    If $idestroyed Then $hwnd = 0
    Return $idestroyed <> 0
EndFunc

Func _guictrlstatusbar_embedcontrol($hwnd, $ipart, $hcontrol, $ifit = 4)
    Local $arect = _guictrlstatusbar_getrect($hwnd, $ipart)
    Local $ibarx = $arect[0]
    Local $ibary = $arect[1]
    Local $ibarw = $arect[2] - $ibarx
    Local $ibarh = $arect[3] - $ibary
    Local $iconx = $ibarx
    Local $icony = $ibary
    Local $iconw = _winapi_getwindowwidth($hcontrol)
    Local $iconh = _winapi_getwindowheight($hcontrol)
    If $iconw > $ibarw Then $iconw = $ibarw
    If $iconh > $ibarh Then $iconh = $ibarh
    Local $ipadx = ($ibarw - $iconw) / 2
    Local $ipady = ($ibarh - $iconh) / 2
    If $ipadx < 0 Then $ipadx = 0
    If $ipady < 0 Then $ipady = 0
    If BitAND($ifit, 1) = 1 Then $iconx = $ibarx + $ipadx
    If BitAND($ifit, 2) = 2 Then $icony = $ibary + $ipady
    If BitAND($ifit, 4) = 4 Then
        $ipadx = _guictrlstatusbar_getbordersrect($hwnd)
        $ipady = _guictrlstatusbar_getbordersvert($hwnd)
        $iconx = $ibarx
        If _guictrlstatusbar_issimple($hwnd) Then $iconx += $ipadx
        $icony = $ibary + $ipady
        $iconw = $ibarw - ($ipadx * 2)
        $iconh = $ibarh - ($ipady * 2)
    EndIf
    _winapi_setparent($hcontrol, $hwnd)
    _winapi_movewindow($hcontrol, $iconx, $icony, $iconw, $iconh)
EndFunc

Func _guictrlstatusbar_getborders($hwnd)
    Local $tborders = DllStructCreate($tagborders)
    Local $iret
    If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
        $iret = _sendmessage($hwnd, $sb_getborders, 0, $tborders, 0, "wparam", "struct*")
    Else
        Local $isize = DllStructGetSize($tborders)
        Local $tmemmap
        Local $pmemory = _meminit($hwnd, $isize, $tmemmap)
        $iret = _sendmessage($hwnd, $sb_getborders, 0, $pmemory, 0, "wparam", "ptr")
        _memread($tmemmap, $pmemory, $tborders, $isize)
        _memfree($tmemmap)
    EndIf
    Local $aborders[3]
    If $iret = 0 Then Return SetError(-1, -1, $aborders)
    $aborders[0] = DllStructGetData($tborders, "BX")
    $aborders[1] = DllStructGetData($tborders, "BY")
    $aborders[2] = DllStructGetData($tborders, "RX")
    Return $aborders
EndFunc

Func _guictrlstatusbar_getbordershorz($hwnd)
    Local $aborders = _guictrlstatusbar_getborders($hwnd)
    Return SetError(@error, @extended, $aborders[0])
EndFunc

Func _guictrlstatusbar_getbordersrect($hwnd)
    Local $aborders = _guictrlstatusbar_getborders($hwnd)
    Return SetError(@error, @extended, $aborders[2])
EndFunc

Func _guictrlstatusbar_getbordersvert($hwnd)
    Local $aborders = _guictrlstatusbar_getborders($hwnd)
    Return SetError(@error, @extended, $aborders[1])
EndFunc

Func _guictrlstatusbar_getcount($hwnd)
    Return _sendmessage($hwnd, $sb_getparts)
EndFunc

Func _guictrlstatusbar_getheight($hwnd)
    Local $trect = _guictrlstatusbar_getrectex($hwnd, 0)
    Return DllStructGetData($trect, "Bottom") - DllStructGetData($trect, "Top") - (_guictrlstatusbar_getbordersvert($hwnd) * 2)
EndFunc

Func _guictrlstatusbar_geticon($hwnd, $iindex = 0)
    Return _sendmessage($hwnd, $sb_geticon, $iindex, 0, 0, "wparam", "lparam", "handle")
EndFunc

Func _guictrlstatusbar_getparts($hwnd)
    Local $icount = _guictrlstatusbar_getcount($hwnd)
    Local $tparts = DllStructCreate("int[" & $icount & "]")
    Local $aparts[$icount + 1]
    If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
        $aparts[0] = _sendmessage($hwnd, $sb_getparts, $icount, $tparts, 0, "wparam", "struct*")
    Else
        Local $iparts = DllStructGetSize($tparts)
        Local $tmemmap
        Local $pmemory = _meminit($hwnd, $iparts, $tmemmap)
        $aparts[0] = _sendmessage($hwnd, $sb_getparts, $icount, $pmemory, 0, "wparam", "ptr")
        _memread($tmemmap, $pmemory, $tparts, $iparts)
        _memfree($tmemmap)
    EndIf
    For $ii = 1 To $icount
        $aparts[$ii] = DllStructGetData($tparts, 1, $ii)
    Next
    Return $aparts
EndFunc

Func _guictrlstatusbar_getrect($hwnd, $ipart)
    Local $trect = _guictrlstatusbar_getrectex($hwnd, $ipart)
    If @error Then Return SetError(@error, 0, 0)
    Local $arect[4]
    $arect[0] = DllStructGetData($trect, "Left")
    $arect[1] = DllStructGetData($trect, "Top")
    $arect[2] = DllStructGetData($trect, "Right")
    $arect[3] = DllStructGetData($trect, "Bottom")
    Return $arect
EndFunc

Func _guictrlstatusbar_getrectex($hwnd, $ipart)
    Local $trect = DllStructCreate($tagrect)
    Local $iret
    If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
        $iret = _sendmessage($hwnd, $sb_getrect, $ipart, $trect, 0, "wparam", "struct*")
    Else
        Local $irect = DllStructGetSize($trect)
        Local $tmemmap
        Local $pmemory = _meminit($hwnd, $irect, $tmemmap)
        $iret = _sendmessage($hwnd, $sb_getrect, $ipart, $pmemory, 0, "wparam", "ptr")
        _memread($tmemmap, $pmemory, $trect, $irect)
        _memfree($tmemmap)
    EndIf
    Return SetError($iret = 0, 0, $trect)
EndFunc

Func _guictrlstatusbar_gettext($hwnd, $ipart)
    Local $bunicode = _guictrlstatusbar_getunicodeformat($hwnd)
    Local $ibuffer = _guictrlstatusbar_gettextlength($hwnd, $ipart) + 1
    If $ibuffer = 1 Then Return SetError(1, 0, "")
    Local $tbuffer
    If $bunicode Then
        $tbuffer = DllStructCreate("wchar Text[" & $ibuffer & "]")
        $ibuffer *= 2
    Else
        $tbuffer = DllStructCreate("char Text[" & $ibuffer & "]")
    EndIf
    If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
        _sendmessage($hwnd, $sb_gettextw, $ipart, $tbuffer, 0, "wparam", "struct*")
    Else
        Local $tmemmap
        Local $pmemory = _meminit($hwnd, $ibuffer, $tmemmap)
        If $bunicode Then
            _sendmessage($hwnd, $sb_gettextw, $ipart, $pmemory, 0, "wparam", "ptr")
        Else
            _sendmessage($hwnd, $sb_gettext, $ipart, $pmemory, 0, "wparam", "ptr")
        EndIf
        _memread($tmemmap, $pmemory, $tbuffer, $ibuffer)
        _memfree($tmemmap)
    EndIf
    Return DllStructGetData($tbuffer, "Text")
EndFunc

Func _guictrlstatusbar_gettextflags($hwnd, $ipart)
    If _guictrlstatusbar_getunicodeformat($hwnd) Then
        Return _sendmessage($hwnd, $sb_gettextlengthw, $ipart)
    Else
        Return _sendmessage($hwnd, $sb_gettextlength, $ipart)
    EndIf
EndFunc

Func _guictrlstatusbar_gettextlength($hwnd, $ipart)
    Return _winapi_loword(_guictrlstatusbar_gettextflags($hwnd, $ipart))
EndFunc

Func _guictrlstatusbar_gettextlengthex($hwnd, $ipart)
    Return _winapi_hiword(_guictrlstatusbar_gettextflags($hwnd, $ipart))
EndFunc

Func _guictrlstatusbar_gettiptext($hwnd, $ipart)
    Local $bunicode = _guictrlstatusbar_getunicodeformat($hwnd)
    Local $tbuffer
    If $bunicode Then
        $tbuffer = DllStructCreate("wchar Text[4096]")
    Else
        $tbuffer = DllStructCreate("char Text[4096]")
    EndIf
    If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
        _sendmessage($hwnd, $sb_gettiptextw, _winapi_makelong($ipart, 4096), $tbuffer, 0, "wparam", "struct*")
    Else
        Local $tmemmap
        Local $pmemory = _meminit($hwnd, 4096, $tmemmap)
        If $bunicode Then
            _sendmessage($hwnd, $sb_gettiptextw, _winapi_makelong($ipart, 4096), $pmemory, 0, "wparam", "ptr")
        Else
            _sendmessage($hwnd, $sb_gettiptexta, _winapi_makelong($ipart, 4096), $pmemory, 0, "wparam", "ptr")
        EndIf
        _memread($tmemmap, $pmemory, $tbuffer, 4096)
        _memfree($tmemmap)
    EndIf
    Return DllStructGetData($tbuffer, "Text")
EndFunc

Func _guictrlstatusbar_getunicodeformat($hwnd)
    Return _sendmessage($hwnd, $sb_getunicodeformat) <> 0
EndFunc

Func _guictrlstatusbar_getwidth($hwnd, $ipart)
    Local $trect = _guictrlstatusbar_getrectex($hwnd, $ipart)
    Return DllStructGetData($trect, "Right") - DllStructGetData($trect, "Left") - (_guictrlstatusbar_getbordershorz($hwnd) * 2)
EndFunc

Func _guictrlstatusbar_issimple($hwnd)
    Return _sendmessage($hwnd, $sb_issimple) <> 0
EndFunc

Func _guictrlstatusbar_resize($hwnd)
    _sendmessage($hwnd, $__statusbarconstant_wm_size)
EndFunc

Func _guictrlstatusbar_setbkcolor($hwnd, $icolor)
    $icolor = _sendmessage($hwnd, $sb_setbkcolor, 0, $icolor)
    If $icolor = $__statusbarconstant_clr_default Then Return "0x" & Hex($__statusbarconstant_clr_default)
    Return $icolor
EndFunc

Func _guictrlstatusbar_seticon($hwnd, $ipart, $hicon = -1, $siconfile = "")
    If $hicon = -1 Then Return _sendmessage($hwnd, $sb_seticon, $ipart, $hicon, 0, "wparam", "handle") <> 0
    If StringLen($siconfile) <= 0 Then Return _sendmessage($hwnd, $sb_seticon, $ipart, $hicon) <> 0
    Local $ticon = DllStructCreate("handle")
    Local $vresult = DllCall("shell32.dll", "uint", "ExtractIconExW", "wstr", $siconfile, "int", $hicon, "ptr", 0, "struct*", $ticon, "uint", 1)
    If @error Then Return SetError(@error, @extended, False)
    $vresult = $vresult[0]
    If $vresult > 0 Then $vresult = _sendmessage($hwnd, $sb_seticon, $ipart, DllStructGetData($ticon, 1), 0, "wparam", "handle")
    DllCall("user32.dll", "bool", "DestroyIcon", "handle", DllStructGetData($ticon, 1))
    Return $vresult
EndFunc

Func _guictrlstatusbar_setminheight($hwnd, $iminheight)
    _sendmessage($hwnd, $sb_setminheight, $iminheight)
    _guictrlstatusbar_resize($hwnd)
EndFunc

Func _guictrlstatusbar_setparts($hwnd, $aparts = -1, $apartwidth = 25)
    Local $tparts, $iparts = 1
    If IsArray($aparts) <> 0 Then
        $aparts[UBound($aparts) - 1] = -1
        $iparts = UBound($aparts)
        $tparts = DllStructCreate("int[" & $iparts & "]")
        For $x = 0 To $iparts - 2
            DllStructSetData($tparts, 1, $aparts[$x], $x + 1)
        Next
        DllStructSetData($tparts, 1, -1, $iparts)
    ElseIf IsArray($apartwidth) <> 0 Then
        $iparts = UBound($apartwidth)
        $tparts = DllStructCreate("int[" & $iparts & "]")
        For $x = 0 To $iparts - 2
            DllStructSetData($tparts, 1, $apartwidth[$x], $x + 1)
        Next
        DllStructSetData($tparts, 1, -1, $iparts)
    ElseIf $aparts > 1 Then
        $iparts = $aparts
        $tparts = DllStructCreate("int[" & $iparts & "]")
        For $x = 1 To $iparts - 1
            DllStructSetData($tparts, 1, $apartwidth * $x, $x)
        Next
        DllStructSetData($tparts, 1, -1, $iparts)
    Else
        $tparts = DllStructCreate("int")
        DllStructSetData($tparts, $iparts, -1)
    EndIf
    If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
        _sendmessage($hwnd, $sb_setparts, $iparts, $tparts, 0, "wparam", "struct*")
    Else
        Local $isize = DllStructGetSize($tparts)
        Local $tmemmap
        Local $pmemory = _meminit($hwnd, $isize, $tmemmap)
        _memwrite($tmemmap, $tparts)
        _sendmessage($hwnd, $sb_setparts, $iparts, $pmemory, 0, "wparam", "ptr")
        _memfree($tmemmap)
    EndIf
    _guictrlstatusbar_resize($hwnd)
    Return True
EndFunc

Func _guictrlstatusbar_setsimple($hwnd, $bsimple = True)
    _sendmessage($hwnd, $sb_simple, $bsimple)
EndFunc

Func _guictrlstatusbar_settext($hwnd, $stext = "", $ipart = 0, $iuflag = 0)
    Local $bunicode = _guictrlstatusbar_getunicodeformat($hwnd)
    Local $ibuffer = StringLen($stext) + 1
    Local $ttext
    If $bunicode Then
        $ttext = DllStructCreate("wchar Text[" & $ibuffer & "]")
        $ibuffer *= 2
    Else
        $ttext = DllStructCreate("char Text[" & $ibuffer & "]")
    EndIf
    DllStructSetData($ttext, "Text", $stext)
    If _guictrlstatusbar_issimple($hwnd) Then $ipart = $sb_simpleid
    Local $iret
    If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
        $iret = _sendmessage($hwnd, $sb_settextw, BitOR($ipart, $iuflag), $ttext, 0, "wparam", "struct*")
    Else
        Local $tmemmap
        Local $pmemory = _meminit($hwnd, $ibuffer, $tmemmap)
        _memwrite($tmemmap, $ttext)
        If $bunicode Then
            $iret = _sendmessage($hwnd, $sb_settextw, BitOR($ipart, $iuflag), $pmemory, 0, "wparam", "ptr")
        Else
            $iret = _sendmessage($hwnd, $sb_settext, BitOR($ipart, $iuflag), $pmemory, 0, "wparam", "ptr")
        EndIf
        _memfree($tmemmap)
    EndIf
    Return $iret <> 0
EndFunc

Func _guictrlstatusbar_settiptext($hwnd, $ipart, $stext)
    Local $bunicode = _guictrlstatusbar_getunicodeformat($hwnd)
    Local $ibuffer = StringLen($stext) + 1
    Local $ttext
    If $bunicode Then
        $ttext = DllStructCreate("wchar TipText[" & $ibuffer & "]")
        $ibuffer *= 2
    Else
        $ttext = DllStructCreate("char TipText[" & $ibuffer & "]")
    EndIf
    DllStructSetData($ttext, "TipText", $stext)
    If _winapi_inprocess($hwnd, $__g_hsblastwnd) Then
        _sendmessage($hwnd, $sb_settiptextw, $ipart, $ttext, 0, "wparam", "struct*")
    Else
        Local $tmemmap
        Local $pmemory = _meminit($hwnd, $ibuffer, $tmemmap)
        _memwrite($tmemmap, $ttext, $pmemory, $ibuffer)
        If $bunicode Then
            _sendmessage($hwnd, $sb_settiptextw, $ipart, $pmemory, 0, "wparam", "ptr")
        Else
            _sendmessage($hwnd, $sb_settiptexta, $ipart, $pmemory, 0, "wparam", "ptr")
        EndIf
        _memfree($tmemmap)
    EndIf
EndFunc

Func _guictrlstatusbar_setunicodeformat($hwnd, $bunicode = True)
    Return _sendmessage($hwnd, $sb_setunicodeformat, $bunicode)
EndFunc

Func _guictrlstatusbar_showhide($hwnd, $istate)
    If $istate <> @SW_HIDE AND $istate <> @SW_SHOW Then Return SetError(1, 1, False)
    Return _winapi_showwindow($hwnd, $istate)
EndFunc

Global Const $ss_left = 0
Global Const $ss_center = 1
Global Const $ss_right = 2
Global Const $ss_icon = 3
Global Const $ss_blackrect = 4
Global Const $ss_grayrect = 5
Global Const $ss_whiterect = 6
Global Const $ss_blackframe = 7
Global Const $ss_grayframe = 8
Global Const $ss_whiteframe = 9
Global Const $ss_simple = 11
Global Const $ss_leftnowordwrap = 12
Global Const $ss_bitmap = 14
Global Const $ss_enhmetafile = 15
Global Const $ss_etchedhorz = 16
Global Const $ss_etchedvert = 17
Global Const $ss_etchedframe = 18
Global Const $ss_realsizecontrol = 64
Global Const $ss_noprefix = 128
Global Const $ss_notify = 256
Global Const $ss_centerimage = 512
Global Const $ss_rightjust = 1024
Global Const $ss_sunken = 4096
Global Const $gui_ss_default_label = 0
Global Const $gui_ss_default_graphic = 0
Global Const $gui_ss_default_icon = $ss_notify
Global Const $gui_ss_default_pic = $ss_notify
Global Const $stm_seticon = 368
Global Const $stm_geticon = 369
Global Const $stm_setimage = 370
Global Const $stm_getimage = 371
Global Const $wc_animate = "SysAnimate32"
Global Const $wc_button = "Button"
Global Const $wc_combobox = "ComboBox"
Global Const $wc_comboboxex = "ComboBoxEx32"
Global Const $wc_datetimepick = "SysDateTimePick32"
Global Const $wc_edit = "Edit"
Global Const $wc_header = "SysHeader32"
Global Const $wc_hotkey = "msctls_hotkey32"
Global Const $wc_ipaddress = "SysIPAddress32"
Global Const $wc_link = "SysLink"
Global Const $wc_listbox = "ListBox"
Global Const $wc_listview = "SysListView32"
Global Const $wc_monthcal = "SysMonthCal32"
Global Const $wc_nativefontctl = "NativeFontCtl"
Global Const $wc_pagescroller = "SysPager"
Global Const $wc_progress = "msctls_progress32"
Global Const $wc_rebar = "ReBarWindow32"
Global Const $wc_scrollbar = "ScrollBar"
Global Const $wc_static = "Static"
Global Const $wc_statusbar = "msctls_statusbar32"
Global Const $wc_tabcontrol = "SysTabControl32"
Global Const $wc_toolbar = "ToolbarWindow32"
Global Const $wc_tooltips = "tooltips_class32"
Global Const $wc_trackbar = "msctls_trackbar32"
Global Const $wc_treeview = "SysTreeView32"
Global Const $wc_updown = "msctls_updown32"
Global Const $ws_overlapped = 0
Global Const $ws_tiled = $ws_overlapped
Global Const $ws_maximizebox = 65536
Global Const $ws_minimizebox = 131072
Global Const $ws_tabstop = 65536
Global Const $ws_group = 131072
Global Const $ws_sizebox = 262144
Global Const $ws_thickframe = $ws_sizebox
Global Const $ws_sysmenu = 524288
Global Const $ws_hscroll = 1048576
Global Const $ws_vscroll = 2097152
Global Const $ws_dlgframe = 4194304
Global Const $ws_border = 8388608
Global Const $ws_caption = 12582912
Global Const $ws_overlappedwindow = BitOR($ws_caption, $ws_maximizebox, $ws_minimizebox, $ws_overlapped, $ws_sysmenu, $ws_thickframe)
Global Const $ws_tiledwindow = $ws_overlappedwindow
Global Const $ws_maximize = 16777216
Global Const $ws_clipchildren = 33554432
Global Const $ws_clipsiblings = 67108864
Global Const $ws_disabled = 134217728
Global Const $ws_visible = 268435456
Global Const $ws_minimize = 536870912
Global Const $ws_iconic = $ws_minimize
Global Const $ws_child = 1073741824
Global Const $ws_childwindow = $ws_child
Global Const $ws_popup = -2147483648
Global Const $ws_popupwindow = -2138570752
Global Const $ds_3dlook = 4
Global Const $ds_absalign = 1
Global Const $ds_center = 2048
Global Const $ds_centermouse = 4096
Global Const $ds_contexthelp = 8192
Global Const $ds_control = 1024
Global Const $ds_fixedsys = 8
Global Const $ds_localedit = 32
Global Const $ds_modalframe = 128
Global Const $ds_nofailcreate = 16
Global Const $ds_noidlemsg = 256
Global Const $ds_setfont = 64
Global Const $ds_setforeground = 512
Global Const $ds_shellfont = BitOR($ds_fixedsys, $ds_setfont)
Global Const $ds_sysmodal = 2
Global Const $ws_ex_acceptfiles = 16
Global Const $ws_ex_appwindow = 262144
Global Const $ws_ex_composited = 33554432
Global Const $ws_ex_controlparent = 65536
Global Const $ws_ex_clientedge = 512
Global Const $ws_ex_contexthelp = 1024
Global Const $ws_ex_dlgmodalframe = 1
Global Const $ws_ex_layered = 524288
Global Const $ws_ex_layoutrtl = 4194304
Global Const $ws_ex_left = 0
Global Const $ws_ex_leftscrollbar = 16384
Global Const $ws_ex_ltrreading = 0
Global Const $ws_ex_mdichild = 64
Global Const $ws_ex_noactivate = 134217728
Global Const $ws_ex_noinheritlayout = 1048576
Global Const $ws_ex_noparentnotify = 4
Global Const $ws_ex_right = 4096
Global Const $ws_ex_rightscrollbar = 0
Global Const $ws_ex_rtlreading = 8192
Global Const $ws_ex_staticedge = 131072
Global Const $ws_ex_toolwindow = 128
Global Const $ws_ex_topmost = 8
Global Const $ws_ex_transparent = 32
Global Const $ws_ex_windowedge = 256
Global Const $ws_ex_overlappedwindow = BitOR($ws_ex_clientedge, $ws_ex_windowedge)
Global Const $ws_ex_palettewindow = BitOR($ws_ex_toolwindow, $ws_ex_topmost, $ws_ex_windowedge)
Global Const $wm_null = 0
Global Const $wm_create = 1
Global Const $wm_destroy = 2
Global Const $wm_move = 3
Global Const $wm_sizewait = 4
Global Const $wm_size = 5
Global Const $wm_activate = 6
Global Const $wm_setfocus = 7
Global Const $wm_killfocus = 8
Global Const $wm_setvisible = 9
Global Const $wm_enable = 10
Global Const $wm_setredraw = 11
Global Const $wm_settext = 12
Global Const $wm_gettext = 13
Global Const $wm_gettextlength = 14
Global Const $wm_paint = 15
Global Const $wm_close = 16
Global Const $wm_queryendsession = 17
Global Const $wm_quit = 18
Global Const $wm_erasebkgnd = 20
Global Const $wm_queryopen = 19
Global Const $wm_syscolorchange = 21
Global Const $wm_endsession = 22
Global Const $wm_systemerror = 23
Global Const $wm_showwindow = 24
Global Const $wm_ctlcolor = 25
Global Const $wm_settingchange = 26
Global Const $wm_wininichange = 26
Global Const $wm_devmodechange = 27
Global Const $wm_activateapp = 28
Global Const $wm_fontchange = 29
Global Const $wm_timechange = 30
Global Const $wm_cancelmode = 31
Global Const $wm_setcursor = 32
Global Const $wm_mouseactivate = 33
Global Const $wm_childactivate = 34
Global Const $wm_queuesync = 35
Global Const $wm_getminmaxinfo = 36
Global Const $wm_logoff = 37
Global Const $wm_painticon = 38
Global Const $wm_iconerasebkgnd = 39
Global Const $wm_nextdlgctl = 40
Global Const $wm_alttabactive = 41
Global Const $wm_spoolerstatus = 42
Global Const $wm_drawitem = 43
Global Const $wm_measureitem = 44
Global Const $wm_deleteitem = 45
Global Const $wm_vkeytoitem = 46
Global Const $wm_chartoitem = 47
Global Const $wm_setfont = 48
Global Const $wm_getfont = 49
Global Const $wm_sethotkey = 50
Global Const $wm_gethotkey = 51
Global Const $wm_filesyschange = 52
Global Const $wm_isactiveicon = 53
Global Const $wm_queryparkicon = 54
Global Const $wm_querydragicon = 55
Global Const $wm_winhelp = 56
Global Const $wm_compareitem = 57
Global Const $wm_fullscreen = 58
Global Const $wm_clientshutdown = 59
Global Const $wm_ddemlevent = 60
Global Const $wm_getobject = 61
Global Const $wm_calcscroll = 63
Global Const $wm_testing = 64
Global Const $wm_compacting = 65
Global Const $wm_otherwindowcreated = 66
Global Const $wm_otherwindowdestroyed = 67
Global Const $wm_commnotify = 68
Global Const $wm_mediastatuschange = 69
Global Const $wm_windowposchanging = 70
Global Const $wm_windowposchanged = 71
Global Const $wm_power = 72
Global Const $wm_copyglobaldata = 73
Global Const $wm_copydata = 74
Global Const $wm_canceljournal = 75
Global Const $wm_logonnotify = 76
Global Const $wm_keyf1 = 77
Global Const $wm_notify = 78
Global Const $wm_access_window = 79
Global Const $wm_inputlangchangerequest = 80
Global Const $wm_inputlangchange = 81
Global Const $wm_tcard = 82
Global Const $wm_help = 83
Global Const $wm_userchanged = 84
Global Const $wm_notifyformat = 85
Global Const $wm_qm_activate = 96
Global Const $wm_hook_do_callback = 97
Global Const $wm_syscopydata = 98
Global Const $wm_finaldestroy = 112
Global Const $wm_measureitem_clientdata = 113
Global Const $wm_contextmenu = 123
Global Const $wm_stylechanging = 124
Global Const $wm_stylechanged = 125
Global Const $wm_displaychange = 126
Global Const $wm_geticon = 127
Global Const $wm_seticon = 128
Global Const $wm_nccreate = 129
Global Const $wm_ncdestroy = 130
Global Const $wm_nccalcsize = 131
Global Const $wm_nchittest = 132
Global Const $wm_ncpaint = 133
Global Const $wm_ncactivate = 134
Global Const $wm_getdlgcode = 135
Global Const $wm_syncpaint = 136
Global Const $wm_synctask = 137
Global Const $wm_kludgeminrect = 139
Global Const $wm_lpkdrawswitchwnd = 140
Global Const $wm_uahdestroywindow = 144
Global Const $wm_uahdrawmenu = 145
Global Const $wm_uahdrawmenuitem = 146
Global Const $wm_uahinitmenu = 147
Global Const $wm_uahmeasuremenuitem = 148
Global Const $wm_uahncpaintmenupopup = 149
Global Const $wm_ncmousemove = 160
Global Const $wm_nclbuttondown = 161
Global Const $wm_nclbuttonup = 162
Global Const $wm_nclbuttondblclk = 163
Global Const $wm_ncrbuttondown = 164
Global Const $wm_ncrbuttonup = 165
Global Const $wm_ncrbuttondblclk = 166
Global Const $wm_ncmbuttondown = 167
Global Const $wm_ncmbuttonup = 168
Global Const $wm_ncmbuttondblclk = 169
Global Const $wm_ncxbuttondown = 171
Global Const $wm_ncxbuttonup = 172
Global Const $wm_ncxbuttondblclk = 173
Global Const $wm_ncuahdrawcaption = 174
Global Const $wm_ncuahdrawframe = 175
Global Const $wm_input_device_change = 254
Global Const $wm_input = 255
Global Const $wm_keydown = 256
Global Const $wm_keyfirst = 256
Global Const $wm_keyup = 257
Global Const $wm_char = 258
Global Const $wm_deadchar = 259
Global Const $wm_syskeydown = 260
Global Const $wm_syskeyup = 261
Global Const $wm_syschar = 262
Global Const $wm_sysdeadchar = 263
Global Const $wm_yomichar = 264
Global Const $wm_keylast = 265
Global Const $wm_unichar = 265
Global Const $wm_convertrequest = 266
Global Const $wm_convertresult = 267
Global Const $wm_im_info = 268
Global Const $wm_ime_startcomposition = 269
Global Const $wm_ime_endcomposition = 270
Global Const $wm_ime_composition = 271
Global Const $wm_ime_keylast = 271
Global Const $wm_initdialog = 272
Global Const $wm_command = 273
Global Const $wm_syscommand = 274
Global Const $wm_timer = 275
Global Const $wm_hscroll = 276
Global Const $wm_vscroll = 277
Global Const $wm_initmenu = 278
Global Const $wm_initmenupopup = 279
Global Const $wm_systimer = 280
Global Const $wm_gesture = 281
Global Const $wm_gesturenotify = 282
Global Const $wm_gestureinput = 283
Global Const $wm_gesturenotified = 284
Global Const $wm_menuselect = 287
Global Const $wm_menuchar = 288
Global Const $wm_enteridle = 289
Global Const $wm_menurbuttonup = 290
Global Const $wm_menudrag = 291
Global Const $wm_menugetobject = 292
Global Const $wm_uninitmenupopup = 293
Global Const $wm_menucommand = 294
Global Const $wm_changeuistate = 295
Global Const $wm_updateuistate = 296
Global Const $wm_queryuistate = 297
Global Const $wm_lbtrackpoint = 305
Global Const $wm_ctlcolormsgbox = 306
Global Const $wm_ctlcoloredit = 307
Global Const $wm_ctlcolorlistbox = 308
Global Const $wm_ctlcolorbtn = 309
Global Const $wm_ctlcolordlg = 310
Global Const $wm_ctlcolorscrollbar = 311
Global Const $wm_ctlcolorstatic = 312
Global Const $mn_gethmenu = 481
Global Const $wm_parentnotify = 528
Global Const $wm_entermenuloop = 529
Global Const $wm_exitmenuloop = 530
Global Const $wm_nextmenu = 531
Global Const $wm_sizing = 532
Global Const $wm_capturechanged = 533
Global Const $wm_moving = 534
Global Const $wm_powerbroadcast = 536
Global Const $wm_devicechange = 537
Global Const $wm_mdicreate = 544
Global Const $wm_mdidestroy = 545
Global Const $wm_mdiactivate = 546
Global Const $wm_mdirestore = 547
Global Const $wm_mdinext = 548
Global Const $wm_mdimaximize = 549
Global Const $wm_mditile = 550
Global Const $wm_mdicascade = 551
Global Const $wm_mdiiconarrange = 552
Global Const $wm_mdigetactive = 553
Global Const $wm_dropobject = 554
Global Const $wm_querydropobject = 555
Global Const $wm_begindrag = 556
Global Const $wm_dragloop = 557
Global Const $wm_dragselect = 558
Global Const $wm_dragmove = 559
Global Const $wm_mdisetmenu = 560
Global Const $wm_entersizemove = 561
Global Const $wm_exitsizemove = 562
Global Const $wm_dropfiles = 563
Global Const $wm_mdirefreshmenu = 564
Global Const $wm_touch = 576
Global Const $wm_ime_setcontext = 641
Global Const $wm_ime_notify = 642
Global Const $wm_ime_control = 643
Global Const $wm_ime_compositionfull = 644
Global Const $wm_ime_select = 645
Global Const $wm_ime_char = 646
Global Const $wm_ime_system = 647
Global Const $wm_ime_request = 648
Global Const $wm_ime_keydown = 656
Global Const $wm_ime_keyup = 657
Global Const $wm_ncmousehover = 672
Global Const $wm_mousehover = 673
Global Const $wm_ncmouseleave = 674
Global Const $wm_mouseleave = 675
Global Const $wm_wtssession_change = 689
Global Const $wm_tablet_first = 704
Global Const $wm_tablet_last = 735
Global Const $wm_cut = 768
Global Const $wm_copy = 769
Global Const $wm_paste = 770
Global Const $wm_clear = 771
Global Const $wm_undo = 772
Global Const $wm_paletteischanging = 784
Global Const $wm_hotkey = 786
Global Const $wm_palettechanged = 785
Global Const $wm_sysmenu = 787
Global Const $wm_hookmsg = 788
Global Const $wm_exitprocess = 789
Global Const $wm_wakethread = 790
Global Const $wm_print = 791
Global Const $wm_printclient = 792
Global Const $wm_appcommand = 793
Global Const $wm_querynewpalette = 783
Global Const $wm_themechanged = 794
Global Const $wm_uahinit = 795
Global Const $wm_desktopnotify = 796
Global Const $wm_clipboardupdate = 797
Global Const $wm_dwmcompositionchanged = 798
Global Const $wm_dwmncrenderingchanged = 799
Global Const $wm_dwmcolorizationcolorchanged = 800
Global Const $wm_dwmwindowmaximizedchange = 801
Global Const $wm_dwmexileframe = 802
Global Const $wm_dwmsendiconicthumbnail = 803
Global Const $wm_magnification_started = 804
Global Const $wm_magnification_ended = 805
Global Const $wm_dwmsendiconiclivepreviewbitmap = 806
Global Const $wm_dwmthumbnailsizechanged = 807
Global Const $wm_magnification_output = 808
Global Const $wm_measurecontrol = 816
Global Const $wm_getactiontext = 817
Global Const $wm_forwardkeydown = 819
Global Const $wm_forwardkeyup = 820
Global Const $wm_gettitlebarinfoex = 831
Global Const $wm_notifywow = 832
Global Const $wm_handheldfirst = 856
Global Const $wm_handheldlast = 863
Global Const $wm_afxfirst = 864
Global Const $wm_afxlast = 895
Global Const $wm_penwinfirst = 896
Global Const $wm_penwinlast = 911
Global Const $wm_dde_initiate = 992
Global Const $wm_dde_terminate = 993
Global Const $wm_dde_advise = 994
Global Const $wm_dde_unadvise = 995
Global Const $wm_dde_ack = 996
Global Const $wm_dde_data = 997
Global Const $wm_dde_request = 998
Global Const $wm_dde_poke = 999
Global Const $wm_dde_execute = 1000
Global Const $wm_dbnotification = 1021
Global Const $wm_netconnect = 1022
Global Const $wm_hibernate = 1023
Global Const $wm_user = 1024
Global Const $wm_app = 32768
Global Const $nm_first = 0
Global Const $nm_outofmemory = $nm_first - 1
Global Const $nm_click = $nm_first - 2
Global Const $nm_dblclk = $nm_first - 3
Global Const $nm_return = $nm_first - 4
Global Const $nm_rclick = $nm_first - 5
Global Const $nm_rdblclk = $nm_first - 6
Global Const $nm_setfocus = $nm_first - 7
Global Const $nm_killfocus = $nm_first - 8
Global Const $nm_customdraw = $nm_first - 12
Global Const $nm_hover = $nm_first - 13
Global Const $nm_nchittest = $nm_first - 14
Global Const $nm_keydown = $nm_first - 15
Global Const $nm_releasedcapture = $nm_first - 16
Global Const $nm_setcursor = $nm_first - 17
Global Const $nm_char = $nm_first - 18
Global Const $nm_tooltipscreated = $nm_first - 19
Global Const $nm_ldown = $nm_first - 20
Global Const $nm_rdown = $nm_first - 21
Global Const $nm_themechanged = $nm_first - 22
Global Const $wm_mousefirst = 512
Global Const $wm_mousemove = 512
Global Const $wm_lbuttondown = 513
Global Const $wm_lbuttonup = 514
Global Const $wm_lbuttondblclk = 515
Global Const $wm_rbuttondown = 516
Global Const $wm_rbuttonup = 517
Global Const $wm_rbuttondblclk = 518
Global Const $wm_mbuttondown = 519
Global Const $wm_mbuttonup = 520
Global Const $wm_mbuttondblclk = 521
Global Const $wm_mousewheel = 522
Global Const $wm_xbuttondown = 523
Global Const $wm_xbuttonup = 524
Global Const $wm_xbuttondblclk = 525
Global Const $wm_mousehwheel = 526
Global Const $ps_solid = 0
Global Const $ps_dash = 1
Global Const $ps_dot = 2
Global Const $ps_dashdot = 3
Global Const $ps_dashdotdot = 4
Global Const $ps_null = 5
Global Const $ps_insideframe = 6
Global Const $ps_userstyle = 7
Global Const $ps_alternate = 8
Global Const $ps_endcap_round = 0
Global Const $ps_endcap_square = 256
Global Const $ps_endcap_flat = 512
Global Const $ps_join_bevel = 4096
Global Const $ps_join_miter = 8192
Global Const $ps_join_round = 0
Global Const $ps_geometric = 65536
Global Const $ps_cosmetic = 0
Global Const $lwa_alpha = 2
Global Const $lwa_colorkey = 1
Global Const $rgn_and = 1
Global Const $rgn_or = 2
Global Const $rgn_xor = 3
Global Const $rgn_diff = 4
Global Const $rgn_copy = 5
Global Const $errorregion = 0
Global Const $nullregion = 1
Global Const $simpleregion = 2
Global Const $complexregion = 3
Global Const $transparent = 1
Global Const $opaque = 2
Global Const $ccm_first = 8192
Global Const $ccm_getunicodeformat = ($ccm_first + 6)
Global Const $ccm_setunicodeformat = ($ccm_first + 5)
Global Const $ccm_setbkcolor = $ccm_first + 1
Global Const $ccm_setcolorscheme = $ccm_first + 2
Global Const $ccm_getcolorscheme = $ccm_first + 3
Global Const $ccm_getdroptarget = $ccm_first + 4
Global Const $ccm_setwindowtheme = $ccm_first + 11
Global Const $ga_parent = 1
Global Const $ga_root = 2
Global Const $ga_rootowner = 3
Global Const $sm_cxscreen = 0
Global Const $sm_cyscreen = 1
Global Const $sm_cxvscroll = 2
Global Const $sm_cyhscroll = 3
Global Const $sm_cycaption = 4
Global Const $sm_cxborder = 5
Global Const $sm_cyborder = 6
Global Const $sm_cxdlgframe = 7
Global Const $sm_cydlgframe = 8
Global Const $sm_cyvthumb = 9
Global Const $sm_cxhthumb = 10
Global Const $sm_cxicon = 11
Global Const $sm_cyicon = 12
Global Const $sm_cxcursor = 13
Global Const $sm_cycursor = 14
Global Const $sm_cymenu = 15
Global Const $sm_cxfullscreen = 16
Global Const $sm_cyfullscreen = 17
Global Const $sm_cykanjiwindow = 18
Global Const $sm_mousepresent = 19
Global Const $sm_cyvscroll = 20
Global Const $sm_cxhscroll = 21
Global Const $sm_debug = 22
Global Const $sm_swapbutton = 23
Global Const $sm_reserved1 = 24
Global Const $sm_reserved2 = 25
Global Const $sm_reserved3 = 26
Global Const $sm_reserved4 = 27
Global Const $sm_cxmin = 28
Global Const $sm_cymin = 29
Global Const $sm_cxsize = 30
Global Const $sm_cysize = 31
Global Const $sm_cxframe = 32
Global Const $sm_cyframe = 33
Global Const $sm_cxmintrack = 34
Global Const $sm_cymintrack = 35
Global Const $sm_cxdoubleclk = 36
Global Const $sm_cydoubleclk = 37
Global Const $sm_cxiconspacing = 38
Global Const $sm_cyiconspacing = 39
Global Const $sm_menudropalignment = 40
Global Const $sm_penwindows = 41
Global Const $sm_dbcsenabled = 42
Global Const $sm_cmousebuttons = 43
Global Const $sm_secure = 44
Global Const $sm_cxedge = 45
Global Const $sm_cyedge = 46
Global Const $sm_cxminspacing = 47
Global Const $sm_cyminspacing = 48
Global Const $sm_cxsmicon = 49
Global Const $sm_cysmicon = 50
Global Const $sm_cysmcaption = 51
Global Const $sm_cxsmsize = 52
Global Const $sm_cysmsize = 53
Global Const $sm_cxmenusize = 54
Global Const $sm_cymenusize = 55
Global Const $sm_arrange = 56
Global Const $sm_cxminimized = 57
Global Const $sm_cyminimized = 58
Global Const $sm_cxmaxtrack = 59
Global Const $sm_cymaxtrack = 60
Global Const $sm_cxmaximized = 61
Global Const $sm_cymaximized = 62
Global Const $sm_network = 63
Global Const $sm_cleanboot = 67
Global Const $sm_cxdrag = 68
Global Const $sm_cydrag = 69
Global Const $sm_showsounds = 70
Global Const $sm_cxmenucheck = 71
Global Const $sm_cymenucheck = 72
Global Const $sm_slowmachine = 73
Global Const $sm_mideastenabled = 74
Global Const $sm_mousewheelpresent = 75
Global Const $sm_xvirtualscreen = 76
Global Const $sm_yvirtualscreen = 77
Global Const $sm_cxvirtualscreen = 78
Global Const $sm_cyvirtualscreen = 79
Global Const $sm_cmonitors = 80
Global Const $sm_samedisplayformat = 81
Global Const $sm_immenabled = 82
Global Const $sm_cxfocusborder = 83
Global Const $sm_cyfocusborder = 84
Global Const $sm_tabletpc = 86
Global Const $sm_mediacenter = 87
Global Const $sm_starter = 88
Global Const $sm_serverr2 = 89
Global Const $sm_cmetrics = 90
Global Const $sm_remotesession = 4096
Global Const $sm_shuttingdown = 8192
Global Const $sm_remotecontrol = 8193
Global Const $sm_caretblinkingenabled = 8194
Global Const $blackness = 66
Global Const $captureblt = 1073741824
Global Const $dstinvert = 5570569
Global Const $mergecopy = 12583114
Global Const $mergepaint = 12255782
Global Const $nomirrorbitmap = -2147483648
Global Const $notsrccopy = 3342344
Global Const $notsrcerase = 1114278
Global Const $patcopy = 15728673
Global Const $patinvert = 5898313
Global Const $patpaint = 16452105
Global Const $srcand = 8913094
Global Const $srccopy = 13369376
Global Const $srcerase = 4457256
Global Const $srcinvert = 6684742
Global Const $srcpaint = 15597702
Global Const $whiteness = 16711778
Global Const $dt_bottom = 8
Global Const $dt_calcrect = 1024
Global Const $dt_center = 1
Global Const $dt_editcontrol = 8192
Global Const $dt_end_ellipsis = 32768
Global Const $dt_expandtabs = 64
Global Const $dt_externalleading = 512
Global Const $dt_hideprefix = 1048576
Global Const $dt_internal = 4096
Global Const $dt_left = 0
Global Const $dt_modifystring = 65536
Global Const $dt_noclip = 256
Global Const $dt_nofullwidthcharbreak = 524288
Global Const $dt_noprefix = 2048
Global Const $dt_path_ellipsis = 16384
Global Const $dt_prefixonly = 2097152
Global Const $dt_right = 2
Global Const $dt_rtlreading = 131072
Global Const $dt_singleline = 32
Global Const $dt_tabstop = 128
Global Const $dt_top = 0
Global Const $dt_vcenter = 4
Global Const $dt_wordbreak = 16
Global Const $dt_word_ellipsis = 262144
Global Const $rdw_erase = 4
Global Const $rdw_frame = 1024
Global Const $rdw_internalpaint = 2
Global Const $rdw_invalidate = 1
Global Const $rdw_noerase = 32
Global Const $rdw_noframe = 2048
Global Const $rdw_nointernalpaint = 16
Global Const $rdw_validate = 8
Global Const $rdw_erasenow = 512
Global Const $rdw_updatenow = 256
Global Const $rdw_allchildren = 128
Global Const $rdw_nochildren = 64
Global Const $wm_renderformat = 773
Global Const $wm_renderallformats = 774
Global Const $wm_destroyclipboard = 775
Global Const $wm_drawclipboard = 776
Global Const $wm_paintclipboard = 777
Global Const $wm_vscrollclipboard = 778
Global Const $wm_sizeclipboard = 779
Global Const $wm_askcbformatname = 780
Global Const $wm_changecbchain = 781
Global Const $wm_hscrollclipboard = 782
Global Const $hterror = -2
Global Const $httransparent = -1
Global Const $htnowhere = 0
Global Const $htclient = 1
Global Const $htcaption = 2
Global Const $htsysmenu = 3
Global Const $htgrowbox = 4
Global Const $htsize = $htgrowbox
Global Const $htmenu = 5
Global Const $hthscroll = 6
Global Const $htvscroll = 7
Global Const $htminbutton = 8
Global Const $htmaxbutton = 9
Global Const $htleft = 10
Global Const $htright = 11
Global Const $httop = 12
Global Const $httopleft = 13
Global Const $httopright = 14
Global Const $htbottom = 15
Global Const $htbottomleft = 16
Global Const $htbottomright = 17
Global Const $htborder = 18
Global Const $htreduce = $htminbutton
Global Const $htzoom = $htmaxbutton
Global Const $htsizefirst = $htleft
Global Const $htsizelast = $htbottomright
Global Const $htobject = 19
Global Const $htclose = 20
Global Const $hthelp = 21
Global Const $color_scrollbar = 0
Global Const $color_background = 1
Global Const $color_activecaption = 2
Global Const $color_inactivecaption = 3
Global Const $color_menu = 4
Global Const $color_window = 5
Global Const $color_windowframe = 6
Global Const $color_menutext = 7
Global Const $color_windowtext = 8
Global Const $color_captiontext = 9
Global Const $color_activeborder = 10
Global Const $color_inactiveborder = 11
Global Const $color_appworkspace = 12
Global Const $color_highlight = 13
Global Const $color_highlighttext = 14
Global Const $color_btnface = 15
Global Const $color_btnshadow = 16
Global Const $color_graytext = 17
Global Const $color_btntext = 18
Global Const $color_inactivecaptiontext = 19
Global Const $color_btnhighlight = 20
Global Const $color_3ddkshadow = 21
Global Const $color_3dlight = 22
Global Const $color_infotext = 23
Global Const $color_infobk = 24
Global Const $color_hotlight = 26
Global Const $color_gradientactivecaption = 27
Global Const $color_gradientinactivecaption = 28
Global Const $color_menuhilight = 29
Global Const $color_menubar = 30
Global Const $color_desktop = 1
Global Const $color_3dface = 15
Global Const $color_3dshadow = 16
Global Const $color_3dhighlight = 20
Global Const $color_3dhilight = 20
Global Const $color_btnhilight = 20
Global Const $hinst_commctrl = -1
Global Const $idb_std_small_color = 0
Global Const $idb_std_large_color = 1
Global Const $idb_view_small_color = 4
Global Const $idb_view_large_color = 5
Global Const $idb_hist_small_color = 8
Global Const $idb_hist_large_color = 9
Global Const $startf_forceofffeedback = 128
Global Const $startf_forceonfeedback = 64
Global Const $startf_preventpinning = 8192
Global Const $startf_runfullscreen = 32
Global Const $startf_titleisappid = 4096
Global Const $startf_titleislinkname = 2048
Global Const $startf_usecountchars = 8
Global Const $startf_usefillattribute = 16
Global Const $startf_usehotkey = 512
Global Const $startf_useposition = 4
Global Const $startf_useshowwindow = 1
Global Const $startf_usesize = 2
Global Const $startf_usestdhandles = 256
Global Const $cdds_prepaint = 1
Global Const $cdds_postpaint = 2
Global Const $cdds_preerase = 3
Global Const $cdds_posterase = 4
Global Const $cdds_item = 65536
Global Const $cdds_itemprepaint = 65537
Global Const $cdds_itempostpaint = 65538
Global Const $cdds_itempreerase = 65539
Global Const $cdds_itemposterase = 65540
Global Const $cdds_subitem = 131072
Global Const $cdis_selected = 1
Global Const $cdis_grayed = 2
Global Const $cdis_disabled = 4
Global Const $cdis_checked = 8
Global Const $cdis_focus = 16
Global Const $cdis_default = 32
Global Const $cdis_hot = 64
Global Const $cdis_marked = 128
Global Const $cdis_indeterminate = 256
Global Const $cdis_showkeyboardcues = 512
Global Const $cdis_nearhot = 1024
Global Const $cdis_othersidehot = 2048
Global Const $cdis_drophilited = 4096
Global Const $cdrf_dodefault = 0
Global Const $cdrf_newfont = 2
Global Const $cdrf_skipdefault = 4
Global Const $cdrf_notifypostpaint = 16
Global Const $cdrf_notifyitemdraw = 32
Global Const $cdrf_notifysubitemdraw = 32
Global Const $cdrf_notifyposterase = 64
Global Const $cdrf_doerase = 8
Global Const $cdrf_skippostpaint = 256
Global Const $gui_ss_default_gui = BitOR($ws_minimizebox, $ws_caption, $ws_popup, $ws_sysmenu)
Global Const $prov_rsa_full = 1
Global Const $prov_rsa_aes = 24
Global Const $crypt_verifycontext = -268435456
Global Const $hp_hashsize = 4
Global Const $hp_hashval = 2
Global Const $crypt_exportable = 1
Global Const $crypt_userdata = 1
Global Const $calg_md2 = 32769
Global Const $calg_md4 = 32770
Global Const $calg_md5 = 32771
Global Const $calg_sha1 = 32772
Global Const $calg_3des = 26115
Global Const $calg_aes_128 = 26126
Global Const $calg_aes_192 = 26127
Global Const $calg_aes_256 = 26128
Global Const $calg_des = 26113
Global Const $calg_rc2 = 26114
Global Const $calg_rc4 = 26625
Global Const $calg_userkey = 0
Global Const $kp_algid = 7
Global $__g_acryptinternaldata[3]

Func _crypt_startup()
    If __crypt_refcount() = 0 Then
        Local $hadvapi32 = DllOpen("Advapi32.dll")
        If $hadvapi32 = -1 Then Return SetError(1, 0, False)
        __crypt_dllhandleset($hadvapi32)
        Local $iproviderid = $prov_rsa_aes
        Local $aret = DllCall(__crypt_dllhandle(), "bool", "CryptAcquireContext", "handle*", 0, "ptr", 0, "ptr", 0, "dword", $iproviderid, "dword", $crypt_verifycontext)
        If @error OR NOT $aret[0] Then
            Local $ierror = @error + 10, $iextended = @extended
            DllClose(__crypt_dllhandle())
            Return SetError($ierror, $iextended, False)
        Else
            __crypt_contextset($aret[1])
        EndIf
    EndIf
    __crypt_refcountinc()
    Return True
EndFunc

Func _crypt_shutdown()
    __crypt_refcountdec()
    If __crypt_refcount() = 0 Then
        DllCall(__crypt_dllhandle(), "bool", "CryptReleaseContext", "handle", __crypt_context(), "dword", 0)
        DllClose(__crypt_dllhandle())
    EndIf
EndFunc

Func _crypt_derivekey($vpassword, $ialgid, $ihashalgid = $calg_md5)
    Local $aret = 0, $hbuff = 0, $hcrypthash = 0, $ierror = 0, $iextended = 0, $vreturn = 0
    _crypt_startup()
    Do
        $aret = DllCall(__crypt_dllhandle(), "bool", "CryptCreateHash", "handle", __crypt_context(), "uint", $ihashalgid, "ptr", 0, "dword", 0, "handle*", 0)
        If @error OR NOT $aret[0] Then
            $ierror = @error + 10
            $iextended = @extended
            $vreturn = -1
            ExitLoop
        EndIf
        $hcrypthash = $aret[5]
        $hbuff = DllStructCreate("byte[" & BinaryLen($vpassword) & "]")
        DllStructSetData($hbuff, 1, $vpassword)
        $aret = DllCall(__crypt_dllhandle(), "bool", "CryptHashData", "handle", $hcrypthash, "struct*", $hbuff, "dword", DllStructGetSize($hbuff), "dword", $crypt_userdata)
        If @error OR NOT $aret[0] Then
            $ierror = @error + 20
            $iextended = @extended
            $vreturn = -1
            ExitLoop
        EndIf
        $aret = DllCall(__crypt_dllhandle(), "bool", "CryptDeriveKey", "handle", __crypt_context(), "uint", $ialgid, "handle", $hcrypthash, "dword", $crypt_exportable, "handle*", 0)
        If @error OR NOT $aret[0] Then
            $ierror = @error + 30
            $iextended = @extended
            $vreturn = -1
            ExitLoop
        EndIf
        $vreturn = $aret[5]
    Until True
    If $hcrypthash <> 0 Then DllCall(__crypt_dllhandle(), "bool", "CryptDestroyHash", "handle", $hcrypthash)
    Return SetError($ierror, $iextended, $vreturn)
EndFunc

Func _crypt_destroykey($hcryptkey)
    Local $aret = DllCall(__crypt_dllhandle(), "bool", "CryptDestroyKey", "handle", $hcryptkey)
    Local $ierror = @error, $iextended = @extended
    _crypt_shutdown()
    If $ierror OR NOT $aret[0] Then
        Return SetError($ierror + 10, $iextended, False)
    Else
        Return True
    EndIf
EndFunc

Func _crypt_encryptdata($vdata, $vcryptkey, $ialgid, $bfinal = True)
    Switch $ialgid
        Case $calg_userkey
            Local $icalgused = __crypt_getcalgfromcryptkey($vcryptkey)
            If @error Then Return SetError(@error, -1, @extended)
            If $icalgused = $calg_rc4 Then ContinueCase
        Case $calg_rc4
            If BinaryLen($vdata) = 0 Then Return SetError(0, 0, Binary(""))
    EndSwitch
    Local $ireqbuffsize = 0, $aret = 0, $hbuff = 0, $ierror = 0, $iextended = 0, $vreturn = 0
    _crypt_startup()
    Do
        If $ialgid <> $calg_userkey Then
            $vcryptkey = _crypt_derivekey($vcryptkey, $ialgid)
            If @error Then
                $ierror = @error + 100
                $iextended = @extended
                $vreturn = -1
                ExitLoop
            EndIf
        EndIf
        $aret = DllCall(__crypt_dllhandle(), "bool", "CryptEncrypt", "handle", $vcryptkey, "handle", 0, "bool", $bfinal, "dword", 0, "ptr", 0, "dword*", BinaryLen($vdata), "dword", 0)
        If @error OR NOT $aret[0] Then
            $ierror = @error + 20
            $iextended = @extended
            $vreturn = -1
            ExitLoop
        EndIf
        $ireqbuffsize = $aret[6]
        $hbuff = DllStructCreate("byte[" & $ireqbuffsize + 1 & "]")
        DllStructSetData($hbuff, 1, $vdata)
        $aret = DllCall(__crypt_dllhandle(), "bool", "CryptEncrypt", "handle", $vcryptkey, "handle", 0, "bool", $bfinal, "dword", 0, "struct*", $hbuff, "dword*", BinaryLen($vdata), "dword", DllStructGetSize($hbuff) - 1)
        If @error OR NOT $aret[0] Then
            $ierror = @error + 30
            $iextended = @extended
            $vreturn = -1
            ExitLoop
        EndIf
        $vreturn = BinaryMid(DllStructGetData($hbuff, 1), 1, $ireqbuffsize)
    Until True
    If $ialgid <> $calg_userkey Then _crypt_destroykey($vcryptkey)
    _crypt_shutdown()
    Return SetError($ierror, $iextended, $vreturn)
EndFunc

Func _crypt_decryptdata($vdata, $vcryptkey, $ialgid, $bfinal = True)
    Switch $ialgid
        Case $calg_userkey
            Local $icalgused = __crypt_getcalgfromcryptkey($vcryptkey)
            If @error Then Return SetError(@error, -1, @extended)
            If $icalgused = $calg_rc4 Then ContinueCase
        Case $calg_rc4
            If BinaryLen($vdata) = 0 Then Return SetError(0, 0, Binary(""))
    EndSwitch
    Local $aret = 0, $hbuff = 0, $htempstruct = 0, $ierror = 0, $iextended = 0, $iplaintextsize = 0, $vreturn = 0
    _crypt_startup()
    Do
        If $ialgid <> $calg_userkey Then
            $vcryptkey = _crypt_derivekey($vcryptkey, $ialgid)
            If @error Then
                $ierror = @error + 100
                $iextended = @extended
                $vreturn = -1
                ExitLoop
            EndIf
        EndIf
        $hbuff = DllStructCreate("byte[" & BinaryLen($vdata) + 1000 & "]")
        If BinaryLen($vdata) > 0 Then DllStructSetData($hbuff, 1, $vdata)
        $aret = DllCall(__crypt_dllhandle(), "bool", "CryptDecrypt", "handle", $vcryptkey, "handle", 0, "bool", $bfinal, "dword", 0, "struct*", $hbuff, "dword*", BinaryLen($vdata))
        If @error OR NOT $aret[0] Then
            $ierror = @error + 20
            $iextended = @extended
            $vreturn = -1
            ExitLoop
        EndIf
        $iplaintextsize = $aret[6]
        $htempstruct = DllStructCreate("byte[" & $iplaintextsize + 1 & "]", DllStructGetPtr($hbuff))
        $vreturn = BinaryMid(DllStructGetData($htempstruct, 1), 1, $iplaintextsize)
    Until True
    If $ialgid <> $calg_userkey Then _crypt_destroykey($vcryptkey)
    _crypt_shutdown()
    Return SetError($ierror, $iextended, $vreturn)
EndFunc

Func _crypt_hashdata($vdata, $ialgid, $bfinal = True, $hcrypthash = 0)
    Local $aret = 0, $hbuff = 0, $ierror = 0, $iextended = 0, $ihashsize = 0, $vreturn = 0
    _crypt_startup()
    Do
        If $hcrypthash = 0 Then
            $aret = DllCall(__crypt_dllhandle(), "bool", "CryptCreateHash", "handle", __crypt_context(), "uint", $ialgid, "ptr", 0, "dword", 0, "handle*", 0)
            If @error OR NOT $aret[0] Then
                $ierror = @error + 10
                $iextended = @extended
                $vreturn = -1
                ExitLoop
            EndIf
            $hcrypthash = $aret[5]
        EndIf
        $hbuff = DllStructCreate("byte[" & BinaryLen($vdata) & "]")
        DllStructSetData($hbuff, 1, $vdata)
        $aret = DllCall(__crypt_dllhandle(), "bool", "CryptHashData", "handle", $hcrypthash, "struct*", $hbuff, "dword", DllStructGetSize($hbuff), "dword", $crypt_userdata)
        If @error OR NOT $aret[0] Then
            $ierror = @error + 20
            $iextended = @extended
            $vreturn = -1
            ExitLoop
        EndIf
        If $bfinal Then
            $aret = DllCall(__crypt_dllhandle(), "bool", "CryptGetHashParam", "handle", $hcrypthash, "dword", $hp_hashsize, "dword*", 0, "dword*", 4, "dword", 0)
            If @error OR NOT $aret[0] Then
                $ierror = @error + 30
                $iextended = @extended
                $vreturn = -1
                ExitLoop
            EndIf
            $ihashsize = $aret[3]
            $hbuff = DllStructCreate("byte[" & $ihashsize & "]")
            $aret = DllCall(__crypt_dllhandle(), "bool", "CryptGetHashParam", "handle", $hcrypthash, "dword", $hp_hashval, "struct*", $hbuff, "dword*", DllStructGetSize($hbuff), "dword", 0)
            If @error OR NOT $aret[0] Then
                $ierror = @error + 40
                $iextended = @extended
                $vreturn = -1
                ExitLoop
            EndIf
            $vreturn = DllStructGetData($hbuff, 1)
        Else
            $vreturn = $hcrypthash
        EndIf
    Until True
    If $hcrypthash <> 0 AND $bfinal Then DllCall(__crypt_dllhandle(), "bool", "CryptDestroyHash", "handle", $hcrypthash)
    _crypt_shutdown()
    Return SetError($ierror, $iextended, $vreturn)
EndFunc

Func _crypt_hashfile($sfilepath, $ialgid)
    Local $btempdata = 0, $hfile = 0, $hhashobject = 0, $ierror = 0, $iextended = 0, $vreturn = 0
    _crypt_startup()
    Do
        $hfile = FileOpen($sfilepath, $fo_binary)
        If $hfile = -1 Then
            $ierror = 1
            $vreturn = -1
            ExitLoop
        EndIf
        Do
            $btempdata = FileRead($hfile, 512 * 1024)
            If @error Then
                $vreturn = _crypt_hashdata($btempdata, $ialgid, True, $hhashobject)
                If @error Then
                    $ierror = @error
                    $iextended = @extended
                    $vreturn = -1
                    ExitLoop 2
                EndIf
                ExitLoop 2
            Else
                $hhashobject = _crypt_hashdata($btempdata, $ialgid, False, $hhashobject)
                If @error Then
                    $ierror = @error + 100
                    $iextended = @extended
                    $vreturn = -1
                    ExitLoop 2
                EndIf
            EndIf
        Until False
    Until True
    _crypt_shutdown()
    If $hfile <> -1 Then FileClose($hfile)
    Return SetError($ierror, $iextended, $vreturn)
EndFunc

Func _crypt_encryptfile($ssourcefile, $sdestinationfile, $vcryptkey, $ialgid)
    Local $btempdata = 0, $hinfile = 0, $houtfile = 0, $ierror = 0, $iextended = 0, $ifilesize = FileGetSize($ssourcefile), $iread = 0, $breturn = True
    _crypt_startup()
    Do
        If $ialgid <> $calg_userkey Then
            $vcryptkey = _crypt_derivekey($vcryptkey, $ialgid)
            If @error Then
                $ierror = @error
                $iextended = @extended
                $breturn = False
                ExitLoop
            EndIf
        EndIf
        $hinfile = FileOpen($ssourcefile, $fo_binary)
        If @error Then
            $ierror = 2
            $breturn = False
            ExitLoop
        EndIf
        $houtfile = FileOpen($sdestinationfile, $fo_overwrite + $fo_createpath + $fo_binary)
        If @error Then
            $ierror = 3
            $breturn = False
            ExitLoop
        EndIf
        Do
            $btempdata = FileRead($hinfile, 1024 * 1024)
            $iread += BinaryLen($btempdata)
            If $iread = $ifilesize Then
                $btempdata = _crypt_encryptdata($btempdata, $vcryptkey, $calg_userkey, True)
                If @error Then
                    $ierror = @error + 400
                    $iextended = @extended
                    $breturn = False
                EndIf
                FileWrite($houtfile, $btempdata)
                ExitLoop 2
            Else
                $btempdata = _crypt_encryptdata($btempdata, $vcryptkey, $calg_userkey, False)
                If @error Then
                    $ierror = @error + 500
                    $iextended = @extended
                    $breturn = False
                    ExitLoop 2
                EndIf
                FileWrite($houtfile, $btempdata)
            EndIf
        Until False
    Until True
    If $ialgid <> $calg_userkey Then _crypt_destroykey($vcryptkey)
    _crypt_shutdown()
    If $hinfile <> -1 Then FileClose($hinfile)
    If $houtfile <> -1 Then FileClose($houtfile)
    Return SetError($ierror, $iextended, $breturn)
EndFunc

Func _crypt_decryptfile($ssourcefile, $sdestinationfile, $vcryptkey, $ialgid)
    Local $btempdata = 0, $hinfile = 0, $houtfile = 0, $ierror = 0, $iextended = 0, $ifilesize = FileGetSize($ssourcefile), $iread = 0, $breturn = True
    _crypt_startup()
    Do
        If $ialgid <> $calg_userkey Then
            $vcryptkey = _crypt_derivekey($vcryptkey, $ialgid)
            If @error Then
                $ierror = @error
                $iextended = @extended
                $breturn = False
                ExitLoop
            EndIf
        EndIf
        $hinfile = FileOpen($ssourcefile, $fo_binary)
        If @error Then
            $ierror = 2
            $breturn = False
            ExitLoop
        EndIf
        $houtfile = FileOpen($sdestinationfile, $fo_overwrite + $fo_createpath + $fo_binary)
        If @error Then
            $ierror = 3
            $breturn = False
            ExitLoop
        EndIf
        Do
            $btempdata = FileRead($hinfile, 1024 * 1024)
            $iread += BinaryLen($btempdata)
            If $iread = $ifilesize Then
                $btempdata = _crypt_decryptdata($btempdata, $vcryptkey, $calg_userkey, True)
                If @error Then
                    $ierror = @error + 400
                    $iextended = @extended
                    $breturn = False
                EndIf
                FileWrite($houtfile, $btempdata)
                ExitLoop 2
            Else
                $btempdata = _crypt_decryptdata($btempdata, $vcryptkey, $calg_userkey, False)
                If @error Then
                    $ierror = @error + 500
                    $iextended = @extended
                    $breturn = False
                    ExitLoop 2
                EndIf
                FileWrite($houtfile, $btempdata)
            EndIf
        Until False
    Until True
    If $ialgid <> $calg_userkey Then _crypt_destroykey($vcryptkey)
    _crypt_shutdown()
    If $hinfile <> -1 Then FileClose($hinfile)
    If $houtfile <> -1 Then FileClose($houtfile)
    Return SetError($ierror, $iextended, $breturn)
EndFunc

Func _crypt_genrandom($pbuffer, $isize)
    _crypt_startup()
    Local $aret = DllCall(__crypt_dllhandle(), "bool", "CryptGenRandom", "handle", __crypt_context(), "dword", $isize, "struct*", $pbuffer)
    Local $ierror = @error, $iextended = @extended
    _crypt_shutdown()
    If $ierror OR (NOT $aret[0]) Then
        Return SetError($ierror + 10, $iextended, False)
    Else
        Return True
    EndIf
EndFunc

Func __crypt_refcount()
    Return $__g_acryptinternaldata[0]
EndFunc

Func __crypt_refcountinc()
    $__g_acryptinternaldata[0] += 1
EndFunc

Func __crypt_refcountdec()
    If $__g_acryptinternaldata[0] > 0 Then $__g_acryptinternaldata[0] -= 1
EndFunc

Func __crypt_dllhandle()
    Return $__g_acryptinternaldata[1]
EndFunc

Func __crypt_dllhandleset($hadvapi32)
    $__g_acryptinternaldata[1] = $hadvapi32
EndFunc

Func __crypt_context()
    Return $__g_acryptinternaldata[2]
EndFunc

Func __crypt_contextset($hcryptcontext)
    $__g_acryptinternaldata[2] = $hcryptcontext
EndFunc

Func __crypt_getcalgfromcryptkey($vcryptkey)
    Local $talgid = DllStructCreate("uint;dword")
    DllStructSetData($talgid, 2, 4)
    Local $aret = DllCall(__crypt_dllhandle(), "bool", "CryptGetKeyParam", "handle", $vcryptkey, "dword", $kp_algid, "ptr", DllStructGetPtr($talgid, 1), "dword*", DllStructGetPtr($talgid, 2), "dword", 0)
    If @error OR NOT $aret[0] Then
        Return SetError(@error, @extended, $crypt_userdata)
    Else
        Return DllStructGetData($talgid, 1)
    EndIf
EndFunc

Global Const $tcs_ex_flatseparators = 1
Global Const $tcs_ex_registerdrop = 2
Global Const $tcht_nowhere = 1
Global Const $tcht_onitemicon = 2
Global Const $tcht_onitemlabel = 4
Global Const $tcht_onitem = 6
Global Const $tcif_text = 1
Global Const $tcif_image = 2
Global Const $tcif_rtlreading = 4
Global Const $tcif_param = 8
Global Const $tcif_state = 16
Global Const $tcif_alldata = 27
Global Const $tcis_buttonpressed = 1
Global Const $tcis_highlighted = 2
Global Const $tc_err = -1
Global Const $tcs_bottom = 2
Global Const $tcs_buttons = 256
Global Const $tcs_fixedwidth = 1024
Global Const $tcs_flatbuttons = 8
Global Const $tcs_focusnever = 32768
Global Const $tcs_focusonbuttondown = 4096
Global Const $tcs_forceiconleft = 16
Global Const $tcs_forcelabelleft = 32
Global Const $tcs_hottrack = 64
Global Const $tcs_multiline = 512
Global Const $tcs_multiselect = 4
Global Const $tcs_ownerdrawfixed = 8192
Global Const $tcs_raggedright = 2048
Global Const $tcs_right = 2
Global Const $tcs_rightjustify = 0
Global Const $tcs_scrollopposite = 1
Global Const $tcs_singleline = 0
Global Const $tcs_tabs = 0
Global Const $tcs_tooltips = 16384
Global Const $tcs_vertical = 128
Global Const $gui_ss_default_tab = 0
Global Const $tcm_first = 4864
Global Const $tccm_first = 8192
Global Const $tcm_adjustrect = ($tcm_first + 40)
Global Const $tcm_deleteallitems = ($tcm_first + 9)
Global Const $tcm_deleteitem = ($tcm_first + 8)
Global Const $tcm_deselectall = ($tcm_first + 50)
Global Const $tcm_getcurfocus = ($tcm_first + 47)
Global Const $tcm_getcursel = ($tcm_first + 11)
Global Const $tcm_getextendedstyle = ($tcm_first + 53)
Global Const $tcm_getimagelist = ($tcm_first + 2)
Global Const $tcm_getitema = ($tcm_first + 5)
Global Const $tcm_getitemw = ($tcm_first + 60)
Global Const $tcm_getitemcount = ($tcm_first + 4)
Global Const $tcm_getitemrect = ($tcm_first + 10)
Global Const $tcm_getrowcount = ($tcm_first + 44)
Global Const $tcm_gettooltips = ($tcm_first + 45)
Global Const $tccm_getunicodeformat = ($tccm_first + 6)
Global Const $tcm_getunicodeformat = $tccm_getunicodeformat
Global Const $tcm_highlightitem = ($tcm_first + 51)
Global Const $tcm_hittest = ($tcm_first + 13)
Global Const $tcm_insertitema = ($tcm_first + 7)
Global Const $tcm_insertitemw = ($tcm_first + 62)
Global Const $tcm_removeimage = ($tcm_first + 42)
Global Const $tcm_setitema = ($tcm_first + 6)
Global Const $tcm_setitemw = ($tcm_first + 61)
Global Const $tcm_setitemextra = ($tcm_first + 14)
Global Const $tcm_setitemsize = $tcm_first + 41
Global Const $tcm_setcurfocus = ($tcm_first + 48)
Global Const $tcm_setcursel = ($tcm_first + 12)
Global Const $tcm_setextendedstyle = ($tcm_first + 52)
Global Const $tcm_setimagelist = $tcm_first + 3
Global Const $tcm_setmintabwidth = ($tcm_first + 49)
Global Const $tcm_setpadding = ($tcm_first + 43)
Global Const $tcm_settooltips = ($tcm_first + 46)
Global Const $tccm_setunicodeformat = ($tccm_first + 5)
Global Const $tcm_setunicodeformat = $tccm_setunicodeformat
Global Const $tcn_first = -550
Global Const $tcn_focuschange = ($tcn_first - 4)
Global Const $tcn_getobject = ($tcn_first - 3)
Global Const $tcn_keydown = ($tcn_first + 0)
Global Const $tcn_selchange = ($tcn_first - 1)
Global Const $tcn_selchanging = ($tcn_first - 2)
Global Const $hgifdll__kernel32 = DllOpen("kernel32.dll")
Global Const $hgifdll__user32 = DllOpen("user32.dll")
Global Const $hgifdll__gdi32 = DllOpen("gdi32.dll")
Global Const $hgifdll__comctl32 = DllOpen("comctl32.dll")
Global Const $hgifdll__ole32 = DllOpen("ole32.dll")
Global Const $hgifdll__gdiplus = DllOpen("gdiplus.dll")
Global $sgif__assocstring_internal = ";"

Func _gif_deletegif($igifid, $fdelctrl = True)
    Local $pgif = _gif_getgifassoc($igifid)
    Local $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;" & "bool ExitFlag;", $pgif)
    Local $hgifthread = DllStructGetData($tgif, "GIFThread")
    If $hgifthread Then
        _gif_resumethread($hgifthread)
        DllStructSetData($tgif, "ExitFlag", 1)
        _gif_waitforsingleobject($hgifthread)
        _gif_closehandle($hgifthread)
    EndIf
    Local $pcodebuffer = DllStructGetData($tgif, "CodeBuffer")
    If $pcodebuffer Then _gif_memglobalfree($pcodebuffer)
    Local $himagelist = DllStructGetData($tgif, "ImageList")
    If $himagelist Then _gif_imagelist_destroy($himagelist)
    _gif_memglobalfree($pgif)
    _gif_deleteobject(GUICtrlSendMsg($igifid, 370, 0, 0))
    If $fdelctrl Then GUICtrlDelete($igifid)
    $sgif__assocstring_internal = StringReplace($sgif__assocstring_internal, $igifid & "|" & $pgif & ";", "")
    Return 1
EndFunc

Func _gif_exitanimation($igifid)
    Local $pgif = _gif_getgifassoc($igifid)
    Local $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;" & "bool ExitFlag;" & "bool Transparent;" & "dword CurrentFrame;", $pgif)
    Local $hgifthread = DllStructGetData($tgif, "GIFThread")
    If $hgifthread Then
        _gif_resumethread($hgifthread)
        DllStructSetData($tgif, "ExitFlag", 1)
        _gif_waitforsingleobject($hgifthread)
        _gif_closehandle($hgifthread)
        DllStructSetData($tgif, "GIFThread", 0)
    EndIf
    Local $pcodebuffer = DllStructGetData($tgif, "CodeBuffer")
    If $pcodebuffer Then _gif_memglobalfree($pcodebuffer)
    DllStructSetData($tgif, "CodeBuffer", 0)
    Local $himagelist = DllStructGetData($tgif, "ImageList")
    If $himagelist Then _gif_imagelist_destroy($himagelist)
    DllStructSetData($tgif, "ImageList", 0)
    DllStructSetData($tgif, "CurrentFrame", 0)
    GUICtrlSetState($igifid, GUICtrlGetState($igifid))
    Return 1
EndFunc

Func _gif_getcurrentframe($igifid)
    Local $pgif = _gif_getgifassoc($igifid)
    Local $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;" & "bool ExitFlag;" & "bool Transparent;" & "dword CurrentFrame;", $pgif)
    Return DllStructGetData($tgif, "CurrentFrame")
EndFunc

Func _gif_getdimension($vgif, $vadditionaldata = "")
    Local $aout[2] = [0, 0]
    Local $vdata
    If IsBinary($vgif) Then
        $vdata = $vgif
    Else
        If $vadditionaldata Then
            Local $adata = StringSplit($vadditionaldata, ";", 2)
            If UBound($adata) < 3 Then ReDim $adata[3]
            $vdata = _gif_resourcegetasraw($vgif, $adata[0], $adata[1], $adata[2])
            If @error Then
                $vdata = $vgif
            Else
                If $adata[0] = 2 Then $vdata = _gif_makebitmapfromrt_bitmap($vdata)
            EndIf
        Else
            $vdata = $vgif
        EndIf
    EndIf
    Local $hgdip
    Local $hmemglobal
    Local $pbitmap, $iwidth, $iheight
    If IsString($vdata) Then
        $pbitmap = _gif_createbitmapfromfile($hgdip, $vdata, $iwidth, $iheight)
        If @error Then $pbitmap = _gif_createbitmapfrombinaryimage($hgdip, $hmemglobal, Binary($vdata), $iwidth, $iheight)
        If @error Then
            $vdata = FileRead($vdata)
            $pbitmap = _gif_createbitmapfrombinaryimage($hgdip, $hmemglobal, $vdata, $iwidth, $iheight)
        EndIf
    Else
        $pbitmap = _gif_createbitmapfrombinaryimage($hgdip, $hmemglobal, $vdata, $iwidth, $iheight)
    EndIf
    If @error Then Return SetError(1, 0, $aout)
    _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
    $aout[0] = $iwidth
    $aout[1] = $iheight
    Return $aout
EndFunc

Func _gif_getsize($igifid)
    Local $pgif = _gif_getgifassoc($igifid)
    Local $aout[2] = [0, 0]
    Local $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;", $pgif)
    Local $himagelist = DllStructGetData($tgif, "ImageList")
    If $himagelist Then Return _gif_imagelist_geticonsize($himagelist)
    Local $hcontrol = DllStructGetData($tgif, "ControlHandle")
    If NOT $hcontrol Then Return SetError(1, 0, $aout)
    Local $aarray = WinGetPos($hcontrol)
    If @error Then Return SetError(1, 0, $aout)
    $aout[0] = $aarray[2]
    $aout[1] = $aarray[3]
    Return $aout
EndFunc

Func _gif_pauseanimation($igifid)
    Local $pgif = _gif_getgifassoc($igifid)
    Local $tgif = DllStructCreate("handle GIFThread;", $pgif)
    Local $hgifthread = DllStructGetData($tgif, "GIFThread")
    If NOT $hgifthread Then Return SetExtended(1, 1)
    If _gif_suspendthread($hgifthread) Then _gif_resumethread($hgifthread)
    Return 1
EndFunc

Func _gif_refreshgif($igifid)
    Local $pgif = _gif_getgifassoc($igifid)
    Local $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;" & "bool ExitFlag;" & "bool Transparent;" & "dword CurrentFrame;", $pgif)
    If @error Then Return SetError(1, 0, 0)
    If NOT DllStructGetData($tgif, "ImageList") Then Return 1
    Local $hdc = _gif_getdc(DllStructGetData($tgif, "ControlHandle"))
    If @error Then Return SetError(2, 0, 0)
    Local $icolorref = -1
    If DllStructGetData($tgif, "Transparent") Then $icolorref = _gif_getunderlyingcolor(DllStructGetData($tgif, "ControlHandle"))
    _gif_imagelist_drawex(DllStructGetData($tgif, "ImageList"), DllStructGetData($tgif, "CurrentFrame"), $hdc, 0, 0, 0, 0, $icolorref, -1, 0)
    _gif_releasedc(0, $hdc)
    Return 1
EndFunc

Func _gif_resumeanimation($igifid)
    Local $pgif = _gif_getgifassoc($igifid)
    Local $tgif = DllStructCreate("handle GIFThread;", $pgif)
    Local $hgifthread = DllStructGetData($tgif, "GIFThread")
    If NOT $hgifthread Then Return SetExtended(1, 1)
    If _gif_resumethread($hgifthread) = 2 Then _gif_suspendthread($hgifthread)
    Return 1
EndFunc

Func _gif_validategif($igifid)
    Local $pgif = _gif_getgifassoc($igifid)
    Local $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;" & "bool ExitFlag;" & "bool Transparent;" & "dword CurrentFrame;" & "dword NumberOfFrames;", $pgif)
    If @error Then Return SetError(1, 0, 0)
    If DllStructGetData($tgif, "NumberOfFrames") < 2 Then Return 1
    If NOT DllStructGetData($tgif, "GIFThread") Then Return 1
    _gif_redrawwindow(DllStructGetData($tgif, "ControlHandle"), 0, 0, 1280)
    _gif_refreshgif($igifid)
    Return 1
EndFunc

Func _guictrlcreategif($vgif, $vadditionaldata, $ileft, $itop, $iwidth = Default, $iheight = Default, $irenderingstyle = Default, $iforcedargb = Default, $hgifcontrol = 0)
    If $iwidth = -1 Then $iwidth = Default
    If $iheight = -1 Then $iheight = Default
    Local $vdata
    If IsBinary($vgif) Then
        $vdata = $vgif
    Else
        If $vadditionaldata Then
            Local $adata = StringSplit($vadditionaldata, ";", 2)
            If UBound($adata) < 3 Then ReDim $adata[3]
            $vdata = _gif_resourcegetasraw($vgif, $adata[0], $adata[1], $adata[2])
            If @error Then
                $vdata = $vgif
            Else
                If $adata[0] = 2 Then $vdata = _gif_makebitmapfromrt_bitmap($vdata)
            EndIf
        Else
            $vdata = $vgif
        EndIf
    EndIf
    Local $iwidthdef, $iheightdef
    If NOT IsKeyword($iwidthdef) = 1 Then $iwidthdef = $iwidth
    If NOT IsKeyword($iheightdef) = 1 Then $iheightdef = $iheight
    Local $pgif = _gif_create_pgif($vdata, $iwidthdef, $iheightdef, $hgifcontrol, $ileft, $itop, $iforcedargb)
    If @error Then
        $vdata = FileRead($vdata)
        $pgif = _gif_create_pgif($vdata, $iwidthdef, $iheightdef, $hgifcontrol, $ileft, $itop, $iforcedargb)
        If @error Then
            $pgif = _gif_create_pgif(Binary($vgif), $iwidthdef, $iheightdef, $hgifcontrol, $ileft, $itop, $iforcedargb)
            If @error Then Return SetError(1, @extended = True, 0)
        EndIf
    EndIf
    Local $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;" & "bool ExitFlag;" & "bool Transparent;" & "dword CurrentFrame;" & "dword NumberOfFrames;", $pgif)
    Local $iframecount = DllStructGetData($tgif, "NumberOfFrames")
    $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;" & "bool ExitFlag;" & "bool Transparent;" & "dword CurrentFrame;" & "dword NumberOfFrames;" & "dword FrameDelay[" & $iframecount & "];", $pgif)
    GUICtrlSetResizing($hgifcontrol, 802)
    DllStructSetData($tgif, "ControlHandle", GUICtrlGetHandle($hgifcontrol))
    If $iframecount = 1 Then
        $sgif__assocstring_internal &= $hgifcontrol & "|" & $pgif & ";"
        Return SetExtended(1, $hgifcontrol)
    EndIf
    Local $isizecodebuffer = 157
    If @AutoItX64 Then $isizecodebuffer = 220
    Local $pcodebuffer = _gif_memglobalalloc($isizecodebuffer, 64)
    If @error Then Return SetError(2, 0, $hgifcontrol)
    DllStructSetData($tgif, "CodeBuffer", $pcodebuffer)
    _gif_virtualprotect($pcodebuffer, $isizecodebuffer, 64)
    If @error Then Return SetError(3, 0, $hgifcontrol)
    Local $tcodebuffer = DllStructCreate("byte[" & $isizecodebuffer & "]", $pcodebuffer)
    Local $pimagelist_drawex = _gif_getaddress(_gif_getmodulehandle("comctl32.dll"), "ImageList_DrawEx")
    If @error Then Return SetError(4, 1, $hgifcontrol)
    Local $psleep = _gif_getaddress(_gif_getmodulehandle("kernel32.dll"), "Sleep")
    If @error Then Return SetError(4, 2, $hgifcontrol)
    Local $pgetpixel = _gif_getaddress(_gif_getmodulehandle("gdi32.dll"), "GetPixel")
    If @error Then Return SetError(4, 3, $hgifcontrol)
    Local $huser32 = _gif_getmodulehandle("user32.dll")
    Local $pgetdc = _gif_getaddress($huser32, "GetDC")
    If @error Then Return SetError(4, 4, $hgifcontrol)
    Local $preleasedc = _gif_getaddress($huser32, "ReleaseDC")
    If @error Then Return SetError(4, 5, $hgifcontrol)
    Local $himagelist = DllStructGetData($tgif, "ImageList")
    Local $hcontrol = DllStructGetData($tgif, "ControlHandle")
    Local $istyle
    If $irenderingstyle = Default Then
        $istyle = 1
        If DllStructGetData($tgif, "Transparent") Then $istyle = 0
    Else
        $istyle = $irenderingstyle
    EndIf
    If @AutoItX64 Then
        DllStructSetData($tcodebuffer, 1, "0x" & "4883EC" & _gif_swapendian(88, 1) & "" & "4831F6" & "" & "" & "8BC6" & "A3" & _gif_swapendian(DllStructGetPtr($tgif, "CurrentFrame"), 8) & "" & "48B9" & _gif_swapendian($hcontrol, 8) & "48B8" & _gif_swapendian($pgetdc, 8) & "FFD0" & "" & "4889C3" & "" & "49C7C0" & _gif_swapendian(0, 4) & "BA" & _gif_swapendian(0, 4) & "4889C1" & "48B8" & _gif_swapendian($pgetpixel, 8) & "FFD0" & "" & "3D" & _gif_swapendian(-1, 4) & "75" & _gif_swapendian(2, 1) & "8BC7" & "" & "8BF8" & "" & "89442438" & "B8" & _gif_swapendian($istyle, 4) & "89442448" & "4989D8" & "49C7C1" & _gif_swapendian(0, 4) & "89F2" & "48B9" & _gif_swapendian($himagelist, 8) & "" & "48B8" & _gif_swapendian($pimagelist_drawex, 8) & "FFD0" & "" & "4889DA" & "48B9" & _gif_swapendian($hcontrol, 8) & "48B8" & _gif_swapendian($preleasedc, 8) & "FFD0" & "" & "A1" & _gif_swapendian(DllStructGetPtr($tgif, "ExitFlag"), 8) & "85C0" & "75" & _gif_swapendian(46, 1) & "" & "48BB" & _gif_swapendian(DllStructGetPtr($tgif, "FrameDelay"), 8) & "488B0CB3" & "48B8" & _gif_swapendian($psleep, 8) & "FFD0" & "" & "FFC6" & "" & "81FE" & _gif_swapendian($iframecount, 4) & "" & "74" & _gif_swapendian(5, 1) & "E9" & _gif_swapendian(-200, 4) & "E9" & _gif_swapendian(-208, 4) & "" & "4831C0" & "4883C4" & _gif_swapendian(88, 1) & "C3")
    Else
        DllStructSetData($tcodebuffer, 1, "0x" & "" & "33F6" & "" & "" & "8BC6" & "A3" & _gif_swapendian(DllStructGetPtr($tgif, "CurrentFrame"), 4) & "68" & _gif_swapendian($istyle, 4) & "68" & _gif_swapendian(-1, 4) & "" & "68" & _gif_swapendian($hcontrol, 4) & "B8" & _gif_swapendian($pgetdc, 4) & "FFD0" & "" & "8BD8" & "" & "68" & _gif_swapendian(0, 4) & "68" & _gif_swapendian(0, 4) & "53" & "B8" & _gif_swapendian($pgetpixel, 4) & "FFD0" & "" & "3D" & _gif_swapendian(-1, 4) & "75" & _gif_swapendian(2, 1) & "8BC7" & "" & "8BF8" & "" & "50" & "68" & _gif_swapendian(0, 4) & "68" & _gif_swapendian(0, 4) & "68" & _gif_swapendian(0, 4) & "68" & _gif_swapendian(0, 4) & "53" & "56" & "68" & _gif_swapendian($himagelist, 4) & "" & "B8" & _gif_swapendian($pimagelist_drawex, 4) & "FFD0" & "" & "53" & "68" & _gif_swapendian($hcontrol, 4) & "B8" & _gif_swapendian($preleasedc, 4) & "FFD0" & "" & "A1" & _gif_swapendian(DllStructGetPtr($tgif, "ExitFlag"), 4) & "85C0" & "75" & _gif_swapendian(35, 1) & "" & "BB" & _gif_swapendian(DllStructGetPtr($tgif, "FrameDelay"), 4) & "8B0CB3" & "51" & "B8" & _gif_swapendian($psleep, 4) & "FFD0" & "" & "46" & "" & "81FE" & _gif_swapendian($iframecount, 4) & "" & "74" & _gif_swapendian(5, 1) & "E9" & _gif_swapendian(-147, 4) & "E9" & _gif_swapendian(-154, 4) & "" & "33C0" & "C3")
    EndIf
    Local $hthread = _gif_createthread($pcodebuffer)
    If @error Then Return SetError(5, 0, $hgifcontrol)
    DllStructSetData($tgif, "GIFThread", $hthread)
    _gif_invalidaterect(_gif_getparent($hcontrol))
    $sgif__assocstring_internal &= $hgifcontrol & "|" & $pgif & ";"
    Return $hgifcontrol
EndFunc

Func _guictrlsetgif($icontrold, $vgif, $vadditionaldata = Default, $irenderingstyle = Default, $iforcedargb = Default)
    Local $actrlpos = WinGetPos(GUICtrlGetHandle($icontrold))
    If @error Then Return SetError(6, 0, False)
    If $vadditionaldata = Default Then $vadditionaldata = ""
    If $actrlpos[2] = 0 Then $actrlpos[2] = Default
    If $actrlpos[3] = 0 Then $actrlpos[3] = Default
    _gif_deletegif($icontrold, False)
    _guictrlcreategif($vgif, $vadditionaldata, $actrlpos[0], $actrlpos[1], $actrlpos[2], $actrlpos[3], $irenderingstyle, $iforcedargb, $icontrold)
    Return SetError(@error, @extended, NOT @error)
EndFunc

Func _gif_closehandle($hhandle)
    Local $acall = DllCall($hgifdll__kernel32, "bool", "CloseHandle", "handle", $hhandle)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_waitforsingleobject($hhandle, $imilisec = -1)
    Local $acall = DllCall($hgifdll__kernel32, "dword", "WaitForSingleObject", "handle", $hhandle, "dword", $imilisec)
    If @error Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_createthread($paddress)
    Local $acall = DllCall($hgifdll__kernel32, "handle", "CreateThread", "ptr", 0, "dword_ptr", 0, "ptr", $paddress, "ptr", 0, "dword", 0, "dword*", 0)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_suspendthread($htread)
    Local $acall = DllCall($hgifdll__kernel32, "dword", "SuspendThread", "handle", $htread)
    If @error OR $acall[0] = -1 Then Return SetError(1, 0, -1)
    Return $acall[0]
EndFunc

Func _gif_resumethread($htread)
    Local $acall = DllCall($hgifdll__kernel32, "dword", "ResumeThread", "handle", $htread)
    If @error OR $acall[0] = -1 Then Return SetError(1, 0, -1)
    Return $acall[0]
EndFunc

Func _gif_virtualprotect($paddress, $isize, $iprotection)
    Local $acall = DllCall($hgifdll__kernel32, "bool", "VirtualProtect", "ptr", $paddress, "dword_ptr", $isize, "dword", $iprotection, "dword*", 0)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_getaddress($hmodule, $vfuncname)
    Local $stype = "str"
    If IsNumber($vfuncname) Then $stype = "int"
    Local $acall = DllCall($hgifdll__kernel32, "ptr", "GetProcAddress", "handle", $hmodule, $stype, $vfuncname)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_getmodulehandle($vmodule = 0)
    Local $stype = "wstr"
    If NOT $vmodule Then $stype = "ptr"
    Local $acall = DllCall($hgifdll__kernel32, "ptr", "GetModuleHandleW", $stype, $vmodule)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_getbkcolor($hwnd)
    Local $hdc = _gif_getdc($hwnd)
    If @error Then Return SetError(1, 0, -1)
    Local $acall = DllCall($hgifdll__gdi32, "dword", "GetBkColor", "handle", $hdc)
    If @error OR $acall[0] = -1 Then
        _gif_releasedc($hwnd, $hdc)
        Return SetError(2, 0, -1)
    EndIf
    _gif_releasedc($hwnd, $hdc)
    Return $acall[0]
EndFunc

Func _gif_getdc($hwnd)
    Local $acall = DllCall($hgifdll__user32, "handle", "GetDC", "hwnd", $hwnd)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_releasedc($hwnd, $hdc)
    Local $acall = DllCall($hgifdll__user32, "int", "ReleaseDC", "hwnd", $hwnd, "handle", $hdc)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_invalidaterect($hwnd, $prect = 0, $ferase = True)
    Local $acall = DllCall($hgifdll__user32, "bool", "InvalidateRect", "hwnd", $hwnd, "ptr", $prect, "bool", $ferase)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_validaterect($hwnd, $prect = 0)
    Local $acall = DllCall($hgifdll__user32, "bool", "ValidateRect", "hwnd", $hwnd, "ptr", $prect)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_redrawwindow($hwnd, $prect, $hregion, $iflags)
    Local $acall = DllCall($hgifdll__user32, "bool", "RedrawWindow", "hwnd", $hwnd, "ptr", $prect, "handle", $hregion, "dword", $iflags)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_getunderlyingcolor($hwnd)
    Local $hparent = _gif_getparent($hwnd)
    If @error Then Return SetError(1, 0, -1)
    Local $icolor = _gif_getbkcolor($hparent)
    Return SetError(@error, 0, $icolor)
EndFunc

Func _gif_getparent($hwnd)
    Local $acall = DllCall($hgifdll__user32, "hwnd", "GetParent", "hwnd", $hwnd)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_create_pgif($bbinary, ByRef $iwidth, ByRef $iheight, ByRef $hgifcontrol, $ileft = 0, $itop = 0, $iargb = Default)
    If $iargb = Default Then $iargb = -16777216
    Local $hgdip
    Local $hmemglobal
    Local $pbitmap, $iwidthreal, $iheightreal
    If IsBinary($bbinary) Then
        $pbitmap = _gif_createbitmapfrombinaryimage($hgdip, $hmemglobal, $bbinary, $iwidthreal, $iheightreal)
    Else
        $pbitmap = _gif_createbitmapfromfile($hgdip, $bbinary, $iwidthreal, $iheightreal)
    EndIf
    If @error Then
        Local $ierr = @error
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
        Return SetError(1, $ierr, 0)
    EndIf
    Local $fdoresize
    If $iwidth = Default Then
        $iwidth = $iwidthreal
    Else
        $fdoresize = True
    EndIf
    If $iheight = Default Then
        $iheight = $iheightreal
    Else
        $fdoresize = True
    EndIf
    Local $iframedimensionscount = _gif_gdipimagegetframedimensionscount($pbitmap)
    If @error Then
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
        Return SetError(2, 0, 0)
    EndIf
    Local $tguid = DllStructCreate("dword;word;word;byte[8]")
    Local $pguid = DllStructGetPtr($tguid)
    _gif_gdipimagegetframedimensionslist($pbitmap, $pguid, $iframedimensionscount)
    If @error Then
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
        Return SetError(3, 0, 0)
    EndIf
    Local $iframecount = _gif_gdipimagegetframecount($pbitmap, $pguid)
    If @error Then
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
        Return SetError(4, 0, 0)
    EndIf
    Local $pgif = _gif_memglobalalloc(4 * (8 + 4 * @AutoItX64 + $iframecount), 64)
    If @error Then
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
        Return SetError(3, 0, 0)
    EndIf
    Local $tgif = DllStructCreate("handle GIFThread;" & "ptr CodeBuffer;" & "hwnd ControlHandle;" & "handle ImageList;" & "bool ExitFlag;" & "bool Transparent;" & "dword CurrentFrame;" & "dword NumberOfFrames;" & "dword FrameDelay[" & $iframecount & "];", $pgif)
    DllStructSetData($tgif, "GIFThread", 0)
    DllStructSetData($tgif, "ControlHandle", 0)
    DllStructSetData($tgif, "ExitFlag", 0)
    DllStructSetData($tgif, "CurrentFrame", 0)
    DllStructSetData($tgif, "NumberOfFrames", $iframecount)
    Local $fnewcontrol = False
    If NOT $hgifcontrol Then
        $fnewcontrol = True
        $hgifcontrol = GUICtrlCreatePic("", $ileft, $itop, $iwidth, $iheight)
    EndIf
    If $iframecount = 1 Then
        Local $hgifbitmap = _gif_gdipcreatehbitmapfrombitmap($pbitmap, $iargb)
        If $fdoresize Then _gif_resizebitmap($hgifbitmap, $iwidth, $iheight)
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
        _gif_deleteobject(GUICtrlSendMsg($hgifcontrol, 370, 0, $hgifbitmap))
        _gif_deleteobject($hgifbitmap)
        Return $pgif
    EndIf
    Local $himagelist = _gif_imagelist_create($iwidth, $iheight, 32, $iframecount)
    If @error Then
        If $fnewcontrol Then GUICtrlDelete($hgifcontrol)
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal, $pgif)
        Return SetError(4, 0, 0)
    EndIf
    DllStructSetData($tgif, "ImageList", $himagelist)
    Local $hbitmap
    For $j = 0 To $iframecount - 1
        _gif_gdipimageselectactiveframe($pbitmap, $pguid, $j)
        If @error Then ContinueLoop
        $hbitmap = _gif_gdipcreatehbitmapfrombitmap($pbitmap, $iargb)
        If $fdoresize Then _gif_resizebitmap($hbitmap, $iwidth, $iheight)
        _gif_imagelist_add($himagelist, $hbitmap)
        If $j = 0 Then
            _gif_deleteobject(GUICtrlSendMsg($hgifcontrol, 370, 0, $hbitmap))
            _gif_deleteobject($hbitmap)
        EndIf
        _gif_deleteobject($hbitmap)
    Next
    Local $ipropertyitemsize = _gif_gdipgetpropertyitemsize($pbitmap, 20736)
    If @error Then
        If $fnewcontrol Then GUICtrlDelete($hgifcontrol)
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal, $pgif)
        Return SetError(5, 0, 0)
    EndIf
    Local $trawpropitem = DllStructCreate("byte[" & $ipropertyitemsize & "]")
    _gif_gdipgetpropertyitem($pbitmap, 20736, $ipropertyitemsize, DllStructGetPtr($trawpropitem))
    If @error Then
        If $fnewcontrol Then GUICtrlDelete($hgifcontrol)
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal, $pgif)
        Return SetError(6, 0, 0)
    EndIf
    Local $tpropitem = DllStructCreate("int Id;" & "dword Length;" & "word Type;" & "ptr Value", DllStructGetPtr($trawpropitem))
    Local $isize = DllStructGetData($tpropitem, "Length") / 4
    Local $tpropertydata = DllStructCreate("dword[" & $isize & "]", DllStructGetData($tpropitem, "Value"))
    Local $idelay
    For $j = 1 To $iframecount
        $idelay = DllStructGetData($tpropertydata, 1, $j) * 10
        If NOT $idelay Then $idelay = 130
        If $idelay < 50 Then $idelay = 50
        DllStructSetData($tgif, "FrameDelay", $idelay, $j)
    Next
    Local $ftransparent = True
    Local $ipixelcolor = _gif_gdipbitmapgetpixel($pbitmap, 0, 0)
    If BitShift($ipixelcolor, 24) Then $ftransparent = False
    DllStructSetData($tgif, "Transparent", $ftransparent)
    _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
    Return $pgif
EndFunc

Func _gif_createstreamonhglobal($hglobal, $iflag = 1)
    Local $acall = DllCall($hgifdll__ole32, "long", "CreateStreamOnHGlobal", "handle", $hglobal, "int", $iflag, "ptr*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[3]
EndFunc

Func _gif_getobject($hobject, $isize, $pobject)
    Local $acall = DllCall($hgifdll__gdi32, "int", "GetObject", "handle", $hobject, "int", $isize, "ptr", $pobject)
    If @error Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_deleteobject($hobject)
    Local $acall = DllCall($hgifdll__gdi32, "bool", "DeleteObject", "handle", $hobject)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_imagelist_geticonsize($himagelist)
    Local $aout[2] = [0, 0]
    Local $acall = DllCall($hgifdll__comctl32, "bool", "ImageList_GetIconSize", "handle", $himagelist, "int*", 0, "int*", 0)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, $aout)
    $aout[0] = $acall[2]
    $aout[1] = $acall[3]
    Return $aout
EndFunc

Func _gif_imagelist_create($iwidth, $iheight, $iflag, $iinitial, $igrow = 0)
    Local $acall = DllCall($hgifdll__comctl32, "handle", "ImageList_Create", "int", $iwidth, "int", $iheight, "dword", $iflag, "int", $iinitial, "int", $igrow)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_imagelist_add($himagelist, $hbitmap)
    Local $acall = DllCall($hgifdll__comctl32, "int", "ImageList_Add", "handle", $himagelist, "handle", $hbitmap, "handle", 0)
    If @error OR $acall[0] = -1 Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_imagelist_destroy($himagelist)
    Local $acall = DllCall($hgifdll__comctl32, "bool", "ImageList_Destroy", "handle", $himagelist)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_imagelist_drawex($himagelist, $iimageindex, $hdc, $ixpos = 0, $iypos = 0, $iwidth = 0, $iheight = 0, $ibkcolref = -1, $ifgcolref = -1, $istyle = 0)
    Local $acall = DllCall($hgifdll__comctl32, "bool", "ImageList_DrawEx", "handle", $himagelist, "int", $iimageindex, "handle", $hdc, "int", $ixpos, "int", $iypos, "int", $iwidth, "int", $iheight, "dword", $ibkcolref, "dword", $ifgcolref, "dword", $istyle)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_createbitmapfromfile(ByRef $hgdip, $sfile, ByRef $iwidth, ByRef $iheight)
    $hgdip = _gif_gdiplusstartup()
    If @error Then Return SetError(1, 0, 0)
    Local $pbitmap = _gif_gdiploadimagefromfile($sfile)
    If @error Then
        _gif_gdiplusshutdown($hgdip)
        Return SetError(2, 0, 0)
    EndIf
    _gif_gdipgetimagedimension($pbitmap, $iwidth, $iheight)
    If @error Then
        _gif_freegdipandmem($pbitmap, $hgdip)
        Return SetError(3, 0, 0)
    EndIf
    Return $pbitmap
EndFunc

Func _gif_createbitmapfrombinaryimage(ByRef $hgdip, ByRef $hmemglobal, $bbinary, ByRef $iwidth, ByRef $iheight)
    $bbinary = Binary($bbinary)
    Local $isize = BinaryLen($bbinary)
    $hmemglobal = _gif_memglobalalloc($isize, 2)
    If @error Then Return SetError(1, 0, 0)
    Local $pmemory = _gif_memgloballock($hmemglobal)
    If @error Then
        _gif_memglobalfree($hmemglobal)
        Return SetError(2, 0, 0)
    EndIf
    Local $tbinary = DllStructCreate("byte[" & $isize & "]", $pmemory)
    DllStructSetData($tbinary, 1, $bbinary)
    Local $pstream = _gif_createstreamonhglobal($pmemory, 0)
    If @error Then
        _gif_memglobalfree($hmemglobal)
        Return SetError(3, 0, 0)
    EndIf
    _gif_memglobalunlock($pmemory)
    $hgdip = _gif_gdiplusstartup()
    If @error Then
        _gif_memglobalfree($hmemglobal)
        Return SetError(4, 0, 0)
    EndIf
    Local $pbitmap = _gif_gdipcreatebitmapfromstream($pstream)
    If @error Then
        _gif_gdiplusshutdown($hgdip)
        _gif_memglobalfree($hmemglobal)
        Return SetError(5, 0, 0)
    EndIf
    _gif_gdipgetimagedimension($pbitmap, $iwidth, $iheight)
    If @error Then
        _gif_freegdipandmem($pbitmap, $hgdip, $hmemglobal)
        Return SetError(6, 0, 0)
    EndIf
    DllCallAddress("dword", DllStructGetData(DllStructCreate("ptr QueryInterface; ptr AddRef; ptr Release;", DllStructGetData(DllStructCreate("ptr pObj;", $pstream), "pObj")), "Release"), "ptr", $pstream)
    Return $pbitmap
EndFunc

Func _gif_resizebitmap(ByRef $hbitmap, $inewwidth, $inewheight)
    Local $tbmp = DllStructCreate("long Type;long Width;long Height;long WidthBytes;word Planes;word BitsPixel;ptr Bits;")
    _gif_getobject($hbitmap, DllStructGetSize($tbmp), DllStructGetPtr($tbmp))
    Local $pbitmap = _gif_gdipcreatebitmapfromscan0(DllStructGetData($tbmp, "Width"), DllStructGetData($tbmp, "Height"), DllStructGetData($tbmp, "WidthBytes"), 2498570, DllStructGetData($tbmp, "Bits"))
    _gif_gdipimagerotateflip($pbitmap, 6)
    Local $pnewbitmap = _gif_gdipcreatebitmapfromscan0($inewwidth, $inewheight)
    Local $hgraphics = _gif_gdipgetimagegraphicscontext($pnewbitmap)
    _gif_gdipdrawimagerect($hgraphics, $pbitmap, 0, 0, $inewwidth, $inewheight)
    Local $hnewbitmap = _gif_gdipcreatehbitmapfrombitmap($pnewbitmap)
    _gif_gdipdisposeimage($pbitmap)
    _gif_gdipdeletegraphics($hgraphics)
    _gif_deleteobject($hbitmap)
    _gif_gdipdisposeimage($pnewbitmap)
    $hbitmap = $hnewbitmap
    Return 1
EndFunc

Func _gif_gdiplusstartup()
    Local $tgdiplusstartupinput = DllStructCreate("dword GdiplusVersion;" & "ptr DebugEventCallback;" & "int SuppressBackgroundThread;" & "int SuppressExternalCodecs")
    DllStructSetData($tgdiplusstartupinput, "GdiplusVersion", 1)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdiplusStartup", "dword_ptr*", 0, "ptr", DllStructGetPtr($tgdiplusstartupinput), "ptr", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[1]
EndFunc

Func _gif_gdiplusshutdown($hgdip)
    DllCall($hgifdll__gdiplus, "none", "GdiplusShutdown", "dword_ptr", $hgdip)
EndFunc

Func _gif_gdipdisposeimage($himage)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipDisposeImage", "handle", $himage)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_gdipgetimagedimension($pbitmap, ByRef $iwidth, ByRef $iheight)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipGetImageDimension", "ptr", $pbitmap, "float*", 0, "float*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    $iwidth = $acall[2]
    $iheight = $acall[3]
EndFunc

Func _gif_gdipimagegetframedimensionscount($pbitmap)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipImageGetFrameDimensionsCount", "ptr", $pbitmap, "dword*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[2]
EndFunc

Func _gif_gdipimagegetframedimensionslist($pbitmap, $pguid, $iframedimensionscount)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipImageGetFrameDimensionsList", "ptr", $pbitmap, "ptr", $pguid, "dword", $iframedimensionscount)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_gdipimagegetframecount($pbitmap, $pguid)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipImageGetFrameCount", "ptr", $pbitmap, "ptr", $pguid, "dword*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[3]
EndFunc

Func _gif_gdipimageselectactiveframe($pbitmap, $pguid, $iframeindex)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipImageSelectActiveFrame", "ptr", $pbitmap, "ptr", $pguid, "dword", $iframeindex)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_gdipgetpropertyitemsize($pbitmap, $ipropid)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipGetPropertyItemSize", "ptr", $pbitmap, "ptr", $ipropid, "dword*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[3]
EndFunc

Func _gif_gdipgetpropertyitem($pbitmap, $ipropid, $isize, $pbuffer)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipGetPropertyItem", "ptr", $pbitmap, "dword", $ipropid, "dword", $isize, "ptr", $pbuffer)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_gdipbitmapgetpixel($pbitmap, $ix, $iy)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipBitmapGetPixel", "ptr", $pbitmap, "int", $ix, "int", $iy, "dword*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[4]
EndFunc

Func _gif_gdiploadimagefromfile($sfile)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipLoadImageFromFile", "wstr", $sfile, "ptr*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[2]
EndFunc

Func _gif_gdipcreatebitmapfromscan0($iwidth, $iheight, $istride = 0, $ipixelformat = 2498570, $pscan0 = 0)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipCreateBitmapFromScan0", "int", $iwidth, "int", $iheight, "int", $istride, "dword", $ipixelformat, "ptr", $pscan0, "ptr*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[6]
EndFunc

Func _gif_gdipcreatebitmapfromstream($pstream)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipCreateBitmapFromStream", "ptr", $pstream, "ptr*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[2]
EndFunc

Func _gif_gdipcreatehbitmapfrombitmap($pbitmap, $iargb = -16777216)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipCreateHBITMAPFromBitmap", "ptr", $pbitmap, "handle*", 0, "dword", $iargb)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[2]
EndFunc

Func _gif_gdipgetimagegraphicscontext($himage)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipGetImageGraphicsContext", "ptr", $himage, "ptr*", 0)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[2]
EndFunc

Func _gif_gdipdrawimagerect($hgraphics, $himage, $ix, $iy, $iwidth, $iheight)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipDrawImageRectI", "ptr", $hgraphics, "ptr", $himage, "int", $ix, "int", $iy, "int", $iwidth, "int", $iheight)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_gdipdeletegraphics($hgraphics)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipDeleteGraphics", "handle", $hgraphics)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_gdipimagerotateflip($himage, $itype)
    Local $acall = DllCall($hgifdll__gdiplus, "dword", "GdipImageRotateFlip", "handle", $himage, "dword", $itype)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_freegdipandmem($pbitmap = 0, $hgdip = 0, $hmem = 0, $pgif = 0)
    If $pbitmap Then _gif_gdipdisposeimage($pbitmap)
    If $hgdip Then _gif_gdiplusshutdown($hgdip)
    If $hmem Then _gif_memglobalfree($hmem)
    If $pgif Then _gif_memglobalfree($pgif)
EndFunc

Func _gif_memglobalalloc($isize, $iflag)
    Local $acall = DllCall($hgifdll__kernel32, "handle", "GlobalAlloc", "dword", $iflag, "dword_ptr", $isize)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_memglobalfree($hmem)
    Local $acall = DllCall($hgifdll__kernel32, "ptr", "GlobalFree", "handle", $hmem)
    If @error OR $acall[0] Then Return SetError(1, 0, 0)
    Return 1
EndFunc

Func _gif_memgloballock($hmem)
    Local $acall = DllCall($hgifdll__kernel32, "ptr", "GlobalLock", "handle", $hmem)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_memglobalunlock($hmem)
    Local $acall = DllCall($hgifdll__kernel32, "bool", "GlobalUnlock", "handle", $hmem)
    If @error Then Return SetError(1, 0, 0)
    If $acall[0] OR _gif_getlasterror() Then Return $acall[0]
    Return 1
EndFunc

Func _gif_getlasterror()
    Local $acall = DllCall($hgifdll__kernel32, "dword", "GetLastError")
    If @error Then Return SetError(1, 0, -1)
    Return $acall[0]
EndFunc

Func _gif_findresourceex($hmodule, $vrestype, $vresname, $ireslang = 0)
    Local $stypetype = "wstr"
    If $vrestype == Number($vrestype) Then $stypetype = "int"
    Local $snametype = "wstr"
    If $vresname == Number($vresname) Then $snametype = "int"
    Local $acall = DllCall($hgifdll__kernel32, "handle", "FindResourceExW", "handle", $hmodule, $stypetype, $vrestype, $snametype, $vresname, "int", $ireslang)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_sizeofresource($hmodule, $hresource)
    Local $acall = DllCall($hgifdll__kernel32, "int", "SizeofResource", "handle", $hmodule, "handle", $hresource)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_loadresource($hmodule, $hresource)
    Local $acall = DllCall($hgifdll__kernel32, "handle", "LoadResource", "handle", $hmodule, "handle", $hresource)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_lockresource($hresource)
    Local $acall = DllCall($hgifdll__kernel32, "ptr", "LockResource", "handle", $hresource)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_loadlibraryex($smodule, $iflag = 0)
    Local $acall = DllCall($hgifdll__kernel32, "handle", "LoadLibraryExW", "wstr", $smodule, "handle", 0, "dword", $iflag)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_freelibrary($hmodule)
    Local $acall = DllCall($hgifdll__kernel32, "bool", "FreeLibrary", "handle", $hmodule)
    If @error OR NOT $acall[0] Then Return SetError(1, 0, 0)
    Return $acall[0]
EndFunc

Func _gif_resourcegetasraw($smodule, $vrestype, $vresname, $ireslang = 0)
    Local $hmodule = _gif_loadlibraryex($smodule, 2)
    If @error Then Return SetError(1, 0, "")
    Local $hresource = _gif_findresourceex($hmodule, $vrestype, $vresname, $ireslang)
    If @error Then
        _gif_freelibrary($hmodule)
        Return SetError(2, 0, "")
    EndIf
    Local $isizeofresource = _gif_sizeofresource($hmodule, $hresource)
    If @error Then
        _gif_freelibrary($hmodule)
        Return SetError(3, 0, "")
    EndIf
    $hresource = _gif_loadresource($hmodule, $hresource)
    If @error Then
        _gif_freelibrary($hmodule)
        Return SetError(4, 0, "")
    EndIf
    Local $presource = _gif_lockresource($hresource)
    If @error Then
        _gif_freelibrary($hmodule)
        Return SetError(5, 0, "")
    EndIf
    Local $tbinary = DllStructCreate("byte[" & $isizeofresource & "]", $presource)
    Local $bbinary = DllStructGetData($tbinary, 1)
    _gif_freelibrary($hmodule)
    Return $bbinary
EndFunc

Func _gif_makebitmapfromrt_bitmap($bbinary)
    Local $tbinary = DllStructCreate("byte[" & BinaryLen($bbinary) & "]")
    DllStructSetData($tbinary, 1, $bbinary)
    Local $iheadersize = DllStructGetData(DllStructCreate("dword HeaderSize", DllStructGetPtr($tbinary)), "HeaderSize")
    Local $tbitmap, $imultiplier
    Switch $iheadersize
        Case 40
            $tbitmap = DllStructCreate("dword HeaderSize;" & "dword Width;" & "dword Height;" & "word Planes;" & "word BitPerPixel;" & "dword CompressionMethod;" & "dword Size;" & "dword Hresolution;" & "dword Vresolution;" & "dword Colors;" & "dword ImportantColors", DllStructGetPtr($tbinary))
            $imultiplier = 4
        Case 12
            $tbitmap = DllStructCreate("dword HeaderSize;" & "word Width;" & "word Height;" & "word Planes;" & "word BitPerPixel", DllStructGetPtr($tbinary))
            $imultiplier = 3
        Case Else
            Return SetError(1, 0, 0)
    EndSwitch
    Local $iexponent = DllStructGetData($tbitmap, "BitPerPixel")
    Local $tdib = DllStructCreate("align 2;char Identifier[2];" & "dword BitmapSize;" & "short;" & "short;" & "dword BitmapOffset;" & "byte Body[" & BinaryLen($bbinary) & "]")
    DllStructSetData($tdib, "Identifier", "BM")
    DllStructSetData($tdib, "BitmapSize", BinaryLen($bbinary) + 14)
    Local $irawbitmapsize = DllStructGetData($tbitmap, "Size")
    If $irawbitmapsize Then
        DllStructSetData($tdib, "BitmapOffset", BinaryLen($bbinary) - $irawbitmapsize + 14)
    Else
        If $iexponent = 24 Then
            DllStructSetData($tdib, "BitmapOffset", $iheadersize + 14)
        Else
            Local $iwidth = DllStructGetData($tbitmap, "Width")
            Local $iheight = DllStructGetData($tbitmap, "Height")
            $irawbitmapsize = 4 * Floor(($iwidth * $iexponent + 31) / 32) * $iheight
            Local $ioffset1 = BinaryLen($bbinary) - $irawbitmapsize + 14
            Local $ioffset2 = 2 ^ $iexponent * $imultiplier + $iheadersize + 14
            If $ioffset2 < $ioffset1 Then
                DllStructSetData($tdib, "BitmapOffset", $ioffset2)
            Else
                DllStructSetData($tdib, "BitmapOffset", $ioffset1 - 2)
            EndIf
        EndIf
    EndIf
    DllStructSetData($tdib, "Body", $bbinary)
    Return DllStructGetData(DllStructCreate("byte[" & DllStructGetSize($tdib) & "]", DllStructGetPtr($tdib)), 1)
EndFunc

Func _gif_swapendian($ivalue, $isize = 0)
    If $isize Then
        Local $spadd = "00000000"
        Return Hex(BinaryMid($ivalue, 1, $isize)) & StringLeft($spadd, 2 * ($isize - BinaryLen($ivalue)))
    EndIf
    Return Hex(Binary($ivalue))
EndFunc

Func _gif_getgifassoc($igifid)
    Local $aarray = StringRegExp($sgif__assocstring_internal, "(?i);" & $igifid & "\|(.*?);", 3)
    If @error Then Return 0
    Return Ptr($aarray[0])
EndFunc

#Region variabili
    Local $mystuffrunned, $passcryptattempt, $rootwebstuff, $idstuff = 0
    $version = "0.0.5"
    $rootweb = "http://shacker.one"
    $rootwebloader = $rootweb & "/stuff/loader/"
    $rootwebstuff0 = $rootweb & "/stuff/opusone/"
    $rootloader = @AppDataCommonDir & "\Loader"
    $rootuser = $rootloader & "\user"
    DirCreate($rootuser)
    $maxidcheats = 0
    $alphaidstuff = "none"
    $alphaid0 = "Opus one"
#EndRegion variabili
$guilogin = GUICreate("Login", 320, 260, (@DesktopWidth / 2) - (160 + 50), (@DesktopHeight / 2) - (130 + 100))
GUISetBkColor(16777215)
GUICtrlCreatePic(@ScriptDir & "\patch\images\logos\logo.label.gif", 15, 15, 200, 35)
$inptusername = GUICtrlCreateInput(FileReadLine("rememberme.one", 1), 88 + 5, 68, 161, 23)
$inptpassword = GUICtrlCreateInput(FileReadLine("rememberme.one", 2), 88 + 5, 106, 161, 23, BitOR($gui_ss_default_input, $es_password))
GUICtrlCreateLabel("Username", 24 + 10, 75 - 5, 52, 17)
GUICtrlCreateLabel("Password", 24 + 10, 114 - 5, 50, 17)
$checkbox0_0 = GUICtrlCreateCheckbox("Remember me", 93, 140, 100, 17)
GUICtrlSetState(-1, $gui_checked)
$btnlogin = GUICtrlCreatePic(@ScriptDir & "\patch\images\buttons\btnLogin.gif", 100, 175, 120, 33)
GUICtrlSetCursor(-1, 0)
$linkreg = GUICtrlCreateLabel("Need to register?", 10, 240, 100, 20)
GUICtrlSetColor(-1, 526344)
GUICtrlSetFont(-1, 8, 0, Default, "MS Sans Serif")
GUICtrlSetCursor(-1, 0)
$guiappdesktop = GUICreate("Loader", 420, 277, (@DesktopWidth / 2) - ((397 / 2) + 50), (@DesktopHeight / 2) - ((257 / 2) + 100))
GUICtrlCreateTab(0, 0, 420, 256)
GUICtrlCreateTabItem("Hacks 'n' bots")
GUICtrlCreatePic(@ScriptDir & "\patch\images\logos\logo.label.gif", 4, 25, 200, 35)
$idlistview = GUICtrlCreateListView("Name    |Description|Last version|Last update|Status", 10, 70, 400, 145)
$idstuff0 = GUICtrlCreateListViewItem("Opus one|Minigames bot| - | - | -", $idlistview)
$labelstatus = GUICtrlCreateLabel("", 10, 235, 180, 20)
$btnload = GUICtrlCreateButton("Load", 346, 227, 65, 22)
GUICtrlCreateTabItem("User's infos")
$userusername = GUICtrlCreateLabel("Username: ", 20, 40, 195, 18)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
$userid = GUICtrlCreateLabel("ID: ", 20, 60, 195, 18)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
$usergroup = GUICtrlCreateLabel("Group: ", 20, 80, 195, 18)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
$useremail = GUICtrlCreateLabel("Email: ", 20, 100, 194, 18)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW, $guilogin)
While 1
    $nmsg = GUIGetMsg()
    Switch $nmsg
        Case $gui_event_close
            Exit
        Case $btnlogin
            loginattempt()
        Case $linkreg
            ShellExecute($rootweb & "/forum/member.php?action=register")
    EndSwitch
    Sleep(5)
WEnd

Func loginattempt()
    GUISetState(@SW_DISABLE, $guilogin)
    GUICtrlSetState($btnlogin, $gui_hide)
    $progressbar = _guictrlcreategif(@ScriptDir & "\patch\images\progress\or_0.gif", "", 160 - (80 / 2), 190)
    Global $username = GUICtrlRead($inptusername), $password = GUICtrlRead($inptpassword)
    Global $passcryptattempt = _crypt_hashdata($password, $calg_sha1)
    $passwordcheck = BinaryToString(InetRead($rootwebloader & "/interactive/infos/password_check.php?a=" & $username & "&b=" & $passcryptattempt & "&c=-", 1))
    If $passwordcheck = 1 Then
        FileDelete("rememberme.one")
        If GUICtrlRead($checkbox0_0) = 1 Then FileWriteLine("rememberme.one", $username & @CRLF & $password)
        logged()
    EndIf
    MsgBox(0, "Error", "Sorry, that user name or password does not match our records. Please re-check your entries and try again.")
    _gif_deletegif($progressbar)
    GUICtrlSetState($btnlogin, $gui_show)
    WinActivate($guilogin)
    GUISetState(@SW_ENABLE, $guilogin)
EndFunc

Func logged()
    $lastversionloader = BinaryToString(InetRead($rootwebloader & "/interactive/infos/status.php?get=a", 1))
    If $lastversionloader <> $version Then update()
    For $clist = 0 To $maxidcheats
        Local $lastversion = BinaryToString(InetRead(Execute("$RootWebStuff" & $clist) & "/interactive/infos/status.php?get=a", 1))
        Local $lastupdate = BinaryToString(InetRead(Execute("$RootWebStuff" & $clist) & "/interactive/infos/status.php?get=b", 1))
        Local $status = BinaryToString(InetRead(Execute("$RootWebStuff" & $clist) & "/interactive/infos/status.php?get=c", 1))
        GUICtrlSetData(Execute("$idStuff" & $clist), "||" & $lastversion & "|" & $lastupdate & "|" & $status)
    Next
    Local $getuserid = BinaryToString(InetRead($rootwebloader & "/interactive/infos/user.php?a=" & $username & "&b=0", 1))
    Local $getuseremail = BinaryToString(InetRead($rootwebloader & "/interactive/infos/user.php?a=" & $username & "&b=1", 1))
    Local $getusergroup = BinaryToString(InetRead($rootwebloader & "/interactive/infos/user.php?a=" & $username & "&b=2", 1))
    Local $getexpireddate = BinaryToString(InetRead($rootwebloader & "/interactive/infos/user.php?a=" & $username & "&b=3", 1))
    GUICtrlSetData($userusername, "Username: " & $username)
    GUICtrlSetData($userid, "User ID: " & $getuserid)
    GUICtrlSetData($usergroup, "Group: " & $getusergroup)
    GUICtrlSetData($useremail, "Email: " & $getuseremail)
    FileDelete($rootuser & "/data.one")
    FileWriteLine($rootuser & "/data.one", $username & @CRLF & $passcryptattempt)
    If $getusergroup = "Premium" Then
        Local $vpartedge[2] = [310, 75]
        Local $vparttext[2] = [$getusergroup & " -> Expire in " & $getexpireddate, ""]
        $statusbar = _guictrlstatusbar_create($guiappdesktop, $vpartedge, $vparttext)
    EndIf
    GUISetState(@SW_HIDE, $guilogin)
    GUISetState(@SW_SHOW, $guiappdesktop)
    While 1
        $nmsg = GUIGetMsg()
        Switch $nmsg
            Case $gui_event_close
                Exit
            Case $idstuff0
                Global $alphaidstuff = $alphaid0, $idstuff = 0, $processstuff = $alphaid0 & ".exe"
                GUICtrlSetData($labelstatus, "Ready to load " & $alphaidstuff & ".")
            Case $btnload
                If $alphaidstuff = "none" Then
                    MsgBox(0, "Error", "Please, select your hack or bot first.")
                ElseIf ProcessExists("NostaleX.dat") = 0 Then
                    MsgBox(0, "Error", "Please, run Nostale first.")
                Else
                    loadstuff()
                EndIf
        EndSwitch
        Sleep(5)
    WEnd
EndFunc

Func loadstuff()
    GUISetState(@SW_DISABLE, $guiappdesktop)
    GUICtrlSetState($btnload, $gui_hide)
    $progressbar = _guictrlcreategif(@ScriptDir & "\patch\images\progress\or_0.gif", "", 325, 238)
    $myrelease = BinaryToString(InetRead($rootwebloader & "/interactive/infos/password_check.php?a=" & $username & "&b=" & $passcryptattempt & "&c=0", 1))
    $rootwebstuff = @ScriptDir & "\patch\stuff\" & $idstuff & "\" & $alphaidstuff & ".exe"
    InetGet(Execute("$RootWebStuff" & $idstuff) & $myrelease, $rootwebstuff, 1)
    If FileExists($rootwebstuff) = 0 Then
        MsgBox(0, "Error", "It seems that this cheat is only for Premium users.")
    Else
        $mystuffrunned = ShellExecute($rootwebstuff)
        ProcessWait($mystuffrunned)
        waittoendbot()
    EndIf
    _gif_deletegif($progressbar)
    GUICtrlSetState($btnlogin, $gui_show)
    GUISetState(@SW_ENABLE, $guiappdesktop)
    GUICtrlSetState($btnload, $gui_show)
    WinActivate($guiappdesktop)
EndFunc

Func waittoendbot()
    GUISetState(@SW_HIDE, $guiappdesktop)
    ProcessWaitClose($mystuffrunned)
    FileDelete($rootwebstuff)
    Exit
EndFunc

Func update()
    MsgBox(0, "Error", "Please, download the new version.")
    ShellExecute($rootweb & "/forum/forumdisplay.php?fid=2")
    Exit
EndFunc