主升浪航班和谐源码分享通达信公式 主图 测试图

VAR1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,30))/MA(CLOSE,30);

Q:DMA((2*CLOSE+LOW+HIGH)/4,VAR1),COLORMAGENTA,LINETHICK3;

VAR2:=CLOSE/Q;

VAR3:=MA(VAR2*(2*CLOSE+HIGH+LOW)/4,3);

VAR4:=(VAR3-Q)/Q/3;

VAR5:=VAR3-VAR4*VAR3;

J:IF(VAR5<=Q,Q,DRAWNULL),COLORCYAN,LINETHICK3;

A:VAR5,COLORYELLOW,LINETHICK2;

X:IF(VAR5<=Q,VAR5,DRAWNULL),COLORGREEN,LINETHICK2;

VAR6:=MA(HIGH/REF(CLOSE,1),13)*CLOSE;

VAR7:=MA(LOW/REF(CLOSE,1),13)*CLOSE;

VAR8:=FORCAST(CLOSE,3);

VAR9:=FORCAST(CLOSE,4);

VAR10:=FORCAST(CLOSE,5);

VAR11:=(VAR8+VAR9+VAR10)/3;

高点:REF(VAR6,1),COLORMAGENTA,LINETHICK0;

低点:REF(VAR7,1),COLORFF5500,LINETHICK0;

实际高点:HIGH,COLORRED,LINETHICK0;

实际低点:LOW,COLORGREEN,LINETHICK0;

明日高点:VAR6,COLORMAGENTA,LINETHICK0;

MA1:MA(CLOSE,5),COLORWHITE;

MA2:MA(CLOSE,38),COLORLIRED;

MA3:MA(CLOSE,48),COLORYELLOW;

MA4:MA(CLOSE,58),COLORBLUE;

MA5:MA(CLOSE,68),COLORGREEN;

MA6:MA(CLOSE,78),COLORCYAN;

VAR12:=IF(CURRBARSCOUNT<20 AND CLOSE<100,CONST(LLV(LOW,20)),DRAWNULL);

VAR13:=IF(CURRBARSCOUNT<20 AND CLOSE<100,CONST(HHV(CLOSE,20)),DRAWNULL);

价咯还低:VAR12+0.1;

DRAWICON(MA(LOW,20)/价咯还低<1.02 AND LOW/价咯还低<1.02,价咯还低,26);

VAR14:=STRCAT(4,STRCAT(STRCAT(STRCAT(5,HYBLOCK),STRCAT(6,DYBLOCK)),STRCAT(7,GNBLOCK)));

VAR15:=STRCAT(STRCAT(8,CON2STR(TOTALCAPITAL/1000000,2)),9);

VAR16:=STRCAT(STRCAT(10,CON2STR(CAPITAL/1000000,2)),9);

VAR17:=STRCAT(STRCAT(11,CON2STR(CAPITAL/TOTALCAPITAL*100,2)),12);

VAR18:=STRCAT(STRCAT(13,CON2STR(CAPITAL/1000000*CLOSE,2)),9);

VAR19:=STRCAT(14,CON2STR(HHV((BARSCOUNT(CLOSE)=0)*(DATE+19000000),0),0));

VAR20:=STRCAT(15,STRCAT(STRCAT(STRCAT(STRCAT(VAR15,VAR16),VAR17),VAR18),VAR19));

VAR21:=STRCAT(16,CON2STR(CLOSE/FINANCE(33),2));

VAR22:=STRCAT(17,CON2STR(CLOSE/(FINANCE(20)/FINANCE(1)),2));

VAR23:=STRCAT(18,CON2STR(CLOSE/FINANCE(34),2));

VAR24:=STRCAT(19,CON2STR(FINANCE(33)/FINANCE(34)*100,2));

VAR25:=STRCAT(20,CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));

VAR26:=STRCAT(21,CON2STR(FINANCE(30)/FINANCE(20)*100,2));

VAR27:=STRCAT(22,CON2STR(FINANCE(23)/FINANCE(20)*100,2));

VAR28:=STRCAT(23,STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(VAR21,VAR22),VAR23),VAR24),VAR25),VAR26),VAR27));

DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,VAR14),COLORMAGENTA;

DRAWTEXT_FIX(ISLASTBAR,0.005,0.09,0,VAR20),COLORMAGENTA;

DRAWTEXT_FIX(ISLASTBAR,0.005,0.18,0,VAR28),COLORMAGENTA;

VAR29:=STRCAT(HYBLOCK,24);{股票指标网 }

VAR30:=STRCAT(VAR29,FGBLOCK);

VAR31:=STRCAT(VAR30,DYBLOCK);

VAR32:=STRCAT(VAR31,24);

DRAWTEXT_FIX(ISLASTBAR,0.005,0.28,0,STRCAT(VAR32,GNBLOCK)),COLORMAGENTA;

拉升成本:COST(75),COLORRED;

 

原理解析：
VAR1赋值:(2*收盘价+最高价+最低价的绝对值/4-收盘价的30日简单移动平均)/收盘价的30日简单移动平均
输出Q:DMA((2*收盘价+最低价+最高价)/4,VAR1),COLORMAGENTA, 线宽为3
VAR2赋值:收盘价/Q
VAR3赋值:MA(VAR2*(2*收盘价+最高价+最低价)/4,3)
VAR4赋值:(VAR3-Q)/Q/3
VAR5赋值:VAR3-VAR4*VAR3
如果VAR5<=Q返回Q否则返回DRAWNULL
输出A:VAR5,画黄色, 线宽为2
如果VAR5<=Q返回VAR5否则返回DRAWNULL
VAR6:=最高价/1日前的收盘价的13日简单移动平均*收盘价
VAR7:=最低价/1日前的收盘价的13日简单移动平均*收盘价
VAR8:=FORCAST(收盘价,3)
VAR9:=FORCAST(收盘价,4)
VAR10:=FORCAST(收盘价,5)
VAR11:=(VAR8+VAR9+VAR10)/3
输出高点:1日前的VAR6,COLORMAGENTA,LINETHICK0
输出低点:1日前的VAR7,COLORFF5500,LINETHICK0
实际输出高点:最高价,画红色,LINETHICK0
实际输出低点:最低价,画绿色,LINETHICK0
明日输出高点:VAR6,COLORMAGENTA,LINETHICK0
MA1:收盘价的5日简单移动平均,画白色
MA2:收盘价的38日简单移动平均,COLORLIRED
MA3:收盘价的48日简单移动平均,画黄色
MA4:收盘价的58日简单移动平均, 画蓝色
MA5:收盘价的68日简单移动平均,画绿色
MA6:收盘价的78日简单移动平均,COLORCYAN
VAR12:=IF(CURRBARSCOUNT<20 AND 收盘价<100,CONST(20日内最低价最低值),DRAWNULL)
VAR13:=IF(CURRBARSCOUNT<20 AND 收盘价<100,CONST(20日内收盘价最高值),DRAWNULL)
输出价咯还低:VAR12+0.1
DRAWICON(最低价的20日简单移动平均/价咯还低<1.02 AND 最低价/价咯还低<1.02,价咯还低,26)
VAR14:=STRCAT(4,STRCAT(STRCAT(STRCAT(5,HYBLOCK),STRCAT(6,DYBLOCK)),STRCAT(7,GNBLOCK)))
VAR15:=STRCAT(STRCAT(8,CON2STR(TOTALCAPITAL/1000000,2)),9)
VAR16:=STRCAT(STRCAT(10,CON2STR(CAPITAL/1000000,2)),9)
VAR17:=STRCAT(STRCAT(11,CON2STR(CAPITAL/TOTALCAPITAL*100,2)),12)
VAR18:=STRCAT(STRCAT(13,CON2STR(CAPITAL/1000000*收盘价,2)),9)
VAR19:=STRCAT(14,CON2STR(HHV((收盘价的有效数据周期数=0)*(DATE+19000000),0),0))
VAR20:=STRCAT(15,STRCAT(STRCAT(STRCAT(STRCAT(VAR15,VAR16),VAR17),VAR18),VAR19))
VAR21:=STRCAT(16,CON2STR(收盘价/FINANCE(33),2))
VAR22:=STRCAT(17,CON2STR(收盘价/(FINANCE(20)/FINANCE(1)),2))
VAR23:=STRCAT(18,CON2STR(收盘价/FINANCE(34),2))
VAR24:=STRCAT(19,CON2STR(FINANCE(33)/FINANCE(34)*100,2))
VAR25:=STRCAT(20,CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2))
VAR26:=STRCAT(21,CON2STR(FINANCE(30)/FINANCE(20)*100,2))
VAR27:=STRCAT(22,CON2STR(FINANCE(23)/FINANCE(20)*100,2))
VAR28:=STRCAT(23,STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(VAR21,VAR22),VAR23),VAR24),VAR25),VAR26),VAR27))
当满足条件ISLASTBAR时,在横轴0.005纵轴0.02位置书写文字
当满足条件ISLASTBAR时,在横轴0.005纵轴0.09位置书写文字
当满足条件ISLASTBAR时,在横轴0.005纵轴0.18位置书写文字
VAR29:=STRCAT(HYBLOCK,24)
{股票指标网 }
VAR30:=STRCAT(VAR29,FGBLOCK)
VAR31:=STRCAT(VAR30,DYBLOCK)
VAR32:=STRCAT(VAR31,24)
DRAWTEXT_FIX(ISLASTBAR,0.005,0.28,0,STRCAT(VAR32,GNBLOCK)),COLORMAGENTA
输出拉升成本:获利盘为75%的成本分布,画红色