Send 2 lines from text file

[AzKay]

#include <String.au3>

$Text = FileRead("somefile.txt")
$Text = _StringBetween($Text, "PointA", "PointB")
For $i = 0 To UBound($Text) -1
    MsgBox(0, "", $Text[$i])
Next

Like that?

[haXor4life]

#include <String.au3>

$Text = FileRead("somefile.txt")
$Text = _StringBetween($Text, "PointA", "PointB")
For $i = 0 To UBound($Text) -1
    MsgBox(0, "", $Text[$i])
Next

Like that?

Yes, thank you. Do you know by any chance how to send it between pauses? (I mean after pause there should be new part of text.)

Or maybe this one

$Text = FileRead("somefile.txt")

$Text = __StringBetween($Text, "PointA", "PointB")

MsgBox(0, "", $Text)

Func __StringBetween($s, $from, $to)

$x = StringInStr($s, $from) + StringLen($from)

$y = StringInStr(StringTrimLeft($s, $x), $to)

Return StringMid($s, $x, $y)

EndFunc

I tried variations like this

$Text = FileRead("somefile.txt")

$Text = __StringBetween($Text, "PointA", "PointB")

Send($Text)

Func __StringBetween($s, $from, $to)

$x = StringInStr($s, $from) + StringLen($from)

$y = StringInStr(StringTrimLeft($s, $x), $to)

Return StringMid($s, $x, $y)

EndFunc

but it doesn't work. Edited January 23, 2009 by haXor4life

[AzKay]

#include <String.au3>

$Text = FileRead("somefile.txt")
$Text = _StringBetween($Text, "PointA", "PointB")
For $i = 0 To UBound($Text) -1
    Send($Text)
    Sleep(1000)
Next

?

[haXor4life]

It doesn't work for some reason. When it is time to send it turns off.

But when I changed code that it should send anything (e. g. Send("Sample")) it sent amount of this word equal to number of marks.

[AzKay]

Send($Text[$i])

Edited January 23, 2009 by AzKay

[haXor4life]

Thank you very much indeed.

[bo8ster]

For learning more I would also recommend looking at the example script section. You can pick up a lot playing with that stuff.