N fx:
4
 0
72
608
10
50
0
0
0
0
0
0
0
0
 251
872
560
0
0
0
0
0
0
0
0
0
0
 125
568
544
10
50
0
0
0
0
0
0
0
0
 259
328
608
' AFTER EDIT DO SAVE PROJECT BEFORE RUN %vbCr%%vbLf%' MAINTAIN the Strucure and edit mainly only inside '***'%vbCr%%vbLf%' 3 Inputs are  INP1() INP2() INP3() Arrays%vbCr%%vbLf%' 3 Outputs are OUT1() OUT2() OUT3() Arrays%vbCr%%vbLf%%vbCr%%vbLf%' You can use custom parameter P1 to P5%vbCr%%vbLf%%vbCr%%vbLf%%vbCr%%vbLf%' --- Absolutely Don't touch code from Here%vbCr%%vbLf%%vbCr%%vbLf%Sub Process(W%comma% H%comma% INP1%comma% INP2%comma% INP3%comma% OUT1%comma% OUT2%comma% OUT3%comma% P1%comma% P2%comma% P3%comma% P4%comma% P5)%vbCr%%vbLf%Dim X %vbCr%%vbLf%Dim Y %vbCr%%vbLf%ReDim OUT1(W%comma% H)%vbCr%%vbLf%ReDim OUT2(W%comma% H)%vbCr%%vbLf%ReDim OUT3(W%comma% H)%vbCr%%vbLf%%vbCr%%vbLf%' --- TO HERE%vbCr%%vbLf%%vbCr%%vbLf%DIM W2%vbCr%%vbLf%DIM H2%vbCr%%vbLf%Dim V%vbCr%%vbLf%%vbCr%%vbLf%W2=W*0.5%vbCr%%vbLf%H2=H*0.5%vbCr%%vbLf%%vbCr%%vbLf%For X = 0 To W%vbCr%%vbLf%       For Y = 0 To H%vbCr%%vbLf%'      *** Your Main Code Here -----------%vbCr%%vbLf%%vbCr%%vbLf%if X<W2 then%vbCr%%vbLf%    if Y<H2 then%vbCr%%vbLf%        V = X + Y%vbCr%%vbLf%    else%vbCr%%vbLf%        V = X + Y - H2%vbCr%%vbLf%    end if%vbCr%%vbLf%else%vbCr%%vbLf%    if Y<H2 then%vbCr%%vbLf%        V = X -W2 + Y %vbCr%%vbLf%    else%vbCr%%vbLf%        V = X -W2 + Y - H2%vbCr%%vbLf%end if%vbCr%%vbLf%end if%vbCr%%vbLf%%vbCr%%vbLf%%vbCr%%vbLf%       v = 2.0 *v / (W+H)%vbCr%%vbLf%%vbCr%%vbLf%       OUT1(X%comma% Y) = v%vbCr%%vbLf%       OUT2(X%comma% Y) = v%vbCr%%vbLf%       OUT3(X%comma% Y) = v%vbCr%%vbLf%%vbCr%%vbLf%%vbCr%%vbLf%'       ***-------------------------------%vbCr%%vbLf%       Next%vbCr%%vbLf%Next%vbCr%%vbLf%%vbCr%%vbLf%End Sub%vbCr%%vbLf%
0
0
0
0
0
0
0
0
0
Nlinks
12
-
1
1
-
0
3
-
2
2
-
0
3
-
3
3
-
0
3
-
1
1
-
0
2
-
2
2
-
0
2
-
3
3
-
0
2
-
4
1
-
3
2
-
5
2
-
3
2
-
6
3
-
3
2
-
1
1
-
2
1
-
2
2
-
2
1
-
3
3
-
2
1
EXTRA
0.3.3525
FOLDS 2.txt


X
X
X
X
