通达信神奇九转的变异、可调结构序列的神奇多转主副图指标 源码 附图

{可调神奇多转主图源码如下}







序列前天数:=1;

结构序列:=1;

A1:=C>REF(C,序列前天数);

NT:=BARSLASTCOUNT(A1);

TJ11:=NT=结构序列;

TJ13:=ISLASTBAR AND BETWEEN(NT,1,结构序列-1);

AY:=(BACKSET(TJ11>0,结构序列) OR BACKSET(TJ13>0,NT))*NT;

DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF;

DRAWTEXT(NT=结构序列,H*1.02,VAR2STR(结构序列,0)),COLORGREEN;

DRAWICON(TJ11,H*1.045,2);

B1:=C<REF(C,序列前天数);

NT0:=BARSLASTCOUNT(B1);

TJ21:=NT0=结构序列;

TJ23:=ISLASTBAR AND BETWEEN(NT0,1,结构序列-1);

AY1:=(BACKSET(TJ21>0,结构序列) OR BACKSET(TJ23>0,NT0))*NT0;

DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORGREEN;

DRAWTEXT(NT0=结构序列,L*0.98,VAR2STR(结构序列,0)),COLORFF00FF;

DRAWICON(TJ21,L*0.975,1)COLORGREEN;









{可调多转副图源码如下}







序列前天数:=1;

结构序列:=1;

B1:=C<REF(C,序列前天数);

NT0:=BARSLASTCOUNT(B1);

TJ21:=NT0=结构序列;

TJ23:=ISLASTBAR AND BETWEEN(NT0,1,结构序列-1);

AY1:=(BACKSET(TJ21>0,结构序列) OR BACKSET(TJ23>0,NT0))*NT0;

XG:TJ21;

原理解析：

{可调神奇多转主图源码如下}

序列前天数赋值:1
结构序列赋值:1
A1赋值:C>序列前天数日前的C
NT赋值:BARSLASTCOUNT(A1)
TJ11赋值:NT=结构序列
TJ13赋值:ISLASTBAR AND BETWEEN(NT,1,结构序列-1)
AY赋值:(BACKSET(TJ11>0,结构序列) OR BACKSET(TJ13>0,NT))*NT
DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF
DRAWTEXT(NT=结构序列,H*1.02,VAR2STR(结构序列,0)),画绿色
当满足条件TJ11时,在H*1.045和2之间画图标
B1赋值:C<序列前天数日前的C
NT0:=BARSLASTCOUNT(B1)
TJ21赋值:NT0=结构序列
TJ23赋值:ISLASTBAR AND BETWEEN(NT0,1,结构序列-1)
AY1:=(BACKSET(TJ21>0,结构序列) OR BACKSET(TJ23>0,NT0))*NT0
DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),画绿色
DRAWTEXT(NT0=结构序列,L*0.98,VAR2STR(结构序列,0)),COLORFF00FF
当满足条件TJ21时,在L*0.975和1之间画图标

{可调多转副图源码如下}

序列前天数:=1
结构序列赋值:1
B1赋值:C<序列前天数日前的C
NT0:=BARSLASTCOUNT(B1)
TJ21赋值:NT0=结构序列
TJ23赋值:ISLASTBAR AND BETWEEN(NT0,1,结构序列-1)
AY1:=(BACKSET(TJ21>0,结构序列) OR BACKSET(TJ23>0,NT0))*NT0
输出XG:TJ21