通达信公式,历史大峰谷
(2022-05-27 08:05:27)
标签:
股票股市公式通达信 |
K:=700;{这里可根据需要修改历史天数}
峰距离:=CONST(HHVBARS(H,K));
谷距离:=CONST(LLVBARS(L,K));
峰价:=CONST(HHV(H,K));
谷价:=CONST(LLV(L,K));
趋势:=IF(谷距离>峰距离,1,-1);
距A:=IF(趋势>0,谷距离,峰距离);
距B:=IF(趋势>0,峰距离,谷距离);
A价:=IF(趋势>0,谷价,峰价);
B价:=IF(趋势>0,峰价,谷价);
AB幅:=(B价/A价-1)*100;
C价:=IF(趋势>0,CONST(LLV(L,距B+1)),CONST(HHV(H,距B+1)));
幅BC:=(C价/B价-1)*100;
现价:=CONST(C);
现幅:=(现价/C价-1)*100;
距C:=IF(趋势>0,CONST(LLVBARS(L,距B+1)),CONST(HHVBARS(H,距B+1)));
DRAWLINE(CURRBARSCOUNT=距A+1,A价,CURRBARSCOUNT=距B+1,B价,0)COLORFFFFFF;
DRAWLINE(CURRBARSCOUNT=距B+1,B价,CURRBARSCOUNT=距C+1,C价,0)COLOR00FFFF;
DRAWLINE(CURRBARSCOUNT=距C+1,C价,CURRBARSCOUNT=1,现价,0)COLOR0000FF;
DRAWTEXT(CURRBARSCOUNT=距A+2,IF(趋势>0,A价*0.995,A价*1.005),'A');
DRAWTEXT(CURRBARSCOUNT=距B+2,IF(趋势<0,B价*0.995,B价*1.005),'B');
DRAWTEXT(CURRBARSCOUNT=距C+2,IF(趋势>0,C价*0.995,C价*1.005),'C');
DRAWTEXT_FIX(ISLASTBAR,0.00,0.00,0,VARCAT('统计周期数:',VAR2STR(K,0)))COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.03,0,VARCAT('A价:',VAR2STR(A价,2)))COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.06,0,VARCAT('B价:',VAR2STR(B价,2)))COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.09,0,VARCAT('AB幅%:',VAR2STR(AB幅,2)))COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.12,0,VARCAT('C价:',VAR2STR(C价,2)))COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.15,0,VARCAT('幅BC%:',VAR2STR(幅BC,2)))COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.18,0,VARCAT('现价:',VAR2STR(现价,2)))COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.21,0,VARCAT('现幅:',VAR2STR(现幅,2)))COLOR0000FF;
前一篇:关于A股T+0制度的建议
后一篇:魔方第三层解法