通达信主图月周日裸k同图,源码,黄金分割
主图月周日裸k同图,源码,黄金分割
开始整理公式,如喜欢,可能陆续发布
不用说明吧,发布公式,力求简单明了。可以自己组合进你的主图
大家喜欢,可以组成周日时裸k。。。。。。。。
或者季月周,这个有难度
STICKLINE(1=1,H,L,9,0)COLOR000000;
MC:=C#MONTH;MO:=O#MONTH;MH:=H#MONTH;ML:=L#MONTH;
ZC:=C#WEEK;ZO:=O#WEEK;ZH:=H#WEEK;ZL:=L#WEEK;
STICKLINE(MC>=MO,MO,MC,3,-1),COLOR73599D;
STICKLINE(MC<MO,MO,MC,3,-1),COLOR8A8E31;
STICKLINE(ZC>=ZO,ZO,ZC,4,0)COLOR00009C;
STICKLINE(ZC<ZO,ZO,ZC,4,0),COLOR9F3333;
KJY:=H#MONTH-L#MONTH;HY5:=H#MONTH-KJY*0.500;
HY1:=IF(CONST(C)>=H#MONTH-KJY*0.500,H#MONTH-KJY*0.382,H#MONTH-KJY*0.618),CIRCLEDOT;
HY2:=IF(CONST(C)>=H#MONTH-KJY*0.500,H#MONTH-KJY*0.191,H#MONTH-KJY*0.809),CIRCLEDOT;
HY3:=IF(CONST(C)>=H#MONTH-KJY*0.500,H#MONTH-KJY*0.25,H#MONTH-KJY*0.75),CIRCLEDOT;
STICKLINE(C , HY1,HY1,3,-1),COLORRED;
STICKLINE(C , HY2,HY2,3,-1),COLORFFFF00;
STICKLINE(C, HY5,HY5,3,1),COLORFF00FF;
STICKLINE(C , HY3,HY3,3,-1),COLORRED;
{STICKLINE(C AND 光<=55, HY5,HY5,3,1),COLORFF00FF;
STICKLINE(1,ZH,ZO,1/10,0),COLOR00599D;
STICKLINE(1,ZC,ZL,1/10,0),COLOR008E31;};
DRAWKLINE(H,O,L,C);
改成 周日时共图源码
PED:=PERIOD>4 ;
MC:=IF(PED,C#MONTH,C#WEEK);
MO:=IF(PED,O#MONTH,O#WEEK);
MH:=IF(PED,H#MONTH,H#WEEK);
ML:=IF(PED,L#MONTH,L#WEEK);
ZC:=IF(PED,C#WEEK,C#DAY);
ZO:=IF(PED,O#WEEK,O#DAY);
ZH:=IF(PED,H#WEEK,H#DAY);
ZL:=IF(PED,L#WEEK,L#DAY);