All Activity

This stream auto-updates   

  1. Past hour
  2. Ok, I've tried using the search and came up short. I have a Raspberry Pi 2 running Raspbian. I would like to basically simulate a keyboard and send a string to the Pi from a USB port on my system into one of the USB ports on the Pi. Is this possible? My system will running Windows 7. I just need to know if I'm chasing something that isn't possible.
  3. Today
  4. Curious as to what you mean with this, as it reads as though you are stating the community has not been helpful. I would say it might be a language-barrier issue, but as you're from the Armpit of the West I would guess not
  5. Not sure if this is what you want. Just try.... #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_UseUpx=y #AutoIt3Wrapper_Run_Au3Stripper=y #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include <Array.au3> #include <File.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <ButtonConstants.au3> #include <WindowsConstants.au3> AutoItSetOption('MouseCoordMode' , 0) Opt("WinTitleMatchMode", 2) #Region ### START Koda GUI section ### Form=c:\users\sdunn\desktop\shelbysbp3tool.kxf Global $ShelbysBP3Tool = GUICreate("Shelby's BP3 Tool", 738, 414, -1, -1) GUISetFont(10, 800, 0, "Sitka Display") GUISetBkColor(0x6D6D6D) Global $StartBP3 = GUICtrlCreateButton("StartBP3", 223, 8, 115, 33) GUICtrlSetFont(-1, 14, 800, 0, "Sitka Display") GUICtrlSetColor(-1, 0x000000) GUICtrlSetBkColor(-1, 0x3399FF) Global $SelectSirenSysOuts = GUICtrlCreateButton("SelectSirenSysOuts", 536, 176, 163, 33) GUICtrlSetColor(-1, 0x000000) Global $SirenRelayOuts = GUICtrlCreateButton("SirenRelayOuts", 536, 224, 163, 33) GUICtrlSetColor(-1, 0x000000) Global $SetNames = GUICtrlCreateButton("SetNames", 32, 304, 107, 25) GUICtrlSetColor(-1, 0x000000) Global $EXIT = GUICtrlCreateButton("EXIT", 331, 328, 75, 33) GUICtrlSetFont(-1, 14, 800, 0, "Sitka Display") GUICtrlSetColor(-1, 0x000000) GUICtrlSetBkColor(-1, 0x800000) Global $InstallBP3 = GUICtrlCreateButton("InstallBP3", 391, 8, 123, 33) GUICtrlSetFont(-1, 14, 800, 0, "Sitka Display") GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, 0x000000) Global $Group1 = GUICtrlCreateGroup("", 16, 40, 185, 113) Global $RemotePush1 = GUICtrlCreateRadio("RemotePush", 32, 80, 129, 17) GUICtrlSetState(-1, $GUI_CHECKED) Global $RemoteRotary1 = GUICtrlCreateRadio("RemoteRotary", 32, 96, 137, 17) Global $Handheld1 = GUICtrlCreateRadio("Handheld", 32, 112, 113, 17) Global $SetupCPpanel = GUICtrlCreateButton("SetupCPpanel", 24, 56, 115, 25) Global $NotUsed1 = GUICtrlCreateRadio("Not Used", 32, 128, 113, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) Global $Group2 = GUICtrlCreateGroup("", 16, 152, 169, 145) Global $RemoteRotary2 = GUICtrlCreateRadio("RemoteRotary", 32, 208, 113, 17) Global $ConsolePush = GUICtrlCreateRadio("ConsolePush", 32, 224, 113, 17) Global $ConsoleRotary = GUICtrlCreateRadio("ConsoleRotary", 32, 240, 113, 17) GUICtrlSetState(-1, $GUI_CHECKED) Global $Handheld2 = GUICtrlCreateRadio("Handheld", 32, 256, 113, 17) Global $RemotePush2 = GUICtrlCreateRadio("RemotePush", 32, 192, 113, 17) Global $SetupSIRENpanel = GUICtrlCreateButton("SetupSIRENpanel", 24, 168, 155, 25) Global $NotUsed2 = GUICtrlCreateRadio("Not Used", 32, 272, 113, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) Global $Group4 = GUICtrlCreateGroup("", 216, 176, 297, 121) Global $SelectLBouts = GUICtrlCreateButton("SelectLBouts", 224, 192, 107, 25) Global $LBfront = GUICtrlCreateCheckbox("FrontMods", 232, 240, 81, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $LBrear = GUICtrlCreateCheckbox("RearMods", 232, 264, 81, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $LBstt = GUICtrlCreateCheckbox("STT", 408, 240, 49, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $LBalleys = GUICtrlCreateCheckbox("Alleys", 232, 216, 65, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $LBTD = GUICtrlCreateCheckbox("TD", 328, 240, 57, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $LBscene = GUICtrlCreateCheckbox("Scene", 328, 264, 65, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $LBarrowL = GUICtrlCreateCheckbox("Arrow L", 328, 216, 73, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $LBarrowR = GUICtrlCreateCheckbox("Arrow R", 408, 216, 97, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $LBcruise = GUICtrlCreateCheckbox("Cruise", 408, 264, 81, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) Global $LBCheck = GUICtrlCreateCheckbox("CheckALL", 344, 192, 89, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlCreateGroup("", -99, -99, 1, 1) Global $Group3 = GUICtrlCreateGroup("", 216, 40, 233, 137) Global $RN1outs = GUICtrlCreateCheckbox("RN1outs", 232, 88, 81, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $SelectRNouts = GUICtrlCreateButton("SelectRNouts", 224, 56, 107, 25) Global $RN2outs = GUICtrlCreateCheckbox("RN2outs", 232, 104, 81, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $RN3outs = GUICtrlCreateCheckbox("RN3outs", 232, 120, 89, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $RN4outs = GUICtrlCreateCheckbox("RN4outs", 232, 136, 89, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $RN5outs = GUICtrlCreateCheckbox("RN5outs", 232, 152, 89, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlSetColor(-1, 0xFFFFFF) Global $RNCheck = GUICtrlCreateCheckbox("CheckALL", 344, 64, 81, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlCreateGroup("", -99, -99, 1, 1) Global $Group5 = GUICtrlCreateGroup("", 448, 40, 249, 137) Global $SelectCentralOuts = GUICtrlCreateButton("SelectCentralOuts", 456, 56, 131, 25) Global $Cgroup1 = GUICtrlCreateCheckbox("Group1", 464, 88, 65, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) Global $CGroup2 = GUICtrlCreateCheckbox("Group2", 464, 104, 65, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) Global $CGroup3 = GUICtrlCreateCheckbox("Group3", 464, 120, 65, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) Global $CGroup4 = GUICtrlCreateCheckbox("Group4", 464, 136, 65, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) Global $CentralCheck = GUICtrlCreateCheckbox("CheckALL", 600, 64, 89, 17) GUICtrlSetState(-1, $GUI_UNCHECKED) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) Global $PageTitle = 'bluePRINT 3 - Version 3.' Global $NameBox = 'Assign I/O' While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $EXIT Exit Case $StartBP3 _bluePRINT3() Case $InstallBP3 ;_InstallBP3internal Case $SetupCPpanel WinActivate($PageTitle) ;MouseClick('primary', 339,204, 1, 0) ;MouseClick('primary', 615,116, 1, 0) MouseClick('primary', 122,106, 1, 0) sleep( 1000) MouseClick('primary', 130, 131, 1, 0) Sleep( 1000) MouseClick('primary', 732, 182, 1, 0) If GUICtrlRead( $RemotePush1) = 1 Then Send('{UP 3}{DOWN 2}{ENTER}') EndIf If GUICtrlRead( $RemoteRotary1) = 1 Then Send('{UP 3}{DOWN 1}{ENTER}') EndIf If GUICtrlRead( $Handheld1) = 1 Then Send('{UP 3}{DOWN 3}{ENTER}') EndIf If GUICtrlRead($NotUsed1) = 1 Then Send('{UP 3}{ENTER}') EndIf Sleep( 2000) MouseClick('primary', 45, 104, 1, 0) ;Clicks I/O Mapping tab Case $SetupSIRENpanel WinActivate($PageTitle) MouseClick('primary', 122,106, 1, 0) sleep( 1000) MouseClick('primary', 130, 131, 1, 0) Sleep( 1000) MouseClick('primary', 1471, 181,1,0) If GUICtrlRead( $ConsoleRotary) = 1 Then Send('{UP 5}{DOWN 1}{ENTER}') EndIf If GUICtrlRead( $ConsolePush) = 1 Then Send('{UP 5}{DOWN 2}{ENTER}') EndIf If GUICtrlRead( $RemoteRotary2) = 1 Then Send('{UP 5}{DOWN 3}{ENTER}') EndIf If GUICtrlRead( $Handheld2) = 1 Then Send('{UP 5}{DOWN 5}{ENTER}') EndIf If GUICtrlRead($NotUsed2) = 1 Then Send('{UP 5}{ENTER}') EndIf Sleep( 2000) MouseClick('primary', 45, 104, 1, 0) Case $RNCheck If GUICtrlRead( $RNCheck) =$GUI_UNCHECKED Then GUICtrlSetState($RN1outs, $GUI_UNCHECKED) GUICtrlSetState($RN2outs, $GUI_UNCHECKED) GUICtrlSetState($RN3outs, $GUI_UNCHECKED) GUICtrlSetState($RN4outs, $GUI_UNCHECKED) GUICtrlSetState($RN5outs, $GUI_UNCHECKED) Else GUICtrlSetState($RN1outs, $GUI_CHECKED) GUICtrlSetState($RN2outs, $GUI_CHECKED) GUICtrlSetState($RN3outs, $GUI_CHECKED) GUICtrlSetState($RN4outs, $GUI_CHECKED) GUICtrlSetState($RN5outs, $GUI_CHECKED) EndIf Case $RN1outs If GUICtrlRead($RN1outs)=$GUI_UNCHECKED Then GUICtrlSetState($RNCheck, $GUI_UNCHECKED) EndIf Case $RN2outs If GUICtrlRead($RN2outs)=$GUI_UNCHECKED Then GUICtrlSetState($RNCheck, $GUI_UNCHECKED) EndIf Case $RN3outs If GUICtrlRead($RN3outs)=$GUI_UNCHECKED Then GUICtrlSetState($RNCheck, $GUI_UNCHECKED) EndIf Case $RN4outs If GUICtrlRead($RN4outs)=$GUI_UNCHECKED Then GUICtrlSetState($RNCheck, $GUI_UNCHECKED) EndIf Case $RN5outs If GUICtrlRead($RN5outs)=$GUI_UNCHECKED Then GUICtrlSetState($RNCheck, $GUI_UNCHECKED) EndIf Case $SelectRNouts WinActivate($PageTitle) MouseClick('primary', 45, 104, 1, 0) sleep(1000) MouseClick('primary', 874, 169, 1, 0);Needs to click on I/O Mapping and Remote Node outputs tab sleep(1000) If GUICtrlRead( $RN1outs) = 1 Then MouseClick('primary', 758, 221, 1, 0);Needs to select Remote node 1 _RemoteNodeOutputs() EndIf If GUICtrlRead( $RN2outs) = 1 Then MouseClick('primary', 758, 253, 1, 0);Needs to select Remote node 2 _RemoteNodeOutputs() EndIf If GUICtrlRead( $RN3outs) = 1 Then MouseClick('primary', 758, 285, 1, 0);Needs to select Remote node 3 _RemoteNodeOutputs() EndIf If GUICtrlRead( $RN4outs) = 1 Then MouseClick('primary', 758, 318, 1, 0);Needs to select Remote node 4 _RemoteNodeOutputs() EndIf If GUICtrlRead( $RN5outs) = 1 Then MouseClick('primary', 758, 350, 1, 0);Needs to select Remote node 5 _RemoteNodeOutputs() EndIf Case $LBCheck If GUICtrlRead( $LBCheck) =$GUI_UNCHECKED Then GUICtrlSetState($LBalleys, $GUI_UNCHECKED) GUICtrlSetState($LBfront, $GUI_UNCHECKED) GUICtrlSetState($LBrear, $GUI_UNCHECKED) GUICtrlSetState($LBarrowL, $GUI_UNCHECKED) GUICtrlSetState($LBarrowR, $GUI_UNCHECKED) GUICtrlSetState($LBTD, $GUI_UNCHECKED) GUICtrlSetState($LBstt, $GUI_UNCHECKED) GUICtrlSetState($LBscene, $GUI_UNCHECKED) GUICtrlSetState($LBcruise, $GUI_UNCHECKED) Else GUICtrlSetState($LBalleys, $GUI_CHECKED) GUICtrlSetState($LBfront, $GUI_CHECKED) GUICtrlSetState($LBrear, $GUI_CHECKED) GUICtrlSetState($LBarrowL, $GUI_CHECKED) GUICtrlSetState($LBarrowR, $GUI_CHECKED) GUICtrlSetState($LBTD, $GUI_CHECKED) GUICtrlSetState($LBstt, $GUI_CHECKED) GUICtrlSetState($LBscene, $GUI_CHECKED) GUICtrlSetState($LBcruise, $GUI_CHECKED) EndIf Case $LBalleys If GUICtrlRead($LBalleys)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $LBfront If GUICtrlRead($LBfront)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $LBrear If GUICtrlRead($LBrear)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $LBarrowL If GUICtrlRead($LBarrowL)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $LBarrowR If GUICtrlRead($LBarrowR)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $LBTD If GUICtrlRead($LBTD)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $LBstt If GUICtrlRead($LBstt)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $LBscene If GUICtrlRead($LBscene)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $LBcruise If GUICtrlRead($LBcruise)=$GUI_UNCHECKED Then GUICtrlSetState($LBCheck, $GUI_UNCHECKED) EndIf Case $SelectLBouts WinActivate($PageTitle) MouseClick('primary', 45, 104, 1, 0) sleep(1000) MouseClick('primary', 755, 169, 1,0) sleep(1000) If GUICtrlRead($LBalleys)= 1 Then MouseClick('primary', 789, 313, 1, 0) ;alley driver MouseClick('primary', 916, 313, 1, 0) ;alley pass EndIf If GUICtrlRead($LBfront)= 1 Then MouseClick('primary', 796, 431, 1, 0) ; FInb1 MouseClick('primary', 796, 461, 1, 0) ;FInb2 MouseClick('primary', 796, 491, 1, 0) ;FInb3 MouseClick('primary', 796, 520, 1, 0) ;FInb4 MouseClick('primary', 796, 550, 1, 0) ;FInb5 MouseClick('primary', 796, 230, 1, 0) ;FCorners EndIf If GUICtrlRead($LBrear) = 1 Then MouseClick('primary', 922, 431, 1, 0) ; RInb1 MouseClick('primary', 922, 461, 1, 0) ;RInb2 MouseClick('primary', 922, 491, 1, 0) ;RInb3 MouseClick('primary', 922, 520, 1, 0) ;RInb4 MouseClick('primary', 922, 550, 1, 0) ;RInb5 MouseClick('primary', 796, 260, 1, 0) ;RCorners EndIf If GuiCtrlRead($LBarrowL) = 1 Then MouseClick('primary', 1054, 230, 1, 0) EndIf If GUICtrlRead($LBarrowR) = 1 Then MouseClick('primary', 1267, 230, 1, 0) EndIf If GUICtrlRead($LBTD) = 1 Then MouseClick('primary', 1058, 434, 1,0) EndIf If GUICtrlRead($LBstt) = 1 Then MouseClick('primary', 1510, 232, 1, 0) EndIf If GUICtrlRead($LBscene) = 1 Then MouseClick('primary', 1056, 463, 1, 0) EndIf If GUICtrlRead($LBcruise) = 1 Then MouseClick('primary', 1386, 353, 1, 0) EndIf ;If GUICtrlRead($LBCheck) = 1 Then ;MouseClick('primary', Case $CentralCheck If GUICtrlRead( $CentralCheck) =$GUI_UNCHECKED Then GUICtrlSetState($Cgroup1, $GUI_UNCHECKED) GUICtrlSetState($Cgroup2, $GUI_UNCHECKED) GUICtrlSetState($Cgroup3, $GUI_UNCHECKED) GUICtrlSetState($Cgroup4, $GUI_UNCHECKED) Else GUICtrlSetState($Cgroup1, $GUI_CHECKED) GUICtrlSetState($Cgroup2, $GUI_CHECKED) GUICtrlSetState($Cgroup3, $GUI_CHECKED) GUICtrlSetState($Cgroup4, $GUI_CHECKED) EndIf Case $Cgroup1 If GUICtrlRead($Cgroup1)=$GUI_UNCHECKED Then GUICtrlSetState($CentralCheck, $GUI_UNCHECKED) EndIf Case $Cgroup2 If GUICtrlRead($Cgroup2)=$GUI_UNCHECKED Then GUICtrlSetState($CentralCheck, $GUI_UNCHECKED) EndIf Case $Cgroup3 If GUICtrlRead($Cgroup3)=$GUI_UNCHECKED Then GUICtrlSetState($CentralCheck, $GUI_UNCHECKED) EndIf Case $Cgroup4 If GUICtrlRead($Cgroup4)=$GUI_UNCHECKED Then GUICtrlSetState($CentralCheck, $GUI_UNCHECKED) EndIf Case $SelectCentralOuts WinActivate($PageTitle) MouseClick('primary', 45, 104, 1, 0) sleep(1000) MouseClick('primary', 979, 168, 1,0) sleep(1000) If GUICtrlRead($Cgroup1) = 1 Then MouseClick('primary', 825, 260, 1, 0) ;#1 MouseClick('primary', 825, 295, 1, 0) ;#2 MouseClick('primary', 825, 330, 1, 0) ;#3 MouseClick('primary', 825, 364, 1, 0) ;#4 MouseClick('primary', 825, 399, 1, 0) ;#5 EndIf If GUICtrlRead($Cgroup2) = 1 Then MouseClick('primary', 825, 490, 1, 0) ;#6 MouseClick('primary', 825, 524, 1, 0) ;#7 MouseClick('primary', 825, 559, 1, 0) ;#8 MouseClick('primary', 825, 595, 1, 0) ;#9 MouseClick('primary', 825, 630, 1, 0) ;#10 EndIf If GUICtrlRead($Cgroup3) = 1 Then MouseClick('primary', 1299, 259, 1, 0) ;#15 MouseClick('primary', 1299, 295, 1, 0) ;#16 MouseClick('primary', 1299, 331, 1, 0) ;#17 MouseClick('primary', 1299, 365, 1, 0) ;#18 MouseClick('primary', 1299, 400, 1, 0) ;#19 EndIf If GUICtrlRead($Cgroup4) = 1 Then MouseClick('primary', 1299, 490, 1, 0) ;#20 MouseClick('primary', 1299, 523, 1, 0) ;#21 MouseClick('primary', 1299, 560, 1, 0) ;#22 MouseClick('primary', 1299, 595, 1, 0) ;#23 MouseClick('primary', 1299, 630, 1, 0) ;#24 EndIf Case $SetNames WinActivate($PageTitle) MouseClick('primary', 45, 104, 1, 0) sleep(1000) $NameBox = 'Assign I/O' _RN1ONames() _RN2ONames() _RN3ONames() _RN4ONames() _RN5ONames() sleep(1000) _CentralOutNames() Case $SelectSirenSysOuts WinActivate($PageTitle) MouseClick('primary', 45, 104, 1, 0) sleep(1000) MouseClick('primary', 1519, 547, 1, 0) ;Siren System tab _SirenSystemFeatures _SirenSystemCP _SirenSystemSirenfeatures _SirenSystemOverride _SirenSystemArrow Case $SirenRelayOuts WinActivate($PageTitle) MouseClick('primary', 45, 104, 1, 0) sleep(1000) MouseClick('primary',1843, 438, 1, 0) ;Siren Relays tab EndSwitch WEnd ;######################################### End GUI STUFF ########################################### Func _bluePRINT3() ;Run(@ScriptDir & '\bluePRINT3.exe', '', @SW_MAXIMIZE) Local $aBluePRINT3 = _FileListToArrayRec(@LocalAppDataDir & "\Apps\2.0", "bluePRINT3.exe", 1, 1, 1, 2) If @error Then Exit MsgBox(16, "bluePRINT3", "Unable to find bluePRINT3.exe files under " & @LocalAppDataDir & "\Apps\2.0") Local $aBP3Version[$aBluePRINT3[0]][2] For $i = 1 To $aBluePRINT3[0] $aBP3Version[$i-1][0] = $aBluePRINT3[$i] $aBP3Version[$i-1][1] = FileGetVersion($aBluePRINT3[$i]) Next _ArraySort($aBP3Version, 1, 0, 0, 1) Run($aBP3Version[1][0]) WinWait($PageTitle) WinActivate($PageTitle) EndFunc Func _SirenSystemFeatures() MouseClick('primary',1244, 618, 1, 0) ;Cruise MouseClick('primary',1254, 655, 1, 0) ;Cruise2 MouseClick('primary',1238, 687, 1, 0) ;LP1 MouseClick('primary',1246, 720, 1, 0) ;LP2 EndFunc Func _SirenSystemCP() MouseClick('primary',1453, 617, 1, 0) ;Rem Beep MouseClick('primary',1453, 651, 1, 0) ;Backlight MouseClick('primary',1454, 685, 1, 0) ;BL Int1 MouseClick('primary',1456, 721, 1, 0) ;BL Int2 MouseClick('primary',1453, 753, 1, 0) ;Security Trigger EndFunc Func _SirenSystemSirenfeatures() MouseClick('primary',1241, 790, 1, 0) ;Park Kill Trigger MouseClick('primary',1238, 826, 1, 0) ;Horn Ring Trigger MouseClick('primary',1243, 860, 1, 0) ;Horn Ring Enable MouseClick('primary',1241, 895, 1, 0) ;OEM horn cut EndFunc Func _SirenSystemOverride() MouseClick('primary',1457, 826, 1, 0) ;Wail MouseClick('primary',1459, 859, 1, 0) ;Yelp MouseClick('primary',1456, 893, 1, 0) ;Tone MouseClick('primary',1456, 928, 1, 0) ;Manual MouseClick('primary',1456, 962, 1, 0) ;Airhorn MouseClick('primary',1456, 995, 1, 0) ;PA MouseClick('primary',1457, 1033, 1, 0) ;RR MouseClick('primary',1455, 1063, 1, 0) ;Aux Input Tone EndFunc Func _SirenSystemArrow() MouseClick('primary',1242, 959, 1, 0) ;Left Group1 MouseClick('primary',1239, 995, 1, 0) ;Right Group 1 MouseClick('primary',1236, 1029, 1, 0) ;Left Group 2 MouseClick('primary',1242, 1062, 1, 0) ;Right Group 2 EndFunc Func _CentralOutNames() WinActivate($PageTitle) $NameBox = 'Enter Output Name' MouseClick('primary', 45, 104, 1, 0) sleep(1000) MouseClick('primary', 979, 168, 1,0) sleep(1000) MouseClick('Secondary', 825, 260, 1, 0) ;#1 WinWait($NameBox) WinActivate($NameBox) Send('COut1') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 825, 295, 1, 0) ;#2 WinWait($NameBox) WinActivate($NameBox) Send('COut2') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 825, 330, 1, 0) ;#3 WinWait($NameBox) WinActivate($NameBox) Send('COut3') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 825, 364, 1, 0) ;#4 WinWait($NameBox) WinActivate($NameBox) Send('COut4') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 825, 399, 1, 0) ;#5 WinWait($NameBox) WinActivate($NameBox) Send('COut5') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 825, 490, 1, 0) ;#6 WinWait($NameBox) WinActivate($NameBox) Send('COut6') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 825, 524, 1, 0) ;#7 WinWait($NameBox) WinActivate($NameBox) Send('COut7') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 825, 559, 1, 0) ;#8 WinWait($NameBox) WinActivate($NameBox) Send('COut8') Send('{ENTER}') WinActivate($PageTitle) MouseClick('Secondary', 825, 595, 1, 0) ;#9 WinWait($NameBox) WinActivate($NameBox) Send('COut9') Send('{ENTER}') WinActivate($PageTitle) MouseClick('Secondary', 825, 630, 1, 0) ;#10 WinWait($NameBox) WinActivate($NameBox) Send('COut10') Send('{ENTER}') WinActivate($PageTitle) MouseClick('Secondary', 1299, 259, 1, 0) ;#15 WinWait($NameBox) WinActivate($NameBox) Send('COut15') Send('{ENTER}') WinActivate($PageTitle) MouseClick('Secondary', 1299, 295, 1, 0) ;#16 WinWait($NameBox) WinActivate($NameBox) Send('COut16') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1299, 331, 1, 0) ;#17 WinWait($NameBox) WinActivate($NameBox) Send('COut17') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1299, 365, 1, 0) ;#18 WinWait($NameBox) WinActivate($NameBox) Send('COut18') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1299, 400, 1, 0) ;#19 WinWait($NameBox) WinActivate($NameBox) Send('COut19') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1299, 490, 1, 0) ;#20 WinWait($NameBox) WinActivate($NameBox) Send('COut20') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1299, 523, 1, 0) ;#21 WinWait($NameBox) WinActivate($NameBox) Send('COut21') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1299, 560, 1, 0) ;#22 WinWait($NameBox) WinActivate($NameBox) Send('COut22') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1299, 595, 1, 0) ;#23 WinWait($NameBox) WinActivate($NameBox) Send('COut23') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1299, 630, 1, 0) ;#24 WinWait($NameBox) WinActivate($NameBox) Send('COut24') Send('{ENTER}') WinActivate($PageTitle) sleep(1000) EndFunc Func _RemoteNodeOutputs() Sleep(1000) ;gives time for tab to refresh MouseClick('primary', 1126, 260, 1, 0);RN1output1 MouseClick('primary', 1123, 292, 1, 0);RN1output2 MouseClick('primary', 1120, 326, 1, 0);RN1output3 MouseClick('primary', 1121, 361, 1, 0);RN1output4 MouseClick('primary', 1121, 392, 1, 0);RN1output5 MouseClick('primary', 1121, 479, 1, 0);RN1output6 MouseClick('primary', 1121, 513, 1, 0);RN1output7 MouseClick('primary', 1121, 546, 1, 0);RN1output8 MouseClick('primary', 1121, 577, 1, 0);RN1output9 MouseClick('primary', 1121, 611, 1, 0);RN1output10 EndFunc Func _RN1ONames() MouseClick('primary', 874, 169, 1, 0);Remote Node outputs tab sleep(1000) MouseClick('primary', 758, 221, 1, 0) ;Rnode1 MouseClick('secondary', 1126, 260, 1, 0);RN1output1 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out1') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1123, 292, 1, 0);RN1output2 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out2') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1120, 326, 1, 0);RN1output3 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out3') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 361, 1, 0);RN1output4 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out4') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 392, 1, 0);RN1output5 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out5') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 479, 1, 0);RN1output6 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out6') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 513, 1, 0);RN1output7 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out7') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 546, 1, 0);RN1output8 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out8') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 577, 1, 0);RN1output9 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out9') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 611, 1, 0);RN1output10 WinWait($NameBox) WinActivate($NameBox) Send('RN1Out10') Send('{ENTER}') WinActivate($PageTitle) EndFunc Func _RN2ONames() MouseClick('primary', 874, 169, 1, 0);Remote Node outputs tab sleep(1000) MouseClick('primary', 758, 253, 1, 0) ;Rnode2 MouseClick('secondary', 1126, 260, 1, 0);RN1output1 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out1') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1123, 292, 1, 0);RN1output2 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out2') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1120, 326, 1, 0);RN1output3 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out3') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 361, 1, 0);RN1output4 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out4') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 392, 1, 0);RN1output5 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out5') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 479, 1, 0);RN1output6 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out6') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 513, 1, 0);RN1output7 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out7') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 546, 1, 0);RN1output8 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out8') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 577, 1, 0);RN1output9 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out9') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 611, 1, 0);RN1output10 WinWait($NameBox) WinActivate($NameBox) Send('RN2Out10') Send('{ENTER}') WinActivate($PageTitle) EndFunc Func _RN3ONames() MouseClick('primary', 874, 169, 1, 0);Remote Node outputs tab sleep(1000) MouseClick('primary', 758, 285, 1, 0) ;Rnode3 MouseClick('secondary', 1126, 260, 1, 0);RN1output1 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out1') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1123, 292, 1, 0);RN1output2 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out2') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1120, 326, 1, 0);RN1output3 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out3') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 361, 1, 0);RN1output4 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out4') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 392, 1, 0);RN1output5 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out5') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 479, 1, 0);RN1output6 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out6') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 513, 1, 0);RN1output7 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out7') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 546, 1, 0);RN1output8 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out8') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 577, 1, 0);RN1output9 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out9') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 611, 1, 0);RN1output10 WinWait($NameBox) WinActivate($NameBox) Send('RN3Out10') Send('{ENTER}') WinActivate($PageTitle) EndFunc Func _RN4ONames() MouseClick('primary', 874, 169, 1, 0);Remote Node outputs tab sleep(1000) MouseClick('primary', 758, 318, 1, 0) ;Rnode4 MouseClick('secondary', 1126, 260, 1, 0);RN1output1 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out1') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1123, 292, 1, 0);RN1output2 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out2') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1120, 326, 1, 0);RN1output3 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out3') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 361, 1, 0);RN1output4 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out4') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 392, 1, 0);RN1output5 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out5') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 479, 1, 0);RN1output6 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out6') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 513, 1, 0);RN1output7 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out7') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 546, 1, 0);RN1output8 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out8') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 577, 1, 0);RN1output9 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out9') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 611, 1, 0);RN1output10 WinWait($NameBox) WinActivate($NameBox) Send('RN4Out10') Send('{ENTER}') WinActivate($PageTitle) EndFunc Func _RN5ONames() MouseClick('primary', 874, 169, 1, 0);Remote Node outputs tab sleep(1000) MouseClick('primary', 758, 350, 1, 0) ;Rnode5 MouseClick('secondary', 1126, 260, 1, 0);RN1output1 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out1') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1123, 292, 1, 0);RN1output2 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out2') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1120, 326, 1, 0);RN1output3 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out3') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 361, 1, 0);RN1output4 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out4') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 392, 1, 0);RN1output5 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out5') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 479, 1, 0);RN1output6 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out6') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 513, 1, 0);RN1output7 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out7') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 546, 1, 0);RN1output8 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out8') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 577, 1, 0);RN1output9 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out9') Send('{ENTER}') WinActivate($PageTitle) MouseClick('secondary', 1121, 611, 1, 0);RN1output10 WinWait($NameBox) WinActivate($NameBox) Send('RN5Out10') Send('{ENTER}') WinActivate($PageTitle) EndFunc
  6. Try this: #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <GUIConstants.au3> $CloseGUI = True $Form1 = GUICreate("Close GUI", 615, 199, 642, 406) $Label1 = GUICtrlCreateLabel(" Open Label 2", 232, 24, 74, 17) $Label2 = GUICtrlCreateLabel(" Label2", 240, 104, 66, 17) GUICtrlSetState($Label2, $GUI_HIDE) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE If $CloseGUI Then Exit Case $Label1 $CloseGUI = False GUICtrlSetState($Label2, $GUI_Show) Case $Label2 $CloseGUI = True GUICtrlSetState($Label2, $GUI_HIDE) ; When $Lable2 is hidden, it means the screen is in default mode. Close button should be enabled now... EndSwitch WEnd
  7. Not the most eloquent nor efficient, to be sure, but with the following functionality: MULTI_BAR Features: ---------------------------------------------------------------- * Floating MULTIBAR Toolbar with four(4) Docking Positions * Drag MULTI bar to Dock at any Edge position * Drag Edge bar to screen center to Float as a MULTI bar * FADING EDGE BARS for LEFT, TOP-LEFT, TOP-RIGHT, RIGHT Sides * All 4 EDGE BARS and MULTI BAR can exist and execute at one time * All Toolbars use common INI file format * Any Toolbar can be displayed by any positional Service EXE * All ToolBars have common Controls Return to calling BAR [ORIGIN} Manual Edit the INI file [INIEDIT] Create and place a NEW Toolbar on a button [NEWBAR] Search Icon Initiator - search for a Toolbar or a Button Function Set AUTO mode for EDGE bar show/fade on cursor or click, [AUTOSW] Set AUTO mode for FLOAT bar to close or stay open on button click [AUTOSW] Rotate thru 3 button sizes, small, medium and large w/label [B-SIZE] EXIT this bar [EXIT] * User specifies Number of BUTTONS and Number of ROWS * Change Dynamically Number of BUTTONS or ROWS via NEWBAR Function Specifying SAME BARNAME with Changed BUTTONS & ROWS * Three(3) Button sizes - User can change on demand * Shrink to Fit - Will Auto reduce Button size on DOCKING if Bar too long * Buttons can be any File OPEN function, web link, or Open another TOOLBAR_BAR * ToolBars can be cascaded down(DRILL DOWN - Button points to another ToolBar) to additional Toolbars with Return to previous Toolbar via Origin Function * 2 BAR TYPES: ACTION(Buttons do TOOLBAR, FILE or URL OPENS) User drops a Link on Button DROP(Buttons are Folder Targets)dropped files are sorted to destination MOVE or COPY: FILE, FILE(s) or FOLDERS(DIRs) to Button target Recycle Bin(a Shortcut) is supported as a DROP target for FILE, FILE(s) or FOLDERs * Button Context functions DELETE the current function - empty the button EDIT the TOOLTIP for this Button EDIT the LABEL displayed on Large Button PLUCK this Button for move to new location on this bar -or- ANY other Bar (in this TOOLBOX) PLACE any PLUCKED Button, or PLACE any NEW TOOL_BAR OPEN file location of Button file UNZIP the attached to a folder which will be the folder for all toolbar definitions and executables. THIS FOLDER IS YOUR TOOLBOX. TOOLBOX\MULTIBAR\]README.doc or ]README.pdf provides detail on functions and implementing. Appreciate all the SILENT help from the AUTOIT community for this and my many projects. Please advise on errors or suggestions. MULTIBAR was developed on Windows 10. Other targets or themes may present errors.For your personal use. Accept no responsibility for its functionality. Enjoy, olbitpicker MULTIBAR.zip
  8. The solution is literally included in the decompiled package, at best the implementation here was not even a mask, just a simple substitution. They may be named the same thing, but I'd imagine the comparisons end there.
  9. Yesterday
  10. GUI uses Unicode in Windows since ... long time ago.
  11. Hello, I have to create a program that, using the data in the database, creates a report to print directly (no Excel - Word -Rtf - etc.). can you give me an example that using the _WinApi_ functions creates a print setting an A2 sheet, inserts a logo in gif and draws some lines and some text? Sorry for the bad english. Thank you.
  12. @Jakub Look here My Examples using this Ansi2Oem and Oem2Ansi conversion: EDIT: General explanation: In GUI is used ANSI codepage (1250 in Czech) and in CUI commandline is used OEM codepage (852 in Czech) PS: I'm from Czech republic ;-)
  13. I use Local $Str = BinaryToString(StringToBinary($s, 1), 4) change 4 and 1 instead of your hint code and it works properly Question is, how encoding is used for stdoutread returned text, because I must use charset 65001 for cmd and flag 1 in StringToBinary()
  14. You're welcome! It was a challenging issue, so I learned some in the process as well.
  15. Found another nice one for Delphi example to call .NET classes that are not comvisible Assm := Host.DefaultAppDomain.Load_2('NetAddr'); T := Assm.GetType_2('DelphiNET.NETAdder'); Obj := T.InvokeMember_3('ctor', BindingFlags_CreateInstance, nil, null, nil); Params := VarArrayOf([2]); WriteLn('2 + 3 = ' + IntToStr(T.InvokeMember_3('Add3', BindingFlags_InvokeMethod, nil, Obj, PSafeArray(VarArrayAsPSafeArray(Params))))); https://stackoverflow.com/questions/2048540/hosting-clr-in-delphi-with-without-jcl-example With the examples we already have above should be (whenever people are interested and have time ;-)) completing the stuff
  16. Thanks dude.. I see my mistake
  17. Thank you so very very much. I have spent a lot of time on this (days). I searched a lot and tried a lot. My problem is that I do not have a good understanding. I am trying to learn. I hope you do not feel that you simply did it for me because I will be studying what you did and learn from it!
  18. Thank you for giving me the link to download Obfuscator. As for " No it doesn't and have explained that already too many times! ". With all due respect but It does by bringing confusion to an average Joe's brain..it should take some time to solve the puzzle. By the way, there are paid code obfuscation solutions for javascript and NET platform. Do you consider them a scam?
  19. Cheers @water with your help and a small change to the use of double quotation marks, that did the trick! ; Compress the directories one by one in the zip using the listfile.... Local $iPID = Run(@ScriptDir & '\bin\7z.exe a -mx' & $compressionQuality & ' -v' & $compressSplitFileSize & ' -wc:\temp "' _ & $backupToLocation & '\' & $userDirectory & '.7z" @bin\listfile.txt -x@bin\excludefile.txt -bb3', "", @SW_SHOWDEFAULT, $STDIO_INHERIT_PARENT) I switched to single quotation marks after I realized when reading through the 7Zip command-line guide, that double quotes should be used around the folder locations, especially if they have any whitespace. The next step is to poll what's logged to the console and push it to the GUI.
  20. Hi, I wanted the $GUI_EVENT_CLOSE button to be enabled only when I am at my Default GUI screen. Is there a way, I can disable the Close button while I am performing some operations. I was checking a long ago post and tried putting the below line where ever I wanted to disable the close button. This works, but it also disables when I back to the default screen. GUIRegisterMsg ($WM_NCLBUTTONDOWN, "WM_NCLBUTTONDOWN_FUNC") Giving a small example #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <GUIConstants.au3> $Form1 = GUICreate("Close GUI", 615, 199, 642, 406) $Label1 = GUICtrlCreateLabel(" Open Lable 2", 232, 24, 74, 17) $Label2 = GUICtrlCreateLabel(" Label2", 240, 104, 66, 17) GUICtrlSetState($Label2, $GUI_HIDE) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Label1 GUIRegisterMsg ($WM_NCLBUTTONDOWN, "WM_NCLBUTTONDOWN_FUNC") ; Disabling Close button GUICtrlSetState($Label2, $GUI_Show) Case $Label2 GUICtrlSetState($Label2, $GUI_HIDE) ; When $Lable2 is hidden, it means the screen is in default mode. Close button should be enabled now... EndSwitch WEnd Func WM_NCLBUTTONDOWN_FUNC($hWnd, $Msg, $WParam, $LParam) $nID = BitAnd($wParam, 0x0000FFFF) If $nID = 20 Then Return 0 Else Return $GUI_RUNDEFMSG EndIf EndFunc
  21. No it doesn't and have explained that already too many times! No and the FAQ is pretty clear about it: https://www.autoitscript.com/wiki/FAQ#How_can_I_protect_my_code_from_decompilation.3F https://www.autoitscript.com/autoit3/scite/download/beta_SciTE4AutoIt3/discontinued/ Jos
  22. Speed example results on my system but would be interesting to see all native AutoIt and .NET collections compared (including maps in beta AutoIt) http://geekswithblogs.net/BlackRabbitCoder/archive/2011/06/16/c.net-fundamentals-choosing-the-right-collection-class.aspx SpeedTest _ArrayAdd vs ListAdd [_ListAdd] Start adding 5000 items using _ListAdd func... Adding has end. Time spent on this action is 103 ms. UBound of $aListAdd is 5000. [_ArrayAdd] Start adding 5000 items using _ArrayAdd func... Adding has end. Time spent on this action is 3424 ms. UBound of $aArrayAdd is 5000. TestSpeed ArraySearch vs ListIndexOf Preparing array and list for later use... $aArray and $aList are ready. Searching $aArray for item 4999... Found item in 3.74687017624091 ms. Searching $aList for item 4999... Found item in 0.311995511007418 ms. And this one some nice VB .NET steps to the arrays in post#2
  23. The source code is there. Otherwise, the browser couldn't display the associated elements. What's wrong with using the information you retrieved by "inspecting the element on the page"?
  24. Obfuscation offers a basic protection against decompilers.Do you plan to deliver another code protection in the future or do you know any software to make compiled programs more secure? If not,where can i get the latest version of obfuscator?
  25. I have a page that I need to be able to click on a button, but the class name for that button is only visible with inspecting element on the page and not the source code. I added Local $sHTML = $oDoc.documentElement.innerHTML hoping to be able to use that as the object then change Local $oInputs = _IETagNameGetCollection($oIE, "span") to Local $oInputs = _IETagNameGetCollection($sHTML, "span") hoping that would work, but of course it did not. Here is my full code. #include <IE.au3> $oIE = _IECreate("https://www.example.com/somethinghere/") Sleep(1000) $oDoc = _IEDocGetObj ($oIE) Local $sHTML = $oDoc.documentElement.innerHTML _IELoadWait($oIE) $i = 0 while $i <= 10 Local $oInputs = _IETagNameGetCollection($sHTML, "span") For $oInput In $oInputs If $oInput.className == "this-class-name" Then _IEAction($oInput, "click") Next Sleep(2000) WEnd Is it possible to click on an element that's only in the innerHTML and not the source code?
  26. The UTF8 you read from stdout needs to be converted to UTF16-LE which AutoIt uses. Try this: ; $s is your UTF8 string Local $Str = BinaryToString(StringToBinary($s, 4), 1) EDIT: exchange 4 and 1 as noticed by OP. Sorry for mistake.
  1. Load more activity