自动预测赢家，预测赢家的指标，通达信划线主图
VAR1:=BARSCOUNT(C);VAR2:=CONST(VAR1);VAR3:=VAR2-VAR1;K线计数:VAR3+1,NODRAW,COLORYELLOW;{自动预测周期}DRAWKLINE(H,O,L,C);A1 := (REF(HIGH,自动预测周期) = HHV(HIGH,(自动预测周期 + 1)));B1 := FILTER(A1,自动预测周期);C1 := BACKSET(B1,(自动预测周期 + 1));D1 := FILTER(C1,自动预测周期);A2 := (REF(LOW,自动预测周期) = LLV(LOW,(自动预测周期 + 1)));B2 := FILTER(A2,自动预测周期);C2 := BACKSET(B2,(自动预测周期 + 1));D2 := FILTER(C2,自动预测周期);E1 := ((REF(LLV(LOW,自动预测周期),1) + REF(HHV(HIGH,自动预测周期),1)) / 2);E2 := ((HIGH + LOW) / 2);H1 := (((D1 AND NOT((D2 AND (E1 >= E2)))) OR ISLASTBAR) OR (BARSCOUNT(CLOSE) = 1));L1 := (D2 AND NOT((D1 AND (E1 < E2))));H2 := (D1 AND NOT((D2 AND (E1 >= E2))));X1 := REF(BARSLAST(H1),1) + 1;F1 := BACKSET((H1 AND (COUNT(L1,X1) > 0)),LLVBARS(IF(L1,LOW,10000),X1));G1 := (F1 > REF(F1,1));I1 := BACKSET(G1,2);LD := (I1 > REF(I1,1));L2 := ((LD OR ISLASTBAR) OR (BARSCOUNT(CLOSE) = 1));X2 := (REF(BARSLAST(L2),1) + 1);F2 := BACKSET((L2 AND (COUNT(H2,X2) > 0)),HHVBARS(IF(H2,HIGH,0),X2));G2 := (F2 > REF(F2,1));I2 := BACKSET(G2,2);HD := (I2 > REF(I2,1));{全画}IF(全画开关=1,DRAWLINE(LD,L,HD,H,0),DRAWNULL)COLORRED;IF(全画开关=1,DRAWLINE(HD,H,LD,L,0),DRAWNULL)COLORGREEN;DRAWTEXT(全画开关=1 AND LD AND BARSLAST(HD)<BARSLAST(REF(LD,1)) ,L*0.98,'Ａ'),COLORRED;DRAWNUMBER(全画开关=1 AND LD AND BARSLAST(HD)<BARSLAST(REF(LD,1)) ,L*0.98,L),COLORRED;DRAWTEXT(全画开关=1 AND HD,H*1.01,'Ｂ'),COLORGREEN;DRAWNUMBER(全画开关=1 AND HD,H*1.01,H),COLORGREEN;最高价格:=HHV(REF(HIGH,最高-1),2),NODRAW;最低价格:=LLV(REF(LOW,最低-1),2),NODRAW;高低比:=最高价格/最低价格;高低比平方:=SQRT(高低比);再平放:=SQRT(高低比平方);短高点B:=最低价格*(SQRT(高低比)+再平放-1)NODRAW;短高点:CONST(短高点B),NODRAW;短中点:CONST(最高价格/高低比平方),NODRAW;VAR12:=最低价格*SQRT(SQRT(最高价格/最低价格));短低点:CONST(VAR12),NODRAW;求最高值:=REFDATE(HHV(HIGH,最高),DATE);求最低值:=REFDATE(LLV(LOW,最低),DATE);{DRAWLINE(CURRBARSCOUNT=最低,短高点,ISLASTBAR,短高点,0)POINTDOT,LINETHICK4,COLORMAGENTA;{C3横线}DRAWLINE(CURRBARSCOUNT=最低,短高点,CURRBARSCOUNT,短高点,0)DOTLINE,LINETHICK1,COLORMAGENTA;{C3横线}DRAWLINE(CURRBARSCOUNT=最低,短中点,CURRBARSCOUNT,短中点,0)DOTLINE,LINETHICK1,COLORMAGENTA;{C2横线}DRAWLINE(CURRBARSCOUNT=最低,短低点,CURRBARSCOUNT,短低点,0)DOTLINE,LINETHICK1,COLORMAGENTA;{C1横线}DRAWTEXT(CURRBARSCOUNT=最低,短高点*1.01,STRCAT(' C3:',CON2STR(短高点,2))),COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=最低,短中点*0.99,STRCAT(' C2:',CON2STR(短中点,2)))COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=最低,短低点*0.97,STRCAT(' C1:',CON2STR(短低点,2)))COLORMAGENTA;DRAWTEXT(CURRBARSCOUNT=最高,H,'( 高B )'),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=最低,L,'( 低A )'),COLORYELLOW;DRAWICON(CURRBARSCOUNT=最低,L,38);{历史低点标记}DRAWICON(CURRBARSCOUNT=最高,H,39);{历史高点标记};DRAWLINE(CURRBARSCOUNT=最低,L,CURRBARSCOUNT=最高,H,0)COLORMAGENTA,LINETHICK2;{最高到低点划线}DRAWLINE(CURRBARSCOUNT=最高,H,CURRBARSCOUNT=最低,L,0)COLORMAGENTA,LINETHICK2;{最低到高点划线};DRAWLINE(CURRBARSCOUNT=最低,L,短高点,短高点,-1)DOTLINE,LINETHICK1,COLORMAGENTA;STICKLINE(CURRBARSCOUNT=最低,L,短高点,0,0),COLORMAGENTA;
未来函数检测结果如下：
该公式包含未来函数:BACKSET
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
VAR1赋值:C的有效数据周期数
VAR2赋值:CONST(VAR1)
VAR3赋值:VAR2-VAR1
输出K线计数:VAR3+1,NODRAW,画黄色
{自动预测周期}DRAWKLINE(H,O,L,C)
A1 := (自动预测周期日前的最高价 = HHV(最高价,(自动预测周期 + 1)))
B1 := A1的自动预测周期过滤
C1 := BACKSET(B1,(自动预测周期 + 1))
D1 := C1的自动预测周期过滤
A2 := (自动预测周期日前的最低价 = LLV(最低价,(自动预测周期 + 1)))
B2 := A2的自动预测周期过滤
C2 := BACKSET(B2,(自动预测周期 + 1))
D2 := C2的自动预测周期过滤
E1 := ((REF(自动预测周期日内最低价最低值,1) + REF(自动预测周期日内最高价最高值,1)) / 2)
E2 := ((最高价 + 最低价) / 2)
H1 := (((D1 AND NOT((D2 AND (E1 >= E2)))) OR ISLASTBAR) OR (收盘价的有效数据周期数 = 1))
L1 := (D2 AND NOT((D1 AND (E1 < E2))))
H2 := (D1 AND NOT((D2 AND (E1 >= E2))))
X1 := REF(上次H1距今天数,1) + 1
如果L1返回最低价否则返回10000
G1 := (F1 > 1日前的F1)
I1 := BACKSET(G1,2)
LD := (I1 > 1日前的I1)
L2 := ((LD OR ISLASTBAR) OR (收盘价的有效数据周期数 = 1))
X2 := (REF(上次L2距今天数,1) + 1)
如果H2返回最高价否则返回0
G2 := (F2 > 1日前的F2)
I2 := BACKSET(G2,2)
HD := (I2 > 1日前的I2)
{全画}IF(全画开关=1,DRAWLINE(LD,L,HD,H,0),DRAWNULL)画红色
IF(全画开关=1,DRAWLINE(HD,H,LD,L,0),DRAWNULL)画绿色
DRAWTEXT(全画开关=1 AND LD AND 上次HD距今天数DRAWNUMBER(全画开关=1 AND LD AND 上次HD距今天数当满足条件全画开关=1 AND HD时,在H*1.01和'Ｂ'位置书写文字
DRAWNUMBER(全画开关=1 AND HD,H*1.01,H),画绿色
最高价格赋值:2日内最高-1日前的最高价最高值,NODRAW
最低价格赋值:2日内最低-1日前的最低价最低值,NODRAW
高低比赋值:最高价格/最低价格
高低比平方:=SQRT(高低比)
再平放赋值:SQRT(高低比平方)
短高点B赋值:最低价格*(SQRT(高低比)+再平放-1)NODRAW
输出短高点:CONST(短高点B),NODRAW
输出短中点:CONST(最高价格/高低比平方),NODRAW
VAR12:=最低价格*SQRT(SQRT(最高价格/最低价格))
输出短低点:CONST(VAR12),NODRAW
求最高值赋值:REFDATE(最高日内最高价最高值,DATE)
求最低值赋值:REFDATE(最低日内最低价最低值,DATE)
{DRAWLINE( 到最后交易的周期=最低,短高点,ISLASTBAR,短高点,0)POINTDOT,LINETHICK4,画洋红色
{C3横线}DRAWLINE( 到最后交易的周期=最低,短高点, 到最后交易的周期,短高点,0)DOTLINE,LINETHICK1,画洋红色
{C3横线}DRAWLINE( 到最后交易的周期=最低,短中点, 到最后交易的周期,短中点,0)DOTLINE,LINETHICK1,画洋红色
{C2横线}DRAWLINE( 到最后交易的周期=最低,短低点, 到最后交易的周期,短低点,0)DOTLINE,LINETHICK1,画洋红色
{C1横线}DRAWTEXT( 到最后交易的周期=最低,短高点*1.01,STRCAT(' C3:',CON2STR(短高点,2))),画洋红色
DRAWTEXT( 到最后交易的周期=最低,短中点*0.99,STRCAT(' 输出C2:',CON2STR(短中点,2)))画洋红色
DRAWTEXT( 到最后交易的周期=最低,短低点*0.97,STRCAT(' 输出C1:',CON2STR(短低点,2)))画洋红色
DRAWTEXT( 到最后交易的周期=最高,H,'( 高B )'),画黄色
DRAWTEXT( 到最后交易的周期=最低,L,'( 低A )'),画黄色
当满足条件 到最后交易的周期=最低时,在L和38之间画图标
当满足条件 到最后交易的周期=最高时,在H和39之间画图标
{历史高点标记}
DRAWLINE( 到最后交易的周期=最低,L, 到最后交易的周期=最高,H,0)画洋红色, 线宽为2
{最高到低点划线}DRAWLINE( 到最后交易的周期=最高,H, 到最后交易的周期=最低,L,0)画洋红色, 线宽为2
{最低到高点划线}
DRAWLINE( 到最后交易的周期=最低,L,短高点,短高点,-1)DOTLINE,LINETHICK1,画洋红色
当满足条件 到最后交易的周期=最低时,在L和短高点之间画柱状线
