MucF1=Param("F1",0.382,0.236,4.23,0.001);
MauF1=ParamColor("Color F1",colorPink);
MucF2=Param("F2",0.618,0.236,4.23,0.001);
MauF2=ParamColor("Color F2",colorGreen);
MucF3=Param("F3",1.27,0.236,4.23,0.001);
MauF3=ParamColor("Color F3",colorBlue);
MucF4=Param("F4",2.618,0.236,4.23,0.001);
MauF4=ParamColor("Color F4",colorRed);
MucF5=Param("F5",4.23,0.236,4.23,0.001);
MauF5=ParamColor("Color F5",colorViolet);
MauPP=ParamColor("Color PP",colorYellow);
Hmn=Lmn=Cmn=HL=PP=0;
R1=R2=R3=R4=R5=S1=S2=S3=S4=S5=0;
RS1=RS2=RS3=RS4=RS5=0;
Hmn = Ref(TimeFrameExpand( H, inWeekly ),-1);
Lmn = Ref(TimeFrameExpand( L, inWeekly ),-1);
Cmn = Ref(TimeFrameExpand( C, inWeekly ),-1);
PP=(Hmn+Lmn+Cmn)/3;
HL=Hmn-Lmn;
RS1=HL*MucF1;
RS2=HL*MucF2;
RS3=HL*MucF3;
RS4=HL*MucF4;
RS5=HL*MucF5;
R1=PP+RS1; S1=PP-RS1;
R2=PP+RS3;S2=PP-RS2;
R3=PP+RS3;S3=PP-RS3;
R4=PP+RS4;S4=PP-RS4;
R5=PP+RS5;S5=PP-RS5;
//TimeFrameExpand()
Plot(PP,"PP",MauPP,styleLine,Null,Null,0,0,5);
Plot(R1,"R1",MauF1,styleLine,Null,Null,0,0,2);
Plot(S1,"S1",MauF1,styleLine,Null,Null,0,0,2);
Plot(R2,"R2",MauF2,styleLine,Null,Null,0,0,2);
Plot(S2,"S2",MauF2,styleLine,Null,Null,0,0,2);
Plot(R3,"R3",MauF1,styleLine,Null,Null,0,0,2);
Plot(S3,"S3",MauF1,styleLine,Null,Null,0,0,2);
Plot(R4,"R4",MauF1,styleLine,Null,Null,0,0,2);
Plot(S4,"S4",MauF1,styleLine,Null,Null,0,0,2);
Plot(R5,"R5",MauF1,styleLine,Null,Null,0,0,2);
Plot(S5,"S5",MauF1,styleLine,Null,Null,0,0,2);
Posted by: adwin.co@gmail.com
| Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (1) |
This group is for the discussion between users only.
This is *NOT* technical support channel.
TO GET TECHNICAL SUPPORT send an e-mail directly to
SUPPORT {at} amibroker.com
TO SUBMIT SUGGESTIONS please use FEEDBACK CENTER at
http://www.amibroker.com/feedback/
(submissions sent via other channels won't be considered)
For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
http://www.amibroker.com/devlog/
EmoticonEmoticon