Opt("WinTitleMatchMode",2)
$list="d:\list.txt"
$browser="c:\FirefoxPortable\FirefoxPortable.exe"
$path="c:\FirefoxPortable\"
$process="firefox.exe"
$window="Firefox"

$list=FileRead($list)
$list=StringSplit($list,@CRLF,1)

ShellExecute(@ScriptDir&"\memory.exe",$process)
ShellExecute($browser,"",$path)
Sleep(1000*30)
$s=0
For $i=1 To 150
	ShellExecute($list[$i])
	Sleep(Random(1000,10000))
	$s+=1
	If $s=30 Then
		WinActivate($window)
		WinWaitActive($window)
		For $j=0 To 29
			Send("^w")
			Sleep(Random(100,1000))
		Next
		$s=0
	EndIf
Next
Sleep(1000*30)
WinClose($window)

Exit