Stock Portfolio Organizer

The ultimate porfolio management solution.

Shares, Margin, CFD's, Futures and Forex
EOD and Realtime
Dividends and Trust Distributions
And Much More ....
For Portfolio Manager Click Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here

Support and Resistance for Amibroker (AFL)

Copy & Paste Friendly
//Mehdi Roosta of the Iran
//The following formula support and resistance showing
//Date of writing this formula 2017/08/14
//////////////////////////////////////////////
GraphXSpace = 5;
SetChartOptions(0,chartShowArrows|chartShowDates);
if (SetBarFillColor( IIf( (C < O) AND (C < Ref( C, -1)), colorPlum, colorDarkGreen  ) ) );else
(SetBarFillColor( IIf( (C > O)AND (C < Ref( C, -1)), colorWhite,colorWhite)));
Plot( C, "", IIf( C > O, colorWhite, IIf( C <= O, colorOrange, colorPaleGreen ) ), styleThick| styleNoTitle | GetPriceStyle() );
///////////////////////////////////////////////////////////////////////////////////////////////////////
ataj=((ATR(66)+ATR(22)+ATR(10)+ATR(3))/4);
MjH = Highest(C-ataj);	 
MjL = Lowest(C+ataj);
Mj3H = Highest(C+ataj);	 
Mj3L = Lowest(C-ataj);
M3C = (mjh+mjl+mj3h+mj3l)/4;	 
//////////////////////////////////////////////
h4=((mj3h-mj3l)*(1.1/2))+m3c;
h3=((mj3h-mj3l)*(1.1/4))+m3c;
h2=((mj3h-mj3l)*(1.1/6))+m3c;
h1=((mj3h-mj3l)*(1.1/12))+m3c;
l1=m3c-((mj3h-mj3l)*(1.1/12));
l2=m3c-((mj3h-mj3l)*(1.1/6));
l3=m3c-((mj3h-mj3l)*(1.1/4));
l4=m3c-((mj3h-mj3l)*(1.1/2));
//////////////////////////////////////////////
jh=((h3-C)/C)*100;
jl=((C-l3)/l3)*100;
//////////////////////////////////////////////
gj=2.61;
g1=round((SQRT(mj3h)-gj)^2);           k1=round((SQRT(mj3l)+gj)^2);   
g2=round((SQRT(g1)-gj)^2);              k2=round((SQRT(k1)+gj)^2);
g3=round((SQRT(g2)-gj)^2);              k3=round((SQRT(k2)+gj)^2);
g4=round((SQRT(g3)-gj)^2);              k4=round((SQRT(k3)+gj)^2);
g5=round((SQRT(g4)-gj)^2);              k5=round((SQRT(k4)+gj)^2);
g6=round((SQRT(g5)-gj)^2);              k6=round((SQRT(k5)+gj)^2);
g7=round((SQRT(g6)-gj)^2);              k7=round((SQRT(k6)+gj)^2);
g8=round((SQRT(g7)-gj)^2);              k8=round((SQRT(k7)+gj)^2);
g9=round((SQRT(g8)-gj)^2);              k9=round((SQRT(k8)+gj)^2);
g10=round((SQRT(g9)-gj)^2);            k10=round((SQRT(k9)+gj)^2);
g11=round((SQRT(g10)-gj)^2);          k11=round((SQRT(k10)+gj)^2);
g12=round((SQRT(g11)-gj)^2);          k12=round((SQRT(k11)+gj)^2);
g13=round((SQRT(g12)-gj)^2);          k13=round((SQRT(k12)+gj)^2);
g14=round((SQRT(g13)-gj)^2);          k14=round((SQRT(k13)+gj)^2);
g15=round((SQRT(g14)-gj)^2);          k15=round((SQRT(k14)+gj)^2);
g16=round((SQRT(g15)-gj)^2);          k16=round((SQRT(k15)+gj)^2);
g17=round((SQRT(g16)-gj)^2);          k17=round((SQRT(k16)+gj)^2);
g18=round((SQRT(g17)-gj)^2);          k18=round((SQRT(k17)+gj)^2);
g19=round((SQRT(g18)-gj)^2);          k19=round((SQRT(k18)+gj)^2);
g20=round((SQRT(g19)-gj)^2);          k20=round((SQRT(k19)+gj)^2);
g21=round((SQRT(g20)-gj)^2);          k21=round((SQRT(k20)+gj)^2);
g22=round((SQRT(g21)-gj)^2);          k22=round((SQRT(k21)+gj)^2);
g23=round((SQRT(g22)-gj)^2);          k23=round((SQRT(k22)+gj)^2);
g24=round((SQRT(g23)-gj)^2);          k24=round((SQRT(k23)+gj)^2);
g25=round((SQRT(g24)-gj)^2);          k25=round((SQRT(k24)+gj)^2);
g26=round((SQRT(g25)-gj)^2);          k26=round((SQRT(k25)+gj)^2);
g27=round((SQRT(g26)-gj)^2);          k27=round((SQRT(k26)+gj)^2);
g28=round((SQRT(g27)-gj)^2);          k28=round((SQRT(k27)+gj)^2);
g29=round((SQRT(g28)-gj)^2);          k29=round((SQRT(k28)+gj)^2);
g30=round((SQRT(g29)-gj)^2);          k30=round((SQRT(k29)+gj)^2); 
g31=round((SQRT(g30)-gj)^2);          k31=round((SQRT(k30)+gj)^2);   
g32=round((SQRT(g31)-gj)^2);          k32=round((SQRT(k31)+gj)^2);
g33=round((SQRT(g32)-gj)^2);          k33=round((SQRT(k32)+gj)^2);
g34=round((SQRT(g33)-gj)^2);          k34=round((SQRT(k33)+gj)^2);
g35=round((SQRT(g34)-gj)^2);          k35=round((SQRT(k34)+gj)^2);
g36=round((SQRT(g35)-gj)^2);          k36=round((SQRT(k35)+gj)^2);
g37=round((SQRT(g36)-gj)^2);          k37=round((SQRT(k36)+gj)^2);
g38=round((SQRT(g37)-gj)^2);          k38=round((SQRT(k37)+gj)^2);
g39=round((SQRT(g38)-gj)^2);          k39=round((SQRT(k38)+gj)^2);
g40=round((SQRT(g39)-gj)^2);          k40=round((SQRT(k39)+gj)^2);
g41=round((SQRT(g40)-gj)^2);          k41=round((SQRT(k40)+gj)^2);
g42=round((SQRT(g41)-gj)^2);          k42=round((SQRT(k41)+gj)^2);
g43=round((SQRT(g42)-gj)^2);          k43=round((SQRT(k42)+gj)^2);
g44=round((SQRT(g43)-gj)^2);          k44=round((SQRT(k43)+gj)^2);
g45=round((SQRT(g44)-gj)^2);          k45=round((SQRT(k44)+gj)^2);
g46=round((SQRT(g45)-gj)^2);          k46=round((SQRT(k45)+gj)^2);
g47=round((SQRT(g46)-gj)^2);          k47=round((SQRT(k46)+gj)^2);
g48=round((SQRT(g47)-gj)^2);          k48=round((SQRT(k47)+gj)^2);
g49=round((SQRT(g48)-gj)^2);          k49=round((SQRT(k48)+gj)^2);
g50=round((SQRT(g49)-gj)^2);          k50=round((SQRT(k49)+gj)^2);
g51=round((SQRT(g50)-gj)^2);          k51=round((SQRT(k50)+gj)^2);
g52=round((SQRT(g51)-gj)^2);          k52=round((SQRT(k51)+gj)^2);
g53=round((SQRT(g52)-gj)^2);          k53=round((SQRT(k52)+gj)^2);
g54=round((SQRT(g53)-gj)^2);          k54=round((SQRT(k53)+gj)^2);
g55=round((SQRT(g54)-gj)^2);          k55=round((SQRT(k54)+gj)^2);
g56=round((SQRT(g55)-gj)^2);          k56=round((SQRT(k55)+gj)^2);
g57=round((SQRT(g56)-gj)^2);          k57=round((SQRT(k56)+gj)^2);
g58=round((SQRT(g57)-gj)^2);          k58=round((SQRT(k57)+gj)^2);
g59=round((SQRT(g58)-gj)^2);          k59=round((SQRT(k58)+gj)^2);
g60=round((SQRT(g59)-gj)^2);          k60=round((SQRT(k59)+gj)^2);
///////////////////////////////////////////////////////////////////////////////////////////
YH5 = Param("Resistance",0,0,60,1);
if(YH5==1) 	  Plot(g1,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==2) 	  Plot(g2,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==3) 	  Plot(g3,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==4) 	  Plot(g4,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==5) 	  Plot(g5,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==6)        Plot(g6,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==7)        Plot(g7,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==8)        Plot(g8,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==9)        Plot(g9,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==10)       Plot(g10,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==11)       Plot(g11,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==12)       Plot(g12,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==13)       Plot(g13,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==14)       Plot(g14,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==15)       Plot(g15,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==16)       Plot(g16,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==17)       Plot(g17,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==18)       Plot(g18,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==19)       Plot(g19,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==20)       Plot(g20,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==21)       Plot(g21,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==22)       Plot(g22,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==23)       Plot(g23,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==24)       Plot(g24,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==25)       Plot(g25,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==26)       Plot(g26,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==27)       Plot(g27,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==28)       Plot(g28,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==29)       Plot(g29,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==30)       Plot(g30,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed); 
if(YH5==31)       Plot(g31,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==32) 	  Plot(g32,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==33)       Plot(g33,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==34)       Plot(g34,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==35) 	  Plot(g35,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==36)       Plot(g36,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==37)       Plot(g37,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==38)       Plot(g38,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==39)       Plot(g39,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==40)       Plot(g40,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==41)       Plot(g41,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==42)       Plot(g42,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==43)       Plot(g43,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==44)       Plot(g44,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==45)       Plot(g45,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==46)       Plot(g46,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==47)       Plot(g47,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==48)       Plot(g48,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==49)       Plot(g49,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==50)       Plot(g50,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==51)       Plot(g51,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==52)       Plot(g52,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==53)       Plot(g53,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==54)       Plot(g54,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==55)       Plot(g55,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==56)       Plot(g56,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==57)       Plot(g57,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==58)       Plot(g58,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==59)       Plot(g59,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
if(YH5==60)       Plot(g60,"",ColorBlend(ColorBlend(colorOrange,0.1),GetChartBkColor(),0.3),styleDashed);
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  YL5 = Param("Support",0,0,60,1);
if(YL5==1)         Plot(K1,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==2)         Plot(K2,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==3)         Plot(K3,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==4)         Plot(K4,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==5)         Plot(K5,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==6)         Plot(K6,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==7)         Plot(K7,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==8)         Plot(K8,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==9)         Plot(K9,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==10)       Plot(K10,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==11)       Plot(K11,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==12)       Plot(K12,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==13)       Plot(K13,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==14)       Plot(K14,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==15)       Plot(K15,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==16)       Plot(K16,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==17)       Plot(K17,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==18)       Plot(K18,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==19)       Plot(K19,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==20)       Plot(K20,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==21)       Plot(K21,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==22)       Plot(K22,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==23)       Plot(K23,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==24)       Plot(K24,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==25)       Plot(K25,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==26)       Plot(K26,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==27)       Plot(K27,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==28)       Plot(K28,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==29)       Plot(K29,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==30)       Plot(K30,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==31)       Plot(K31,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==32)       Plot(K32,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==33)       Plot(K33,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==34)       Plot(K34,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==35)       Plot(K35,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==36)       Plot(K36,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==37)       Plot(K37,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==38)       Plot(K38,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==39)       Plot(K39,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==40)       Plot(K40,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==41)       Plot(K41,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==42)       Plot(K42,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==43)       Plot(K43,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==44)       Plot(K44,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==45)       Plot(K45,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==46)       Plot(K46,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==47)       Plot(K47,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==48)       Plot(K48,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==49)       Plot(K49,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==50)       Plot(K50,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==51)       Plot(K51,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==52)       Plot(K52,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==53)       Plot(K53,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==54)       Plot(K54,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==55)       Plot(K55,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==56)       Plot(K56,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==57)       Plot(K57,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==58)       Plot(K58,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==59)       Plot(K59,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
if(YL5==60)       Plot(K60,"",ColorBlend(ColorBlend(colorWhite,0.1),GetChartBkColor(),0.3),styleDashed);
///////////////////////////////////////////////////////////////////////////////
Title =Name()+ "    " + EncodeColor(ColorBlend( colorGold, GetChartBkColor(), 0.2 )) + Date() +EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+ "  " +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 )) + "{{INTERVAL}}  " +"      "+
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"Open =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(O,format=1.0)+"  " +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"  High =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(H,format=1.0)+"  " +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"  Low =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(L,format=1.0)+"  " +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"  Close =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(C,format=1.0)+"\n" +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"R4 =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(h4,format=1.0)+"\n" +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"R3 =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(h3,format=1.0)+"\n" +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"R2 =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(h2,format=1.0)+"\n" +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"Min =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(m3c,format=1.0)+"\n" +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"S2 =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(l2,format=1.0)+"\n" +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"S3 =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(l3,format=1.0)+"\n" +
EncodeColor(ColorBlend( 7, GetChartBkColor(), 0.2 ))+"S4 =="+EncodeColor(ColorBlend( 11, GetChartBkColor(), 0.2 ))+WriteVal(l4,format=1.0);
///////////////////////////////////////////////////
Back