[Creat0R]

надеюсь, вопрос снят окончательно. методом проб и ошибок заработало так »

Отлично, учимся медитировать над кодом .

Только во втором условии And Not... не нужно, достаточно просто проверять что $j = 1.
А ещё лучше, сделать так:

Код:

	For $j = 0 To 3
            If $j = 1 Then
                If StringInStr($aItem[$j], $sInStrCond) Then
                    $aItem[$j] = StringRegExpReplace($aItem[$j], '.*?(-?\d+)', '\1')
                Else
                    $aItem[$j] &= ',0'
                EndIf
            EndIf

            ...
        Next