Jump to content

Recommended Posts

Posted

Here I'm, with a huge problem knocking my head, hope someone can help me with that.

This is the question within a sample script.

Global $a = 100
Global $b = 1
Global $c = 26
Global $t = Random(1000,4000)
While 1
Sleep($t)
WEnd

For $c = 26 to 25 step -1 then
Do
ControlClick($a,"","","left",1,0,0)
Until
$b = 0
Next
For $c = 25 to 24 step -1 then
Do
ControlClick($a,"","","left",1,0,0)
Until
$b = 0
Next
(?)
Send("100")

The question isn't that simple, When I reach 1 I want continue the loop but from the begin, the probably result will be a condition in the last loop -

If $c = 1 then
$c = 26
EndIf

It will result in a loop, right? I'm gonna add this "If" condition in the end of "Do...Until" expression.

  • Moderators
Posted

Bullet,

That code will never leave the first While...WEnd loop - although it is so syntactically flawed it would never run anyway! :)

I think you want to do this:

Global $a = 100
;Global $b = 1 ; Not required
;Global $c = 26 ; Not required
Global $t = Random(1000, 4000)

While 1
    
    ; Run this 26 times
    For $c = 1 To 26
        ; Click the control
        ControlClick($a, "", "", "left", 1, 0, 0)
        ; Sleep the random length of time
        Sleep($t)
    Next

    ; Send 100
    Send("100")
    
    ; And now we start all over again with another 26 ControlClicks
    
WEnd

Perhaps if you gave a little context we might be able to offer some better help. ;)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

  • 3 weeks later...
Posted

Bullet,

That code will never leave the first While...WEnd loop - although it is so syntactically flawed it would never run anyway! :)

I think you want to do this:

Global $a = 100
;Global $b = 1 ; Not required
;Global $c = 26 ; Not required
Global $t = Random(1000, 4000)

While 1
    
    ; Run this 26 times
    For $c = 1 To 26
        ; Click the control
        ControlClick($a, "", "", "left", 1, 0, 0)
        ; Sleep the random length of time
        Sleep($t)
    Next

    ; Send 100
    Send("100")
    
    ; And now we start all over again with another 26 ControlClicks
    
WEnd

Perhaps if you gave a little context we might be able to offer some better help. ;)

M23

Dude, It doesn't fix my problem because my concept is wrong, but You gave me a very nice idea my mind is totally clear, thanks.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...