Functions...

[bb05]

Basically have an already working script for what i need.. except i would like to add a few features:

1:) GUI for user input (number)

2:) GUI to load a txt file as input

3:) Hotkey for pause / resuming.

here is what i have so far:

expandcollapse popup

HotkeySet("{HOME}","_end")
HotKeySet("{F11}", "_Pause")
Func _Pause()
While 1
    Sleep(100)
WEnd
EndFunc
Func _end()
Exit 0
EndFunc
$fileinput = FileOpen("enc.txt", 0)
$i = 1;
while $i <= 117
Opt("WinTitleMatchMode", 2)
WinActivate("MeGUI 0.3")
WinWait("MeGUI 0.3","")
WinMove("MeGUI 0.3","",1,1)
MouseClick("left",164,42,1,3);select tools
MouseClick("left",239,176,1,3);select avs script creator
WinWait("MeGUI - AviSynth script creator","")
WinMove("MeGUI - AviSynth script creator","",1,1);move aviscript creator tab to top left
MouseClick("left",447,90,1,3) ;selects source
$line = FileReadLine($fileinput)
WinWait("Select a source file","")
WinActivate("Select a source file","")
Send($line)
Send("{ENTER}")
WinWait("Current position: ","")
WinClose("Current position: ")
MouseClick("left",441,500,1,3);Saves the script
MouseClick("left",487,296,1,3);Selects audio input
WinWait("Select your audio input","")
WinActivate("Select your audio input","")
Send($line)
Send("{ENTER}")
MouseClick("left",474,509,1,3) ; autoencode button
WinWait("MeGUI - Automatic Encoding","")
WinMove("MeGUI - Automatic Encoding","",1,1)
MouseClick("left",325,144,1,3)
MouseClick("left",365,410,1,3);first user defined size
MouseClick("left",385,236,1,3);queue button
;MouseClick("left",185,58,1,3) ; Container Click
;MouseClick("left",146,76,1,3) ; MKV Format
;MouseClick("left",131,91,1,3) ; MP4 Format
$i = $i + 1
WEnd

ideas and comments appreciated.

[bo8ster]

Try looking at the GUI*() functions in the help file.

[BinaryBrother]

Well... If your not familiar with GUI's try tasking a look at this...

$Number = InputBox("Title","Input a number please")

;;;;;;;;;;;;;;;;;

$Number = FileOpenDialog("Choose File") ;etc...

Edited April 15, 2009 by BinaryBrother