【原】大智慧短线搏击主图指标公式源码编程思路破译

编程思路破译

N赋值:3

M1赋值:20

M2赋值:20

输出MID:((1+M1/100)*收盘价的N日简单移动平均+(1-M2/100)*收盘价的N日简单移动平均)/2,COLORFFFFFF

RSV赋值:((13日内最高价的最高值-收盘价)/(13日内最高价的最高值-13日内最低价的最低值))*(100)

LWR1赋值:RSV的3日[1日权重]移动平均

LWR2赋值:LWR1的5日[1日权重]移动平均

当满足条件(LWR1>=LWR2)时,在最高价和最低价位置之间画柱状线,宽度为0.05,0不为0则画空心柱.,COLORFFDDC0

当满足条件(LWR1>=LWR2)时,在开盘价和收盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLORFFDDC0

当满足条件(LWR1<LWR2)时,在最高价和最低价位置之间画柱状线,宽度为0.05,0不为0则画空心柱.,COLOR0000FF

当满足条件(LWR1<LWR2)时,在开盘价和收盘价位置之间画柱状线,宽度为5,1不为0则画空心柱.,COLOR0000FF

VAR1AA赋值:((2)*(收盘价)+开盘价+最高价+最低价)/(5)

VAR2AA赋值:成交量(手)

输出上升:((VAR1AA)*(VAR2AA)的8日累和)/(VAR2AA的8日累和),画红色

输出下降:8日内上升的最低值,COLOR00FF00

VAR3AA赋值:如果(收盘价>1日前的收盘价),返回88,否则返回0

VAR4AA赋值:如果((收盘价)/(1日前的收盘价)>1.05)AND((最高价)/(收盘价)<1.01)AND(VAR3AA>0),返回91,否则返回0

当满足条件(VAR4AA>90)的45日过滤时,在(最低价)*(0.94999998)位置书写文字,COLOR00FFFF

当满足条件(VAR4AA>90)的35日过滤时,在(最低价)*(0.99000001)位置书写文字,COLOR00FFFF

A1AA赋值:9

A2AA赋值:(A1AA+1日前的收盘价<收盘价)

当满足条件(A2AA>-0.5)的84日过滤时,在(最高价)*(1.05)位置书写文字,COLORFFFFFF

VAR1赋值:1日前的收盘价

VAR2赋值:收盘价的5日简单移动平均

VAR3赋值:收盘价-VAR1和0的较大值的6日[1日权重]移动平均/收盘价-VAR1的绝对值的6日[1日权重]移动平均*100

VAR4赋值:收盘价-VAR1和0的较大值的12日[1日权重]移动平均/收盘价-VAR1的绝对值的12日[1日权重]移动平均*100

VAR5赋值:收盘价-VAR1和0的较大值的24日[1日权重]移动平均/收盘价-VAR1的绝对值的24日[1日权重]移动平均*100

VAR6赋值:如果VAR3上穿VAR5,返回最低价,否则返回上次VAR3上穿VAR5距今天数日前的最低价

VAR7赋值:如果VAR5上穿VAR3,返回最高价,否则返回上次VAR5上穿VAR3距今天数日前的最高价

VAR8赋值:如果收盘价>=收盘价的20日简单移动平均,返回80,否则返回50

VAR9赋值:如果收盘价>=收盘价的20日简单移动平均,返回50,否则返回20

VARA赋值:如果VAR3<VAR8ANDREF(VAR3,1)>=VAR8,返回上次VAR3>=VAR8ANDREF(VAR3,1)<VAR8距今天数-1日内1日前的最高价的最高值,否则返回上次VAR3<VAR8ANDREF(VAR3,1)距今天数日前的上次VAR3>=VAR8ANDREF(VAR3,1)<VAR8距今天数-1日内1日前的最高价的最高值

VARB赋值:如果最高价>VARA,返回最低价,否则返回上次最高价>VARA距今天数日前的最低价

VARC赋值:如果最高价>VARA,返回VAR3,否则返回上次最高价>VARA距今天数日前的VAR3

VARD赋值:如果最高价>VARBANDVAR3<VARCANDVAR3<VAR5,返回最高价,否则返回上次最高价>VARBANDVAR3<VARCANDVAR3<VAR5距今天数日前的最高价

VARE赋值:如果VAR3>VAR9ANDREF(VAR3,1)<=VAR9,返回上次VAR3<=VAR9ANDREF(VAR3,1)>VAR9距今天数-1日内1日前的最低价的最低值,否则返回上次VAR3>VAR9ANDREF(VAR3,1)距今天数日前的上次VAR3<=VAR9ANDREF(VAR3,1)>VAR9距今天数-1日内1日前的最低价的最低值

VARF赋值:如果最低价<VARE,返回最高价,否则返回上次最低价<VARE距今天数日前的最高价

VAR10赋值:如果最低价<VARE,返回VAR3,否则返回上次最低价<VARE距今天数日前的VAR3

VAR11赋值:如果最低价<VARFANDVAR3>VAR10ANDVAR3>VAR5,返回最低价,否则返回上次最低价<VARFANDVAR3>VAR10ANDVAR3>VAR5距今天数日前的最低价

程序源码

N:=3;

M1:=20;

M2:=20;

MID:((1+M1/100)*MA(CLOSE,N)+(1-M2/100)*MA(CLOSE,N))/2,COLORFFFFFF;

RSV:=((HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13)))*(100);

LWR1:=SMA(RSV,3,1);

LWR2:=SMA(LWR1,5,1);

STICKLINE((LWR1>=LWR2),HIGH,LOW,0.05,0),COLORFFDDC0;

STICKLINE((LWR1>=LWR2),OPEN,CLOSE,5,0),COLORFFDDC0;

STICKLINE((LWR1<LWR2),HIGH,LOW,0.05,0),COLOR0000FF;

STICKLINE((LWR1<LWR2),OPEN,CLOSE,5,1),COLOR0000FF;

VAR1AA:=((2)*(CLOSE)+OPEN+HIGH+LOW)/(5);

VAR2AA:=VOL;

上升:(SUM((VAR1AA)*(VAR2AA),8))/(SUM(VAR2AA,8)),COLORRED;

下降:LLV(上升,8),COLOR00FF00;

VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);

VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);

DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.94999998),'大胆搏 '),COLOR00FFFF;

DRAWTEXT(FILTER((VAR4AA>90),35),(LOW)*(0.99000001),'★'),COLOR00FFFF;

A1AA:=9;

A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);

DRAWTEXT(FILTER((A2AA>-0.5),84),(HIGH)*(1.05),'小心'),COLORFFFFFF;

VAR1:=REF(CLOSE,1);

VAR2:=MA(CLOSE,5);

VAR3:=SMA(MAX(CLOSE-VAR1,0),6,1)/SMA(ABS(CLOSE-VAR1),6,1)*100;

VAR4:=SMA(MAX(CLOSE-VAR1,0),12,1)/SMA(ABS(CLOSE-VAR1),12,1)*100;

VAR5:=SMA(MAX(CLOSE-VAR1,0),24,1)/SMA(ABS(CLOSE-VAR1),24,1)*100;

VAR6:=IF(CROSS(VAR3,VAR5),LOW,REF(LOW,BARSLAST(CROSS(VAR3,VAR5))));

VAR7:=IF(CROSS(VAR5,VAR3),HIGH,REF(HIGH,BARSLAST(CROSS(VAR5,VAR3))));

VAR8:=IF(CLOSE>=MA(CLOSE,20),80,50);

VAR9:=IF(CLOSE>=MA(CLOSE,20),50,20);

VARA:=IF(VAR3<VAR8 AND REF(VAR3,1)>=VAR8,HHV(REF(HIGH,1),BARSLAST(VAR3>=VAR8 AND REF(VAR3,1)<VAR8)-1),REF(HHV(REF(HIGH,1),BARSLAST(VAR3>=VAR8 AND REF(VAR3,1)<VAR8)-1),BARSLAST(VAR3<VAR8 AND REF(VAR3,1))));

VARB:=IF(HIGH>VARA,LOW,REF(LOW,BARSLAST(HIGH>VARA)));

VARC:=IF(HIGH>VARA,VAR3,REF(VAR3,BARSLAST(HIGH>VARA)));

VARD:=IF(HIGH>VARB AND VAR3<VARC AND VAR3<VAR5,HIGH,REF(HIGH,BARSLAST(HIGH>VARB AND VAR3<VARC AND VAR3<VAR5)));

VARE:=IF(VAR3>VAR9 AND REF(VAR3,1)<=VAR9,LLV(REF(LOW,1),BARSLAST(VAR3<=VAR9 AND REF(VAR3,1)>VAR9)-1),REF(LLV(REF(LOW,1),BARSLAST(VAR3<=VAR9 AND REF(VAR3,1)>VAR9)

-1),BARSLAST(VAR3>VAR9 AND REF(VAR3,1))));

VARF:=IF(LOW<VARE,HIGH,REF(HIGH,BARSLAST(LOW<VARE)));

VAR10:=IF(LOW<VARE,VAR3,REF(VAR3,BARSLAST(LOW<VARE)));

VAR11:=IF(LOW<VARF AND VAR3>VAR10 AND VAR3>VAR5,LOW,REF(LOW,BARSLAST(LOW<VARF AND VAR3>VAR10 AND VAR3>VAR5)));