Just a small function to type a character one by one, like the Robco terminals from the Fallout games.
Not sure if this would be useful to anyone, but I was recreating a Robco terminal and decided to share this.
Example Usage:
Robco('Robco Industries Unified Operating System', $Terminal, 200)
Function:
Func Robco($string, $control, $time)
$Temp = ''
$Str = StringSplit($string, '')
For $C = 1 To $Str[0]
GUICtrlSetData($control, $Temp & $Str[$C])
$Temp &= $Str[$C]
Sleep($time)
Next
EndFunc
Full Example:
#include <GUIConstants.au3>
GUICreate("Robco Terminal", 500, 400)
$Terminal = GUICtrlCreateLabel("", 200, 30, 150, 30)
GUISetState()
Robco('Robco Industries Unified Operating System', $Terminal, 200)
While 1
$Msg = GUIGetMsg()
Switch $Msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func Robco($string, $control, $time)
$Temp = ''
$Str = StringSplit($string, '')
For $C = 1 To $Str[0]
GUICtrlSetData($control, $Temp & $Str[$C])
$Temp &= $Str[$C]
Sleep($time)
Next
EndFunc