粒米观海指标 (源码)

VAR2:=(((CLOSE - LLV(LOW,27)) / (HHV(HIGH,27) - LLV(LOW,27))) * 100);
角度:(((CLOSE - REF(OPEN,29)) / REF(OPEN,29)) * 100);
VAR3:=SMA(VAR2,3,1);
VAR4:=SMA(VAR3,9,1);
VAR5:=((3 * VAR3) - (2 * VAR4));
VAR6:=VOL;
换手:((VOL / CAPITAL) * 100);
STICKLINE((VOL AND (VAR3 VAR4)),0,VOL,9,1),colorred;
STICKLINE((VOL AND (VAR3 = VAR4)),0,VOL,9,1),colorFFFF00;
VAR2:=(CLOSE - REF(CLOSE,1));
VAR3:=IF(((CLOSE - REF(CLOSE,1)) = 0),VAR2,0);
VAR4:=(REF(CLOSE,1) - CLOSE);
VAR5:=IF(((CLOSE - REF(CLOSE,1)) = 0),VAR4,0);
VAR6:=(SUM(VAR3,16) / SUM(VAR5,16));
VAR7:=(100 - (100 / (1 + VAR6)));
VAR8:=EMA(VAR7,16);
VAR9:=EMA(VAR8,8);
VARA:=EMA(VAR8,45);
MO:=(VAR8 - VARA);
ML:=(VAR9 - VARA);
VAR1A:=EMA(CLOSE,32);
VAR2A:=MA(OPEN,32);
趋势:=(VAR1A - VAR2A);
观望:IF(((((MO ML) AND (趋势 0)) AND (MO REF(MO,3))) AND (趋势 REF(趋势,3))),9,0);
STICKLINE(((((MO ML) AND (趋势 0)) AND (MO REF(MO,3))) AND (趋势 REF(趋势,3))),VOL,0,9,1);
VAR2:=(HIGH - LOW);
VAR3:=ABS((OPEN - CLOSE));
VAR4:=(HIGH - IF((CLOSE OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE OPEN),OPEN,CLOSE) - LOW);
VAR6:=((VAR3 / VAR2) * VOL);
VAR7:=((VAR4 / VAR2) * VOL);
VAR8:=((VAR5 / VAR2) * VOL);
VAR9:=IF(((VOL / CAPITAL) 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));
VARA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);
VARB:=(((MA(CLOSE,5) MA(CLOSE,10)) AND (MA(CLOSE,10) MA(CLOSE,30))) AND (MA(CLOSE,30) MA(CLOSE,60)));
VARC:=((MA(CLOSE,5) MA(CLOSE,10)) AND (MA(CLOSE,10) MA(CLOSE,30)));
上攻量:STICKLINE((((VAR6 = VAR7) AND (VAR6 = VAR8)) AND (CLOSE OPEN)),0,VAR6,8,0),colorred;
下攻量:STICKLINE((((VAR6 = VAR7) AND (VAR6 = VAR8)) AND (CLOSE OPEN)),0,VAR6,8,0);
上探量:STICKLINE(((VAR7 VAR6) AND (VAR7 VAR8)),0,VAR7,8,0),colorCCCC66;
下探量:STICKLINE(((VAR8 VAR6) AND (VAR8 VAR7)),0,VAR8,8,0),colorFF6633;
地量:STICKLINE(((VAR9 2) AND (VOL (MA(VOL,5) / 2))),0,VOL,2.5,0);
量:=(EMA(IF((CLOSE = REF(CLOSE,2)),VOL,(0 - VOL)),60) / MA(VOL,60));
量１:=EMA(量,3);
量２:=EMA(量,5);
量３:=EMA(量,8);
T1:=((量２ = 量３) AND (量 REF(量,1)));
T2:=((量２ 量３) AND (量 REF(量,1)));
K1:=SUM(IF((CLOSE = REF(CLOSE,1)),VOL,0),8);
K2:=SUM(IF((CLOSE REF(CLOSE,1)),VOL,0),8);
KC:=(((EMA(VOL,3) - LLV(VOL,50)) / (HHV(VOL,50) - LLV(VOL,50))) * 100);
KH:=((EMA(EMA(KC,4),16) + EMA(((K1 / (K1 + K2)) * 100),7)) / 4);
AA:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
主动买盘:IF((CLOSE OPEN),(AA * (HIGH - LOW)),IF((CLOSE OPEN),(AA * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))),POINTDOT,colorred;
主动卖盘:IF((CLOSE OPEN),(0 - (AA * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE OPEN),(0 - (AA * (HIGH - LOW))),(0 - (VOL / 2)))),LINETHICK0,colorFF0000;
STICKLINE((主动买盘 0),0,VOL,4,0),colorFF0000;
STICKLINE((主动买盘 0),0,主动买盘,4,0),colorFF00FF;
STICKLINE(CROSS(KH,30),0,VOL,4,0);
STICKLINE(CROSS(30,KH),0,VOL,4,0),color6783DB;
DRAWICON(CROSS(KH,30),VOL,11);
DRAWICON(CROSS(30,KH),VOL,11);
DRAWTEXT(CROSS(KH,30),VOL,'-- 量顶');
DRAWTEXT(CROSS(30,KH),VOL,'-- 量顶'),color6783DB;
换手率:=((VOL * 100) / CAPITAL);
换手相对位置:=(((换手率 - LLV(换手率,89)) / (HHV(换手率,89) - LLV(换手率,89))) * 100);
换手相对位置２:=(((换手率 - LLV(换手率,144)) / (HHV(换手率,144) - LLV(换手率,144))) * 100);
换手率天量拐点:=IF(((REF(换手相对位置,1) = 100) AND (换手相对位置 100)),1,0);
换手率天量拐2:=IF(((REF(换手相对位置２,1) = 100) AND (换手相对位置２ 100)),1,0);
换手率地量拐点:=IF(((REF(换手相对位置,1) = 0) AND (换手相对位置 0)),(0 - 1),0);
换手率地量拐２:=IF(((REF(换手相对位置２,1) = 0) AND (换手相对位置２ 0)),(0 - 1),0);
天量ａ:STICKLINE(((REF(换手相对位置,1) = 100) AND (换手相对位置 100)),0,(VOL * 1.2),1,0);
DRAWICON(((REF(换手相对位置,1) = 100) AND (换手相对位置 100)),(VOL * 1.2),11);
DRAWTEXT(((REF(换手相对位置,1) = 100) AND (换手相对位置 100)),(VOL * 1.2),'-- 天量');
天量ｂ:STICKLINE(((REF(换手相对位置２,1) = 100) AND (换手相对位置２ 100)),0,(VOL * 1.2),1,0);
DRAWICON(((REF(换手相对位置２,1) = 100) AND (换手相对位置２ 100)),(VOL * 1.2),11);
{九毛八股票公式指标网 全网优质指标下载平台www.9m8.cn}
DRAWTEXT(((REF(换手相对位置２,1) = 100) AND (换手相对位置２ 100)),(VOL * 1.2),'-- 天量');
地量ａ:STICKLINE(((REF(换手相对位置,1) = 0) AND (换手相对位置 0)),0,(VOL * 1.2),1,0);
DRAWICON(((REF(换手相对位置,1) = 0) AND (换手相对位置 0)),(VOL * 1.2),10);
DRAWTEXT(((REF(换手相对位置,1) = 0) AND (换手相对位置 0)),(VOL * 1.2),'-- 地量');
地量ｂ:STICKLINE(((REF(换手相对位置２,1) = 0) AND (换手相对位置２ 0)),0,(VOL * 1.2),1,0);
DRAWICON(((REF(换手相对位置２,1) = 0) AND (换手相对位置２ 0)),(VOL * 1.2),10);
DRAWTEXT(((REF(换手相对位置２,1) = 0) AND (换手相对位置２ 0)),(VOL * 1.2),'-- 地量1');
常量:STICKLINE((VOL (MA(VOL,5) * 0.1)),0,VOL,0.1,0),colorFFFFFF;
A1:=MA(VOL,20);
A2:=MA(VOL,90);
DRAWICON(CROSS(A1,A2),LOW,4);
DRAWICON(CROSS(A2,A1),LOW,5);