通达信分时擒龙分时主图指标 高抛低吸T+0 源码
通达信分时擒龙分时主图指标 高抛低吸T+0 源码
{分时擒龙主图源码如下}
{======= 分时擒龙 =========}
{参数1:ATM，最小5，最大2000，? 缺省150}
{参数2:ATM，最小10，最大10000，缺省2000}
{参数3:ATM，最小20，最大8000， 缺省3000}
现价:CLOSE,COLORWHITE,LINETHICK2;
T1:=(BARSLAST(((HOUR = 9) AND (MINUTE = 31))) + 1);
T2:=SUM(CLOSE*VOL,BARSCOUNT(C))/SUM(VOL,BARSCOUNT(C));
T3:=(SUM((CLOSE * VOL),0) / SUM(VOL,0));
T4:=(((SETCODE = 0) OR (SETCODE = 1)) AND (CLOSE < 500));
均价:=IF(T4,T2,T3),COLORYELLOW;
T11:=FSQL.MACS#DAY;
T12:=(T11 * 1.3);
T15:=((CLOSE > REF(CLOSE,1)) AND ((CLOSE / 均价) > (1 + (T11 / 100))));
T16:=((CLOSE < REF(CLOSE,1)) AND ((CLOSE / 均价) < (1 - (T11 / 100))));
HH1:=((REF(SUM(T15,0),1) = 0) AND (SUM(T15,0) = 1));
LL1:=((REF(SUM(T16,0),1) = 0) AND (SUM(T16,0) = 1));
T19:=(SUM(HH1,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(HH1)),0.5));
T20:=(SUM(LL1,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(LL1)),0.5));
CS1:CONST(SUM(IF(T19,REF(CLOSE,1),DRAWNULL),0)),COLORGREEN,LINETHICK2;
CB1:CONST(SUM(IF(T20,REF(CLOSE,1),DRAWNULL),0)),COLORLIMAGENTA,LINETHICK2;
HH2:=CROSS(SUM((T15 AND (CLOSE > (CS1 * (1 + (T12 / 100))))),0),0.5);
LL2:=CROSS(SUM((T16 AND (CLOSE < (CB1 * (1 - (T12 / 100))))),0),0.5);
T25:=(SUM(HH2,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(HH2)),0.5));
T26:=(SUM(LL2,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(LL2)),0.5));
CS2:CONST(SUM(IF(T25,REF(CLOSE,1),DRAWNULL),0)),COLORGREEN,LINETHICK3;
CB2:CONST(SUM(IF(T26,REF(CLOSE,1),DRAWNULL),0)),COLORLIMAGENTA,LINETHICK3;
DRAWICON((HH1 OR HH2),(CLOSE * 1.001),2);
DRAWICON((LL1 OR LL2),(CLOSE * 0.999),1);
DRAWICON((T20 OR T26),(REF(CLOSE,1) * 0.999),42);
DRAWICON((T19 OR T25),(REF(CLOSE,1) * 1.001),43);
{FSQL引用源码如下}
{===== 分时擒龙 =========}
{FSQL}
{引用公式，不需要显示}
T0:=REF(CLOSE,1);
T1:=REF(MAX(HIGH,T0),1);
T2:=REF(MIN(LOW,T0),1);
MACS:(MA((((T1 - T2) / REF(CLOSE,2)) * 100),5) /9);
