|
裸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;};
2131522041.jpg
213244521.jpg
2132122505.jpg
|
