当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：红绿_蚌珠主图，和谐源码分享（通达信公式 主图源码 测试图）
软件名称：[B]红绿_蚌珠主图，和谐源码分享（通达信公式 主图源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：5.00 KB
官方主页：Home Page
更新时间：2022-07-28 00:15:35
软件简介:
{EXP_红绿_蚌珠}
{技术指标} {其他类型} {主图叠加}
{参数填入: { M1:(1,60,3); M2:(1,60,19); D:(30,90,72); }
魔鬼线:MA(CLOSE,321),NODRAW,COLORBLACK;
VAR1:=CROSS(CLOSE,MA(CLOSE,321));
VAR2:=(MA(VOL,5) > MA(VOL,60));
VAR3:=((CLOSE / REF(CLOSE,1)) > 1.04);
VAR4:=((VAR1 AND VAR2) AND VAR3);
DRAWTEXT_FIX(1,0.88,(1 - 0.1),10,DYBLOCK),COLORWHITE;
DRAWTEXT_FIX(1,0.94,(1 - 0.1),10,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.94,(1 - 0.15),10,GNBLOCK),COLORYELLOW;
VAR8:=REF(CLOSE,1);
VAR9:=IF(((((CLOSE - VAR8) * 100) / VAR8) >= (10 - ((0.01 * 100) / VAR8))),1,0);
STICKLINE(VAR9,OPEN,CLOSE,2.5,0),COLORYELLOW;
VAR11:=IF(((((VAR8 - CLOSE) * 100) / VAR8) >= (10 - ((0.01 * 100) / VAR8))),1,0);
STICKLINE(VAR11,OPEN,CLOSE,2.5,0),COLORWHITE;
VAR13:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);
VAR14:=(((CLOSE + HIGH) + LOW) / 3);
VAR15:=EMA(VAR14,10);
VAR16:=REF(VAR15,1);
DRAWBAND(VAR15,RGB(255,0,0),VAR16,RGB(0,0,255));
VAR18:=114080999;
VAR19:=IF((DATE < VAR18),1,DRAWNULL);
(DRAWBAND(VAR15,RGB(255,0,0),VAR16,RGB(0,0,255)) * VAR19);
DRAWTEXT((CROSS(DATE,VAR18) OR (DATE = VAR18)),REF(DRAWBAND(VAR15,RGB(255,0,0),VAR16,RGB(0,0,255)),1),1),COLORYELLOW;
M55:EXPMA(CLOSE,55),LINETHICK2,COLORMAGENTA;
IF((M55 <= REF(M55,1)),M55,DRAWNULL),LINETHICK2,COLORGREEN;
PMA:MA(CLOSE,6),DOTLINE,COLORWHITE;
IF((PMA > REF(PMA,1)),PMA,DRAWNULL),DOTLINE,COLORGREEN;
IF((PMA < REF(PMA,1)),PMA,DRAWNULL),DOTLINE,COLORRED;
VAR27:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
VAR28:=SMA(VAR27,3,1);
VAR29:=SMA(VAR28,3,1);
VAR30:=((3 * VAR28) - (2 * VAR29));
VAR31:=(CLOSE - REF(CLOSE,1));
VAR32:=((100 * EMA(EMA(VAR31,6),6)) / EMA(EMA(ABS(VAR31),6),6));
VAR33:=(((LLV(VAR32,2) = LLV(VAR32,7)) AND COUNT((VAR32 < 0),2)) AND CROSS(VAR32,MA(VAR32,2)));
DRAWTEXT(FILTER((VAR33 = 1),5),(LOW - 0.05),'抄底'),COLORMAGENTA;
STICKLINE(VAR33,OPEN,CLOSE,2,0),COLORYELLOW;
VAR36:=REF(HHV(HIGH,72),3);
顶:REFDATE(VAR36,DATE),DOTLINE,COLORYELLOW;
VAR38:=((CLOSE / REF(CLOSE,1)) > 1.0969);
STICKLINE(VAR38,CLOSE,OPEN,2,0),COLORRED;
STICKLINE(VAR38,HIGH,LOW,0,0),COLORRED;
VAR41:=(CLOSE * VOL);
VAR42:=EMA((((((EMA(VAR41,3) / EMA(VOL,3)) + (EMA(VAR41,6) / EMA(VOL,6))) + (EMA(VAR41,12) / EMA(VOL,12))) + (EMA(VAR41,24) / EMA(VOL,24))) / 4),13);
VAR43:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);
VAR44:=(((((((((8 * VAR43) + (7 * REF(VAR43,1))) + (6 * REF(VAR43,2))) + (5 * REF(VAR43,3))) + (4 * REF(VAR43,4))) + (3 * REF(VAR43,5))) + (2 * REF(VAR43,6))) + REF(VAR43,8)) / 36);
VAR45:=((((VOL = HHV(VOL,10)) AND (VOL > (2 * REF(VOL,1)))) AND (CLOSE > VAR44)) AND (CLOSE > REF(CLOSE,1)));
VAR46:=FILTER(VAR45,5);
VAR47:=0;
VAR48:=(CLOSE > MA(CLOSE,63));
VAR49:=(((((CLOSE > VAR47) AND VAR48) AND (CLOSE > HHV(MA((((LOW + HIGH) + CLOSE) / 3),5),60))) AND (CLOSE > (1.06 * EMA((((((EMA((CLOSE * VOL),3) / EMA(VOL,3)) + (EMA((CLOSE * VOL),6) / EMA(VOL,6))) + (EMA((CLOSE * VOL),12) / EMA(VOL,12))) + (EMA((CLOSE * VOL),24) / EMA(VOL,24))) / 4),13)))) AND (CLOSE > REF(CLOSE,1)));
DRAWTEXT(VAR49,(CLOSE * 1.04),'追'),COLORGREEN;
STICKLINE(VAR46,OPEN,CLOSE,3,0),COLORYELLOW;
VAR52:=((100 - (3 * SMA((((CLOSE - LLV(LOW,D)) / (HHV(HIGH,D) - LLV(LOW,D))) * 100),20,1))) + (2 * SMA(SMA((((CLOSE - LLV(LOW,D)) / (HHV(HIGH,D) - LLV(LOW,D))) * 100),20,1),15,1)));
VAR53:=((100 - (3 * SMA((((OPEN - LLV(LOW,D)) / (HHV(HIGH,D) - LLV(LOW,D))) * 100),20,1))) + (2 * SMA(SMA((((OPEN - LLV(LOW,D)) / (HHV(HIGH,D) - LLV(LOW,D))) * 100),20,1),15,1)));
活筹OAMV:VAR52,NODRAW;
VAR55:=EMA(((AMOUNT / VOL) / 100),5);
VAR56:=EMA(((AMOUNT / VOL) / 100),13);
VAR57:=(VAR55 - VAR56);
势能:IF((((1000 * VAR57) / VAR55) > 0),((1000 * VAR57) / VAR55),0),NODRAW;
VAR59:=(CROSS(势能,活筹OAMV) AND (CLOSE > REF(CLOSE,1)));
DRAWTEXT(VAR59,(LOW * 0.91),'抄底'),COLORMAGENTA;
VAR61:=(((REF(CLOSE,2) / REF(CLOSE,3)) < 0.96) AND ((REF(OPEN,2) / REF(CLOSE,2)) > 1.05));
VAR62:=BETWEEN((REF(OPEN,1) / REF(CLOSE,2)),1.02,0.98);
VAR63:=((BETWEEN((OPEN / REF(OPEN,1)),1.02,0.98) AND ((CLOSE / REF(CLOSE,1)) > 1.05)) AND ((CLOSE / OPEN) > 1.05));
XG:((VAR61 AND VAR62) AND VAR63),NODRAW;
VAR65:=(EMA(CLOSE,12) - EMA(CLOSE,26));
VAR66:=EMA(VAR65,9);
VAR67:=(BETWEEN((REF(CLOSE,1) / REF(CLOSE,2)),0.97,1.05) AND ((MAX(REF(CLOSE,1),REF(OPEN,1)) / MIN(REF(CLOSE,1),REF(OPEN,1))) < 1.03));
VAR68:=(((CLOSE = HHV(CLOSE,5)) AND (CLOSE > OPEN)) AND ((CLOSE / REF(CLOSE,1)) > 1.03));
VAR69:=((((MA(CLOSE,10) > MA(CLOSE,20)) AND (MA(CLOSE,20) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60))) AND (MA(CLOSE,30) > MA(CLOSE,120)));
VAR70:=(VAR65 > VAR66);
VAR71:=(COUNT(((REF(CLOSE,1) > REF(MA(CLOSE,20),1)) AND REF((MA(CLOSE,10) > MA(CLOSE,20)),1)),5) = 5);
VAR72:=((((COUNT(VAR67,5) = 5) AND VAR68) AND VAR69) AND VAR70);
DRAWTEXT(VAR72,(LOW * 1.01),'抄底'),COLORWHITE;
{参数精灵: 请设置计算参数:
M1: PARAM#0 (1.00--60.00)
M2: PARAM#1 (1.00--60.00)
D: PARAM#2 (30.00--90.00) }
{-----------------------------------};
[url=http://www.70822.com/soft/sort013/sort05/down-163465.html]红绿_蚌珠主图，和谐源码分享（通达信公式 主图源码 测试图）[/url]