SG-NDB 脑电波
HH:=IF(C/REF(C,1)>1.093 AND L>REF(H,1),2*C-REF(C,1)-H,2*C-H-L); V1:=BARSCOUNT(C);
V2:=2*REF(C,V1)-REF(H,V1)-REF(L,V1); DK:SUM(HH,0)+V2; MDK5:MA(DK,P1); MDK10:MA(DK,P2);
SG-SMX 生命线（需下载日线）
H1:=HHV(HIGH,N); L1:=LLV(LOW,N);
H2:=HHV(INDEXH,N); L2:=LLV(INDEXL,N);
ZY:=CLOSE/INDEXC*2000; ZY1:EMA(ZY,3); ZY2:EMA(ZY,17); ZY3:EMA(ZY,34);
SG-LB 量比（需下载日线）
ZY2:=VOL/INDEXV*1000; 量比:ZY2;
MA5:MA(ZY2,5); MA10:MA(ZY2,10);
29
SG-PF 强势股评分（需下载日线）
ZY1:=CLOSE/INDEXC*1000; A1:=IF(ZY1>HHV(ZY1,3),10,0); A2:=IF(ZY1>HHV(ZY1,5),15,0); A3:=IF(ZY1>HHV(ZY1,10),20,0); A4:=IF(ZY1>HHV(ZY1,2),10,0);
A5:=COUNT(ZY1>REF(ZY1,1) ,9)*5; 强势股评分:A1+A2+A3+A4+A5;
第十二节 龙系
RAD 威力雷达
SM:=(OPEN+HIGH+CLOSE+LOW)/4; SMID:=MA(SM,D);
IM:=(INDEXO+INDEXH+INDEXL+INDEXC)/4; IMID:=MA(IM,D);
SI1:=(SMID-REF(SMID,1))/SMID; II:=(IMID-REF(IMID,1))/IMID; RADER1:SUM((SI1-II)*2,S)*1000; RADERMA:SMA(RADER1,M,1);
LON 龙系长线
LC := REF(CLOSE,1);
VID := SUM(VOL,2)/(((HHV(HIGH,2)-LLV(LOW,2)))*100); RC := (CLOSE-LC)*VID; LONG := SUM(RC,0);
DIFF := SMA(LONG,10,1); DEA := SMA(LONG,20,1); LON : DIFF-DEA;
LONMA : MA(LON,10);
LONT : LON, COLORSTICK;
30
SHT 龙系短线
VAR1:=MA((VOL-REF(VOL,1))/REF(VOL,1),5);
VAR2:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100; MY: VAR2*(1+VAR1); SHT: MY, COLORSTICK; SHTMA: MA(SHT,N);
ZLJC 主力进出
VAR1:=(CLOSE+LOW+HIGH)/3;
VAR2:=SUM(((VAR1-REF(LOW,1))-(HIGH-VAR1))*VOL/100000/(HIGH-LOW),0); VAR3:=EMA(VAR2,1); JCS:VAR3;
JCM:MA(VAR3,12); JCL:MA(VAR3,26);
ZLMM 主力买卖
LC :=REF(CLOSE,1);
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100; RSI3:=SMA(MAX(CLOSE-LC,0),18,1)/SMA(ABS(CLOSE-LC),18,1)*100;
MMS:MA(3*RSI2-2*SMA(MAX(CLOSE-LC,0),16,1)/SMA(ABS(CLOSE-LC),16,1)*100,3); MMM:EMA(MMS,8);
MML:MA(3*RSI3-2*SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100,5);
SLZT 神龙在天
白龙: MA(CLOSE,125);
黄龙: 白龙+2*STD(CLOSE,170); 紫龙: 白龙-2*STD(CLOSE,145); 青龙: SAR(125,1,7), LINESTICK; VAR2:=HHV(HIGH,70); VAR3:=HHV(HIGH,20); 红龙: VAR2*0.83; 蓝龙: VAR3*0.91;
ADVOL 龙系离散量
A:=SUM(((CLOSE-LOW)-(HIGH-CLOSE))*VOL/10000/(HIGH-LOW),0); ADVOL:A;
MA1:MA(A,30); MA2:MA(MA1,100);
31
第十三节 鬼系
CYC 成本均线
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3)); DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC1:IF(JJJT,0.01*EMA(AMOUNT,P1)/EMA(VOL,P1),EMA((HIGH+LOW+CLOSE)/3,P1)); CYC2:IF(JJJT,0.01*EMA(AMOUNT,P2)/EMA(VOL,P2),EMA((HIGH+LOW+CLOSE)/3,P2)); CYC3:IF(JJJT,0.01*EMA(AMOUNT,P3)/EMA(VOL,P3),EMA((HIGH+LOW+CLOSE)/3,P3)); CYC
∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));
CYS 市场盈亏
CYC13:=0.01*EMA(AMOUNT,13)/EMA(VOL,13); CYS:(CLOSE-CYC13)/CYC13*100;
CYQKL 博弈K线长度
KL:100*(WINNER(CLOSE)-WINNER(OPEN));
CYW 主力控盘
VAR1:=CLOSE-LOW; VAR2:=HIGH-LOW; VAR3:=CLOSE-HIGH;
VAR4:=IF(HIGH>LOW,(VAR1/VAR2+VAR3/VAR2)*VOL,0); CYW: SUM(VAR4,10)/10000, COLORSTICK;
第十四节 其他系
XT 箱体
【箱顶】:PEAK(CLOSE,N,1)*0.98; 【箱底】:TROUGH(CLOSE,N,1)*1.02;
【箱高】:100*(【箱顶】-【箱底】)/【箱底】,NODRAW;
32
JAX 济安线
AA:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,N))/MA(CLOSE,N);
济安线:DMA((2*CLOSE+LOW+HIGH)/4,AA),LINETHICK3,COLORMAGENTA; CC:=(CLOSE/济安线);
MA1:=MA(CC*(2*CLOSE+HIGH+LOW)/4,3); MAAA:=((MA1-济安线)/济安线)/3; TMP:=MA1-MAAA*MA1;
J:IF(TMP<=济安线,济安线,DRAWNULL),LINETHICK3,COLORCYAN; A:TMP,LINETHICK2,COLORYELLOW;
X:IF(TMP<=济安线,TMP,DRAWNULL),LINETHICK2,COLORGREEN;
CJDX 超级短线
VAR1:=(2*CLOSE+HIGH+LOW)/4; VAR2:=EMA(EMA(EMA(VAR1,4),4),4);
J: (VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK; D: MA(J,3); K: MA(J,1);
ZJTJ 庄家抬轿
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE; A10:=CROSS(控盘,0);
无庄控盘:IF(控盘<0,控盘,0),COLORWHITE,NODRAW; 开始控盘:IF(A10,5,0),LINETHICK1,COLORYELLOW;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW; VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)
高度控盘:IF(VAR2>50 AND COST(85)
33