Still noob here,
Need help for setting any amount of loop times on each script then add a button to run it on sequence. Here is my code:
Code: Select all
Gui, +AlwaysOnTop +Resize -MaximizeBox -MinimizeBox
Gui, Font, cRed
Gui, Add, Text, w130 h20 , ESC to STOP
Gui, Add, Text, w130 h20 , End to EXIT
Gui, Font, cBlue
Gui, Add, Text, w130 h20 , S+F1 for Mouse Coor.
Scripts := "DESCRIPTION, VALUE, EXPCOM, QTY"
ScriptsArray := StrSplit(Scripts, ", ")
Loop, % 1*ScriptsArray.Count()
Gui, Add, Button, xm y+1 w130 h35 gTestUniversal , % "Run " . ScriptsArray[Round(A_Index/1)] . ".AHK"
Gui, Add, Edit, w30 h20 vf1x,
Gui, Add, Edit, w30 h20 vf1y,
Gui, Font, s5
Gui, Show,, MULTIPLE ITEMS BREXIT
Return
+F1::
CoordMode, Mouse, Screen
MouseGetPos, xpos, ypos
GuiControl,, f1x, % f1x := xpos
GuiControl,, f1y, % f1y := ypos
Return
TestUniversal:
Run % "C:\Users\DepEd\OneDrive\Desktop\BREXIT SCRIPTS\" . StrReplace(A_GuiControl, "Run ")
Return
#d::Run, C:\Users\DepEd\OneDrive\Desktop\BREXIT SCRIPTS\DESCRIPTION.AHK
#v::Run, C:\Users\DepEd\OneDrive\Desktop\BREXIT SCRIPTS\VALUE.AHK
#e::Run, C:\Users\DepEd\OneDrive\Desktop\BREXIT SCRIPTS\EXPCOM.AHK
#q::Run, C:\Users\DepEd\OneDrive\Desktop\BREXIT SCRIPTS\QTY.AHK
GuiClose:
End::
ExitApp
I want to loop the description for 6x(editable) then,
8x(editable) for value then,
5x(editable) for EXPCOM then
3x(editable) for QTY
Then add a button to run it on sequence.