当前位置：分析家公式网 → 股票公式 → 大智慧L2公式 → 一键转帖：孔明解盘大智慧版本（大智慧公式 主图 源码 测试图）
软件名称：[B]孔明解盘大智慧版本（大智慧公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：32.0 KB
官方主页：Home Page
更新时间：2022-07-28 00:15:56
软件简介:
这是本人从某宝换回来的 大智慧公式，是核心公式。
和谐出来分享给大家。
{孔明解盘}
VAR0:=LLV(HIGH,240);
VAR1:=CLOSE - VAR0;
VAR2:=100 * VAR1;
VAR3:=VAR2 / VAR0;
VAR4:=LLV(LOW,528);
VAR5:=CLOSE - VAR4;
VAR6:=HHV(HIGH,528);
VAR7:=VAR6 - VAR4;
VAR8:=0;
VAR9:=SMA(MAX(CLOSE - REF(CLOSE,1),0),34,1);
VAR10:=ABS(CLOSE - REF(CLOSE,1));
VAR11:=SMA(VAR10,7,1);
VAR12:=SMA(MAX(CLOSE - REF(CLOSE,1),0),13,1);
VAR13:=SMA(VAR10,13,1);
VAR14:=TROUGHBARS(3,16,1);
VAR15:=LOW + 0.04;
VAR16:=IF((VAR14 = 0) AND (HIGH > VAR15),4,0);
VAR17:=VAR16;
VAR18:=(((ZIG(3,6) > REF(ZIG(3,6),1)) AND (REF(ZIG(3,6),1) <= REF(ZIG(3,6),2))) AND (REF(ZIG(3,6),2) <= REF(ZIG(3,6),3))) + (((ZIG(3,22) > REF(ZIG(3,22),1)) AND (REF(ZIG(3,22),1) <= REF(ZIG(3,22),2))) AND (REF(ZIG(3,22),2) <= REF(ZIG(3,22),3)));
VAR19:=(VAR18 + (((ZIG(3,51) > REF(ZIG(3,51),1)) AND (REF(ZIG(3,51),1) <= REF(ZIG(3,51),2))) AND (REF(ZIG(3,51),2) <= REF(ZIG(3,51),3)))) + (((ZIG(3,72) > REF(ZIG(3,72),1)) AND (REF(ZIG(3,72),1) <= REF(ZIG(3,72),2))) AND (REF(ZIG(3,72),2) <= REF(ZIG(3,72),3)));
VAR20:=(((ZIG(3,6) < REF(ZIG(3,6),1)) AND (REF(ZIG(3,6),1) >= REF(ZIG(3,6),2))) AND (REF(ZIG(3,6),2) >= REF(ZIG(3,6),3))) + (((ZIG(3,22) < REF(ZIG(3,22),1)) AND (REF(ZIG(3,22),1) >= REF(ZIG(3,22),2))) AND (REF(ZIG(3,22),2) >= REF(ZIG(3,22),3)));
VAR21:=(VAR20 + (((ZIG(3,51) < REF(ZIG(3,51),1)) AND (REF(ZIG(3,51),1) >= REF(ZIG(3,51),2))) AND (REF(ZIG(3,51),2) >= REF(ZIG(3,51),3)))) + (((ZIG(3,72) < REF(ZIG(3,72),1)) AND (REF(ZIG(3,72),1) >= REF(ZIG(3,72),2))) AND (REF(ZIG(3,72),2) >= REF(ZIG(3,72),3)));
VAR22:=IF(CLOSE > MA(CLOSE,5),10,0 - 10);
VAR23:=IF(MA(CLOSE,5) > MA(CLOSE,10),10,0 - 10);
VAR24:=IF(CLOSE > MA(CLOSE,10),10,0 - 10);
VAR25:=IF(MA(CLOSE,5) > MA(CLOSE,20),10,0 - 10);
VAR26:=IF(CLOSE > MA(CLOSE,20),10,0 - 10);
VAR27:=IF(MA(CLOSE,20) > REF(MA(CLOSE,20),1),10,0 - 10);
VAR28:=BARSLAST(DISPSTATUS = 1);
VAR29:=IF((((AMOUNT / CLOSE) / (HHV(AMOUNT,20) / HHV(CLOSE,20))) * 100) > 100,100,((AMOUNT / CLOSE) / (HHV(AMOUNT,20) / HHV(CLOSE,20))) * 100);
DRAWTEXTREL(300,40,'旺铺：富人帝国（出品）量能饱和度：' + NUMTOSTRN(VAR29,0)),LINETHICK2,COLORYELLOW;
DRAWTEXTREL(10,0,'今日阻力=：' + NUMTOSTRN(REF((2 * ((((HIGH + LOW) + OPEN) + (2 * CLOSE)) / 5)) - LOW,1),2) + ''),COLORYELLOW;
DRAWTEXTREL(10,30,'今日支撑=：' + NUMTOSTRN(REF((2 * ((((HIGH + LOW) + OPEN) + (2 * CLOSE)) / 5)) - HIGH,1),2) + ''),COLORGREEN;
DRAWTEXTREL(10,60,'明日突破=：' + NUMTOSTRN(((((HIGH + LOW) + OPEN) + (2 * CLOSE)) / 5) + (HIGH - LOW),2)),COLORMAGENTA;
DRAWTEXTREL(10,90,'明日阻力=：' + NUMTOSTRN((2 * ((((HIGH + LOW) + OPEN) + (2 * CLOSE)) / 5)) - LOW,2)),COLORCYAN;
DRAWTEXTREL(10,120,'明日支撑=：' + NUMTOSTRN((2 * ((((HIGH + LOW) + OPEN) + (2 * CLOSE)) / 5)) - HIGH,2)),COLORRED;
DRAWTEXTREL(10,150,'明日反转=：' + NUMTOSTRN(((((HIGH + LOW) + OPEN) + (2 * CLOSE)) / 5) - (HIGH - LOW),2)),COLORGREEN;
VAR30:=(HIGH - LOW) * 0.618;
DRAWTEXTREL(820,800,'黄金卖点：' + NUMTOSTRN(EMA(CLOSE + VAR30,3),2)),LINETHICK2,COLORYELLOW;
DRAWTEXTREL(820,740,'黄金买点：' + NUMTOSTRN(EMA(((OPEN + HIGH) + LOW) / 3,4),2)),LINETHICK2,COLORYELLOW;
DRAWTEXTREL(820,870,'昨测今日买点：' + NUMTOSTRN(REF((EMA(((OPEN + HIGH) + LOW) / 3,4)) + ((((HIGH + LOW) / 2) - (REF(((OPEN + HIGH) + LOW) / 3,3))) / 4),1),2)),LINETHICK2,COLORWHITE;
VAR31:=((EMA(CLOSE + VAR30,3)) - (EMA(((OPEN + HIGH) + LOW) / 3,4))) * 0.618;
DRAWTEXTREL(820,930,'昨测今日卖点：' + NUMTOSTRN(REF((EMA(CLOSE + VAR30,3)) + VAR31,1),2)),LINETHICK2,COLORWHITE;
VAR32:=COST(0.33);
VAR33:=COST(5);
VAR34:=COST(15);
VAR35:=COST(55);
VAR36:=COST(97);
VAR37:=WINNER(CLOSE);
DRAWTEXTABS(520,25,'建仓:' + NUMTOSTRN(VAR33,2)),COLORYELLOW;
DRAWTEXTABS(600,25,'快刀:' + NUMTOSTRN(VAR34,2)),COLORYELLOW;
DRAWTEXTABS(675,25,'升浪:' + NUMTOSTRN(VAR35,2)),COLORYELLOW;
DRAWTEXTABS(520,40,'获利:' + NUMTOSTRN(VAR37 * 100,2) + '%'),COLORYELLOW;
DRAWTEXTABS(600,40,'套牢:' + NUMTOSTRN(100 - (VAR37 * 100),2) + '%'),COLORYELLOW;
DRAWTEXTABS(675,40,'预测:' + NUMTOSTRN(VAR36,2)),COLORYELLOW;
VAR38:=ATAN((EMA(((CLOSE + LOW) + HIGH) / 3,13)) - (REF(EMA(((CLOSE + LOW) + HIGH) / 3,13),1)));
VAR39:=VAR38 * 3.1416;
DRAWTEXT(FILTER(((VAR39 * 10) > 1) AND ((EMA(((CLOSE + LOW) + HIGH) / 3,13)) > (REF(EMA(((CLOSE + LOW) + HIGH) / 3,8),1))),10),EMA(CLOSE,8),'∠45上升'),COLORYELLOW;
VAR40:=(AMOUNT / VOL) * 0.9;
VAR41:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100) > 1.2;
VAR42:=MA(CLOSE,5) * 0.921;
VAR43:=MA(VOL,5) * 1.5;
老鼠仓:(((LOW < VAR40) AND VAR41) AND (LOW < VAR42)) AND (VOL < VAR43),LINETHICK0;
VAR44:=LOW * 0.99;
DRAWTEXT(老鼠仓,VAR44,'老鼠仓'),COLOR40CCFF;
VAR45:=HIGH * 1.02;
VAR46:=HIGH * 1.04;
阴阳分界线:EMA(CLOSE,17),LINETHICK1,COLORWHITE;
现价:EMA(CLOSE,1),LINETHICK1,COLORWHITE;
阴阳卖出带:阴阳分界线,LINETHICK1,COLORWHITE;
阴阳买入带:阴阳分界线;
阴阳卖出线:阴阳分界线,LINETHICK1,COLORRED;
阴阳买入线:阴阳分界线,LINETHICK1,COLORBLUE;
阳上:阴阳分界线 + (3 * STD(CLOSE,17)),LINETHICK1,COLORRED;
阳下:阴阳分界线 + (2 * STD(CLOSE,17)),LINETHICK1,COLORRED;
阴上:阴阳分界线 - (2 * STD(CLOSE,17)),LINETHICK1,COLORBLUE;
阴下:阴阳分界线 - (3 * STD(CLOSE,17)),LINETHICK1,COLORBLUE;
VAR47:=阴下 * 0.96;
DRAWBMP(CROSS(阴下,LOW),VAR47,'红宝石');
VAR48:=HIGH * 1.035;
DRAWBMP(CROSS(HIGH,阳上),VAR48,'绿宝石');
黄金生命线:阴阳分界线 * 1;
VAR49:=SMA(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100,5,1);
VAR50:=SMA(((CLOSE - LLV(LOW,21)) / (HHV(HIGH,21) - LLV(LOW,21))) * 100,6,1);
VAR51:=SMA(((CLOSE - LLV(LOW,21)) / (HHV(HIGH,21) - LLV(LOW,21))) * 100,5,1);
VAR52:=SMA(VAR51,5,1);
VAR53:=HIGH * 0.97;
DRAWTEXT((CROSS(MA((3 * VAR50) - (2 * VAR52),2),0)) AND ((EMA((3 * VAR49) - (2 * VAR49),5)) < 40),VAR53,'▲大黑马'),COLORYELLOW;
VAR54:=10;
DRAWTEXT((VAR17 > 0) OR (VAR19 > 0),LOW * 1,'←买入'),CROSSDOT,LINETHICK1,COLORRED;
DRAWTEXT(VAR21 > 0,HIGH * 1,'←卖出'),CROSSDOT,LINETHICK1,COLORGREEN;
VAR55:=((((VAR22 + VAR23) + VAR24) + VAR25) + VAR26) + VAR27;
VAR56:=CLOSE / INDEXC;
VAR57:=MA(VOL,5);
VAR58:=MA(VOL,10);
VAR59:=VAR28 + 1;
VAR60:=VAR28 + 1;
IF (((BARSTATUS = 2) AND (CLOSE < 200)) AND ((CROSS(VAR55,1) AND (VAR57 >= VAR58)) AND (VAR56 >= MA(VAR56,5)))) THEN BEGIN
DRAWTEXTABS(32,100,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。 '),LINETHICK3,COLORRED;
END
IF (((BARSTATUS = 2) AND (CLOSE < 200)) AND ((CROSS(VAR55,1) AND (VAR57 < VAR58)) AND (VAR56 >= MA(VAR56,5)))) THEN BEGIN
DRAWTEXTABS(32,100,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。 '),LINETHICK3,COLORRED;
END
IF (((BARSTATUS = 2) AND (CLOSE < 200)) AND ((CROSS(VAR55,1) AND (VAR57 > VAR58)) AND (VAR56 < MA(VAR56,5)))) THEN BEGIN
<[url=http://www.70822.com/soft/sort013/sort03/down-163460.html]孔明解盘大智慧版本（大智慧公式 主图 源码 测试图）[/url]