Leaderboard
Popular Content
Showing content with the highest reputation on 04/20/2018 in all areas
-
Try this, it's much better than what you have. #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <MsgBoxConstants.au3> Global $g_bPaused = False ; <<<<<<<<<< Global variables should be declared outside of functions. HotKeySet("{f1}", "begin") HotKeySet("{f3}", "pause") #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 336, 72, 192, 124) $btn_begin = GUICtrlCreateButton("Start Click", 16, 16, 137, 33) $btn_pause = GUICtrlCreateButton("Pause / Resume", 184, 16, 137, 33) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 ;~ HotKeySet("{f1}", "begin") ;~ Sleep(50) ;~ HotKeySet("{f3}", "pause") ;~ Sleep(50) $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $btn_begin begin() Case $btn_pause pause() EndSwitch WEnd Func begin() ;~ For $i = 1 To 10 ;~ While 1 <<<<<<<<<<<<<< not sure why you think you need so many While loops MsgBox($MB_SYSTEMMODAL, "Title", "This message box will timeout after 10 seconds or select the OK button.", 10) ;~ Sleep(500) <<<<<<<<<<<<<<<<<< Unnecessary ;~ ExitLoop ;~ WEnd ;~ Next ;~ Sleep(50) <<<<<<<<<<<<<<< or so many sleep statements. EndFunc ;==>begin Func pause() $g_bPaused = Not $g_bPaused While $g_bPaused ToolTip('Script is Paused"', 500, 500) $nMsg = GUIGetMsg() Switch $nMsg Case $btn_pause $g_bPaused = Not $g_bPaused EndSwitch Sleep(10) WEnd ToolTip('Script is not Paused"', 500, 500) EndFunc ;==>pause1 point
-
replace words in text with other words from a word list
Earthshine reacted to Melba23 for a topic
vin1, So my guess was right. No help for you - write your own material. Thread locked. M231 point -
Trigger file's context menu
Earthshine reacted to therks for a topic
Sorry @Earthshine, I guess I was not clear. I don't want to add things to a context menu, I want the normal Windows menu to appear when/where I want. ie: I can click a button, and the normal Windows right click menu for a file will appear (with Open, Send To, Cut, Copy, Paste, Properties, etc). Like imagine a function like this: $aMouse = MouseGetPos() _WinAPI_FileTrackPopupMenu('C:\windows\notepad.exe', $aMouse[0], $aMouse[1]) I'm sure it won't be that easy though. @Subz There's a lot to go through on that thread, and I'm about to go to bed so I will give it a thorough look later. Hopefully it's what I'm looking for. Thanks!1 point -
See example below from LarsJ, specifically the ListView.au3 example, drag and drop listview with context menu.1 point
-
Funny story about this latest update, though it was not funny at the time. One major thing that all ethical coders dread, is their program deleting something it shouldn't belonging to a user. So I had a scare in that regard, when involved in some troubleshooting of TeraCopy Timer, when all of a sudden I noticed two source folders were missing, both containing videos, and one had many. To say i was a bit off my stride yesterday, would be entirely true. One of my ears was giving me grief, I had a headache, and I had awoken that way. So even after medication, I still felt pretty lousy, and mentally I was not entirely up to par. I needed a distraction, and had an update idea on the back-burner, and current use of this program, was put on hold to add the new feature, as I was wishing for it right then and there. I was however, due to my state, only going to do a basic update, and then add more complex features to it another time when I mentally felt up to it. I did that. Then as often happens, I thought I would make a little start on some of the easier more complex stuff ... but not yet implement any of it. So anyway, I got partway through, and then thought, hang on, this is not as complex as I thought it would be, as most of the code is already done, in functions I can call ... one with a little tweak to make more suitable. So I did all that, and then started my testing and fine tuning. Then I got to a point where for some strange reason, a delay of 4 mins that was not supposed to be occurring until a third MOVE job, was seemingly happening before first job. While troubleshooting that, I eventually discovered the two missing source folders. I got an error message on subsequent testing, that a source was missing. That blew my mind, especially as I was sure nothing was supposed to be deleting anything, TeraCopy was the only element copying or moving files around, and it hadn't started because of that 4 minute delay ... or so I thought. So for a while there I was in a real spin. I knew that one file (if used) got deleted after a job had completed, but it was a text file, not a folder, and I had checks in place. Anyway I went paranoid and added even more checks. This is for the 'Combine List_1.txt' etc file if it gets created. At this point I had not lost anything important, because I had a backup on another drive of those two folders, but I was starting to panic, because I had shared my program here at AF. That drive however wasn't accessible by the Win XP laptop I was working on, being GPT not MBR and 4 Tb. So I started up my my Win 7 Netbook, so I could gain access to the backup copy of those two folders. While it was doing that, I resumed testing, and then it was that I noticed two things almost simultaneously. That the first two jobs were actually being processed, and so the 4 min delay was for the right job. They were just being processed in a blink of an eye. So something wasn't right. I had also browsed back up the tree on one of the two external HDD I was working with, and just noticed the two folders I thought were missing. Phew, they hadn't been deleted, and I fairly quickly determined what had happened from that point on. I was moving a large bunch of folders from one portable HDD to another, and I had done some the day before, and set the Destination folder. On the following day, the day in question, I had just booted up my PC and connected the HDDs again. What I hadn't noticed and hadn't thought to check (I blame my foggy minded unwell state), was that the drives had gotten the opposite drive letters. So in short, the Source and Destination drive in Job settings in TeraCopy Timer, was the same. Both drives had a similar enough folder structure, but not completely exact. So what had happened, was that those first two folders (each a separate Job) had been an instant process because they were only being moved from one location on a drive to another location on the same drive. You'll note, that one of the new features in this latest update, attempts to address this issue - Warnings added for when drive letter of Source and Destination are the same. I guess in theory, those warnings might be annoying to some, but also in theory, you would hardly be likely to use TeraCopy Timer to MOVE files around on the same drive. You might for COPY, so I may consider addressing that issue later. The things we do sometimes.1 point
-
And here is funcionality of both previous scripts joined together to only one script show catching of selection change in ListBox+ListView at the same time: ; https://www.autoitscript.com/forum/topic/193573-problem-with-guictrllist/ #include <guiconstantsex.au3>; #include <GUIConstants.au3> #include <File.au3> #include <GUIConstantsEx.au3> ;~ #include <MsgBoxConstants.au3> #include <WindowsConstants.au3> ;~ #include <_httprequest.au3> #include <GuiListView.au3> #include <GuiStatusBar.au3> #include <Array.au3> Global $disable_refresh_status = False ;~ Global $aSorting[3] Local $iExListViewStyle = BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES, $LVS_EX_GRIDLINES, $LVS_EX_DOUBLEBUFFER) Local $iExWindowStyle = BitOR($WS_EX_DLGMODALFRAME, $WS_EX_CLIENTEDGE) $Form1 = GUICreate("Check Tokens Address Myetherwallet", 800, 600, 150, 50) $address = GUICtrlCreateLabel("List Address:", 10, 20, 100, 20) $input = GUICtrlCreateButton("Choose File", 5, 40, 70, 25) $run = GUICtrlCreateButton("Check", 405, 40, 70, 25) GUICtrlSetState($run, $GUI_FOCUS) $mylist = GUICtrlCreateList("", 100, 0, 300, 580) $hListBox = GUICtrlGetHandle($mylist) $myview = GUICtrlCreateListView("Tokens Name|Tokens Balance|Tokens Symbol", 480, 0, 300, 580, -1, $iExWindowStyle) $cButton_0 = GUICtrlCreateButton("Sort Name", 405, 80, 70, 25) $cButton_1 = GUICtrlCreateButton("Sort Balance", 405, 120, 70, 25) $up = GUICtrlCreateButton("Up", 405, 160, 70, 25) $down = GUICtrlCreateButton("Down", 405, 200, 70, 25) _GUICtrlListView_SetColumnWidth($myview, 0, 100) _GUICtrlListView_SetColumnWidth($myview, 1, $LVSCW_AUTOSIZE_USEHEADER) _GUICtrlListView_SetExtendedListViewStyle($myview, $iExListViewStyle) $StatusBar1 = _GUICtrlStatusBar_Create($Form1) GUISetState(@SW_SHOW) GUIRegisterMsg($WM_COMMAND, "WM_COMMAND") GUIRegisterMsg($WM_NOTIFY, "WM_Notify_Events") For $i = 0 To 10 GUICtrlSetData($mylist, 'Item '&StringFormat('%02i', $i)) Next $disable_refresh_status = True For $i = 0 To 10 GUICtrlCreateListViewItem('name '&$i&'|balance '&$i&'|symbol '&$i&'', $myview) Next $disable_refresh_status = False While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop ;~ Case $cButton_0 ;~ _GUICtrlListView_SimpleSort($myview, $aSorting, 0) ;~ Case $cButton_1 ;~ _GUICtrlListView_SimpleSort($myview, $aSorting, 1) EndSwitch WEnd Func WM_COMMAND($hWnd, $msg, $wparam, $lparam) #forceref $hWnd, $msg, $wparam, $lparam Local $i_command_code = BitAND($wparam, 0xFFFF) Local $i_command_notify = BitShift($wparam, 16) Switch $lparam Case $hListBox Switch $i_command_notify Case $LBN_SELCHANGE RefreshStatusBar('LB') EndSwitch EndSwitch Return $GUI_RUNDEFMSG EndFunc Func WM_Notify_Events($hWndGUI, $MsgID, $wParam, $lParam) #forceref $hWndGUI, $MsgID, $wParam Local $tagNMHDR, $event $tagNMHDR = DllStructCreate("int;int;int", $lParam) $event = DllStructGetData($tagNMHDR, 3) ; when $disable_refresh_status = True don't invoke --> on mass changes in ListView ; to not it be slow and don't paint in statusbar change of each row in such situations If $hWndGUI = $Form1 And $wParam = $myview And $disable_refresh_status = False Then If $event = $LVN_ITEMCHANGED Then $NMLISTVIEW = DllStructCreate($tagNMLISTVIEW, $lParam) If BitAND(DllStructGetData($NMLISTVIEW, "Changed"), $LVIF_STATE) = $LVIF_STATE And _ DllStructGetData($NMLISTVIEW, "NewState") <> DllStructGetData($NMLISTVIEW, "OldState") Then RefreshStatusBar('LV') EndIf EndIf Return $GUI_RUNDEFMSG EndFunc ; invoked everytime when selection changes Func RefreshStatusBar($what) If $what == 'LB' Then ; ListBox $text = GUICtrlRead($mylist) _GUICtrlStatusBar_SetText($StatusBar1, 'ListBox, Selected item text: ' & $text) EndIf If $what == 'LV' Then ; ListView $i = _GUICtrlListView_GetNextItem($myview) $name = _GUICtrlListView_GetItemText($myview, $i) _GUICtrlStatusBar_SetText($StatusBar1, 'ListView, Selected item: index=' & $i & ' name=' & $name) EndIf EndFunc1 point
-
replace words in text with other words from a word list
Earthshine reacted to BrewManNH for a topic
If someone types a multi-word sentence in the first box, do you want to replace EVERY word in the sentence, some of the words, highlighted words, specific words? You're not giving us any help here. We'd need the word list, plus a lot of before and after examples of what you're looking to do. Looking at your screenshot of the word list, I'd turn it into an INI file and work with that instead.1 point -
Here it's accomodated to ListBox, when selection changes function is invoked (here StatusBar text is refreshed): Note: Keyboard shortcuts Up/Down works too when ListBox has focus #include <guiconstantsex.au3>; #include <GUIConstants.au3> #include <File.au3> #include <GUIConstantsEx.au3> ;~ #include <MsgBoxConstants.au3> #include <WindowsConstants.au3> ;~ #include <_httprequest.au3> #include <GuiListView.au3> #include <GuiStatusBar.au3> #include <Array.au3> Global $aSorting[3] Local $iExListViewStyle = BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES, $LVS_EX_GRIDLINES, $LVS_EX_DOUBLEBUFFER) Local $iExWindowStyle = BitOR($WS_EX_DLGMODALFRAME, $WS_EX_CLIENTEDGE) $Form1 = GUICreate("Check Tokens Address Myetherwallet", 800, 600, 150, 50) $address = GUICtrlCreateLabel("List Address:", 10, 20, 100, 20) $input = GUICtrlCreateButton("Choose File", 5, 40, 70, 25) $run = GUICtrlCreateButton("Check", 405, 40, 70, 25) GUICtrlSetState($run, $GUI_FOCUS) $mylist = GUICtrlCreateList("", 100, 0, 300, 580) $hListBox = GUICtrlGetHandle($mylist) $myview = GUICtrlCreateListView("Tokens Name|Tokens Balance|Tokens Symbol", 480, 0, 300, 600, -1, $iExWindowStyle) $cButton_0 = GUICtrlCreateButton("Sort Name", 405, 80, 70, 25) $cButton_1 = GUICtrlCreateButton("Sort Balance", 405, 120, 70, 25) $up = GUICtrlCreateButton("Up", 405, 160, 70, 25) $down = GUICtrlCreateButton("Down", 405, 200, 70, 25) _GUICtrlListView_SetColumnWidth($myview, 0, 100) _GUICtrlListView_SetColumnWidth($myview, 1, $LVSCW_AUTOSIZE_USEHEADER) _GUICtrlListView_SetExtendedListViewStyle($myview, $iExListViewStyle) ;~ Local $aAccelKeys[2][2] = [["{UP}", $run],["{Down}", $run]] ;~ GUISetAccelerators($aAccelKeys) $StatusBar1 = _GUICtrlStatusBar_Create($Form1) GUISetState(@SW_SHOW) GUIRegisterMsg($WM_COMMAND, "WM_COMMAND") For $i = 0 To 10 GUICtrlSetData($mylist, 'Item '&StringFormat('%02i', $i)) Next While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop Case $cButton_0 _GUICtrlListView_SimpleSort($myview, $aSorting, 0) Case $cButton_1 _GUICtrlListView_SimpleSort($myview, $aSorting, 1) EndSwitch WEnd Func WM_COMMAND($hWnd, $msg, $wparam, $lparam) #forceref $hWnd, $msg, $wparam, $lparam Local $i_command_code = BitAND($wparam, 0xFFFF) Local $i_command_notify = BitShift($wparam, 16) Switch $lparam Case $hListBox Switch $i_command_notify Case $LBN_SELCHANGE RefreshStatusBar() EndSwitch EndSwitch Return $GUI_RUNDEFMSG EndFunc ; invoked everytime when selection changes Func RefreshStatusBar() $text = GUICtrlRead($mylist) _GUICtrlStatusBar_SetText($StatusBar1, 'ListBox, Selected item text: ' & $text) EndFunc1 point
-
Here is your code changed to example how to achieve invoking of function when selection of ListView changes (set text in StatusBar): You can accomodate this example also for another controls in GUI (List instead of ListView?) Note: Keyboard shortcuts Up/Down works too when ListView has focus #include <guiconstantsex.au3>; #include <GUIConstants.au3> #include <File.au3> #include <GUIConstantsEx.au3> ;~ #include <MsgBoxConstants.au3> #include <WindowsConstants.au3> ;~ #include <_httprequest.au3> #include <GuiListView.au3> #include <GuiStatusBar.au3> #include <Array.au3> Global $disable_refresh_status = False Global $aSorting[3] Local $iExListViewStyle = BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES, $LVS_EX_GRIDLINES, $LVS_EX_DOUBLEBUFFER) Local $iExWindowStyle = BitOR($WS_EX_DLGMODALFRAME, $WS_EX_CLIENTEDGE) $Form1 = GUICreate("Check Tokens Address Myetherwallet", 800, 600, 150, 50) $address = GUICtrlCreateLabel("List Address:", 10, 20, 100, 20) $input = GUICtrlCreateButton("Choose File", 5, 40, 70, 25) $run = GUICtrlCreateButton("Check", 405, 40, 70, 25) GUICtrlSetState($run, $GUI_FOCUS) $mylist = GUICtrlCreateList("", 100, 0, 300, 600) $myview = GUICtrlCreateListView("Tokens Name|Tokens Balance|Tokens Symbol", 480, 0, 300, 600, -1, $iExWindowStyle) $cButton_0 = GUICtrlCreateButton("Sort Name", 405, 80, 70, 25) $cButton_1 = GUICtrlCreateButton("Sort Balance", 405, 120, 70, 25) $up = GUICtrlCreateButton("Up", 405, 160, 70, 25) $down = GUICtrlCreateButton("Down", 405, 200, 70, 25) _GUICtrlListView_SetColumnWidth($myview, 0, 100) _GUICtrlListView_SetColumnWidth($myview, 1, $LVSCW_AUTOSIZE_USEHEADER) _GUICtrlListView_SetExtendedListViewStyle($myview, $iExListViewStyle) ;~ Local $aAccelKeys[2][2] = [["{UP}", $run],["{Down}", $run]] ;~ GUISetAccelerators($aAccelKeys) $StatusBar1 = _GUICtrlStatusBar_Create($Form1) GUISetState(@SW_SHOW) GUIRegisterMsg($WM_NOTIFY, "WM_Notify_Events") $disable_refresh_status = True For $i = 0 To 10 GUICtrlCreateListViewItem('name '&$i&'|balance '&$i&'|symbol '&$i&'', $myview) Next $disable_refresh_status = False While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop Case $cButton_0 _GUICtrlListView_SimpleSort($myview, $aSorting, 0) Case $cButton_1 _GUICtrlListView_SimpleSort($myview, $aSorting, 1) EndSwitch WEnd Func WM_Notify_Events($hWndGUI, $MsgID, $wParam, $lParam) #forceref $hWndGUI, $MsgID, $wParam Local $tagNMHDR, $event $tagNMHDR = DllStructCreate("int;int;int", $lParam) $event = DllStructGetData($tagNMHDR, 3) ; when $disable_refresh_status = True don't invoke --> on mass changes in ListView ; to not it be slow and don't paint in statusbar change of each row in such situations If $hWndGUI = $Form1 And $wParam = $myview And $disable_refresh_status = False Then If $event = $LVN_ITEMCHANGED Then $NMLISTVIEW = DllStructCreate($tagNMLISTVIEW, $lParam) If BitAND(DllStructGetData($NMLISTVIEW, "Changed"), $LVIF_STATE) = $LVIF_STATE And _ DllStructGetData($NMLISTVIEW, "NewState") <> DllStructGetData($NMLISTVIEW, "OldState") Then RefreshStatusBar() EndIf EndIf Return $GUI_RUNDEFMSG EndFunc ; invoked everytime when selection changes Func RefreshStatusBar() $i = _GUICtrlListView_GetNextItem($myview) $name = _GUICtrlListView_GetItemText($myview, $i) _GUICtrlStatusBar_SetText($StatusBar1, 'Selected item: index=' & $i & ' name=' & $name) EndFunc1 point
-
Deye, Have a play with this Beta and see what you think: A quick example script - either press the "Return" button with Ctrl pressed or use the HotKey to refresh the drives available: As I anticipated, you will lose any previously selected items, which I feel is reasonable as you could be refreshing the tree and now no longer have access to certain drives. Let me know what you think - and comments from others are always welcome too. M231 point
-
Hi guys, I just finished a Connect 4 game by using MiniMax with Alpha Beta Pruning. I haven't written a program for a long time, but writing an AI program is always funny! I have to learn how the algorithm works and try to optimize the code to run faster. Let's play and have fun! Oops, I lost the game ... Thanks guys! Download: Connect 4.zip1 point
-
You need frames to create an animation. Something like this here: #include <GUIConstantsEx.au3> #include <GDIPlus.au3> Global $aFrames[8], $hCanvas Example() Func Example() ; Create a GUI with various controls. Local $hGUI = GUICreate("Example", 300, 200) GUISetBkColor(0xF4F4F4) ; Create an animation control. Local $iPic = GUICtrlCreatePic("", 120, 50, 48, 48), $hPic = GUICtrlGetHandle($iPic) ; Display the GUI. GUISetState(@SW_SHOW, $hGUI) _GDIPlus_Startup() $hCanvas = _GDIPlus_GraphicsCreateFromHWND($hPic) Local $i For $i = 0 To UBound($aFrames) - 1 $aFrames[$i] = _GDIPlus_BitmapCreateFromMemory(Call("_AnimFrame" & $i + 1)) Next Local $idStart = GUICtrlCreateButton("Start", 60, 150, 85, 25) Local $idStop = GUICtrlCreateButton("Stop", 160, 150, 85, 25) _GDIPlus_GraphicsDrawImageRect($hCanvas, $aFrames[0], 0, 0, 48, 48) ; Loop until the user exits. While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE AdlibUnRegister("Play") For $i = 0 To UBound($aFrames) - 1 _GDIPlus_ImageDispose($aFrames[$i]) Next _GDIPlus_GraphicsDispose($hCanvas) _GDIPlus_Shutdown() ExitLoop Case $idStart ; Start the animation. AdlibRegister("Play", 100) Case $idStop ; Stop the animation. AdlibUnRegister("Play") EndSwitch WEnd ; Delete the previous GUI and all controls. GUIDelete($hGUI) EndFunc ;==>Example Func Play() Local Static $iFrame = 1 _GDIPlus_GraphicsDrawImageRect($hCanvas, $aFrames[$iFrame], 0, 0, 48, 48) $iFrame = Mod($iFrame + 1, 8) EndFunc ;Code below was generated by: 'File to Base64 String' Code Generator v1.20 Build 2018-02-02 Func _AnimFrame1($bSaveBinary = False, $sSavePath = @ScriptDir) Local $AnimFrame1 $AnimFrame1 &= 'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAABGlBMVEX09PTt7e21tbWTk5OIiImFhYaMjIycm53Nzs3y8vGfn598fHyHio+Tm6SnqrGxsrl/f3/ExMSnsbm/ztrV5fXd6vjl8PzZ6fzL1N23usCPj5Dj4+Oyxta92fnf7fynp6qw0vrF3fnF1uelpaaZmJnPz9DQ5PvU1NS31ffL4fjY2NiysrO81O3i7/2tra3p6emvr7Ho8Prk6vfHx8e+yNG5ubrm5vHZ2uTO2ebO0Ne+vb7T1NyiscSgs8pwcHG+wMdqcHjCwcHh4OLFxcvi5e7r6urW1t+8vcPc3Nz5+Pfr7vLd3+dgYGF1dHbKy9J4eXnIyM5paWpZWVlTVFSmsaRPiS9kcWFChxlU7QAgHiBa3wwAAABRwA9RaEWI1XmrAAADlUlEQVR42uyRQwIDURAFx7ZtdWzr/qeKt39ygNT6VRP78wYnSIpmWO7HOC+Ikqyoikxp+k/lGckwLduxXc+Xgv58GMhR7DoPksQyU6pXYOUoy523kLhFWfXkaynKsuYrJI1JteiBSKPLMvctNBB3nU/xKEGnHg265JXu4hwaMOkBShhWo67rkgTivHFfM40CAiUI6SiOYwBwkzduV7KomVjikc/htcR4PH506CbVFCXMRnkOluPM54tXBxiVbIgQJlWRw0OYP3DGtp1AwcxQwpI2obGsxUtwEruBlajjGIJgbVmWvZhvtp7n7XYAabBEP0LbW7bt+Yf90fNWp7N6EdAdsCG5vxr+UWdut5tcrO7Vk01vmzAAhhPHX8RTA7cFDhywhQSSQUNWFiNR2c0auoXWSbZ1n///b8zupE7d1N73nt/n5cGyESaglsAI+wzWtMxc7Wazd5m9fv12D1NAx0okWtVtq5LqL7tIqDptJSxoFt28/5AsGVF09ECX+BilVPOkrevEkgtymDBDZEkQwwXoqrIsBU2Mj8ii/LFemdaMUcQv' $AnimFrame1 &= '5DDoUrQ8TUnRGiqEoJQaLs2tzcaM/G6PSQ1o5MOXBh6ksJmtQu8hXaKLGOkxs2XS8Yc6ACKaRzc3s3ZRpoc71XvAm5fCucv96oK8woXIsrJTBcDRfNZLvsAL3na3ClrOjlKLbb/Z7XYftpfrVZ3nuSqzrPL1NG3japw5tExMmxcETTaHp6Lz0zQcitFaAQC0r4/CyAWEPI1pAJS79ZPXU6/S83FARCYBMaoGSmlhg3xNIIIpO0nR/Aa2fY+uBJ6Q1jWJhzsuQWe01tQ2QX6J4xjjw0GWTTRzaR4ALi2Gg+53b95snEwRwtyUo5enOk9RDPFwxskY7sclRwGI7QIfVs7/63W/dW7/cREPY1MFecQYhqcBhHmfUa8xXqoJwsPSbQKwvXX79afPOF7YIM8Y8vOpn/f9EKWcWxd3pzOTob/pt+H47798RUwsMZsYRqejpFn0eIkqlUvnHJkmstKbB2Bd33/7fmYFmqY4zJvKzz8C80wonhLtzUEMiVxd7der+x8egH4+Pg2teJj/Q3jElopAGCBXM8SLIgBxiuDRz4//PJ7ANJmlLffQ3v8SYezn1yOU7DxIap971FHTZGMXvsSv9tyvQ3ZeJMH+pcy9njASLwoEYwaC/Ut51BsrqoGi45P5l7H5vGmeqT/3odD+L/ILaxWf2jcEUIcAAAAASUVORK5CYII=' Local $bString = _WinAPI_Base64Decode($AnimFrame1) If @error Then Return SetError(1, 0, 0) $bString = Binary($bString) If $bSaveBinary Then Local Const $hFile = FileOpen($sSavePath & "\Search0000.png", 18) If @error Then Return SetError(2, 0, $bString) FileWrite($hFile, $bString) FileClose($hFile) EndIf Return $bString EndFunc ;==>_AnimFrame1 Func _AnimFrame2($bSaveBinary = False, $sSavePath = @ScriptDir) Local $AnimFrame2 $AnimFrame2 &= 'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAABIFBMVEX09PTGxsa0tLSsrK2UlJSIiYuFhYZ8fH2MjIzHx87Cxs7n5+e/vr67u7u2t7ewsLDa6vykpKagoKKcnJ6Xl5fc3N2RkZHU1NXS0dHOzs6AgIDl5eXv7+/t7e3I4PvA2vi51/m3uLy51fKx0vmxs7q6u8G/zNirrbTQ0dqpqarU1dzY2uDy8vLf397d3ubk5/Dl8PvNztTBwcjM4fl5eXpwcXJra2xYW1dSUlLP5PvC0d/U5vmUm6Pf7fyyusHe6veLjZW5wcqzxdTu8PKqucvW4e7Z2NlkZWdgYGHF3fnK0dxChxn29/nR2ODC1Oe70ebe4+q0yd/i7/3i4u2nsr/G1+kAAADS3OdNuQtWxxNa3wxU7QAfHx8hHSFPiS9kcWHqlKidAAADkklEQVR42mIgH4wCQPdklSDHEQTRLW5mhmFmpmXmXbHMvv8tXDVmmtG34jteZFR2dg4xoZIbf6E9cxk5ataaRyQBXxQvnX1oXJ+OTq83JwTv96f46KJijUaj4+Pjw02b7AXco7fV+2MBCOLF9vb4I3JRrU5/B6zphoR7CjUr1aq1Bax1oViqlEm+CwBiQIkD3F0q3hemhQb1dwGm91oqlSxrXSxMLaH1K4Y7n9yulErFNXcfC1nWYcV2sx2AB0vF4v3aGnG9eycmVJGn7gAcxP3Tw9FWW6DiuOnON3y8n/4OnFqnVuFFMncBgDa4/+PD8/Pz52s+4rCgMG3nXgPjenP14ZwTY6XRaLx9tQOQ7QIgO7nanJPb+VltMHi4uKotiAMi/3+GqMCEHu6O3gwG3c5geP35RaG4revQRAiCm97f3VkEzTh/8pkWXj49PR1ccqBOJaQBIR1CQ/2rO9RNkD5xuSYiNvDTtNuquzOeH8dA03UtSrP2H3ZfQ7rf6wm/h9y7OWHUc7xkRr22AWLNQ1rcT/3U+83Ni8diEX25' $AnimFrame2 &= 'o+K2uViYmuYSSgPPhppWdhjV/bQfArAFfBNGWX7AO2fqDZAcjSydyU03jEC9Xi7XkEskO0rTEEAHStzYQR6WsAdBlPZ6efssDO5YuTUYDt88nJ/UmqiNjDBNfWA4QWAmvn8gU2eiI9t2SZJImA4wu+W1AdA03TAghLqwRxrChGCcxAIwlHFHJLaAM+vbZEVQFMUAQBMahh6lorzJ40jAlmaUcqCsjMed7mB4OWA3RrCczxfMQ1BsUo/7v5aXkiSQ7m7NUM0OZGzL45YAhlSJpHkykQHClEpYC33eJtZtnDAqzZeBtr0P4FEOdAfvh26zL5FFbdJqjQWTzH11W56yRCLLOQzT7NdPVpYkByrvh0kfB3dN4ecL/elnKcF9UZ6J+BUGfv7bJcGyLNcdhtGMkDtn0uq0ZFCvPX7/I2WRI7EZk+jy1ox5/G/KfIiasiwbyWo1d1rdzpgDzcfvPq2YQ2ezhMcH+g2P/wPI0wh6gVuXZQfPqNusKfVy7fFbDhAenywXZvRnvFAvz/muDZcQt67IismoZ7cfv/m0SgJKFius/8fPw49CTfsx8ghxJopSd1my/GFBTLaab9v/tzJV3Azkk7zJxMOUkNkKa6L9DmW5qvZDHUm4TUkyg6L9XuU5n+THBjT+3P1uiSfxN6Vqnh18lfoFAp6AfWUG2HoAAAAASUVORK5CYII=' Local $bString = _WinAPI_Base64Decode($AnimFrame2) If @error Then Return SetError(1, 0, 0) $bString = Binary($bString) If $bSaveBinary Then Local Const $hFile = FileOpen($sSavePath & "\Search0001.png", 18) If @error Then Return SetError(2, 0, $bString) FileWrite($hFile, $bString) FileClose($hFile) EndIf Return $bString EndFunc ;==>_AnimFrame2 Func _AnimFrame3($bSaveBinary = False, $sSavePath = @ScriptDir) Local $AnimFrame3 $AnimFrame3 &= 'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAABSlBMVEX09PTt7e20tLSTk5OJiYmEhISMjIyenZ3Ly8vv7++hoaN8fH2GipGRmqSmr7ext75/f3/CwsW+ytbU3+ve7Pvk8P3X5PDF0t6Pj5Dj4+O1xte72PbX6PvA0OGoqKq0yuKx0vnG3vrH2OmlpaaYmJjPz8+uwNLQ5PvT09O40/C/2vm41/q4uLrGxsbX19exsbG90+qqq6vp6emhuNKgtMfK1uPO3e6cpa/CxMzd5/KNjJHf397e4erj6fDp7ve6vMNtbm/z8vL39/nw9PvBwcHQ0ti4ub9xcnPd3NzT1tzY2eC9v8bm5ub49fPHx87Nzc+wsLe9vb2ampyrqrFiYmN3dnjc3eXl5e9YWFhSUlLo6PSDgIji3+RPiS9namiVlZZDhh1U7QAhHSFAiRZa3wwAAABISUhWxxNDhBxNuQtdXV5RaEUfHx/x8fGBk3ykAAADjElEQVR42uyONZbEQBTEzMzM1PCHGe9/seG07XjfKpbqFffP34IXRElWVG2irhumZTuuY0ueP2lesZwgjOIoSV0lG/fzzC7KKn4RVXUjjQaq3XZ9/AmiakB4xCcW7Tr4BRHU0ox9SHTmXfd5VEG/WJYriWcFa7noumX0XId+uex76AN5wwq2eLdcLqMKFj1U0RPYZQIrMJr5clnC235TzZGhMwIslGU5b+swDJO3D90eHxiBut+1x1Px9M/pOU0vl36O1Jx1STwdW2pfr9fb/R6e6/p4elRPVt1uAlEUDgMzyFSgChXuWgWqQyjUsDjxhhhcd6n3/7/21F1e+z2fvY/j2E1+M6jARTY9d+vW48fn07RWj6JL52+sNJq2hzyPabdbP5ycg5DEtXl2Cfq92OnU67Xo0uP7Kxa1NE3LEGLBd9HM04w24OLutSiqvSeFklZ6fcXPAMeQzS/h1czLBq1WpQ3AJoZQUDoajYaXz10Zq7HC' $AnimFrame3 &= '+5mUGIOnn65qoCHkypNJK8mHAcdxGs3y4fD2bWc6PXdupqq4j+cDI3Fc1/4QjpAjc5N2e1IJqq6bD0e2Z2Ilk6Q8HM/sZrNJLckwbrvIQkTmKkPf5gm/QK5kyDJnDG478VIsmrjEtmJTiCamYxhVl1m67qmDQSXHipZ5piUSFcdIGyT6ctksFqZJyn5JMW+6ULyTmbwg2LoqvRfMQ2m4uraWdsfMinGpZHjd9rIM+b7vMQiH4pFIsKDTdd8JQMDCaXc4StfqnUonFXlHX9/AFnKzOZtLSfC+eIWoakyKwnMCuZLzZg6C1XRtE+htbdtlEWOMiZ05AyheykwdQ7XN9VgbvL8Pd4FBMPooyMttkxTK2XDs82p/EHwoHlNKhKKJwP7DVOc9QhQWroFgVFaZXsSzXqO3sxurfOJ6okBLTPobOth/uiTE8rxn0T0zzLdCh/RLiG/M9g8OMZUUQktKcLHrw9C/HFEVmcs8zxkpZwnBu0sWjnvLo+OTDWrh8qN9VgX7z8C2HGTri15Ot+34GRVnYaM3O3oOAgHs1fWm54D9N7Q4zkhuM1EosLAeL02KYW0vXp5sqDoWdsEehvMjrRYXGIlWbLwqeS0MeyKlr9/sCh7daPpSAva/RA6MjDFkC8Ii1GweC0K5wWufq/81cH5ckMDwCW9irJbow3D+Bmi2B1Vpjpj7efZ/5e2HVAEH9v9MCx72P+Edc1ek/FMfDDIAAAAASUVORK5CYII=' Local $bString = _WinAPI_Base64Decode($AnimFrame3) If @error Then Return SetError(1, 0, 0) $bString = Binary($bString) If $bSaveBinary Then Local Const $hFile = FileOpen($sSavePath & "\Search0002.png", 18) If @error Then Return SetError(2, 0, $bString) FileWrite($hFile, $bString) FileClose($hFile) EndIf Return $bString EndFunc ;==>_AnimFrame3 Func _AnimFrame4($bSaveBinary = False, $sSavePath = @ScriptDir) Local $AnimFrame4 $AnimFrame4 &= 'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAABZVBMVEX09PSwsLC5ubmMjIyHh4eEhYWXl5p8fH3JytHx8fHa5vS8vcLAwMDExMSsrK2kpaeenqDj4uSTk5ORkJHh4OHd3d3Pz8+BgYHMzMx6enrn5+fE0d/J2erAy9bA2/m5zubM3/Suuseop66urbT49vScnJ2zs7OWlpa1t7vT4fG9vL3u7e3l5fDNztTIyMjDxct2dXZsbGxWVlfS0tmuyOanw+TZ4+/O3e7c3uVnamdSU1OYtNTL4vy1yd+1tbXT09LN1+Gysrri7/2pqqjG3/vg6PHe6vfBwsW/v8bm7fe4xtPV5PWos77E1ena2tmEhInZ6v3R3OrV3OPZ199xcXK71/a01PhjY2NcXF3W1tqu0fqUnamkrLTP5Puyxdjo6PT09vtDhRxAiRapsLXC2PCXq8KuwtMAAADh4eq5ub9NuQtWxxNa3wxU7QB6jqR/lrDw8vrn5/FLS0xRaEUhHSEfHx9PiS+9V1FvAAADY0lEQVR42u2U08KsRwAEd/zZXtv8bdsWkuNYev7MIrZZ1109Qux//uePpV6yMEHF4GfGRYPhu/uV+7sjX/1Z9QjtJ6vS6uZePIusn86b1t3jxfHqgL24jn9SMMoLt6nVEccHOv2JvIde3t4+fJFffYjjpZ+Y0LPLy8vjYfxhPXVxsYjFHxNUvMuFTWlvKj0+nkqtP6wniftjAiinLyfmTg7SE+ML8URiKpNJ26UfXXJubm5ufOH99+6ycUnaq04dzBlhzXPq3x+P1A6YuEilnlclaVKS+kZmQgtBCWgabI19azFiAEFQ1PjE54eL3tyUpOrzcYPAlqoqEMLo62mvBlSzUIA0sT4/v7ezs7OxIU1Wq9X0Iy5DheOZov5l/EzRFFcUC4VCQJKZTKY6ubGxMTl5cjKVnsh2qKUpgWM6ER2mnTYoBTwcc4SxSEQwkUgsL59OT5+eLi/H' $AnimFrame4 &= 'H18a3S6puaazpAZ0EAfAE+sFTiw6bLUFjSUPuLA8iO9mX9zPnNueaS6pJR0gsR4706iFLApagSmKdd4TUCuZmOLTiSd3s/sv9hkBjnPWgrptA991YwIxthRN14vI9xFQD00HMrnd3pblWqWyn33mY+i5nrJmYVy2/FZfqLWbY9ONRuNmu6LbBBePwBoxoFIDizKgIYUtTwVFRLDNesAzuVBpN5s3Z9ONnQ9ef73RzLNcsTfb7fqWQf0QaVBVocFHt9H1FfAiMSbYutAcu5l+o/HaACsHur1OpzNzFeKyBhW1plvEJ6jTs1W3fz+2Kfma8CE1FNwrr1TWLNYNXK/FJ08YQ/j6vMQPLsZx5TcRMha3hkLOGrOvwtxK5bMZ5FsOnzxmjNfP9utHN6m0KAiyzixtq/mafORQdqXn5cqTdz85YoGBWMgQuZ4BAa8fIbqltbwgCBVMUOjo6NrIy3L+6TuvZplOwtDv1yuHvP5LoW56kNpFWdju3EC7FxqyXFl5+jYXMK/3e10wnP2XDA8YFnGn7aHOebmDqZ578tarWd8meIbX8835NtyJTJp3EPmI5Ntt2WDs40+7GLDeOQicH/oDfIfa10WDYky3ZGoTgsNZS+3P/ocEjK/0/rXnNwdZOUL8cDj7HyIiXZvvXn9JpusGtRIM+nv/I4jBaL4iJzLNiMd/PtyJ/UP4HPaPjIcGyj1TAAAAAElFTkSuQmCC' Local $bString = _WinAPI_Base64Decode($AnimFrame4) If @error Then Return SetError(1, 0, 0) $bString = Binary($bString) If $bSaveBinary Then Local Const $hFile = FileOpen($sSavePath & "\Search0003.png", 18) If @error Then Return SetError(2, 0, $bString) FileWrite($hFile, $bString) FileClose($hFile) EndIf Return $bString EndFunc ;==>_AnimFrame4 Func _AnimFrame5($bSaveBinary = False, $sSavePath = @ScriptDir) Local $AnimFrame5 $AnimFrame5 &= 'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAABX1BMVEX09PSMjIx8fHzMzMysrK2mpqifn5+XmJiWlpeTk5WRkZHy8fGJiYqEhIWCgoOAgYHp6Oh4d3jJytGwsLDEw8PBwcG3t726urq1tbXPz8/d3d3j4uPg39/U1NS9v8RwcXFsbG5oaWpbW1tVVlaqxOGw0vrC0+i5z+ikpKXc6fibmpvt7ey+vb3X5PTU5fjO4/vGxs3N3fHm5vDZ2drO2ujg7v3V4u+6ur/GxsabmqDp6fWrv9Te5/C21fivucPZ6v3J2em81/OoqKvG0dzLztLB0N9QUFHJycnH3/u9ytmzv8tiY2JfY1708/OysblChxnBxMqUm6OosbikssLT09uXstGhvNyysrOtyOXg4OqzxtiuzO/z9fsAAACutbyOorqlrLXu7u7i6/aGipHb4+zI1eLPz9Xc2+Tk7vn59/Xk8P1U7QDr6upRaEUhHSFLgSyurrNNuQtWxxMfHx9a3wwclxa6AAADZklEQVR42u2SA9OjMRzEm+SxLdU2X9u2dLb1/efS9uzx6Tcqdjd/xf7zn9+JssOIEqDRL8p5Ct7eu3Htxp4gG78UD24frPWKj4q9hWnA/lwfsHvnczOPBtSWSOGnhtLeeXZ1IO92uzOzBfonehdMZLP1oRxTXxLCH+p9Zn8qm53pdovVajOXv5iaswT+RwZDPM9OTXWLvVz+9DiTyeRP12VD+YFBZ/JTF8edXO74+vWD9aVqrTkBgE44puuVv2mgyOOjo0x9tV4t4qKqxVrttAAQMiq2ThC2EX5R3k2kEpm51dV6dzimYrHWvCAAclcMjGnbtvKp2q3oBkNgeX2whgfFfuNzpxQw8BMmxvV58oO8bRKmx/MOPVuv12sPMJOTvV6zkz8XWBOZNGEizw8UeqgODN1B/EP8gZTXmpje5OQdTKeTy0zHS05BFitYHhqIHsh13eXLDzExpQ1PzvO5' $AnimFrame5 &= '2c6dvqFzd2ligopLAJCu74crdsEBfDl2SNAMYGl9Bfk8X7bh7trawt3O5K1b1c7axNF+QmTs0PfbyC5wnC57XkwTqWiEIMkSkGXgGCVGW9C0xihmffpgGsol5Puea84zgsCwMuobrIZ2736rdXY4ahU4Va2M7C4uotHo2v70C1km3X7xeglIAgfTuqu8MxzeP2uNX15ennH6vMRQpO4Y0QkdB47rhcimgCRxYHNTDxU+pnGkNjS0xsdbDFHaTKoJyNEsjIuFihuiCslKsgjiac4c3McoLWqL99r9F8bHGVJPJEnLomFyI5V2kItw8SKEQEjFnX48xotGAKCsRt8wRpliasxqNKzt55siZD1cvABVHL/MGV4Z6/vYlqaNFCBH7I4xIbch45ZGre2dx89EiCgAVQjEVFJHPpYP4T17ntA0zZZlj1YT29GiFlknO2+u0rAgqqrcjzfbg/ghfNl3bZobI9WABMsJQFiNCL/w6moZCjheSid0F8d/Ao8tQUgk2jaXEojoBIo0Se68vFqWOVFIDofzJTzviw0XJFKqVIoajZExCJ++Tgo6TMd1FOD4r6GIAIgJxzBsWhDo3YjG6YK6zA6q/xZSwHAbeNTlJ36ALwewpCTKqjOo/tsGUdggXWU4BcUPPFRxbDSY/bdRpCSH/I893VQwWP59eIS8T//f2tqK/SG8BYg9j6ds0OJLAAAAAElFTkSuQmCC' Local $bString = _WinAPI_Base64Decode($AnimFrame5) If @error Then Return SetError(1, 0, 0) $bString = Binary($bString) If $bSaveBinary Then Local Const $hFile = FileOpen($sSavePath & "\Search0004.png", 18) If @error Then Return SetError(2, 0, $bString) FileWrite($hFile, $bString) FileClose($hFile) EndIf Return $bString EndFunc ;==>_AnimFrame5 Func _AnimFrame6($bSaveBinary = False, $sSavePath = @ScriptDir) Local $AnimFrame6 $AnimFrame6 &= 'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAABQVBMVEX09PTMzMzCwcGwr7GEhIR/f4C3t7e0tbXx8fGsrK2pqamhoqKbm5yYmZqUlJSPkJCMjIyJioyIiInPz8/ExMR7e3txcnLp6enj4+Ph4OLc3NzY2Ni4uL52dne7zeK8ytqvwtS+vb3g3+rCwsjU1NTY2OKfnqHQ0dptbW9eXl5UVFTT3uvP3/LO4/vV5/va5vTh7v3r6url6PGoqa7Gxs6lpajKytG+2fi51/mw0vm41PHD0uDc3OWuyui40Oqrucucs8yzx92ysbhjZmS/1e7I2OrP2OPj7vrV4vG3xdG3wMm9vcPb6vvJycnk8P3U1N3e5e3OztWWlpjp8v2Um6Omr7ewuL9paWn59/V9fn7HztaSj5jn7/dAiRaHipHF3vsgHiAAAABNuQtWxxNa3wxU7QBRaEVPiS9Dhh1DhBxISEhQ2mXZAAADaUlEQVR42u2UU4I0WRhE+ypts2xbatuc3xhp/wuYm9Vj2+c5TmR8hdz4n//5o+iyioE1GfzMOCeSV3f3D/d3BrF+Vr326j591Lo4a88fNOWn855ylxm3LhIOW3PB+ElButuevr5Y0+m09kX5J/KmlplOm18InebcKPzEoPvZdPq46Kz5ejyeRQb3Y4KFj6fTSWedXi6Xq73VMQ5/TEDyajKZdFrN8So1rzcajb0tzYAgcH9IEPuzyXjcXG2n6+16enNzM7Uc6hAyiGeh6Xe/K0jsZDzLbKWPDumqdrvdaEx5rRAEoWllqcWzVvjNk0p8Zmtru3FLWd991pyJylo4tyiQYZivr+NMXcnsNVut24T1M/ZSegkUCgUTWJBiepzwZTyEPGTxM5pvXdy+eHHYo5P2lyeOABKgzEPge4EnPaYDC7GAe7KhsplUo93u9XpXV/X6fmpbJAI4t7IiwdnA8wsWkNdxhEyu+4QCySCTSc8Prij1g9T2gyMLbF/S' $AnimFrame6 &= 'tKHpeYVzRmQ1rrtxycuKeiOjc+BxSCkfPKMc1I+OGnvHBMv9vsAzBc8LASOqKiJhsDHCpXyWF0RJI5jYECyK9Mj8yckJIkQZsmyWtgcm5BXDkBUCEoEZXF8uer1cGeqIJzLPWuYoz0iOrQpM1vST8UjSsa6SGjJdKkSD6/JlMdfryX2puutUYlVWbOepKvNZ4Ltega7RCFG16i7NcxsjRRhRYZHrPe8jpxJdX4vEqVLRYMwgGZ8VVEyw5tRUK0h+H3kZU6G4yEkliKvDQbFYHuUhPZE4gRsCOh7bTzWj6rBJPSWAkaqV2IHwvKDuGvni4jIRoo92VaL4dLxh20m9QutpPoGJRqNIjImv2JXTcu5RYD/+4A22AR0f2xquvoOAR+OPcCHD8zuxL+ifxuJprkgFGKGX77+t2SKO4/V6GNI5Xwpdz+SdkFGr+pAnWEY7AxjtvHyPCgatJ7UKMmn91+A4Dw9MWhSrp6PRCNlYHvY/efdtjajYqNQUGHznzyMiX8MVxPKyrpfyg0Ek2faHb94xkE3rgf/dNwE9WN1lTc/1AsBIhi7n87KCDSOu3VjJ+u8K2KgOTXeD0nU934S8dtPHmMTsev13cXFFBd6XN7n0SfQbZhnwxWf/HTjw7aVct+u6dM3Ph+No+p/BZ+T+hfMwnNBxAAAAAElFTkSuQmCC' Local $bString = _WinAPI_Base64Decode($AnimFrame6) If @error Then Return SetError(1, 0, 0) $bString = Binary($bString) If $bSaveBinary Then Local Const $hFile = FileOpen($sSavePath & "\Search0005.png", 18) If @error Then Return SetError(2, 0, $bString) FileWrite($hFile, $bString) FileClose($hFile) EndIf Return $bString EndFunc ;==>_AnimFrame6 Func _AnimFrame7($bSaveBinary = False, $sSavePath = @ScriptDir) Local $AnimFrame7 $AnimFrame7 &= 'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAABPlBMVEX09PSUlJWQkJCEhIWBgYG9vb26urqzs7SurbOwsLCsrK2oqaqioqWgoKGdnJ2Xl5fv7/DExMuNjY2JiYnDw8PAv797e3t4eHnNztTPz8/MzMzd3d3f39/l5eXn5+e9v8aJi422t7zZ6fzQ5PvF3fq51/lwcHFra2tjZWRSUlKnqrGx0vnN1+LU1N3b3ebe4OrI2OrHx87t7e3BwcbT0tLX19fo6fTk5O/f7f3m8f1eXl7JycjE0d7X4u69y9jV5fb6+PbK4frt9PvQ3e1YWFjP0dmlpqdChxmVm6OYp7nd5/KlssGwucO70+y1wc2zxtbm7/rY2N7e6veysrmrs7m1zOa/2vjCzNO6u8Hs8PXi7/21trYAAABRaEVPiS/K3/ZNuQtWxxNa3wzX2eKgv+Sct9J0i6YhHSEfHx9U7QDppX/IAAADgUlEQVR42mIYHmAUABgnpwTZkiiKZuDadtp22farZ7U9/wn0ibptZNb+XuvEDk0FREhZj5+JmxotX3Zfdy8d6j5rPLZv9veut17u7d7aeD2f4cuHRnVra2tzc/NgV3HWCvrlQ6++mQub1fG5sYaP7Ider5YLkNquM19dCL3u9XrVXKgdvW00Ks50lbBDYIHG5uYW0I1G/ah2tE8WqwTJuGs0QKi9PapVnzrdYWGVoClMqDE6T/VO1cwVgiE2WJPqR5bqyXh8971sFFetIANfP2D4Xn93PB6/+UELFC9O/k+SjHG9Xjv4eN3f7e/1b6+ufryyVdf1eEkWvSiZ/scpvfuqNr6/Pxu+OH5xfX0wfnMf8EmaJovI5QRJlnl3/vctYeHh5mb/+phlCw63rmAvy5iw40I8nuf/2s6MUFA62dw6zoWX1aNZILmAz+dR7HqQKDOVP/CFJ3OJhL5j/IcPy+XeyfgdQWIMMMRDMhenWVo0cjp1JSE2DwuR701Gy+m0' $AnimFrame7 &= 'OBr1+xVSVjhGu5xKCZdk6dyNjSdcEiNzWjg8LOiiQrT34eNwOChpAVYFyypVurptq1GWzXcEVcQADmQDYWSIOzHq6tstGlCkGSSwu7elUqkiKorMA76IeRVjkSZJYULUmScr53rQlVqnOueqNiEO1uVPcCqfRIEDPIk8BTkOwjRmAm+Fg+GGrnmkE1Dq6ArPDhEuTOR5hkN5SbdhCD2VogyEihWGg3MU4bYdPoaiTpuBIQs7Hsexo8nbUIrxdluKimZhgpRJeCaSFPnN94MlZGjJmJAygvfAcE7BhBK7eYq9p/dhGWQSVoL03G7L4cbGxmg4OAsnMwXRZlJMYihPfN92tptClD29jMSrYLv5yONtwxotQRgMQqtU+rKNKUqhvOMHML6D3WQKPItQsagV4VZbmS2XGyMQJnD8F7/8RPwYygd+mZy2pJiNz2MubDmzSRv5RBdL0AgKlcSLbz93fJUEAS3DeG4B4/8QpjRFuOMrVjgTKDHkV7DAq4tvQHBgPIXxefs/YlLibCMNOY5emkwsySeGqlx8/blDMXFaHcT96/MUSQu7iyyNZcO2tRm8IM33v/i55Uh+p/nX9n/EjOPENM0iPIJY0B3HsGYGIo4TdJCXt/+3Yv6+oWIxhZdjI4UQGois/dpMp+xfxpzAx/nZr48JgaWKa/B/SYVfN0QAAPP9h1lQpis3AAAAAElFTkSuQmCC' Local $bString = _WinAPI_Base64Decode($AnimFrame7) If @error Then Return SetError(1, 0, 0) $bString = Binary($bString) If $bSaveBinary Then Local Const $hFile = FileOpen($sSavePath & "\Search0006.png", 18) If @error Then Return SetError(2, 0, $bString) FileWrite($hFile, $bString) FileClose($hFile) EndIf Return $bString EndFunc ;==>_AnimFrame7 Func _AnimFrame8($bSaveBinary = False, $sSavePath = @ScriptDir) Local $AnimFrame8 $AnimFrame8 &= 'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAMAAABg3Am1AAABI1BMVEX09PTAwMC0tLSxsbGYmJiPjpCMjIyHh4eAgIF8fHyEhYXS0tHNztSurq7o6Ojl5eXi4uLd3d2cnJ3JytGUlJTLy8vJycjY2Ni2tre/wMW3ub95eXqlpqfCxMrBz9zY2uLd4uzt7e3M0dnF3vrA2vm51/nDw8OioqOfnp+61vKx0vm9vb3V1t3y8vLV1dXf7PzQ5Punq7Gys7pvb3BmaGZeXl9VVVW6wsrc3ufL4fni5e/o6PXq7PDx9frf6veosbrZ6fzW5vfS4O7l8PzA0+bL1uNChxmCiZKUm6MAAABOTk+2yt67vML4+frG1+jp8fpfcIWzxdSxxNumus5RaEVPiS+sxOFNuQtWxxNa3wxU7QB2dXfS0t3GxcUhHSEfHx+pqqv2Api2AAADiklEQVR42mIgB4wCQLVkldjKEURRN8Mwk5iZ0cz0OMzJ/leRHkdxWPZv7q/Oqb5Vmir0Gadu8Ep82BF399PZ9J7x1qvG07uz0uXp1ellKaXkZd7y7z91z6/yjC9KBfai4N6/6dUVnQvj8/dt/AKv0U+93uR3YTwpsdELhc66vd6u0aTeaHZTNtwnhEw90Bw/0c1GvT7ZlmS0T0D4utlsqiqN+uR8nHe6JnCf0Cl0m83GpF7P6Tzn3ba7rxOGzUY+fLezeqFnYHPfUY1uo7692F0pF9QL1t4d3te3SviQJxfq1xTtE0JZ2k4uLk5zvnJzc/3mq7UA1X1bk/hS8UrY1PTaTemzz90Mg8D57zVavKb48jrVN7Xp3ceP0wzFLRAjAwLN/tenoF9bn83045OTw8rl9Vp2gGPbTqSFfQgRgq3ob0ceQgGKlZN3KicfThOGQWRZlq2ElgqAMDb/TI/6iCCDFUJreHBcTjrChYFjR9FopAUtoKJZw8IzHgEEHDx1l99TId0OloK2YTiKRpoWBAHABghsyzZ337vd' $AnimFrame8 &= 'gjAYHuCpMV9AXUM+JbiD+mHwRLf6bS77jmWPWiF+wiHUhtWDd203YSsyLQ7Kg9FTtMBL3s6mLqVtzbKiELYhVWDZwD71MXR9nSwY0HRN1wflSqWyqa3TGTIKhVhXeBC3CUE8cg48dTyACkTaOHv0YaSuMgrCUK3Z78cQQqBwRwOGzxj2eZALcVEfJMJu0xUhlDMXAdX9RwARjGN1GlOVh676gYiVoZm/CUk2iMmyox9XdOTyeYYNGOZPBLap2sAO5ZzQ5QLp5vDA8wuex4sanfNi+ShPuWgQKSkGIyfH+wXCuSTzFQFO/n0kWHq+YVE2T384PDo63JQHNd1LDJ/PHTPKy0shKFvOYT5eJQIpzWyfLA29ongl1PTi2/TLBeG+3UIuE0JSNb7lVHNeBaZextjjHKe6Eiq5oM5/+91PUgQdKjJB5XJhBGr8LsMIdhZLMf2FcQwT1UgVStHttw8r0ZZZxvPxIFLjn4WqpUEuSOrpCeTSNWaq0ez2m4dHwdR4vpojzdrhO2NYVbeGLmNu4nkeFBK3C7dfP6w4kWyx8vPj/CPKMe0A4VwqFlNXiC9+XjAkVnMjUOP/PcqxnAAqCRcT7EvJMjX+uf1/Wuo7Bgb1C1zyDGrmXvy5nuWofxjG4fPtX2WZ5mvx3e0U/f/Ir0uzgmBsgoYPAAAAAElFTkSuQmCC' Local $bString = _WinAPI_Base64Decode($AnimFrame8) If @error Then Return SetError(1, 0, 0) $bString = Binary($bString) If $bSaveBinary Then Local Const $hFile = FileOpen($sSavePath & "\Search0007.png", 18) If @error Then Return SetError(2, 0, $bString) FileWrite($hFile, $bString) FileClose($hFile) EndIf Return $bString EndFunc ;==>_AnimFrame8 Func _WinAPI_Base64Decode($sB64String) Local $aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "ptr", 0, "dword*", 0, "ptr", 0, "ptr", 0) If @error Or Not $aCrypt[0] Then Return SetError(1, 0, "") Local $bBuffer = DllStructCreate("byte[" & $aCrypt[5] & "]") $aCrypt = DllCall("Crypt32.dll", "bool", "CryptStringToBinaryA", "str", $sB64String, "dword", 0, "dword", 1, "struct*", $bBuffer, "dword*", $aCrypt[5], "ptr", 0, "ptr", 0) If @error Or Not $aCrypt[0] Then Return SetError(2, 0, "") Return DllStructGetData($bBuffer, 1) EndFunc ;==>_WinAPI_Base64Decode1 point
-
Real programmers use a single function call, quiche eaters use two. © Ed Post. https://www.ee.ryerson.ca/~elf/hack/realmen.html1 point
-
I did not create this, but the GUI for LinuxLive USB Creator is amazing! The cherry on top is that it is made in AutoIt! This is what got me into looking into AutoIt, and the rest is history1 point