How to start a random function?

[PEscobar]

How do I make it so a random function within the script runs. What I tried was giving all the functions the same name but with a different number at the end. In my script I added the name of each function, then the random function with a range of 1-3 since that is what each function has at the end, but this of course did not work. What is another way of doing this without using the random function?

 

HotKeySet("{F1}", "endProg")

While(1)
    camera(random(1, 3, 1)()
 WEnd

 Func camera1()
    send("{right down}")
    sleep(random(200, 1000, 1)
    send("{right up}")
 EndFunc

 Func camera2()
   send("{left down}")
   sleep(random(200, 1000, 1)
   send("{left up}")
EndFunc

Func camera3()
   send("{up down}")
   sleep(random(200, 1000, 1)
   send("{up up}")
EndFunc

[JohnOne]

Here's one way...

HotKeySet("{F1}", "RunFunc")

While (1)
    Sleep(100)
WEnd

Func RunFunc()
    Local $aFuncs[3] = [camera1, camera2, camera3]
    Call($aFuncs[Random(0, 2, 1)])
EndFunc   ;==>RunFunc


Func camera1()
    MsgBox(0, 0, "camera1")
EndFunc   ;==>camera1

Func camera2()
    MsgBox(0, 0, "camera2")
EndFunc   ;==>camera2

Func camera3()
    MsgBox(0, 0, "camera3")
EndFunc   ;==>camera3

 

[water]

Or without the need to use an array:

HotKeySet("{F1}", "RunFunc")
Global $iMaxFuncs = 3 ; highest function number
While (1)
    Sleep(100)
WEnd

Func RunFunc()
    Call("camera" & Random(1, $iMaxFuncs, 1))
EndFunc   ;==>RunFunc


Func camera1()
    MsgBox(0, 0, "camera1")
EndFunc   ;==>camera1

Func camera2()
    MsgBox(0, 0, "camera2")
EndFunc   ;==>camera2

Func camera3()
    MsgBox(0, 0, "camera3")
EndFunc   ;==>camera3

 

[JohnOne]

And without the need to use Call

HotKeySet("{F1}", "RunFunc")

While (1)
    Sleep(100)
WEnd

Func RunFunc()
    Local $aFuncs[3] = [camera1, camera2, camera3]
    $aFuncs[Random(0, 2, 1)]()
EndFunc   ;==>RunFunc


Func camera1()
    MsgBox(0, 0, "camera1")
EndFunc   ;==>camera1

Func camera2()
    MsgBox(0, 0, "camera2")
EndFunc   ;==>camera2

Func camera3()
    MsgBox(0, 0, "camera3")
EndFunc   ;==>camera3

 

[water]

PEscobar,

out of curiosity: Why do you need to run random functions?

Edited January 5, 2016 by water

[Jos]

@PEscobar, did you actually read those forumrules you were [pointed to by @Melba23?

I haven't seen the removed code but the question seems to be pretty close to your first thread!

Jos