- 通达信【倾情奉献3】应邀发裸K+大盘叠加主图原码说明 
- 
                        相关简介:裸K+大盘叠加主图原码说明 有同学需要我这个主图,下面分享给大家,有什么好的意见,大家不防多多提点。 K=1时,就有大盘叠加图。如果你对参数的设定不是很了解,请下TNE格式的文件。 后面大括号内的指标,你自己慢慢体会吧,反正是好的提示点。 {缺口 K 0 1 0 } {画大盘K} ZQ:=220; P1:=CONST(LLV(INDEXL,ZQ));PC:=CONST(HHV(INDEXH,ZQ))-P1; J1:=CONST(LLV(L,ZQ)); JC:=CONST(HHV(H,ZQ))-J 
- 
                        文章来源:股海网作者:股海网发布时间:2013-04-28浏览次数: 
 
                    裸K+大盘叠加主图原码说明
有同学需要我这个主图,下面分享给大家,有什么好的意见,大家不防多多提点。
 K=1时,就有大盘叠加图。如果你对参数的设定不是很了解,请下TNE格式的文件。
 后面大括号内的指标,你自己慢慢体会吧,反正是好的提示点。
 {缺口 K   0   1    0  }
{画大盘K}
ZQ:=220;
P1:=CONST(LLV(INDEXL,ZQ));PC:=CONST(HHV(INDEXH,ZQ))-P1;
J1:=CONST(LLV(L,ZQ));     JC:=CONST(HHV(H,ZQ))-J1;
JPB:=JC/PC;
LX:=J1+(INDEXL-P1)*JPB;
HX:=J1+(INDEXH-P1)*JPB;
OX:=J1+(INDEXO-P1)*JPB;
CX:=J1+(INDEXC-P1)*JPB;
STICKLINE(OX<=CX AND K=1,HX,LX,0,0),COLOR660066;
STICKLINE(OX<=CX AND K=1,OX,CX,2,1),COLOR660066;
STICKLINE(OX>CX AND K=1,HX,LX,0,0),COLOR8A0000;
STICKLINE(OX>CX AND K=1,OX,CX,2,0),COLOR8A0000;
{缺口}
STICKLINE(L>REF(H,1) ,REF(H,1),L,9,-1),COLORFD00DF;
STICKLINE(H<REF(L,1) ,REF(L,1),H,9,-1),COLORFDFD00;
DRAWKLINE(H,O,L,C);
{STICKLINE(CLOSE/REF(CLOSE,1)>=1.095,C,O,-1,0),COLOR00DDDD;}
DRAWTEXT(CLOSE/REF(CLOSE,1)>=1.095,L,'涨停'),COLOR00DDDD;
{IF(CURRBARSCOUNT<T+3,CONST(REF(C,1)),DRAWNULL),COLORLIMAGENTA;
IF(CURRBARSCOUNT<T+3,CONST(REF(O,T)),DRAWNULL),COLORLIMAGENTA;};



 
                 
                 
                

 
                             现在就去充值积分
 现在就去充值积分 加入VIP可下载100以下的所有资源
加入VIP可下载100以下的所有资源