股票公式

001.周K线叠及周量叠★通达信

 

{引用}
XA:=BARSLAST(WEEKDAY=1)+1;
BZ:=WEEKDAY=2;
O1:REF(O,BZ);
C1:C;
H1:HHV(H,XA);
L1:LLV(L,XA);
周量:SUM(V,XA)*0.4,COLORFF0000,LINETHICK0

{叠加周K线}
WO:="引用.O1#WEEK",LINETHICK1;
WC:="引用.C1#WEEK",LINETHICK1;
WH:="引用.H1#WEEK",LINETHICK1;
WL:="引用.L1#WEEK",LINETHICK1;
VVAH:=IF(WEEKDAY=3,WH,WC);
VVAL:=IF(WEEKDAY=3,WL,WO);
AD:=WC>=WO;
AF:=WO>=WC;
STICKLINE(AD ,WO,WC,4,0),COLOR73599D;
STICKLINE(AD ,VVAH,VVAL,1.5,0),COLOR73599D;
STICKLINE(AF ,WC,WO,4,0),COLOR8A8E31;
STICKLINE(AF ,VVAH,VVAL,1.5,0),COLOR8A8E31;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

{叠加周量}
Z周:="引用.周量#WEEK",LINETHICK0;
WO:="引用.O1#WEEK",LINETHICK0;
WC:="引用.C1#WEEK",LINETHICK0;
AD:=WC>WO;
AF:=WC<=WO;
STICKLINE(AD,Z周,0,4,0),COLOR73599D;
STICKLINE(AF,Z周,0,4,0),COLOR8A8E31;
量:VOL,LINETHICK0,VOLSTICK;
MA1:MA(VOL,5);
MA2:MA(VOL,13);
MA3:MA(VOL,90);