通达信〖强庄吸筹潜伏〗判断价格动量与趋势的同步性主图指标公式源码

VAR01:=(HIGH+LOW+CLOSE)/3;
VAR02:=(VAR01-MA(VAR01,14))/(0.015*AVEDEV(VAR01,14)),COLORMAGENTA;
VAR03:=(EMA(CLOSE,12)-EMA(CLOSE,26))/(0.015*AVEDEV(VAR01,14)),COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,0 ),COLORYELLOW;
STICKLINE(C< O AND C>REF(C,1),C,O,3,0),COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) AND C>O ,OPEN,CLOSE,3,0 ),COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) AND C>O ,OPEN,CLOSE,2.7,0 ),COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) AND C>O ,OPEN,CLOSE,2.1,0 ),COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORYELLOW;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORYELLOW;
STICKLINE(CLOSE= REF(CLOSE,1) ,H,L,3,1 ),COLOR999999;
STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,0 ),COLORWHITE;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORCYAN;
STICKLINE(C< REF(C,1) AND C>O,C,O,3,0),COLORFFCC00;
STICKLINE(C< REF(C,1) AND C< O ,OPEN,CLOSE,3,0 ),COLOR990000;
STICKLINE(C< REF(C,1) AND C< O ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00;
VAR04:=EMA(VAR03*(0.015*AVEDEV(VAR01,14)),9)/(0.015*AVEDEV(VAR01,14)),COLORCYAN;
VAR05:=(VAR03-VAR04)*4,COLORSTICK;
VAR06:=(VAR01-MA(VAR01,14))/(0.015*AVEDEV(VAR01,14)),COLORMAGENTA;
VAR07:=VAR06<REF(VAR06,1) AND VAR03>REF(VAR03,1) AND VAR06<VAR03 AND VAR03>100,COLORGREEN;
VAR08: MA(C,10), COLORWHITE;
VAR09: MA(C,20), COLORYELLOW;
VAR10: MA(C,35), COLORFF00FF;
VAR11:=IF(DATE<999999999,1,DRAWNULL);
VAR12:EMA(EMA(CLOSE,10),10)*VAR11,COLORRED,LINETHICK3;
VAR13:=IF(DATETODAY(DATE)<999999999,1,DRAWNULL);
VAR14:=VAR12>REF(VAR12,1)*VAR11;
IF(VAR14 - 1,VAR12,DRAWNULL)*VAR11,COLORGREEN,LINETHICK3;
VAR15 := REF(CLOSE, 1) / REF(CLOSE, 2) > 1.095;
VAR16 := (CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100 > 9.9 AND (CLOSE - REF(CLOSE, 3)) / REF(CLOSE, 3) * 100 < 31 AND (CLOSE - REF(CLOSE, 4)) / REF(CLOSE, 4) * 100 < 40;
VAR17 := VAR15 AND VAR16 AND CLOSE < 16 AND REF(vol / CAPITAL * 100, 1) < 25 AND MA(CLOSE, 5) > MA(CLOSE, 10) AND MA(CLOSE, 10) > MA(CLOSE, 21) AND MA(CLOSE, 5) > MA(CLOSE, 34) AND VOL <= REF(VOL, 1) * 3.1 AND (CLOSE - REF(CLOSE, 9)) / REF(CLOSE, 9) * 100 < 50 AND (CLOSE - REF(CLOSE, 7)) / REF(CLOSE, 7) * 100 < 50 AND (CLOSE - REF(CLOSE, 12)) / REF(CLOSE, 12) * 100 < 150 AND REF(VOL / CAPITAL * 100, 0) < 30 AND REF(VOL / CAPITAL * 100, 2) < 45 AND MA(CLOSE, 3) > MA(CLOSE, 5);
VAR18 := EMA(CLOSE, 9) - EMA(CLOSE, 26);
VAR19 := EMA(VAR18, 12);
VAR20 := 2 * (VAR18 - VAR19);
VAR21 := 50 * (IF(VAR20 > REF(VAR20, 1) AND REF(VAR20, 1) > 0 AND REF(VAR20, 2) > REF(VAR20, 1), 0.2, 0));
VAR22 := IF(REF((H - MAX(C, O)) / Abs(C - O) > 1, 1), 0, 1);
VAR23 := 0.01 * EMA(AMOUNT, 13) / EMA(VOL, 13);
VAR24 := (CLOSE - VAR23) / VAR23 * 1000;
VAR25 := BARSLASTCOUNT(VAR24 > 0 AND VAR24 >= 50) = 1;
VAR26 := VAR25 AND VAR20 > 0 AND VAR21 AND VAR22;
STICKLINE(VAR26, 0, 0.8, 2, 0), COLORRED;
STICKLINE(VAR26, 0, 0.5, 2, 0), COLORYELLOW;
STICKLINE(VAR26, 0, 0.1, 3, 0), COLORWHITE;
DRAWICON(VAR26, 1, 1);
DRAWTEXT(VAR26,H *1.015,'★强庄吸筹'), COLORCYAN;
DRAWICON(VAR26, L*0.98, 26);