Скрипт считывает не все строки с текстового файла

$data = FileRead(@ScriptDir & '/item-ISBN-Preis1.3.txt')
$items = StringRegExp($data, '(?m)^Item:([A-Za-z0-9\s]*)ISBN-10:([A-Za-z0-9\s]*)ISBN-13:([A-Za-z0-9\s]*)Price:.*$', 4)

StringRegExp($data, '(?m)^Item:([A-Za-z0-9\s]*)ISBN-10:([A-Za-z0-9\s]*)ISBN-13:([A-Za-z0-9\s]*)Price:.*$', 4)

$data = FileRead(@ScriptDir & '/item-ISBN-Preis1.3.txt')
FileWrite(@ScriptDir & '/item-ISBN-Preis1.3c.txt',$data)

#include <IE.au3> 
#include <Debug.au3>

const $RETRY_CNT = 30
const $blankURL = 'http://www.amazon.de/gp/product/'

func FindCost(ByRef $oIE, $URL = '')
  _IENavigate ($oIE, $URL)

  $retry = 0
  
  while $retry < $RETRY_CNT
    sleep(1)
    
    if IsObj($oIE.document.body) then
      return StringRegExp($oIE.document.body.innerText,  'Preis:\s*EUR\s*\d+,\d+', 0)
    endif
    
    $retry += 1
  wend
  
  _DebugReport('SKIPPED BY TIMEOUT: ' & $url)
  
  return false
endfunc

  _DebugSetup(Default, True)

$data = FileRead(@ScriptDir & '/item-ISBN-Preis1.3.txt')
$items = StringRegExp($data, '(?m)^Item:([A-Za-z0-9\s]*)ISBN-10:([A-Za-z0-9\s]*)ISBN-13:([A-Za-z0-9\s]*)Price:.*$', 4)

const $last = UBound($items) - 1

$found = 0
$skiped = 0
  
  _DebugReport('Records matched: ' & ($last+1))

$oIE = _IECreate ('about:blank', 0, 1, 1)

for $i=0 to $last
  $item = $items[$i]

  _DebugReport(@CRLF & @CRLF & 'Trying item: ' & StringStripWS($item[1], 8) & ', record num: ' & $i)

  $ISDN = StringStripWS($item[2], 8)
    
  if not $ISDN then
    continueloop
  endif
  
  _DebugReport('    ISDN: ' & $ISDN)
  
  $URL = $blankURL & $ISDN

  if FindCost($oIE, $URL) then
    $item[0] = StringStripCR($item[0])
    _DebugReport('Written: ' & $URL & '[funcReturn]' & FileWriteLine(@ScriptDir & '/found.txt', $item[0]))
	
    $found += 1
  endif
  
next

msgbox(0, 'Result', ' Found records: ' & $found & @CRLF & ' From: ' & ($last+1) & @CRLF & ' Skiped by timeout: ' & $found)

FileOpen

FileReadLine

$aISBN_10 = StringRegExp('Item:   130770055662   ISBN-10:   B00APXDD38   ISBN-13:   Price:   12,36</span>','[\d|\w]+\s+(?=ISBN-13)', 1)
ConsoleWrite(StringStripWS($aISBN_10[0], 2) & @CR)