[Математика] Сложение столбца чисел из текстового файла

[exHalfer]

Помогите написать скрипт сложения столбца чисел.
Есть текстовый файл вида

Пауза 10 мин с 08:47
Пауза 5 мин с 09:06
Пауза 11 мин с 09:52
Пауза 8 мин с 10:48
Пауза 14 мин с 11:39
Пауза 71 мин с 12:31

Надо посчитать количество минут.

 

[madmasles]

exHalfer,
Попробуйте так.

$vTmp = 'Пауза 10 мин с 08:47' & @CRLF & _
		'Пауза 5 мин с 09:06' & @CRLF & _
		'Пауза 11 мин с 09:52' & @CRLF & _
		'Пауза 8 мин с 10:48' & @CRLF & _
		'Пауза 14 мин с 11:39' & @CRLF & _
		'Пауза 71 мин с 12:31'

$aTmp = StringRegExp($vTmp, '\h(\d+?)\h', 3)
;$aTmp = StringRegExp($vTmp, '(\d+?)\h+мин', 3)
If @error Then Exit 13
$vTmp = 0
For $i = 0 To UBound($aTmp) - 1
	$vTmp += $aTmp[$i]
Next
$aTmp = 0
ConsoleWrite('Summ: ' & $vTmp & @LF)

 

[Yuri]

Еще способ

#include <file.au3>
#include <String.au3>

Dim $aRecords
_FileReadToArray(@ScriptDir & "\Test1.txt", $aRecords)

$Sum = 0
For $i = 1 To $aRecords[0]
    $aMin = _StringBetween($aRecords[$i], "Пауза ", " мин", -1)   
    $Sum += $aMin[0]	
Next

MsgBox(64, "Сумма", $Sum & " минут")

 

[sngr]

#include 'array.au3'
$file='Пауза 10 мин с 08:47'& _
'Пауза 5 мин с 09:06'& _
'Пауза 11 мин с 09:52'& _
'Пауза 8 мин с 10:48'& _
'Пауза 14 мин с 11:39'& _
'Пауза 71 мин с 12:31'
$str=StringRegExp($file,'Пауза (\d+)',3)
;~ _ArrayDisplay($str)
MsgBox(32,'',Execute(_ArrayToString($str,'+')))

 

[exHalfer]

Спасибо, очень помогли