|
以下是通达信灾后自救之六画圆弧2源码主图（无源码的请下载附件导入）
这个帖子是跟帖中有同学要求右侧能不能画一个形成V型？其实，这个圆弧只是方便您主观好看，记住这一波K线。圆弧选股意义不大，反过来这条黄色支撑和玫红色压力还可以考虑参考。所以 这个帖子没有做选股。因为 右侧黄色圆圈会随着交易日增加，不断扩大，只是方便您在今后的交易日中不断观察，看看这个圆弧与K线走向到底关系几何？
玫红色左侧标注的是压力线的价格 中间玫红色圆圈标注的绿色跌幅 是这一波”股灾“个股的区间跌幅。右侧黄色圆圈上面标注的是 这一波跌幅的最低位到今天的区间涨幅。很直观比如002681
在6.12到6.30这波跌幅41.4%而6.30到7.21这波反攻上涨44.58%标注很清楚。但你从K线上看现在的收盘价比6.12的要低很多。
{圆弧主图2}
A:=CURRBARSCOUNT;
HA:=IF(BETWEEN(DATE,1150601,1150630),H,-999);
T:=HHVBARS(HA,0);
TT:=BARSLAST(L=LLV(L,T+1));
T1:=BARSLAST(A=CONST(TT)+1);
T2:=BARSLAST(A=CONST(T)+1);
GT:=CONST(T2)+1;
DT:=CONST(T1)+1;
AA:=DRAWLINE(A=GT,L,A=DT,L,0);
DRAWBAND(AA,RGB(69,139,0),AA,RGB(69,139,0));
HH:=CONST(REF(L,BARSLAST(A=DT+1)));
LL:=CONST(REF(L,BARSLAST(A=GT+1)));
JJ:=HH-LL;
TJ:=ABS(GT-DT);
PT:=TJ/2+MIN(GT,DT);
PJ:=(HH+LL)/2;
LJ:=HH*LL;
BT:=2*LJ/TJ;
BJ:=LJ/JJ;
TJA:=IF(A<PT,PT-A,A-PT)*BT;
TJB:=IF(TJA<LJ,SQRT(LJ*LJ-TJA*TJA),0)/BJ;
XH:IF(DT<GT,PJ+TJB,PJ-TJB),COLORMAGENTA;
SH:IF(DT<GT,PJ-TJB,PJ+TJB),COLORMAGENTA;
GT1:=CONST(T1)+1;
DT1:=CONST(BARSLAST(A=1)+1);
AA1:=DRAWLINE(A=GT1,L,A=DT1,L,0);
DRAWBAND(AA1,RGB(255,215,0),AA1,RGB(255,215,0));
HH1:=CONST(REF(L,BARSLAST(A=DT1+1)));
LL1:=CONST(REF(L,BARSLAST(A=GT1+1)));
JJ1:=HH1-LL1;
TJ1:=ABS(GT1-DT1);
PT1:=TJ1/2+MIN(GT1,DT1);
PJ1:=(HH1+LL1)/2;
LJ1:=HH1*LL1;
BT1:=2*LJ1/TJ1;
BJ1:=LJ1/JJ1;
TJA1:=IF(A<PT1,PT1-A,A-PT1)*BT1;
TJB1:=IF(TJA1<LJ1,SQRT(LJ1*LJ1-TJA1*TJA1),0)/BJ1;
XH1:IF(DT1<GT1,PJ1+TJB1,PJ1-TJB1),COLORYELLOW;
SH1:IF(DT1<GT1,PJ1-TJB1,PJ1+TJB1),COLORYELLOW;
TB:=A=ROUND((GT+DT)/2);
ZF:=(REF(C,T1)-REF(C,T2+1))/REF(C,T2+1)*100;
DF:=(C-REF(C,T1+1))/REF(C,T1+1)*100;
DRAWTEXT(TB,AA*1.08,VARCAT(VARCAT('跌幅：',VAR2STR(CONST(ZF),2)),'%')),COLORGREEN;
DRAWTEXT(A=GT+5,SH*1.04,VARCAT(VARCAT('突破价：',VAR2STR(SH,2)),'元')),COLORMAGENTA;
DRAWTEXT(A=DT-1,SH*1.04,VARCAT(VARCAT('涨幅：',VAR2STR(CONST(DF),2)),'%')),COLORYELLOW;
看看截图就知道002681真正的涨跌幅区别了
41166528.jpg
411133276.jpg
410499482.rar
(3.17 KB, 下载次数: 0, 售价: 3 金钱)
| 
