| AA:=IF(CLOSE<0,0,SUM(IF(CLOSE>REF(CLOSE,1) AND VOL>REF(VOL,1),VOL,0),2)); BB:=IF(CLOSE<0,0,SUM(IF(CLOSE<REF(CLOSE,1) AND VOL<REF(VOL,1),VOL,0),2)); DD:=IF(CLOSE<0,0,AA-BB); X0:=IF(CLOSE<0,0,IF(DD>0 AND (CLOSE/REF(CLOSE,1)-1)*100>0,AMOUNT/10000,0)); X1:=IF(CLOSE<0,0,IF(DD<0 AND (CLOSE/REF(CLOSE,1)-1)*100<0,AMOUNT/10000,0)); DDX:IF(CLOSE<0,0,(X0-X1)/FINANCE(7)*CLOSE/100),LINETHICK0; 选股:IF(CLOSE<0,0,DDX>=0 AND (CLOSE/REF(CLOSE,1)-1)*100>4),LINETHICK0; STICKLINE(DDX>0,0,DDX,8,0),colorAAFF; STICKLINE(DDX>0,0,DDX,6.6,0),colorBBFF; STICKLINE(DDX>0,0,DDX,4.4,0),colorCCFF; STICKLINE(DDX>0,0,DDX,3.3,0),colorDDFF; STICKLINE(DDX>0,0,DDX,2.2,0),colorEEFF; STICKLINE(DDX>0,0,DDX,1.1,0),colorFFFF; STICKLINE(DDX<0,0,DDX,8,0),colorFF2200; STICKLINE(DDX<0,0,DDX,1,0),colorFF2200; STICKLINE(DDX<0,0,DDX,5,0),colorFF6600; STICKLINE(DDX<0,0,DDX,3,0),colorFF9900; STICKLINE(DDX<0,0,DDX,1.5,0),colorFFDD00; STICKLINE(DDX<0,0,DDX,0,0),colorFFDD00; 周净流入:IF(CLOSE<0,0,SUM(X0-X1,5)),LINETHICK0,color6622FF; DDX1:(IF(CLOSE<0,0,EMA(DDX,60)))*15.367; DDX2:IF(CLOSE<0,0,MA(DDX1,5)); DDX3:IF(CLOSE<0,0,MA(DDX1,10)); 天:=IF(CLOSE<0,0,COUNT(X0-X1>0,5)); DRAWTEXTEX(CLOSE,1,380,0,'一周内翻红:'+NUMTOSTR(天,0)+' 天'),colorFFDD00; DRAWTEXTEX(DD>=0,1,200,0,'大单动向:'+'↑'),colorFFDD00; DRAWTEXTEX(DD<0,1,200,0,'大单动向:'+'↓'),colorFFDD00; 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>0,1,650,0,STR1),colorFFDD00; DRAWTEXTEX(CLOSE,1,10,0,STKLABEL+' '+STKNAME+''),colorFFBF00; |
