Hi,
I'll try to help you !!
You could use an array
Dim $Myarray[41]
$Myarray[1] = "phrase 1"
....
$My Arry[30] = "phrase 30"
...
$My Array[40] = "phrase 40"
then a loop
for $i = 1 to 40
Sleep(10000)
MouseClick("Right",350,237)
Sleep(100)
Send(Myarray[$i] ,1)
Send({ENTER})
Sleep(7000)
MouseClick("Right",60,125)
Sleep(10000)
Next
Hope this help
We could also use a file from wich read each phrase (refer to FileReadLine )
Regarding the GUI concept, i don't understand the purpose of your script, thus i can't help
Xavier