相關標簽:

?

分時大單 同花順分時指標源碼IF (MARKETTYPE==17 OR MARKETTYPE==33 )
{
分時大單="該指標只用于A股。";
}
V1:=TIME;
A1:=COUNT(BARSCOUNT(NEW)=1 AND TIME<102000 ,0 );
T:=IF(V1<130000,(FLOOR(V1/10000)-9.5)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000)),
(FLOOR(V1/10000)-11)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000))),NODRAW;
成交:AMOUNT,NODRAW;
總:SUM(AMOUNT,T),NODRAW;
VV3:=總/T;
SS:=IF(CAPITAL>150000000,0.3,IF(CAPITAL>20000000,0.5,IF(CAPITAL>10000000,0.8,IF(CAPITAL<200000,5,IF(CAPITAL<1000000,3,
IF(CAPITAL<5000000,1.5,1)))))),NODRAW;
VV5:=(REF(VV3,T-1)/CEILING(REF(VV3,T-1)/CAPITAL *10000+0.1))*SS,NODRAW;
大額線:=IF(REF(VV3,T)=REF(VV3,T-1),VV5,REF(VV3,T)),NODRAW;
大線位:大額線*100,COLOR00FFFF;
初正1:=IF(T=1 AND DYNAINFO(4)>=DYNAINFO(3),總,0);
初負1:=IF(T=1 AND DYNAINFO(4)<DYNAINFO(3),總,0);
初正:=CONST(SUM(IF(初正1>=大額線 AND T=1,初正1,0),T)),NODRAW;
初負:=CONST(SUM(IF(初負1>=大額線 AND T=1,初負1,0),T)),NODRAW;
初正2:=CONST(SUM(IF(初正1<大額線 AND T=1,初正1,0),T)),NODRAW;
初負2:=CONST(SUM(IF(初負1<大額線 AND T=1,初負1,0),T)),NODRAW;
T00:=IF(NEW>REF(NEW,1),0.9,-0.9);
T01:=IF(NEW<REF(NEW,1),-0.9,0.9);
T02:=T00+T01,NODRAW;
TT1:=BARSLAST(CROSS(T02,1.5)),NODRAW;
TT2:=BARSLAST(CROSS(-1.5,T02)),NODRAW;
TT:=IF(T02=1.8,1,IF(T02=-1.8,-1,0));
正V1:=IF(TT=1 OR (TT=0 AND TT1<TT2),成交,0),NODRAW;
負V1:=IF(TT=-1 OR (TT=0 AND TT1>TT2),成交,0),NODRAW;
正負0:=IF(成交!= 0 AND (正V1=0 AND 負V1=0),成交,0);
正V0:=IF(正負0!= 0 AND REF(正V1,1)!= 0 ,正負0,0);
負V0:=IF(正負0!= 0 AND REF(負V1,1)!= 0 ,正負0,0);
正V11:=正V1+正V0;
負V11:=負V1+負V0;
正總1:=初正1+SUM(正V11,T),NODRAW,COLOR0000FF;
負總1:=初負1+SUM(負V11,T),NODRAW,COLOR00FF00;
正V:=IF(正V11>=大額線,正V11,0);
負V:=IF(負V11>=大額線,負V11,0);
正V2:=IF(正V11<大額線,正V11,0);
負V2:=IF(負V11<大額線,負V11,0);
大正總:=IF(TT1<2,初正,0)+SUM(正V,T),NODRAW,COLOR0000FF;
大負總:=IF(TT2<2,初負,0)+SUM(負V,T),NODRAW,COLOR00FF00;
大凈_億OR萬:(大正總-大負總)/10000,NODRAW;
差％:(大正總-大負總)/(大正總+大負總)*100,COLOR00FF00,NODRAW;
正總2:=IF(TT1<2,初正2,0)+SUM(正V2,T),NODRAW,COLOR0000FF;
負總2:=IF(TT2<2,初負2,0)+SUM(負V2,T),NODRAW,COLOR00FF00;
小凈_億OR萬:(正總2-負總2)/10000,NODRAW;
小差％:(正總2-負總2)/(正總2+負總2)*100,COLOR00FF00,NODRAW;
STICKLINE(TT=1 OR 正V0!= 0,0,AMOUNT*100,3,1),COLOR0000FF;
STICKLINE(TT=-1 OR 負V0!= 0,0,AMOUNT*100,3,0),COLOR00FF00;
STICKLINE(TT=0 AND TT1<TT2,0,AMOUNT*100,3,1),COLOR00FFFF;
STICKLINE(TT=0 AND TT1>TT2,0,AMOUNT*100,3,0),COLORFF0000;
STICKLINE(正V>大額線,0,AMOUNT*100,3,1),COLORFF00FF;
STICKLINE(負V>大額線,0,AMOUNT*100,3,0),COLORFFFFFF;
STICKLINE(T=1 AND 初正1>0,0,初正1*100,3,0),COLOR00FFFF;
STICKLINE(T=1 AND 初負1>0,0,初負1*100,3,0),COLORFF0000;
STICKLINE(T=1 AND 初正>0,0,初正*100,3,0),COLORFF00FF;
STICKLINE(T=1 AND 初負>0,0,初負*100,3,0),COLORFFFFFF;
((大正總+大負總)+(正總2+負總2))/10000,NODRAW;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?