0% found this document useful (0 votes)
58 views

AÇÕES

The document defines variables for line values, colors, widths and styles. It then contains conditional logic to set the values of the line variables based on the asset, with different values for assets like ABEV3, ALOS3, etc. Lines are defined for walls, max/min gamma levels and a flip level for each asset.
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
0% found this document useful (0 votes)
58 views

AÇÕES

The document defines variables for line values, colors, widths and styles. It then contains conditional logic to set the values of the line variables based on the asset, with different values for assets like ABEV3, ALOS3, etc. Lines are defined for walls, max/min gamma levels and a flip level for each asset.
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 64

var

clWall : integer;
clMidWall : integer;
clMidWallFibo : integer;
clFlip : integer;
clMaxGamma: integer;
clMinGamma : integer;
stlMidWallFibo : integer;
stlMidWall : integer;
line1 : float;
line1Color : integer;
line1Width : integer;
line1Style : integer;
line2 : float;
line2Color : integer;
line2Width : integer;
line2Style : integer;
line3 : float;
line3Color : integer;
line3Width : integer;
line3Style : integer;
line4 : float;
line4Color : integer;
line4Width : integer;
line4Style : integer;
line5 : float;
line5Color : integer;
line5Width : integer;
line5Style : integer;
line6 : float;
line6Color : integer;
line6Width : integer;
line6Style : integer;
line7 : float;
line7Color : integer;
line7Width : integer;
line7Style : integer;
line8 : float;
line8Color : integer;
line8Width : integer;
line8Style : integer;
line9 : float;
line9Color : integer;
line9Width : integer;
line9Style : integer;
line10 : float;
line10Color : integer;
line10Width : integer;
line10Style : integer;
line11 : float;
line11Color : integer;
line11Width : integer;
line11Style : integer;
line12 : float;
line12Color : integer;
line12Width : integer;
line12Style : integer;
line13 : float;
line13Color : integer;
line13Width : integer;
line13Style : integer;
line14 : float;
line14Color : integer;
line14Width : integer;
line14Style : integer;
line15 : float;
line15Color : integer;
line15Width : integer;
line15Style : integer;
line16 : float;
line16Color : integer;
line16Width : integer;
line16Style : integer;
line17 : float;
line17Color : integer;
line17Width : integer;
line17Style : integer;
line18 : float;
line18Color : integer;
line18Width : integer;
line18Style : integer;
line19 : float;
line19Color : integer;
line19Width : integer;
line19Style : integer;
line20 : float;
line20Color : integer;
line20Width : integer;
line20Style : integer;
line21 : float;
line21Color : integer;
line21Width : integer;
line21Style : integer;
line22 : float;
line22Color : integer;
line22Width : integer;
line22Style : integer;
line23 : float;
line23Color : integer;
line23Width : integer;
line23Style : integer;
line24 : float;
line24Color : integer;
line24Width : integer;
line24Style : integer;
line25 : float;
line25Color : integer;
line25Width : integer;
line25Style : integer;
line26 : float;
line26Color : integer;
line26Width : integer;
line26Style : integer;
line27 : float;
line27Color : integer;
line27Width : integer;
line27Style : integer;
line28 : float;
line28Color : integer;
line28Width : integer;
line28Style : integer;
line29 : float;
line29Color : integer;
line29Width : integer;
line29Style : integer;
line30 : float;
line30Color : integer;
line30Width : integer;
line30Style : integer;
line31 : float;
line31Color : integer;
line31Width : integer;
line31Style : integer;
line32 : float;
line32Color : integer;
line32Width : integer;
line32Style : integer;
line33 : float;
line33Color : integer;
line33Width : integer;
line33Style : integer;
line34 : float;
line34Color : integer;
line34Width : integer;
line34Style : integer;
line35 : float;
line35Color : integer;
line35Width : integer;
line35Style : integer;
line36 : float;
line36Color : integer;
line36Width : integer;
line36Style : integer;
line37 : float;
line37Color : integer;
line37Width : integer;
line37Style : integer;
line38 : float;
line38Color : integer;
line38Width : integer;
line38Style : integer;
line39 : float;
line39Color : integer;
line39Width : integer;
line39Style : integer;
line40 : float;
line40Color : integer;
line40Width : integer;
line40Style : integer;
line41 : float;
line41Color : integer;
line41Width : integer;
line41Style : integer;
line42 : float;
line42Color : integer;
line42Width : integer;
line42Style : integer;
line43 : float;
line43Color : integer;
line43Width : integer;
line43Style : integer;
line44 : float;
line44Color : integer;
line44Width : integer;
line44Style : integer;
line45 : float;
line45Color : integer;
line45Width : integer;
line45Style : integer;
line46 : float;
line46Color : integer;
line46Width : integer;
line46Style : integer;
line47 : float;
line47Color : integer;
line47Width : integer;
line47Style : integer;
line48 : float;
line48Color : integer;
line48Width : integer;
line48Style : integer;
line49 : float;
line49Color : integer;
line49Width : integer;
line49Style : integer;
line50 : float;
line50Color : integer;
line50Width : integer;
line50Style : integer;
line51 : float;
line51Color : integer;
line51Width : integer;
line51Style : integer;

BEGIN
clWall := clLime;
clMidWall := clGray;
clMidWallFibo := clDkGray;
clFlip := clYellow;
clMaxGamma:= clGreen;
clMinGamma := clRed;
stlMidWall := 1;
stlMidWallFibo := 2;
if (GetAsset() = "ABEV3") then begin
line1 := 12.078;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 12.822;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 13.328;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 13.579;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 13.820;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 14.070;
line6Color := clWall;
line6Width := 4;
line6Style := 0;
line7 := 14.320;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 14.570;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 14.820;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 15.070;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 15.570;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 16.320;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 17.070;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 15.70;
line14Color := clMaxGamma;
line14Width := 3;
line14Style := 0;
line15 := 13.620;
line15Color := clMinGamma;
line15Width := 3;
line15Style := 0;
line16 := 14.360;
line16Color := clFlip;
line16Width := 2;
line16Style := 0;
end;
if (GetAsset() = "ALOS3") then begin
line1 := 23.988;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 24.232;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 24.738;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 24.989;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 25.230;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 25.480;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 25.730;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 26.730;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 18.30;
line9Color := clMaxGamma;
line9Width := 3;
line9Style := 0;
line10 := 23.70;
line10Color := clMinGamma;
line10Width := 3;
line10Style := 0;
line11 := 25.790;
line11Color := clFlip;
line11Width := 2;
line11Style := 0;
end;
if (GetAsset() = "ALPA4") then begin
line1 := 8.68;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 8.82;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 9.08;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 10.09;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 8.850;
line5Color := clMaxGamma;
line5Width := 3;
line5Style := 0;
line6 := 6.650;
line6Color := clMinGamma;
line6Width := 3;
line6Style := 0;
line7 := 7.130;
line7Color := clFlip;
line7Width := 2;
line7Style := 0;
end;
if (GetAsset() = "ASAI3") then begin
line1 := 10.958;
line1Color := clWall;
line1Width := 3;
line1Style := 0;
line2 := 11.452;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 11.78;
line3Color := clWall;
line3Width := 3;
line3Style := 0;
line4 := 11.959;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 12.20;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 12.450;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 12.950;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 13.450;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 14.00;
line9Color := clMaxGamma;
line9Width := 3;
line9Style := 0;
line10 := 11.130;
line10Color := clMinGamma;
line10Width := 3;
line10Style := 0;
line11 := 12.710;
line11Color := clFlip;
line11Width := 2;
line11Style := 0;
end;
if (GetAsset() = "AURE3") then begin
line1 := 14.08;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 14.52;
line2Color := clWall;
line2Width := 4;
line2Style := 0;
line3 := 14.078;
line3Color := clMaxGamma;
line3Width := 3;
line3Style := 0;
line4 := 0.09;
line4Color := clMinGamma;
line4Width := 3;
line4Style := 0;
line5 := 0.00;
line5Color := clFlip;
line5Width := 2;
line5Style := 0;
end;
if (GetAsset() = "AZUL4") then begin
line1 := 16.08;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 17.52;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 17.758;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 17.949;
line4Color := clMaxGamma;
line4Width := 3;
line4Style := 0;
line5 := 14.790;
line5Color := clMinGamma;
line5Width := 3;
line5Style := 0;
line6 := 15.890;
line6Color := clFlip;
line6Width := 2;
line6Style := 0;
end;
if (GetAsset() = "B3SA3") then begin
line1 := 12.088;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 12.832;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 13.088;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 13.339;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 13.580;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 13.830;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 14.080;
line7Color := clWall;
line7Width := 3;
line7Style := 0;
line8 := 14.330;
line8Color := clWall;
line8Width := 2;
line8Style := 0;
line9 := 14.580;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 14.830;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 15.080;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 15.580;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 15.690;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 19.580;
line14Color := clWall;
line14Width := 3;
line14Style := 0;
line15 := 14.870;
line15Color := clMaxGamma;
line15Width := 3;
line15Style := 0;
line16 := 10.550;
line16Color := clMinGamma;
line16Width := 3;
line16Style := 0;
line17 := 13.020;
line17Color := clFlip;
line17Width := 2;
line17Style := 0;
end;
if (GetAsset() = "BBAS3") then begin
line1 := 49.718;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 53.212;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 54.218;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 55.219;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 55.710;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 56.210;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 57.110;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 55.70;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 46.10;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 51.570;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "BBDC3") then begin
line1 := 13.248;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 13.992;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 14.248;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 14.749;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 15.240;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 16.980;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 16.990;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 14.730;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 11.530;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 10.160;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "BBDC4") then begin
line1 := 14.868;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 15.112;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 15.368;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 15.619;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 15.860;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 16.110;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 16.360;
line7Color := clWall;
line7Width := 4;
line7Style := 0;
line8 := 16.610;
line8Color := clWall;
line8Width := 3;
line8Style := 0;
line9 := 16.860;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 17.110;
line10Color := clWall;
line10Width := 2;
line10Style := 0;
line11 := 17.360;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 17.610;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 17.860;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 16.560;
line14Color := clMaxGamma;
line14Width := 3;
line14Style := 0;
line15 := 14.220;
line15Color := clMinGamma;
line15Width := 3;
line15Style := 0;
line16 := 15.310;
line16Color := clFlip;
line16Width := 2;
line16Style := 0;
end;
if (GetAsset() = "BBSE3") then begin
line1 := 30.148;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 30.642;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 30.898;
line3Color := clWall;
line3Width := 3;
line3Style := 0;
line4 := 31.149;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 31.390;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 32.640;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 33.520;
line7Color := clMaxGamma;
line7Width := 3;
line7Style := 0;
line8 := 30.280;
line8Color := clMinGamma;
line8Width := 3;
line8Style := 0;
line9 := 23.820;
line9Color := clFlip;
line9Width := 2;
line9Style := 0;
end;
if (GetAsset() = "BHIA3") then begin
line1 := 0.48;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 0.452;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 0.58;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 0.559;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 0.60;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 0.650;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 0.70;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 0.750;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 0.80;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 0.950;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 1.00;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 1.20;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 1.30;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 1.50;
line14Color := clWall;
line14Width := 1;
line14Style := 0;
line15 := 2.00;
line15Color := clWall;
line15Width := 1;
line15Style := 0;
line16 := 2.50;
line16Color := clWall;
line16Width := 1;
line16Style := 0;
line17 := 0.650;
line17Color := clMaxGamma;
line17Width := 3;
line17Style := 0;
line18 := 0.350;
line18Color := clMinGamma;
line18Width := 3;
line18Style := 0;
line19 := 0.410;
line19Color := clFlip;
line19Width := 2;
line19Style := 0;
end;
if (GetAsset() = "BPAC11") then begin
line1 := 33.468;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 33.962;
line2Color := clWall;
line2Width := 4;
line2Style := 0;
line3 := 34.468;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 34.969;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 35.460;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 36.460;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 39.80;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 34.360;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 28.160;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 32.50;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "BRAP4") then begin
line1 := 23.98;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 24.152;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 24.48;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 24.659;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 24.90;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 25.40;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 26.90;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 24.150;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 19.250;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 21.60;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "BRFS3") then begin
line1 := 12.08;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 13.02;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 13.58;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 14.09;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 15.00;
line5Color := clWall;
line5Width := 3;
line5Style := 0;
line6 := 15.190;
line6Color := clMaxGamma;
line6Width := 3;
line6Style := 0;
line7 := 10.950;
line7Color := clMinGamma;
line7Width := 3;
line7Style := 0;
line8 := 12.950;
line8Color := clFlip;
line8Width := 2;
line8Style := 0;
end;
if (GetAsset() = "BRKM5") then begin
line1 := 15.58;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 16.02;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 16.58;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 17.09;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 17.50;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 23.50;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 21.760;
line7Color := clMaxGamma;
line7Width := 3;
line7Style := 0;
line8 := 15.660;
line8Color := clMinGamma;
line8Width := 3;
line8Style := 0;
line9 := 18.560;
line9Color := clFlip;
line9Width := 2;
line9Style := 0;
end;
if (GetAsset() = "BRSR6") then begin
line1 := 11.918;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 12.072;
line2Color := clMaxGamma;
line2Width := 3;
line2Style := 0;
line3 := 0.08;
line3Color := clMinGamma;
line3Width := 3;
line3Style := 0;
line4 := 0.09;
line4Color := clFlip;
line4Width := 2;
line4Style := 0;
end;
if (GetAsset() = "CASH3") then begin
line1 := 7.08;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 8.02;
line2Color := clWall;
line2Width := 4;
line2Style := 0;
line3 := 8.548;
line3Color := clMaxGamma;
line3Width := 3;
line3Style := 0;
line4 := 6.649;
line4Color := clMinGamma;
line4Width := 3;
line4Style := 0;
line5 := 8.030;
line5Color := clFlip;
line5Width := 2;
line5Style := 0;
end;
if (GetAsset() = "CIEL3") then begin
line1 := 3.788;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 3.832;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 3.888;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 4.039;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 4.130;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 4.230;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 4.330;
line7Color := clWall;
line7Width := 3;
line7Style := 0;
line8 := 4.430;
line8Color := clWall;
line8Width := 2;
line8Style := 0;
line9 := 4.530;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 4.630;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 4.730;
line11Color := clWall;
line11Width := 2;
line11Style := 0;
line12 := 4.830;
line12Color := clWall;
line12Width := 4;
line12Style := 0;
line13 := 4.930;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 5.00;
line14Color := clWall;
line14Width := 1;
line14Style := 0;
line15 := 5.020;
line15Color := clWall;
line15Width := 1;
line15Style := 0;
line16 := 5.20;
line16Color := clWall;
line16Width := 2;
line16Style := 0;
line17 := 3.680;
line17Color := clMaxGamma;
line17Width := 3;
line17Style := 0;
line18 := 3.080;
line18Color := clMinGamma;
line18Width := 3;
line18Style := 0;
line19 := 3.330;
line19Color := clFlip;
line19Width := 2;
line19Style := 0;
end;
if (GetAsset() = "CMIG4") then begin
line1 := 9.58;
line1Color := clWall;
line1Width := 3;
line1Style := 0;
line2 := 10.072;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 10.328;
line3Color := clWall;
line3Width := 3;
line3Style := 0;
line4 := 10.579;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 11.070;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 11.570;
line6Color := clWall;
line6Width := 3;
line6Style := 0;
line7 := 11.820;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 12.070;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 12.570;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 13.40;
line10Color := clMaxGamma;
line10Width := 3;
line10Style := 0;
line11 := 10.160;
line11Color := clMinGamma;
line11Width := 3;
line11Style := 0;
line12 := 11.290;
line12Color := clFlip;
line12Width := 2;
line12Style := 0;
end;
if (GetAsset() = "CMIN3") then begin
line1 := 5.758;
line1Color := clWall;
line1Width := 3;
line1Style := 0;
line2 := 6.552;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 6.958;
line3Color := clWall;
line3Width := 3;
line3Style := 0;
line4 := 7.159;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 7.350;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 7.160;
line6Color := clMaxGamma;
line6Width := 3;
line6Style := 0;
line7 := 5.660;
line7Color := clMinGamma;
line7Width := 3;
line7Style := 0;
line8 := 5.970;
line8Color := clFlip;
line8Width := 2;
line8Style := 0;
end;
if (GetAsset() = "COGN3") then begin
line1 := 2.758;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 2.92;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 3.08;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 3.059;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 3.10;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 3.150;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 3.20;
line7Color := clWall;
line7Width := 4;
line7Style := 0;
line8 := 3.250;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 3.30;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 3.350;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 3.40;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 3.50;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 3.550;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 3.90;
line14Color := clWall;
line14Width := 1;
line14Style := 0;
line15 := 4.00;
line15Color := clWall;
line15Width := 1;
line15Style := 0;
line16 := 5.00;
line16Color := clWall;
line16Width := 1;
line16Style := 0;
line17 := 3.950;
line17Color := clMaxGamma;
line17Width := 3;
line17Style := 0;
line18 := 2.750;
line18Color := clMinGamma;
line18Width := 3;
line18Style := 0;
line19 := 2.320;
line19Color := clFlip;
line19Width := 2;
line19Style := 0;
end;
if (GetAsset() = "CPLE6") then begin
line1 := 8.698;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 9.092;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 9.298;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 9.499;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 9.690;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 9.890;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 10.270;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 10.770;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 9.520;
line9Color := clMaxGamma;
line9Width := 3;
line9Style := 0;
line10 := 7.970;
line10Color := clMinGamma;
line10Width := 3;
line10Style := 0;
line11 := 8.370;
line11Color := clFlip;
line11Width := 2;
line11Style := 0;
end;
if (GetAsset() = "CSAN3") then begin
line1 := 16.828;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 17.072;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 17.328;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 17.579;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 18.070;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 18.70;
line6Color := clMaxGamma;
line6Width := 3;
line6Style := 0;
line7 := 16.00;
line7Color := clMinGamma;
line7Width := 3;
line7Style := 0;
line8 := 17.340;
line8Color := clFlip;
line8Width := 2;
line8Style := 0;
end;
if (GetAsset() = "CSNA3") then begin
line1 := 14.758;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 15.012;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 15.518;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 16.019;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 17.010;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 17.510;
line6Color := clWall;
line6Width := 4;
line6Style := 0;
line7 := 17.750;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 18.010;
line8Color := clWall;
line8Width := 2;
line8Style := 0;
line9 := 18.250;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 18.510;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 18.750;
line11Color := clWall;
line11Width := 2;
line11Style := 0;
line12 := 18.390;
line12Color := clMaxGamma;
line12Width := 3;
line12Style := 0;
line13 := 15.090;
line13Color := clMinGamma;
line13Width := 3;
line13Style := 0;
line14 := 15.910;
line14Color := clFlip;
line14Width := 2;
line14Style := 0;
end;
if (GetAsset() = "CVCB3") then begin
line1 := 3.08;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 3.12;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 3.28;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 3.39;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 3.40;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 3.50;
line6Color := clWall;
line6Width := 3;
line6Style := 0;
line7 := 3.550;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 3.80;
line8Color := clWall;
line8Width := 3;
line8Style := 0;
line9 := 4.00;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 6.00;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 3.370;
line11Color := clMaxGamma;
line11Width := 3;
line11Style := 0;
line12 := 2.670;
line12Color := clMinGamma;
line12Width := 3;
line12Style := 0;
line13 := 2.950;
line13Color := clFlip;
line13Width := 2;
line13Style := 0;
end;
if (GetAsset() = "CYRE3") then begin
line1 := 19.668;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 20.662;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 21.668;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 22.669;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 16.030;
line5Color := clMaxGamma;
line5Width := 3;
line5Style := 0;
line6 := 19.150;
line6Color := clMinGamma;
line6Width := 3;
line6Style := 0;
line7 := 21.70;
line7Color := clFlip;
line7Width := 2;
line7Style := 0;
end;
if (GetAsset() = "EGIE3") then begin
line1 := 42.788;
line1Color := clWall;
line1Width := 3;
line1Style := 0;
line2 := 43.282;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 44.038;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 44.289;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 44.780;
line5Color := clWall;
line5Width := 3;
line5Style := 0;
line6 := 45.780;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 47.280;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 44.630;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 37.870;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 40.590;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "ELET3") then begin
line1 := 39.288;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 39.782;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 40.038;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 40.289;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 41.530;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 41.780;
line6Color := clWall;
line6Width := 4;
line6Style := 0;
line7 := 42.780;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 42.040;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 36.280;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 37.690;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "ELET6") then begin
line1 := 41.488;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 46.482;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 46.168;
line3Color := clMaxGamma;
line3Width := 3;
line3Style := 0;
line4 := 31.589;
line4Color := clMinGamma;
line4Width := 3;
line4Style := 0;
line5 := 34.350;
line5Color := clFlip;
line5Width := 2;
line5Style := 0;
end;
if (GetAsset() = "EMBR3") then begin
line1 := 24.58;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 24.362;
line2Color := clMaxGamma;
line2Width := 3;
line2Style := 0;
line3 := 16.668;
line3Color := clMinGamma;
line3Width := 3;
line3Style := 0;
line4 := 18.89;
line4Color := clFlip;
line4Width := 2;
line4Style := 0;
end;
if (GetAsset() = "ENEV3") then begin
line1 := 12.658;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 12.92;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 13.158;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 13.659;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 15.00;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 13.250;
line6Color := clMaxGamma;
line6Width := 3;
line6Style := 0;
line7 := 10.170;
line7Color := clMinGamma;
line7Width := 3;
line7Style := 0;
line8 := 10.840;
line8Color := clFlip;
line8Width := 2;
line8Style := 0;
end;
if (GetAsset() = "ENGI11") then begin
line1 := 52.38;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 54.822;
line2Color := clMaxGamma;
line2Width := 3;
line2Style := 0;
line3 := 48.318;
line3Color := clMinGamma;
line3Width := 3;
line3Style := 0;
line4 := 50.519;
line4Color := clFlip;
line4Width := 2;
line4Style := 0;
end;
if (GetAsset() = "EQTL3") then begin
line1 := 33.878;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 34.372;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 34.878;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 35.129;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 35.370;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 35.870;
line6Color := clWall;
line6Width := 4;
line6Style := 0;
line7 := 36.370;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 35.690;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 31.090;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 33.410;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "GGBR4") then begin
line1 := 21.428;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 21.922;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 22.178;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 22.679;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 22.920;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 23.170;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 23.420;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 23.920;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 24.670;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 24.870;
line10Color := clMaxGamma;
line10Width := 3;
line10Style := 0;
line11 := 20.450;
line11Color := clMinGamma;
line11Width := 3;
line11Style := 0;
line12 := 21.870;
line12Color := clFlip;
line12Width := 2;
line12Style := 0;
end;
if (GetAsset() = "GOAU4") then begin
line1 := 9.558;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 9.82;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 10.058;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 10.39;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 10.550;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 10.80;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 11.050;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 11.820;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 12.210;
line9Color := clMaxGamma;
line9Width := 3;
line9Style := 0;
line10 := 10.350;
line10Color := clMinGamma;
line10Width := 3;
line10Style := 0;
line11 := 11.380;
line11Color := clFlip;
line11Width := 2;
line11Style := 0;
end;
if (GetAsset() = "HAPV3") then begin
line1 := 3.78;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 3.92;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 4.08;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 4.19;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 4.20;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 4.30;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 4.40;
line7Color := clWall;
line7Width := 3;
line7Style := 0;
line8 := 4.50;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 4.60;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 4.80;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 4.90;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 5.00;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 5.010;
line13Color := clMaxGamma;
line13Width := 3;
line13Style := 0;
line14 := 4.210;
line14Color := clMinGamma;
line14Width := 3;
line14Style := 0;
line15 := 4.670;
line15Color := clFlip;
line15Width := 2;
line15Style := 0;
end;
if (GetAsset() = "HYPE3") then begin
line1 := 34.478;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 35.142;
line2Color := clMaxGamma;
line2Width := 3;
line2Style := 0;
line3 := 28.08;
line3Color := clMinGamma;
line3Width := 3;
line3Style := 0;
line4 := 29.649;
line4Color := clFlip;
line4Width := 2;
line4Style := 0;
end;
if (GetAsset() = "ITSA4") then begin
line1 := 7.958;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 8.622;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 9.08;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 9.199;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 9.280;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 9.330;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 9.430;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 9.50;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 9.630;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 9.810;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 9.890;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 10.050;
line12Color := clWall;
line12Width := 4;
line12Style := 0;
line13 := 10.130;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 10.250;
line14Color := clWall;
line14Width := 1;
line14Style := 0;
line15 := 10.520;
line15Color := clWall;
line15Width := 3;
line15Style := 0;
line16 := 11.00;
line16Color := clWall;
line16Width := 1;
line16Style := 0;
line17 := 10.430;
line17Color := clMaxGamma;
line17Width := 3;
line17Style := 0;
line18 := 7.030;
line18Color := clMinGamma;
line18Width := 3;
line18Style := 0;
line19 := 7.590;
line19Color := clFlip;
line19Width := 2;
line19Style := 0;
end;
if (GetAsset() = "ITUB4") then begin
line1 := 28.958;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 29.22;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 30.458;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 30.959;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 31.20;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 31.450;
line6Color := clWall;
line6Width := 3;
line6Style := 0;
line7 := 31.950;
line7Color := clWall;
line7Width := 4;
line7Style := 0;
line8 := 32.450;
line8Color := clWall;
line8Width := 3;
line8Style := 0;
line9 := 32.950;
line9Color := clWall;
line9Width := 2;
line9Style := 0;
line10 := 34.450;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 35.230;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 31.760;
line12Color := clMaxGamma;
line12Width := 3;
line12Style := 0;
line13 := 25.870;
line13Color := clMinGamma;
line13Width := 3;
line13Style := 0;
line14 := 26.820;
line14Color := clFlip;
line14Width := 2;
line14Style := 0;
end;
if (GetAsset() = "JBSS3") then begin
line1 := 23.08;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 23.52;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 24.08;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 24.59;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 25.00;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 24.610;
line6Color := clMaxGamma;
line6Width := 3;
line6Style := 0;
line7 := 21.110;
line7Color := clMinGamma;
line7Width := 3;
line7Style := 0;
line8 := 27.450;
line8Color := clFlip;
line8Width := 2;
line8Style := 0;
end;
if (GetAsset() = "KLBN11") then begin
line1 := 19.918;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 20.412;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 20.918;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 21.169;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 21.410;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 21.660;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 22.160;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 22.410;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 29.660;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 25.090;
line10Color := clMaxGamma;
line10Width := 3;
line10Style := 0;
line11 := 20.170;
line11Color := clMinGamma;
line11Width := 3;
line11Style := 0;
line12 := 22.790;
line12Color := clFlip;
line12Width := 2;
line12Style := 0;
end;
if (GetAsset() = "LREN3") then begin
line1 := 11.558;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 12.552;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 13.058;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 14.89;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 15.050;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 15.550;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 16.050;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 16.550;
line8Color := clWall;
line8Width := 3;
line8Style := 0;
line9 := 17.050;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 17.550;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 19.050;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 20.050;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 14.890;
line13Color := clMaxGamma;
line13Width := 3;
line13Style := 0;
line14 := 11.380;
line14Color := clMinGamma;
line14Width := 3;
line14Style := 0;
line15 := 12.610;
line15Color := clFlip;
line15Width := 2;
line15Style := 0;
end;
if (GetAsset() = "LWSA3") then begin
line1 := 5.38;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 5.52;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 5.98;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 6.19;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 6.30;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 6.590;
line6Color := clMaxGamma;
line6Width := 3;
line6Style := 0;
line7 := 5.290;
line7Color := clMinGamma;
line7Width := 3;
line7Style := 0;
line8 := 5.830;
line8Color := clFlip;
line8Width := 2;
line8Style := 0;
end;
if (GetAsset() = "MGLU3") then begin
line1 := 1.78;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 1.82;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 1.858;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 1.99;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 2.00;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 2.10;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 2.20;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 2.250;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 2.30;
line9Color := clWall;
line9Width := 4;
line9Style := 0;
line10 := 2.350;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 2.40;
line11Color := clWall;
line11Width := 2;
line11Style := 0;
line12 := 2.50;
line12Color := clWall;
line12Width := 3;
line12Style := 0;
line13 := 2.550;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 2.70;
line14Color := clWall;
line14Width := 1;
line14Style := 0;
line15 := 2.80;
line15Color := clWall;
line15Width := 1;
line15Style := 0;
line16 := 3.00;
line16Color := clWall;
line16Width := 1;
line16Style := 0;
line17 := 2.560;
line17Color := clMaxGamma;
line17Width := 3;
line17Style := 0;
line18 := 1.560;
line18Color := clMinGamma;
line18Width := 3;
line18Style := 0;
line19 := 1.940;
line19Color := clFlip;
line19Width := 2;
line19Style := 0;
end;
if (GetAsset() = "MRFG3") then begin
line1 := 8.368;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 9.162;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 9.368;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 9.769;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 9.960;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 10.460;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 10.960;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 9.380;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 0.00;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 0.00;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "MRVE3") then begin
line1 := 8.08;
line1Color := clWall;
line1Width := 3;
line1Style := 0;
line2 := 8.62;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 8.88;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 9.09;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 9.20;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 9.60;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 10.00;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 12.130;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 7.980;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 10.00;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "MULT3") then begin
line1 := 27.138;
line1Color := clWall;
line1Width := 3;
line1Style := 0;
line2 := 27.632;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 28.138;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 27.669;
line4Color := clMaxGamma;
line4Width := 3;
line4Style := 0;
line5 := 24.780;
line5Color := clMinGamma;
line5Width := 3;
line5Style := 0;
line6 := 25.460;
line6Color := clFlip;
line6Width := 2;
line6Style := 0;
end;
if (GetAsset() = "NTCO3") then begin
line1 := 13.378;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 13.872;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 15.628;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 15.879;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 16.370;
line5Color := clWall;
line5Width := 3;
line5Style := 0;
line6 := 18.370;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 19.370;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 20.120;
line8Color := clWall;
line8Width := 3;
line8Style := 0;
line9 := 19.940;
line9Color := clMaxGamma;
line9Width := 3;
line9Style := 0;
line10 := 11.940;
line10Color := clMinGamma;
line10Width := 3;
line10Style := 0;
line11 := 13.630;
line11Color := clFlip;
line11Width := 2;
line11Style := 0;
end;
if (GetAsset() = "PCAR3") then begin
line1 := 3.38;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 3.52;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 3.68;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 4.09;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 4.10;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 4.20;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 4.30;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 4.50;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 4.60;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 0.00;
line10Color := clMaxGamma;
line10Width := 3;
line10Style := 0;
line11 := 3.320;
line11Color := clMinGamma;
line11Width := 3;
line11Style := 0;
line12 := 0.00;
line12Color := clFlip;
line12Width := 2;
line12Style := 0;
end;
if (GetAsset() = "PETR4") then begin
line1 := 32.018;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 32.262;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 32.518;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 32.769;
line4Color := clWall;
line4Width := 3;
line4Style := 0;
line5 := 33.010;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 33.510;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 34.010;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 34.260;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 34.510;
line9Color := clWall;
line9Width := 4;
line9Style := 0;
line10 := 35.010;
line10Color := clWall;
line10Width := 3;
line10Style := 0;
line11 := 35.260;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 35.510;
line12Color := clWall;
line12Width := 3;
line12Style := 0;
line13 := 35.760;
line13Color := clWall;
line13Width := 2;
line13Style := 0;
line14 := 36.010;
line14Color := clWall;
line14Width := 1;
line14Style := 0;
line15 := 36.510;
line15Color := clWall;
line15Width := 1;
line15Style := 0;
line16 := 36.760;
line16Color := clWall;
line16Width := 1;
line16Style := 0;
line17 := 37.450;
line17Color := clMaxGamma;
line17Width := 3;
line17Style := 0;
line18 := 31.850;
line18Color := clMinGamma;
line18Width := 3;
line18Style := 0;
line19 := 34.280;
line19Color := clFlip;
line19Width := 2;
line19Style := 0;
end;
if (GetAsset() = "PETZ3") then begin
line1 := 3.898;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 3.992;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 4.098;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 4.149;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 4.190;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 4.290;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 4.390;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 4.490;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 4.590;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 5.790;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 4.430;
line11Color := clMaxGamma;
line11Width := 3;
line11Style := 0;
line12 := 3.730;
line12Color := clMinGamma;
line12Width := 3;
line12Style := 0;
line13 := 4.00;
line13Color := clFlip;
line13Width := 2;
line13Style := 0;
end;
if (GetAsset() = "PRIO3") then begin
line1 := 40.08;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 42.02;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 43.08;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 43.59;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 44.00;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 44.50;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 45.50;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 47.00;
line8Color := clWall;
line8Width := 2;
line8Style := 0;
line9 := 48.50;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 50.00;
line10Color := clWall;
line10Width := 4;
line10Style := 0;
line11 := 52.00;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 53.50;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 51.030;
line13Color := clMaxGamma;
line13Width := 3;
line13Style := 0;
line14 := 41.410;
line14Color := clMinGamma;
line14Width := 3;
line14Style := 0;
line15 := 44.00;
line15Color := clFlip;
line15Width := 2;
line15Style := 0;
end;
if (GetAsset() = "QUAL3") then begin
line1 := 2.98;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 3.02;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 3.18;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 3.29;
line4Color := clWall;
line4Width := 3;
line4Style := 0;
line5 := 3.30;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 3.40;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 3.50;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 3.350;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 2.750;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 3.040;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "RADL3") then begin
line1 := 25.778;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 27.272;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 27.778;
line3Color := clWall;
line3Width := 3;
line3Style := 0;
line4 := 28.279;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 28.770;
line5Color := clWall;
line5Width := 3;
line5Style := 0;
line6 := 28.410;
line6Color := clMaxGamma;
line6Width := 3;
line6Style := 0;
line7 := 22.970;
line7Color := clMinGamma;
line7Width := 3;
line7Style := 0;
line8 := 26.050;
line8Color := clFlip;
line8Width := 2;
line8Style := 0;
end;
if (GetAsset() = "RAIL3") then begin
line1 := 20.258;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 21.02;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 21.58;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 22.09;
line4Color := clWall;
line4Width := 3;
line4Style := 0;
line5 := 22.250;
line5Color := clWall;
line5Width := 2;
line5Style := 0;
line6 := 22.750;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 23.00;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 23.50;
line8Color := clWall;
line8Width := 2;
line8Style := 0;
line9 := 24.00;
line9Color := clWall;
line9Width := 2;
line9Style := 0;
line10 := 26.550;
line10Color := clMaxGamma;
line10Width := 3;
line10Style := 0;
line11 := 21.480;
line11Color := clMinGamma;
line11Width := 3;
line11Style := 0;
line12 := 24.190;
line12Color := clFlip;
line12Width := 2;
line12Style := 0;
end;
if (GetAsset() = "RAIZ4") then begin
line1 := 2.468;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 3.112;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 3.618;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 3.719;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 3.810;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 4.260;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 5.260;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 5.560;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 4.350;
line9Color := clMaxGamma;
line9Width := 3;
line9Style := 0;
line10 := 3.10;
line10Color := clMinGamma;
line10Width := 3;
line10Style := 0;
line11 := 3.460;
line11Color := clFlip;
line11Width := 2;
line11Style := 0;
end;
if (GetAsset() = "RENT3") then begin
line1 := 58.08;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 58.422;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 59.928;
line3Color := clWall;
line3Width := 3;
line3Style := 0;
line4 := 60.429;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 61.420;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 62.920;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 65.420;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 67.00;
line8Color := clWall;
line8Width := 2;
line8Style := 0;
line9 := 70.00;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 65.470;
line10Color := clMaxGamma;
line10Width := 3;
line10Style := 0;
line11 := 49.990;
line11Color := clMinGamma;
line11Width := 3;
line11Style := 0;
line12 := 55.450;
line12Color := clFlip;
line12Width := 2;
line12Style := 0;
end;
if (GetAsset() = "SBSP3") then begin
line1 := 64.928;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 67.922;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 68.428;
line3Color := clWall;
line3Width := 3;
line3Style := 0;
line4 := 68.929;
line4Color := clWall;
line4Width := 4;
line4Style := 0;
line5 := 69.920;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 75.00;
line6Color := clWall;
line6Width := 3;
line6Style := 0;
line7 := 79.920;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 69.580;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 51.540;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 62.010;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "SMAL11") then begin
line1 := 106.08;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 108.02;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 110.08;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 111.09;
line4Color := clWall;
line4Width := 3;
line4Style := 0;
line5 := 113.00;
line5Color := clWall;
line5Width := 3;
line5Style := 0;
line6 := 115.00;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 120.00;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 110.590;
line8Color := clMaxGamma;
line8Width := 3;
line8Style := 0;
line9 := 94.590;
line9Color := clMinGamma;
line9Width := 3;
line9Style := 0;
line10 := 101.780;
line10Color := clFlip;
line10Width := 2;
line10Style := 0;
end;
if (GetAsset() = "SMFT3") then begin
line1 := 23.918;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 24.412;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 24.918;
line3Color := clWall;
line3Width := 4;
line3Style := 0;
line4 := 24.539;
line4Color := clMaxGamma;
line4Width := 3;
line4Style := 0;
line5 := 21.730;
line5Color := clMinGamma;
line5Width := 3;
line5Style := 0;
line6 := 22.910;
line6Color := clFlip;
line6Width := 2;
line6Style := 0;
end;
if (GetAsset() = "SUZB3") then begin
line1 := 49.138;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 50.632;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 51.638;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 52.139;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 54.130;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 55.770;
line6Color := clMaxGamma;
line6Width := 3;
line6Style := 0;
line7 := 48.570;
line7Color := clMinGamma;
line7Width := 3;
line7Style := 0;
line8 := 36.670;
line8Color := clFlip;
line8Width := 2;
line8Style := 0;
end;
if (GetAsset() = "TAEE11") then begin
line1 := 35.178;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 35.922;
line2Color := clWall;
line2Width := 4;
line2Style := 0;
line3 := 36.178;
line3Color := clWall;
line3Width := 3;
line3Style := 0;
line4 := 37.249;
line4Color := clMaxGamma;
line4Width := 3;
line4Style := 0;
line5 := 35.140;
line5Color := clMinGamma;
line5Width := 3;
line5Style := 0;
line6 := 32.60;
line6Color := clFlip;
line6Width := 2;
line6Style := 0;
end;
if (GetAsset() = "UGPA3") then begin
line1 := 23.08;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 25.02;
line2Color := clWall;
line2Width := 4;
line2Style := 0;
line3 := 25.58;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 30.09;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 21.890;
line5Color := clMaxGamma;
line5Width := 3;
line5Style := 0;
line6 := 0.00;
line6Color := clMinGamma;
line6Width := 3;
line6Style := 0;
line7 := 0.00;
line7Color := clFlip;
line7Width := 2;
line7Style := 0;
end;
if (GetAsset() = "USIM5") then begin
line1 := 6.798;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 7.092;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 7.198;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 7.599;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 7.690;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 8.090;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 8.190;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 8.290;
line8Color := clWall;
line8Width := 4;
line8Style := 0;
line9 := 8.490;
line9Color := clWall;
line9Width := 3;
line9Style := 0;
line10 := 8.690;
line10Color := clWall;
line10Width := 4;
line10Style := 0;
line11 := 8.890;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 9.090;
line12Color := clWall;
line12Width := 3;
line12Style := 0;
line13 := 9.290;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 9.490;
line14Color := clWall;
line14Width := 1;
line14Style := 0;
line15 := 9.690;
line15Color := clWall;
line15Width := 1;
line15Style := 0;
line16 := 8.440;
line16Color := clMaxGamma;
line16Width := 3;
line16Style := 0;
line17 := 5.940;
line17Color := clMinGamma;
line17Width := 3;
line17Style := 0;
line18 := 6.110;
line18Color := clFlip;
line18Width := 2;
line18Style := 0;
end;
if (GetAsset() = "VALE3") then begin
line1 := 68.818;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 69.312;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 69.818;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 70.319;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 71.310;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 71.810;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 72.810;
line7Color := clWall;
line7Width := 1;
line7Style := 0;
line8 := 73.310;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 73.810;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 74.310;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 74.810;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 75.310;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 75.810;
line13Color := clWall;
line13Width := 1;
line13Style := 0;
line14 := 76.310;
line14Color := clWall;
line14Width := 1;
line14Style := 0;
line15 := 76.810;
line15Color := clWall;
line15Width := 1;
line15Style := 0;
line16 := 77.310;
line16Color := clWall;
line16Width := 4;
line16Style := 0;
line17 := 77.660;
line17Color := clMaxGamma;
line17Width := 3;
line17Style := 0;
line18 := 64.330;
line18Color := clMinGamma;
line18Width := 3;
line18Style := 0;
line19 := 72.60;
line19Color := clFlip;
line19Width := 2;
line19Style := 0;
end;
if (GetAsset() = "VBBR3") then begin
line1 := 17.648;
line1Color := clWall;
line1Width := 1;
line1Style := 0;
line2 := 19.892;
line2Color := clWall;
line2Width := 1;
line2Style := 0;
line3 := 20.648;
line3Color := clWall;
line3Width := 1;
line3Style := 0;
line4 := 21.149;
line4Color := clWall;
line4Width := 1;
line4Style := 0;
line5 := 21.640;
line5Color := clWall;
line5Width := 1;
line5Style := 0;
line6 := 22.140;
line6Color := clWall;
line6Width := 2;
line6Style := 0;
line7 := 22.640;
line7Color := clWall;
line7Width := 4;
line7Style := 0;
line8 := 23.640;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 23.890;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 24.640;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 29.140;
line11Color := clWall;
line11Width := 1;
line11Style := 0;
line12 := 31.140;
line12Color := clWall;
line12Width := 1;
line12Style := 0;
line13 := 24.530;
line13Color := clMaxGamma;
line13Width := 3;
line13Style := 0;
line14 := 16.470;
line14Color := clMinGamma;
line14Width := 3;
line14Style := 0;
line15 := 17.550;
line15Color := clFlip;
line15Width := 2;
line15Style := 0;
end;
if (GetAsset() = "WEGE3") then begin
line1 := 29.968;
line1Color := clWall;
line1Width := 2;
line1Style := 0;
line2 := 31.962;
line2Color := clWall;
line2Width := 2;
line2Style := 0;
line3 := 34.968;
line3Color := clWall;
line3Width := 2;
line3Style := 0;
line4 := 35.219;
line4Color := clWall;
line4Width := 2;
line4Style := 0;
line5 := 35.960;
line5Color := clWall;
line5Width := 4;
line5Style := 0;
line6 := 36.710;
line6Color := clWall;
line6Width := 1;
line6Style := 0;
line7 := 36.960;
line7Color := clWall;
line7Width := 2;
line7Style := 0;
line8 := 37.210;
line8Color := clWall;
line8Width := 1;
line8Style := 0;
line9 := 37.960;
line9Color := clWall;
line9Width := 1;
line9Style := 0;
line10 := 39.710;
line10Color := clWall;
line10Width := 1;
line10Style := 0;
line11 := 39.960;
line11Color := clWall;
line11Width := 2;
line11Style := 0;
line12 := 44.60;
line12Color := clMaxGamma;
line12Width := 3;
line12Style := 0;
line13 := 30.00;
line13Color := clMinGamma;
line13Width := 3;
line13Style := 0;
line14 := 35.080;
line14Color := clFlip;
line14Width := 2;
line14Style := 0;
end;
if (GetAsset() = "YDUQ3") then begin
line1 := 20.738;
line1Color := clWall;
line1Width := 4;
line1Style := 0;
line2 := 21.732;
line2Color := clWall;
line2Width := 3;
line2Style := 0;
line3 := 20.998;
line3Color := clMaxGamma;
line3Width := 3;
line3Style := 0;
line4 := 16.679;
line4Color := clMinGamma;
line4Width := 3;
line4Style := 0;
line5 := 18.310;
line5Color := clFlip;
line5Width := 2;
line5Style := 0;
end;

if (((Date = ELDate(2023, 12, 12)) and (Time >= 900)) and ((GetAsset() = "ABEV3")
or (GetAsset() = "ALOS3") or (GetAsset() = "ALPA4") or (GetAsset() = "ASAI3") or
(GetAsset() = "AURE3") or (GetAsset() = "AZUL4") or (GetAsset() = "B3SA3") or
(GetAsset() = "BBAS3") or (GetAsset() = "BBDC3") or (GetAsset() = "BBDC4") or
(GetAsset() = "BBSE3") or (GetAsset() = "BHIA3") or (GetAsset() = "BPAC11") or
(GetAsset() = "BRAP4") or (GetAsset() = "BRFS3") or (GetAsset() = "BRKM5") or
(GetAsset() = "BRSR6") or (GetAsset() = "CASH3") or (GetAsset() = "CIEL3") or
(GetAsset() = "CMIG4") or (GetAsset() = "CMIN3") or (GetAsset() = "COGN3") or
(GetAsset() = "CPLE6") or (GetAsset() = "CSAN3") or (GetAsset() = "CSNA3") or
(GetAsset() = "CVCB3") or (GetAsset() = "CYRE3") or (GetAsset() = "EGIE3") or
(GetAsset() = "ELET3") or (GetAsset() = "ELET6") or (GetAsset() = "EMBR3") or
(GetAsset() = "ENEV3") or (GetAsset() = "ENGI11") or (GetAsset() = "EQTL3") or
(GetAsset() = "GGBR4") or (GetAsset() = "GOAU4") or (GetAsset() = "HAPV3") or
(GetAsset() = "HYPE3") or (GetAsset() = "ITSA4") or (GetAsset() = "ITUB4") or
(GetAsset() = "JBSS3") or (GetAsset() = "KLBN11") or (GetAsset() = "LREN3") or
(GetAsset() = "LWSA3") or (GetAsset() = "MGLU3") or (GetAsset() = "MRFG3") or
(GetAsset() = "MRVE3") or (GetAsset() = "MULT3") or (GetAsset() = "NTCO3") or
(GetAsset() = "PCAR3") or (GetAsset() = "PETR4") or (GetAsset() = "PETZ3") or
(GetAsset() = "PRIO3") or (GetAsset() = "QUAL3") or (GetAsset() = "RADL3") or
(GetAsset() = "RAIL3") or (GetAsset() = "RAIZ4") or (GetAsset() = "RENT3") or
(GetAsset() = "SBSP3") or (GetAsset() = "SMAL11") or (GetAsset() = "SMFT3") or
(GetAsset() = "SUZB3") or (GetAsset() = "TAEE11") or (GetAsset() = "UGPA3") or
(GetAsset() = "USIM5") or (GetAsset() = "VALE3") or (GetAsset() = "VBBR3") or
(GetAsset() = "WEGE3") or (GetAsset() = "YDUQ3"))) then
begin
if (line1 > 0) then begin
SetPlotColor(1, line1Color);
SetPlotWidth(1, line1Width);
SetPlotStyle(1, line1Style);
Plot(line1);
end;
if (line2 > 0) then begin
SetPlotColor(2, line2Color);
SetPlotWidth(2, line2Width);
SetPlotStyle(2, line2Style);
Plot2(line2);
end;
if (line3 > 0) then begin
SetPlotColor(3, line3Color);
SetPlotWidth(3, line3Width);
SetPlotStyle(3, line3Style);
Plot3(line3);
end;
if (line4 > 0) then begin
SetPlotColor(4, line4Color);
SetPlotWidth(4, line4Width);
SetPlotStyle(4, line4Style);
Plot4(line4);
end;
if (line5 > 0) then begin
SetPlotColor(5, line5Color);
SetPlotWidth(5, line5Width);
SetPlotStyle(5, line5Style);
Plot5(line5);
end;
if (line6 > 0) then begin
SetPlotColor(6, line6Color);
SetPlotWidth(6, line6Width);
SetPlotStyle(6, line6Style);
Plot6(line6);
end;
if (line7 > 0) then begin
SetPlotColor(7, line7Color);
SetPlotWidth(7, line7Width);
SetPlotStyle(7, line7Style);
Plot7(line7);
end;
if (line8 > 0) then begin
SetPlotColor(8, line8Color);
SetPlotWidth(8, line8Width);
SetPlotStyle(8, line8Style);
Plot8(line8);
end;
if (line9 > 0) then begin
SetPlotColor(9, line9Color);
SetPlotWidth(9, line9Width);
SetPlotStyle(9, line9Style);
Plot9(line9);
end;
if (line10 > 0) then begin
SetPlotColor(10, line10Color);
SetPlotWidth(10, line10Width);
SetPlotStyle(10, line10Style);
Plot10(line10);
end;
if (line11 > 0) then begin
SetPlotColor(11, line11Color);
SetPlotWidth(11, line11Width);
SetPlotStyle(11, line11Style);
Plot11(line11);
end;
if (line12 > 0) then begin
SetPlotColor(12, line12Color);
SetPlotWidth(12, line12Width);
SetPlotStyle(12, line12Style);
Plot12(line12);
end;
if (line13 > 0) then begin
SetPlotColor(13, line13Color);
SetPlotWidth(13, line13Width);
SetPlotStyle(13, line13Style);
Plot13(line13);
end;
if (line14 > 0) then begin
SetPlotColor(14, line14Color);
SetPlotWidth(14, line14Width);
SetPlotStyle(14, line14Style);
Plot14(line14);
end;
if (line15 > 0) then begin
SetPlotColor(15, line15Color);
SetPlotWidth(15, line15Width);
SetPlotStyle(15, line15Style);
Plot15(line15);
end;
if (line16 > 0) then begin
SetPlotColor(16, line16Color);
SetPlotWidth(16, line16Width);
SetPlotStyle(16, line16Style);
Plot16(line16);
end;
if (line17 > 0) then begin
SetPlotColor(17, line17Color);
SetPlotWidth(17, line17Width);
SetPlotStyle(17, line17Style);
Plot17(line17);
end;
if (line18 > 0) then begin
SetPlotColor(18, line18Color);
SetPlotWidth(18, line18Width);
SetPlotStyle(18, line18Style);
Plot18(line18);
end;
if (line19 > 0) then begin
SetPlotColor(19, line19Color);
SetPlotWidth(19, line19Width);
SetPlotStyle(19, line19Style);
Plot19(line19);
end;
if (line20 > 0) then begin
SetPlotColor(20, line20Color);
SetPlotWidth(20, line20Width);
SetPlotStyle(20, line20Style);
Plot20(line20);
end;
if (line21 > 0) then begin
SetPlotColor(21, line21Color);
SetPlotWidth(21, line21Width);
SetPlotStyle(21, line21Style);
Plot21(line21);
end;
if (line22 > 0) then begin
SetPlotColor(22, line22Color);
SetPlotWidth(22, line22Width);
SetPlotStyle(22, line22Style);
Plot22(line22);
end;
if (line23 > 0) then begin
SetPlotColor(23, line23Color);
SetPlotWidth(23, line23Width);
SetPlotStyle(23, line23Style);
Plot23(line23);
end;
if (line24 > 0) then begin
SetPlotColor(24, line24Color);
SetPlotWidth(24, line24Width);
SetPlotStyle(24, line24Style);
Plot24(line24);
end;
if (line25 > 0) then begin
SetPlotColor(25, line25Color);
SetPlotWidth(25, line25Width);
SetPlotStyle(25, line25Style);
Plot25(line25);
end;
if (line26 > 0) then begin
SetPlotColor(26, line26Color);
SetPlotWidth(26, line26Width);
SetPlotStyle(26, line26Style);
Plot26(line26);
end;
if (line27 > 0) then begin
SetPlotColor(27, line27Color);
SetPlotWidth(27, line27Width);
SetPlotStyle(27, line27Style);
Plot27(line27);
end;
if (line28 > 0) then begin
SetPlotColor(28, line28Color);
SetPlotWidth(28, line28Width);
SetPlotStyle(28, line28Style);
Plot28(line28);
end;
if (line29 > 0) then begin
SetPlotColor(29, line29Color);
SetPlotWidth(29, line29Width);
SetPlotStyle(29, line29Style);
Plot29(line29);
end;
if (line30 > 0) then begin
SetPlotColor(30, line30Color);
SetPlotWidth(30, line30Width);
SetPlotStyle(30, line30Style);
Plot30(line30);
end;
if (line31 > 0) then begin
SetPlotColor(31, line31Color);
SetPlotWidth(31, line31Width);
SetPlotStyle(31, line31Style);
Plot31(line31);
end;
if (line32 > 0) then begin
SetPlotColor(32, line32Color);
SetPlotWidth(32, line32Width);
SetPlotStyle(32, line32Style);
Plot32(line32);
end;
if (line33 > 0) then begin
SetPlotColor(33, line33Color);
SetPlotWidth(33, line33Width);
SetPlotStyle(33, line33Style);
Plot33(line33);
end;
if (line34 > 0) then begin
SetPlotColor(34, line34Color);
SetPlotWidth(34, line34Width);
SetPlotStyle(34, line34Style);
Plot34(line34);
end;
if (line35 > 0) then begin
SetPlotColor(35, line35Color);
SetPlotWidth(35, line35Width);
SetPlotStyle(35, line35Style);
Plot35(line35);
end;
if (line36 > 0) then begin
SetPlotColor(36, line36Color);
SetPlotWidth(36, line36Width);
SetPlotStyle(36, line36Style);
Plot36(line36);
end;
if (line37 > 0) then begin
SetPlotColor(37, line37Color);
SetPlotWidth(37, line37Width);
SetPlotStyle(37, line37Style);
Plot37(line37);
end;
if (line38 > 0) then begin
SetPlotColor(38, line38Color);
SetPlotWidth(38, line38Width);
SetPlotStyle(38, line38Style);
Plot38(line38);
end;
if (line39 > 0) then begin
SetPlotColor(39, line39Color);
SetPlotWidth(39, line39Width);
SetPlotStyle(39, line39Style);
Plot39(line39);
end;
if (line40 > 0) then begin
SetPlotColor(40, line40Color);
SetPlotWidth(40, line40Width);
SetPlotStyle(40, line40Style);
Plot40(line40);
end;
if (line41 > 0) then begin
SetPlotColor(41, line41Color);
SetPlotWidth(41, line41Width);
SetPlotStyle(41, line41Style);
Plot41(line41);
end;
if (line42 > 0) then begin
SetPlotColor(42, line42Color);
SetPlotWidth(42, line42Width);
SetPlotStyle(42, line42Style);
Plot42(line42);
end;
if (line43 > 0) then begin
SetPlotColor(43, line43Color);
SetPlotWidth(43, line43Width);
SetPlotStyle(43, line43Style);
Plot43(line43);
end;
if (line44 > 0) then begin
SetPlotColor(44, line44Color);
SetPlotWidth(44, line44Width);
SetPlotStyle(44, line44Style);
Plot44(line44);
end;
if (line45 > 0) then begin
SetPlotColor(45, line45Color);
SetPlotWidth(45, line45Width);
SetPlotStyle(45, line45Style);
Plot45(line45);
end;
if (line46 > 0) then begin
SetPlotColor(46, line46Color);
SetPlotWidth(46, line46Width);
SetPlotStyle(46, line46Style);
Plot46(line46);
end;
if (line47 > 0) then begin
SetPlotColor(47, line47Color);
SetPlotWidth(47, line47Width);
SetPlotStyle(47, line47Style);
Plot47(line47);
end;
if (line48 > 0) then begin
SetPlotColor(48, line48Color);
SetPlotWidth(48, line48Width);
SetPlotStyle(48, line48Style);
Plot48(line48);
end;
if (line49 > 0) then begin
SetPlotColor(49, line49Color);
SetPlotWidth(49, line49Width);
SetPlotStyle(49, line49Style);
Plot49(line49);
end;
if (line50 > 0) then begin
SetPlotColor(50, line50Color);
SetPlotWidth(50, line50Width);
SetPlotStyle(50, line50Style);
Plot50(line50);
end;
if (line51 > 0) then begin
SetPlotColor(51, line51Color);
SetPlotWidth(51, line51Width);
SetPlotStyle(51, line51Style);
Plot51(line51);
end;
end;

if (Time > 1900) then


begin
NoPlot(1);
NoPlot(2);
NoPlot(3);
NoPlot(4);
NoPlot(5);
NoPlot(6);
NoPlot(7);
NoPlot(8);
NoPlot(9);
NoPlot(10);
NoPlot(11);
NoPlot(12);
NoPlot(13);
NoPlot(14);
NoPlot(15);
NoPlot(16);
NoPlot(17);
NoPlot(18);
NoPlot(19);
NoPlot(20);
NoPlot(21);
NoPlot(22);
NoPlot(23);
NoPlot(24);
NoPlot(25);
NoPlot(26);
NoPlot(27);
NoPlot(28);
NoPlot(29);
NoPlot(30);
NoPlot(31);
NoPlot(32);
NoPlot(33);
NoPlot(34);
NoPlot(35);
NoPlot(36);
NoPlot(37);
NoPlot(38);
NoPlot(39);
NoPlot(40);
NoPlot(41);
NoPlot(42);
NoPlot(43);
NoPlot(44);
NoPlot(45);
NoPlot(46);
NoPlot(47);
NoPlot(48);
NoPlot(49);
NoPlot(50);
NoPlot(51);
end;
END;

You might also like