anzahl zulaessiger instruktionen wurde ueberschritten

Eröffnet von Yvel273 im Board Equilla - Ideen umsetzen und programmieren

Seitenlänge102030
Seite 1 von 1
#1: 29.06.2019 17:18 Yvel273
mit folgendem code bekomme ich die meldung zu vieler instruktionen.
dabei handelt es sich nur um eine vereinfachung zweier vectoren,
die auf wiederholungen ueberprueft werden.
hat jemand eine idee, wie dies umgangen werden kann ?

Meta:
Synopsis("Vectorextractions"),
ShortCode("VE"),
Subchart( false );

Inputs:
filtermultip(true),
valtolerance(2);

Variables:
x,,z,
filtUpArray(Vector), filtDnArray(Vector),
extUpArray(Vector), extDnArray(Vector);


if currentbar = 1 then begin
Fillvector(extUpArray,
11130,5, 11141, 11141, 11156, 11161, 11182, 11185, 11185, 11199, 11210, 11210, 11226, 11233, 11260, 11266, 11266, 11268, 11286, 11295, 11295, 11297, 11297, 11297, 11298, 11311, 11334, 11357, 11365, 11365, 11367, 11370, 11377, 11378, 11380, 11390, 11392, 11392, 11396, 11399, 11399, 11420, 11437, 11437, 11445, 11453, 11458,5, 11470, 11492, 11511, 11514, 11519, 11521, 11526,5, 11526,5, 11540, 11543, 11543, 11543, 11543, 11547, 11555, 11560, 11560, 11561, 11572, 11580, 11580, 11580, 11580, 11580, 11594, 11606, 11606, 11634, 11647, 11664, 11664, 11723, 11728, 11728, 11751, 11773, 11779, 11786, 11786, 11787, 11787, 11803, 11803, 11820, 11821,5, 11855, 11864, 11867, 11871, 11891, 11912, 11912, 11912, 11912, 11912, 11912, 11934, 11943, 11945, 11948, 11948, 11960, 11961, 11983,5, 12003, 12066, 12072, 12078, 12100, 12102, 12102, 12102, 12102, 12113, 12115, 12125, 12135, 12147, 12160, 12196, 12221, 12221, 12221, 12245, 12245, 12263, 12264, 12273, 12274, 12295, 12295, 12295, 12297, 12301, 12302, 12355, 12355, 12355, 12372, 12372,5, 12387, 12396, 12396, 12415, 12415, 12415, 12425, 12426, 12452, 12458, 12463, 12480, 12481, 12481, 12489, 12489, 12489, 12498,5, 12498,5, 12498,5, 12517, 12517, 12519, 12525, 12528, 12559, 12559, 12559, 12564, 12597, 12597, 12597, 12608, 12608, 12608, 12609, 12615, 12625, 12627, 12627, 12627, 12631, 12631, 12645, 12657, 12657, 12657, 12665, 12669, 12695, 12695, 12695, 12746, 12748, 12755,5, 12755,5, 12755,5, 12755,5, 12755,5, 12755,5, 12755,5, 12801, 12801, 12801, 12802, 12802, 12854);
Fillvector(extDnArray,
12755,5, 12755,5, 12755,5, 12755,5, 12755,5, 12755,5, 12695, 12695, 12665, 12657, 12657, 12627, 12627, 12615, 12609, 12608, 12608, 12608, 12606, 12597, 12597, 12564, 12559, 12559, 12528, 12519, 12498,5, 12498,5, 12489, 12489, 12489, 12487, 12463, 12458, 12452, 12415, 12415, 12415, 12413, 12400, 12400, 12387, 12372,5, 12372, 12355, 12355, 12355, 12354, 12340, 12340, 12301, 12295, 12295, 12295, 12295, 12264, 12263, 12226, 12221, 12221, 12221, 12221, 12160, 12136, 12135, 12113, 12102, 12102, 12102, 12102, 12083, 12083, 12003, 11983,5, 11961, 11960, 11943, 11934, 11933, 11912, 11909, 11909, 11909, 11909, 11891, 11867, 11864, 11821,5, 11820, 11820, 11792, 11791, 11789, 11789, 11789, 11773, 11753, 11752, 11751, 11728, 11728, 11709, 11647, 11647, 11594, 11594, 11560, 11547, 11540, 11540, 11528, 11526,5, 11514, 11511, 11511, 11470, 11453, 11453, 11445, 11445, 11437, 11437, 11437, 11380, 11378, 11378, 11367, 11367, 11365, 11311, 11298, 11297, 11297, 11297, 11295, 11295, 11287, 11283, 11283, 11283, 11268, 11266, 11260, 11260, 11233, 11226, 11210, 11210, 11210, 11199, 11196, 11185, 11161, 11161, 11156, 11141, 11141, 11141, 11130,5, 11105);
end;
if Islastbar then begin
if filtermultip then begin
x = 0;
y = 0;
While x < VectorLength( extUpArray ) do begin
z = 1;
value1 = ReadVector( extUpArray, x );
value2 = ReadVector( extUpArray, x + z);
if value2 - value1 <= valtolerance then begin
while value2 - value1 <= valtolerance do begin
z = z + 1;
value2 = ReadVector( extUpArray, x + z);
end;
WriteVector( filtUpArray, y, value1 & "(" & z & ")" );
y = y + 1;
x = x + z;
end;
end;

x = 0;
y = 0;
While x < VectorLength( extDnArray ) do begin
z = 1;
value1 = ReadVector( extDnArray, x );
value2 = ReadVector( extDnArray, x + z);
if value1 - value2 <= valtolerance then begin
while value1 - value2 <= valtolerance do begin
z = z + 1;
value2 = ReadVector( extDnArray, x + z);
end;
WriteVector( filtDnArray, y, value1 & "(" & z & ")" );
y = y + 1;
x = x + z;
end;
end;
end;
Print( FormatVector( filtUpArray ) );
Print( FormatVector( filtDnArray ) );
end;