| VARIABLE:WDAY[7]=星期六;
WDAY[1]:=星期日;
WDAY[2]:=星期一;
WDAY[3]:=星期二;
WDAY[4]:=星期三;
WDAY[5]:=星期四;
WDAY[6]:=星期五;
FY:=YEAR;
FM:=MONTH;
FD:=DAY;
WD:=WEEKDAY;
P:=SYSPARAM(1);
STR1:=+ 今日： +NUMTOSTR(FY[P],0)+年+NUMTOSTR(FM[P],0)+月+NUMTOSTR(FD[P],0)+日 +WDAY[WD[P]+1];
DRAWTEXTEX(CLOSE,1,480,22,STR1),colorDDFF;
量5:MA(VOL,5),colorred;
量10:MA(VOL,10);
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
成交:VOL,POINTDOT,COLORE4C1EE;
主动买盘:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT;
主动卖盘:IF(CLOSE>OPEN,VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,VAR1*(HIGH-LOW),VOL/2)),COLOR00FF00,POINTDOT;
PARTLINE(MA(VOL,5)>=REF(MA(VOL,5),1),MA(VOL,5)),COLORRED,LINETHICK4;
PARTLINE(MA(VOL,5)<=REF(MA(VOL,5),1),MA(VOL,5)),COLOR00C700,LINETHICK2;
换手率:IF(CAPITAL=0,INDEXV/ESTDATA(12),VOL/FINANCE(7)),PRECISION2,LINETHICK0;
买卖比:=主动买盘/主动卖盘;
WJ:=(HIGH+LOW+CLOSE)/3;
VD1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));
VD2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-WJ);
VD3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);
VD4:=IF(HIGH=LOW,1,WJ-MIN(CLOSE,OPEN));
VD5:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
VD6:=(VD1*VD5);
VD7:=(VD2*VD5);
VD8:=(VD3*VD5);
VD9:=(VD4*VD5);
买入量:=(VD9+VD8);
卖出量:=(VD6+VD7);
买入资金:=买入量*close/100;
卖出资金:=卖出量*close/100;
资金进出:=买入资金-卖出资金;
买卖资金比:=买入资金/卖出资金;
挂单买盘:=MA(主动买盘,3);
挂单卖盘:=(MA(主动卖盘,3));
{yyzq:=(sysparam(3)-sysparam(2));
FILL:=barscount(c)>SYSPARAM(2) and barscount(c)<if(sysparam(3)-sysparam(2)>20,SYSPARAM(2)+INTPART(yyzq/2),20);
pich:=refx(hhv(成交,yyzq),yyzq);
picl:=refx(llv(挂单卖盘,yyzq),yyzq}
DRAWTEXTEX(c,1,2,20,┃当日买卖总量 = +NUMTOSTR(VOL,2)),ColorA6B7F3;
DRAWTEXTEX(c,1,2,120,┃买入资金累计万元 : +NUMTOSTR(买入资金,2)),Colorred,LINETHICK1;
DRAWTEXTEX(c,1,300,120,┃卖出资金累计万元 : +NUMTOSTR(卖出资金,2)),Color00ff00,LINETHICK1;
DRAWTEXTEX(c,1,600,120,┃资金进出万元 : +NUMTOSTR(资金进出,2)),Coloryellow,LINETHICK1;
DRAWTEXTEX(c,1,2,250,┃当日挂单买盘 : +NUMTOSTR(挂单买盘,2)),Colorred,LINETHICK1;
DRAWTEXTEX(c,1,260,250,┃当日挂单卖盘 : +NUMTOSTR(挂单卖盘,2)),Color00ff00,LINETHICK1;
|
