九毛八公式指标
请老师帮忙通信达指标k线显示有点大 老师把k线改小一点 谢谢 VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL); VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL); VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL); VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100))))); 加仓:=VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN; 减仓:=VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE
公式模块：
VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*vol);
VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL); VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL); VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100))))); 加仓:=VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN; 减仓:=VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN; 洗盘:=VAR8>VAR6 AND VAR8>VAR7; 高抛:=VAR7>VAR6 AND VAR7>VAR8; 地量:=VAR9>2 AND VOL<MA(VOL,5)/2; 主动加仓:STICKLINE(加仓,H,L,0,0),COLORRED; STICKLINE(加仓,O,C,3,0),COLORRED; 轻度洗盘:STICKLINE(洗盘,H,L,0,0),COLORWHITE; STICKLINE(洗盘,O,C,3,0),COLORWHITE; 深度洗盘:STICKLINE(减仓,H,L,0,0),COLORBLUE; STICKLINE(减仓,O,C,3,0),COLORBLUE; 主动高抛:STICKLINE(高抛,H,L,0,0),COLORMAGENTA; STICKLINE(高抛,O,C,3,0),COLORMAGENTA; 相对地量:STICKLINE(地量,H,L,0,0),COLORGREEN; STICKLINE(相对地量,O,C,3,0),COLORGREEN; JJ:=(3*C+H+L+O)/6; VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36; TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1); LJL:=FILTER(TJ1,5); STICKLINE(CLOSE,REF(LOW,BArslAST(LJL)),REF(LOW,BARSLAST(LJL)),3,0),COLORRED; STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),3,0),COLORYELLOW; STICKLINE(LJL,OPEN,CLOSE,3,0),COLORYELLOW; TY:=C; A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BacKSET(B1,10+1); HD:=FILTER(C1,10); A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
