sloth85 Posted August 17, 2011 Posted August 17, 2011 (edited) expandcollapse popupWhile 1 $currentLine = FileReadLine($SMDfile, $readStart+1+$s) If @error = -1 OR $currentLine = "end" Then ExitLoop If $StringMid($currentLine[1],1,1) = "/" OR $StringMid($currentLine[1],1,1) = ";" OR $StringMid($currentLine[1],1,1) = "#" Then ElseIf $lineID = 0 Then $lineID = 1 Else $tempSplitLine = StringSplit($currentLine, " ", 1) $tempSearch = _A3DSearch($v, $tempSplitLine[2], $tempSplitLine[3], $tempSplitLine[4]) If $tempSearch = -1 Then _Array2D_PutValue($v, $tempSplitLine[2] , UBound($v,1)-1, Default, 0) _Array2D_PutValue($v, $tempSplitLine[3] , UBound($v,1)-1, Default, 1) _Array2D_PutValue($v, $tempSplitLine[4] , UBound($v,1)-1, Default, 2) Redim $v[UBound($v,1)+1][3] _Array2D_PutValue($vn, $tempSplitLine[5] , UBound($vn,1)-1, Default, 0) _Array2D_PutValue($vn, $tempSplitLine[6] , UBound($vn,1)-1, Default, 1) _Array2D_PutValue($vn, $tempSplitLine[7] , UBound($vn,1)-1, Default, 2) Redim $vn[UBound($vn,1)+1][3] _Array2D_PutValue($vt, $tempSplitLine[8] , UBound($vt,1)-1, Default, 0) _Array2D_PutValue($vt, $tempSplitLine[9] , UBound($vt,1)-1, Default, 1) Redim $vt[UBound($vt,1)+1][2] $vcount = $vcount + 1 $tempBcount = $tempSplitLine[10] $bcount[UBound($bcount,1)-1] = $tempBcount If $tempBcount > 0 Then For $i = 0 to $tempBcount-1 _Array2D_PutValue($bref, $tempSplitLine[11+(2*$i)] , UBound($bref,1)-1, Default,$i) Redim $bref[UBound($bref,1)][UBound($bref,2)+1] _Array2D_PutValue($w, $tempSplitLine[12+(2*$i)] , UBound($w,1)-1, Default, $i) Redim $w[UBound($w,1)][UBound($w,2)+1] Next EndIf Redim $bcount[UBound($bcount,1)+1] Redim $bref[UBound($bref,1)+1][UBound($bref,2)] Redim $w[UBound($w,1)+1][UBound($w,2)] $faceIndices[UBound($faceIndices,1)-1] = $vcount-1 Else $faceIndices[UBound($faceIndices,1)-1] = $tempSearch EndIf Redim $faceIndices[UBound($faceindices,1)+1] $fx3count = $fx3count+1 If $lineID = 3 Then $lineID = 0 Else $lineID = $lineID + 1 EndIf $s = $s+1 Wend results in: Wend Error: "Wend" statement with no matching "While" statement. so i remove Wend just to try: expandcollapse popupWhile 1 $currentLine = FileReadLine($SMDfile, $readStart+1+$s) If @error = -1 OR $currentLine = "end" Then ExitLoop If $StringMid($currentLine[1],1,1) = "/" OR $StringMid($currentLine[1],1,1) = ";" OR $StringMid($currentLine[1],1,1) = "#" Then ElseIf $lineID = 0 Then $lineID = 1 Else $tempSplitLine = StringSplit($currentLine, " ", 1) $tempSearch = _A3DSearch($v, $tempSplitLine[2], $tempSplitLine[3], $tempSplitLine[4]) If $tempSearch = -1 Then _Array2D_PutValue($v, $tempSplitLine[2] , UBound($v,1)-1, Default, 0) _Array2D_PutValue($v, $tempSplitLine[3] , UBound($v,1)-1, Default, 1) _Array2D_PutValue($v, $tempSplitLine[4] , UBound($v,1)-1, Default, 2) Redim $v[UBound($v,1)+1][3] _Array2D_PutValue($vn, $tempSplitLine[5] , UBound($vn,1)-1, Default, 0) _Array2D_PutValue($vn, $tempSplitLine[6] , UBound($vn,1)-1, Default, 1) _Array2D_PutValue($vn, $tempSplitLine[7] , UBound($vn,1)-1, Default, 2) Redim $vn[UBound($vn,1)+1][3] _Array2D_PutValue($vt, $tempSplitLine[8] , UBound($vt,1)-1, Default, 0) _Array2D_PutValue($vt, $tempSplitLine[9] , UBound($vt,1)-1, Default, 1) Redim $vt[UBound($vt,1)+1][2] $vcount = $vcount + 1 $tempBcount = $tempSplitLine[10] $bcount[UBound($bcount,1)-1] = $tempBcount If $tempBcount > 0 Then For $i = 0 to $tempBcount-1 _Array2D_PutValue($bref, $tempSplitLine[11+(2*$i)] , UBound($bref,1)-1, Default,$i) Redim $bref[UBound($bref,1)][UBound($bref,2)+1] _Array2D_PutValue($w, $tempSplitLine[12+(2*$i)] , UBound($w,1)-1, Default, $i) Redim $w[UBound($w,1)][UBound($w,2)+1] Next EndIf Redim $bcount[UBound($bcount,1)+1] Redim $bref[UBound($bref,1)+1][UBound($bref,2)] Redim $w[UBound($w,1)+1][UBound($w,2)] $faceIndices[UBound($faceIndices,1)-1] = $vcount-1 Else $faceIndices[UBound($faceIndices,1)-1] = $tempSearch EndIf Redim $faceIndices[UBound($faceindices,1)+1] $fx3count = $fx3count+1 If $lineID = 3 Then $lineID = 0 Else $lineID = $lineID + 1 EndIf $s = $s+1 ;Wend and get EndFunc Error: "While" statement has no matching "Wend" statement. WTF Edited August 17, 2011 by sloth85
enaiman Posted August 17, 2011 Posted August 17, 2011 You are missing an EndIf form the last If statement in the loop. SNMP_UDF ... for SNMPv1 and v2c so far, GetBulk and a new example script wannabe "Unbeatable" Tic-Tac-Toe Paper-Scissor-Rock ... try to beat it anyway :)
sloth85 Posted August 17, 2011 Author Posted August 17, 2011 You are missing an EndIf form the last If statement in the loop. Thanks! Works now. Wish it wouldve said missing EndIf rather than Wend.
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now