GenerateRandomRegisterCallback("_generateRandomReady_Callback1")
GenerateRandomRegisterCallback("_generateRandomReady_Callback2")

GenerateRandom()





Func _generateRandomReady_Callback1($num)
	ConsoleWrite("! -> " & $num & @CRLF)
EndFunc

Func _generateRandomReady_Callback2($num)
	ConsoleWrite("- -> " & $num & @CRLF)
EndFunc






Func GenerateRandomRegisterCallback($funcName)
	GenerateRandomCallbackHandler($funcName, 0)
EndFunc

Func GenerateRandomCallbackHandler($funcName = "", $call = 0)
	Static $callBack[10]
	If $call Then
		For $i = 0 to UBound($callBack)-1
			If $callBack[$i] Then Call($callBack[$i], $call)
		Next
	Else
		For $i = 0 to UBound($callBack)-1
			If Not $callBack[$i] Then
				$callBack[$i] = $funcName
				Return
			EndIf
		Next
	EndIf
EndFunc

Func GenerateRandom()
	GenerateRandomCallbackHandler("", Random(0,1000,1))
EndFunc