【原】大智慧生命钱袋指标公式程序源码编程思路破译

编程思路破译

N赋值:10

F赋值:21

输出趋势: 当满足条件收盘价>(收盘价的3日简单移动平均+收盘价的6日简单移动平均+收盘价的12日简单移动平均+收盘价的24日简单移动平均)/4时,在0和2.5位置之间画柱状线,宽度为10,0不为0则画空心柱.,画红色

VAR1赋值:9日内最高价的最高值-9日内最低价的最低值

VAR2赋值:9日内最高价的最高值-收盘价

VAR3赋值:收盘价-9日内最低价的最低值

VAR4赋值:VAR2/VAR1*100-70

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

VAR6赋值:(2*收盘价+最高价+最低价)/4

VAR7赋值:VAR3/VAR1*100的3日[1日权重]移动平均

VAR8赋值:34日内最低价的最低值

VAR9赋值:VAR7的3日[1日权重]移动平均-VAR4的9日[1日权重]移动平均

VARA赋值:如果VAR9>100,返回VAR9-100,否则返回0

VARB赋值:34日内最高价的最高值

VARC赋值:(VAR6-VAR8)/(VARB-VAR8)*100的13日指数移动平均

VARD赋值:0.667*1日前的VARC+0.333*VARC的2日指数移动平均

VARE赋值:收盘价-1日前的收盘价和0的较大值/收盘价的8日[1日权重]移动平均/大盘的收盘价-1日前的大盘的收盘价的绝对值/大盘的收盘价的8日[1日权重]移动平均*100-25

VARF赋值:VARE的3日简单移动平均

VAR10赋值:1日前的VARF

输出生命: VARD的N日指数移动平均, 画绿色

输出红灯买: 当满足条件VARC上穿VARDANDVARC>VARDANDVARC<18时,在50和0位置之间画柱状线,宽度为1,0不为0则画空心柱., 画红色

输出钱袋: 当满足条件VARD上穿VARCANDVARC<VARDANDVARC>60时,在90和100位置之间画柱状线,宽度为10,1不为0则画空心柱., 画黄色

输出卖: 当满足条件VARD上穿VARC的10日过滤ANDVARD>79ANDVARC>79时,在100和55位置之间画柱状线,宽度为3,0不为0则画空心柱., 画绿色

当满足条件VARC-VARD>0时,在VARC和VARD位置之间画柱状线,宽度为8,1不为0则画空心柱., 画红色

当满足条件VARC-VARD<0时,在VARC和VARD位置之间画柱状线,宽度为8,0不为0则画空心柱., 画绿色

100, 画黄色

0, 画绿色

20, 画黄色

80, 画黄色

程序源码

N:=10;F:=21;

趋势: STICKLINE(CLOSE>(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,0,2.5,10,0),COLORRED;

VAR1:=HHV(HIGH,9)-LLV(LOW,9);

VAR2:=HHV(HIGH,9)-CLOSE;

VAR3:=CLOSE-LLV(LOW,9);

VAR4:=VAR2/VAR1*100-70;

VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;

VAR6:=(2*CLOSE+HIGH+LOW)/4;

VAR7:=SMA(VAR3/VAR1*100,3,1);

VAR8:=LLV(LOW,34);

VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);

VARA:=IF(VAR9>100,VAR9-100,0);

VARB:=HHV(HIGH,34);

VARC:=EMA((VAR6-VAR8)/(VARB-VAR8)*100,13);

VARD:=EMA(0.667*REF(VARC,1)+0.333*VARC,2);

VARE:=SMA(MAX(CLOSE-REF(CLOSE,1),0)/CLOSE,8,1)/SMA(ABS(INDEXC-REF(INDEXC,1))/INDEXC,8,1)*100-25;

VARF:=MA(VARE,3);

VAR10:=REF(VARF,1);

生命: EMA(VARD,N), COLORGREEN;

红灯买: STICKLINE(CROSS(VARC,VARD) AND VARC>VARD AND VARC<18,50,0,1,0), COLORRED;

钱袋: STICKLINE(CROSS(VARD,VARC) AND VARC< VARD AND VARC>60,90,100,10,1), COLORYELLOW;

卖: STICKLINE(FILTER(CROSS(VARD,VARC),10) AND VARD>79 AND VARC>79,100,55,3,0), COLORGREEN;

STICKLINE(VARC-VARD>0,VARC,VARD,8,1), COLORRED;

STICKLINE(VARC-VARD<0,VARC,VARD,8,0), COLORGREEN;

100, COLORYELLOW;

0, COLORGREEN;

20, COLORYELLOW;

80, COLORYELLOW;