正文概述

DRAWGBKLAST(CLOSE>0,STRIP(RGB(95,95,95),RGB(0,0,0),0));
MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20);
MA40:=MA(C,40);
MA60:=MA(C,60);
BIAS:=(C-MA20)/MA20*100;
SHOPEN:=OPEN;
SHHIGH:=HIGH;
SHLOW:=LOW;
SHCLOSE:=CLOSE;
SHAMOUNT:=AMOUNT;
SHVOL:=VOL;
J12:=(HIGH – ((HIGH – LOW) / 3));
J23:=(LOW + ((HIGH – LOW) / 3));
t1:=(((IF((CLOSE = OPEN),1,0) + IF((CLOSE >= J12),1,0)) + IF((CLOSE 1);
t2:=((((CLOSE > J23) AND (CLOSE J23)) AND (OPEN
t3:=((CLOSE >= J12) AND (OPEN
t4:=(((OPEN = J23)) AND (CLOSE > J12));
t5:=(((OPEN = J23));
t6:=((CLOSE = J12));
t7:=(((OPEN = J23)) AND (CLOSE
t8:=(((OPEN >= J12) AND (CLOSE = J23));
t9:=(((SHAMOUNT / SHVOL) / 100) > REF(HIGH,1));
t10:=(((SHAMOUNT / SHVOL) / 100)
if DISPSTATUS=2 then begin;
var1000:=’   ★★★★★                                              ‘;
if t1>0  then var1000:=var1000+’☆ 极端行情,在未来的几日内有85%的机会变更方向                                            ‘;
if t2>0  then var1000:=var1000+’☆ 中性行情,多空双方都未能取得当日行情主动性的控制权                                            ‘;
if t3>0  then var1000:=var1000+’☆ 爬升行情,整个交易期间都有买方主导                                            ‘;
if t4>0  then var1000:=var1000+’☆ 爬升行情,信息较少,但收盘期间是买方主导,其他未知                                            ‘;
if t5>0  then var1000:=var1000+’☆ 爬升行情,买方把收盘价拉升到开盘价之上,卖方却也主导一段行情,但不知道是谁主导最后的行情                                            ‘;
if t6>0  then var1000:=var1000+’☆ 漂流行情,整个交易期间都有卖方主导                                            ‘;
if t7>0  then var1000:=var1000+’☆ 漂流行情,信息最少,但收盘期间是卖方主导,其他未知                                            ‘;
if t8>0  then var1000:=var1000+’☆ 漂流行情,卖方把收盘价压至到开盘价之下,买方却也主导一段行情,但不知道是谁主导最后的行情                                            ‘;
if t9>0  then var1000:=var1000+’☆ 上涨趋势                                            ‘;
if t10>0  then var1000:=var1000+’☆ 下跌趋势                                            ‘;
if MA20>=MA60 AND CROSS(MA40,MA60) then var1000:=var1000+’☆ 形成季托，待股价回落到20天均线或40天均线时介入，20天均价为:’+MA20+’                                            ‘;
if BIAS>9.5 AND (C-REF(C,1))/REF(C,1)*100                                           ‘;
if MA20>=MA60 AND H>=MA20 AND LO AND C>REF(C,1) then var1000:=var1000+’☆ 芙蓉出水，趋势向好                                            ‘;
if BIAS-9.8 then var1000:=var1000+’☆ 股价严重超跌，有爆发要求                                            ‘;
if BIAS                                           ‘;
if ABS(HIGH-REF(HIGH,1))/HIGH                                           ‘;
if ABS(LOW-REF(LOW,1))/LOW                                           ‘;
if CLOSE=OPEN AND  HIGHclose and lowclose and HIGH/LOW > 1.03 then var1000:=var1000+’☆ 长十字 -多空激争前途未明                                            ‘;
if OPEN/CLOSE > 1.05 AND HIGH/LOW                                            ‘;
if REF(CLOSE,1)                                           ‘;

{接上页}
if (MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667 then var1000:=var1000+’☆ 长下影 -下档支撑强或空方试探进攻                                                     ‘;
if (HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667 then var1000:=var1000+’☆ 长上影 -上档阻力大或多方试探进攻                                            ‘;
if CLOSE=OPEN AND CLOSE=LOW AND CLOSEHIGH then var1000:=var1000+’☆ 垂死十字 -在顶部时重要表强力多头开始疲软                                            ‘;
if HIGH=CLOSE AND HIGHLOW then var1000:=var1000+’☆ 光头阳线 -今日尾盘多方气盛可能延续到明天                                            ‘;
if (HIGHREF(HIGH,1)) then var1000:=var1000+’☆ 跳空缺口 -当日未补有与跳空同向进行欲望强烈三日为回补观察期                                            ‘;
if LOW=CLOSE AND HIGHLOW then var1000:=var1000+’☆ 赤脚阴线 -尾盘空方胜注意延续次日                                            ‘;
if CLOSE=OPEN AND HIGHclose and lowclose and high close then var1000:=var1000+’☆ 十字星 -警告信号 原趋势停顿或反转依上下影线长度判后市                                            ‘;
if CLOSE/OPEN>1.05 AND HIGH/LOW                                            ‘;
IF REF(CLOSE,2)/REF(OPEN,2) 1.05 AND CLOSE>REF(CLOSE,2)   THEN
   var1000:=var1000+’☆ 早晨十字 -同晨星从看空平衡到看涨 转强左右跳空曰弃婴                                            ‘;
IF REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,4)   THEN 
   var1000:=var1000+’☆ 上升三部曲 -空方卖压被吸纳趋势易顺势走涨                                            ‘;
IF (ref(high,2) -ref(o,2))/ref(high,2)ref(o,1) AND ref(c,1)>o AND ref(c,1)0 AND ref(low,1)-ref(c,1)0 AND ref(c,2)-ref(low,2)>0   THEN 
   var1000:=var1000+’☆ 三胎鸦 -多头走势被扭转 黑K价愈深量愈大 跳空愈大反转信号愈强                                            ‘;
IF ((REF(CLOSE,1)OPEN AND ABS(CLOSE-REF(CLOSE,1))/CLOSEREF(OPEN,1) AND CLOSE  THEN 
   var1000:=var1000+’☆ 友好反攻 -阴(阳)线结合极线 多方跳低(高)后反弹有企稳迹象                                            ‘;
IF closeopen and MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5)   THEN 
   var1000:=var1000+’☆ 射击之星 -如伴大量上遇阻力 有短期见顶可能转疲                                            ‘;
IF REF(CLOSE,1)-REF(OPEN,1)0 AND OPEN-REF(CLOSE,1)REF(CLOSE,1) AND CLOSE>(REF(CLOSE,1)+REF(OPEN,1))/2   THEN 
   var1000:=var1000+’☆ 贯穿线 -多头力道的反扑或是空单回补力道 长黑之后开低收在前天1/2之上多头反转信号                                            ‘;
IF ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 AND ABS(CLOSE-OPEN)/CLOSE MIN(REF(CLOSE,1),REF(OPEN,1))   THEN 
   var1000:=var1000+’☆ 身怀六甲 -阴(阳)怀阳(阴)怪异的走势显示该股行情可能转向若量由大转缩更明                                            ‘;
IF (ref(c,1)-ref(o,1)0 AND c>ref(o,1) AND o  THEN 
   var1000:=var1000+’☆ 多头阳线吞噬 -红包黑 反转趋势配合量                                            ‘;
IF ((ref(c,2)-ref(o,2)>0 AND (ABS(ref(c,2)-ref(o,2)))/(ABS(ref(c,3)-ref(o,3)))>2.4 AND ABS(c-o)>3 AND ABS(ref(c,2)-ref(o,2))>(ABS(ref(c,1)-ref(o,1))) AND ref(c,1)-ref(o,1)>0 AND c-oref(c,2) AND oref(o,2)) OR (ref(c,2)-ref(o,2)>0 AND (ABS(ref(c,2)-ref(o,2)))/(ABS(ref(c,3)-ref(o,3)))>2.4 AND ABS(c-o)>3 AND (ABS(ref(c,2)-ref(o,2)))>(ABS(ref(c,1)-ref(o,1))) AND ref(c,1)-ref(o,1)ref(c,2)  AND cref(o,2) AND o  THEN 
   var1000:=var1000+’☆ 夜星 -从看多平衡到看空 转弱转空                                            ‘;
IF ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 AND CLOSE=OPEN AND CLOSE MIN(REF(CLOSE,1),REF(OPEN,1))   THEN 
   var1000:=var1000+’☆ 十字胎 -似身怀六甲转向可能性更大量缩观望为宜                                            ‘;
IF ref(c,1)0 AND c>ref(H,1) AND oref(max(O,C),2) and ref(C,1)>ref(min(O,C),2) and ref(max(O,C),2)>ref(max(O,C),3)   THEN 
   var1000:=var1000+’☆ 双人殉情  在上升趋势中最后之空头吞噬也就是所谓的不见长红不回头                                            ‘;
IF (ref(c,1)-ref(o,1)>0 AND c-oref(c,1))   THEN 
   var1000:=var1000+’☆ 阴线吞噬 -黑包红向空反转                                            ‘;
IF REF(CLOSE,1)/REF(OPEN,1)1.03 AND OPENREF(CLOSE,1)   THEN 
   var1000:=var1000+’☆ 曙光 -与乌云盖顶相反行情将演化为V型反转或止跌横盘趋势                                            ‘;
IF (ref(c,1)-ref(o,1)0 AND cref(c,1))   THEN 
   var1000:=var1000+’☆ 多头孕育线 -阴育阳多头反转可能                                            ‘;
IF (ref(c,1)-ref(o,1)>0 AND (ABS(ref(c,1)-ref(o,1)))/(ABS(ref(c,2)-ref(o,2)))>2.4 AND c-oref(o,1) AND ref(c,1)-o>2)   THEN 
   var1000:=var1000+’☆ 空头孕育线 –阳育阴看空                                            ‘;
IF (ref(c,1)-ref(o,1)ref(c,1) AND o  THEN 
   var1000:=var1000+’☆ 空头孕育线 -阴育阴看空                                            ‘;
IF REF(CLOSE,2)  THEN 
   var1000:=var1000+’☆ 三只乌鸦 -强烈转空趋势三黑K价越深量越大越易下跌                                            ‘;
IF REF(CLOSE,4)/REF(OPEN,4)REF(OPEN,3) AND REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND REF(LOW,4)REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN  THEN 
   var1000:=var1000+’☆ 下跌三部曲 -多方弱势不堪一击趋势易顺势走跌                                            ‘;
IF REF(CLOSE,4)/REF(OPEN,4)>1.02 AND REF(CLOSE,3)=REF(open,4) AND REF(high,1)REF(open,4) AND CLOSE/OPEN>1.01 AND open>=REF(open,1) AND CLOSE>=REF(HIGH,3)   THEN 
   var1000:=var1000+’☆ 连续型态之执垫 -比上升三法更具多头意义                                            ‘;
IF ref(O,1)/ref(C,1) > 1.05 AND ref(H,1)/ref(L,1) O and O  THEN 
   var1000:=var1000+’☆ 颈上线 -下降趋势若第二天大量维持原趋势可能大增                                            ‘;
IF (ref(c,1)-ref(o,1)>0 AND (ABS(ref(c,1)-ref(o,1)))/(ABS(ref(c,2)-ref(o,2)))>2.5 AND c-oref(o,1) AND cref(c,1))   THEN 
   var1000:=var1000+’☆ 乌云罩顶 -上涨遇重大阻力空头聚力                                            ‘;
IF (ref(c,1)-ref(o,1)>0 AND c-oref(c,1))   THEN 
   var1000:=var1000+’☆ 最后吞噬 -在下降趋势中 为一黑一红组合 多头吞噬 在上升趋势中 为一红一黑组合空头吞噬                                            ‘;
IF ref(open,1)ref(close,1) and REF(CLOSE,2)/REF(OPEN,2) 1.05 AND CLOSE>REF(CLOSE,2)   THEN 
   var1000:=var1000+’☆ 晨星 -多方势盛变盘信号’;
IF MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > 3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE   THEN 
   var1000:=var1000+’☆ 倒转槌头 -高位抛压低位多空争执’;
IF HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE   THEN 
   var1000:=var1000+’☆ 槌头 -下影线有多头意义 在下降趋势之后看涨注意反弹卖压                                            ‘;
IF HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > 3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE > MA(CLOSE,5)   THEN 
   var1000:=var1000+’☆ 吊颈线 -高档看跌                                            ‘;
IF ((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPENREF(CLOSE,1)) OR (REF(CLOSE,1)/REF(OPEN,1)1.04 AND CLOSE>REF(OPEN,1) AND OPEN  THEN 
   var1000:=var1000+’☆ 穿头破脚 -若第一根K为阴(阳) 表强劲上涨(下跌)力量                                            ‘;
IF ref(open,1)ref(close,1) and REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1) > REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)  THEN 
   var1000:=var1000+’☆ 黄昏之星 -空方势盛反转信号跳空成弃婴                                            ‘;
IF REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)-REF(OPEN,2))/REF(OPEN,2)>=2/100  AND REF(OPEN,1)>=REF(CLOSE,1) AND (REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)=REF(OPEN,2) AND C>=OPEN AND (CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN  THEN 
   var1000:=var1000+’☆ 二阳夹一阴  -必须从后续的走势来研判                                            ‘;
IF OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1)-REF(OPEN,1))  THEN 
   var1000:=var1000+’☆ 分离 -两日开盘相同一阴一阳变盘前彻底整理                                            ‘;
IF ((O>C and open>MA(C,5) and Open>MA(C,10) and O>MA(C,20) and CloseMA(C,5) and Close>MA(C,10) and Close>MA(C,20)))   THEN 
   var1000:=var1000+’☆ 断头铡刀(出水芙蓉) -一根大阴(阳)线切断了三根均线 如果改变了其后均线的排列为空头(多头)排列后势看空(多)                                            ‘;
   end;
TIPTEXT(DISPSTATUS=2,0,var1000);

 

{均线语言 箱体空间}
if DISPSTATUS=2 then aaa:=BARPOS;
if DISPSTATUS=1 then bbb:=BARPOS;
ddd:=aaa-bbb;
ee:=hhv(h,ddd);
MSTATUS:=BARSTATUS=2;
MA5:=MA(C,5);
MA10:=MA(C,10);
MA30:=MA(C,30);
MA60:=MA(C,60);
MA125:=MA(C,125);
MA250:=MA(C,250);
i:=1;
IF MSTATUS and (MA5 > MA10 and MA10 > MA30 and MA5 > MA30) THEN BEGIN DRAWTEXTABS(0,i*16,’短期均线多头排列。股价高位谨防筑顶。中低位当股价向上突破5、10、30日均线，均线呈多头排列是最佳买入时机。’+ma5+’ > ‘+ma10+’ > ‘+ma30+’;’),COLORRED,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (MA5
i:=i+1;
END;
IF MSTATUS and (MA30 > MA60 and MA30 > MA125 and MA60 > MA125) THEN BEGIN DRAWTEXTABS(0,i*16,’中期均线多头排列。注意股价突然下跌，当股价回档至当前盘面30、60、125日任一均线获得支撑，关注均线助涨，次日股价放量向上突破，是中长期最佳买入时机。’+ma30+’ > ‘+ma60+’ > ‘+ma125+’;’),COLORRED,ALIGN0,LINETHICK0;
i:=i+1;
END;

IF MSTATUS and (MA30
i:=i+1;
END;
IF MSTATUS and (MA60 > MA125 and MA125 > MA250 and MA60 > MA250) THEN BEGIN DRAWTEXTABS(0,i*16,’长期均线多头排列。即60，125，250日均线向上多头排列。注意：当股价处于箱体顶部，所有均线多头排列，股价反复震荡不能突破，可能顶部即将形成。’+ma60+’ > ‘+ma125+’ > ‘+ma250+’;’),COLORRED,ALIGN0,LINETHICK0;
i:=i+1; END;
IF MSTATUS and (MA60
i:=i+1;
END;
IF MSTATUS and (CROSS(MA5,MA10)) THEN BEGIN DRAWTEXTABS(0,i*16,’短期5日10日均线金叉。注意观察股价在箱体的位置，30日和其他均线是否成为股价上涨的阻力，或股价在高位的运行方向，判断是反转上涨还是下跌中途的小反弹。’),COLORRED,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA10,MA5)) THEN BEGIN DRAWTEXTABS(0,i*16,’短期5日10日均线死叉。当股价反弹遭遇30日和其他均线的阻力形成死叉，可能是股价下跌中途的小反弹。高位区死叉，必须逃顶或止损。’),COLORGREEN,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA125)) THEN BEGIN DRAWTEXTABS(0,i*16,’今日股价上穿半年线。在半年线上方运行的个股被称为强势股。适合中小资金根据短线技术指标套利操作。’),COLORFF00FF,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA125,C)) THEN BEGIN DRAWTEXTABS(0,i*16,’今日股价跌破半年线。在半年线下方运行的个股被称为弱势股。适合大资金进场吸筹操作。’),COLORGREEN,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA250)) THEN BEGIN DRAWTEXTABS(0,i*16,’今日股价上穿年线。股票筑底后，股价经过反复震荡洗盘上穿年线，予以锁定跟踪。’),COLORFF00FF,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (CROSS(MA250,C)) THEN BEGIN DRAWTEXTABS(0,i*16,’今日股价跌破年线。跌破年线，证明深度调整格局可能形成。如果后市股价继续深跌，调整时间和空间难以预测。’),COLORGREEN,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (CROSS(C,MA60) and CROSS(C,MA125) and CROSS(C,MA250)) THEN BEGIN DRAWTEXTABS(0,i*16,’股价一阳穿三线。5、10、30日均线三线合一，股价一阳穿三线，向上反转，可能变盘反转在即。’),COLORRED,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (MA30 > REF(MA30,1)) THEN BEGIN DRAWTEXTABS(0,i*16,’30日均线趋势向上。注意：如果股价在低位中位30日均线之上，围绕另一条重要均线缩量横盘，随后5-10日均线金叉，所有均线向上呈多头排列，是中长期绩优牛股的摇篮。’),COLORRED,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (MA30 > REF(MA30,1) AND MA30
i:=i+1;
END;
IF MSTATUS and (MA30
i:=i+1;
END;
IF MSTATUS and (MA5 > REF(MA5,1)*1.015) THEN BEGIN DRAWTEXTABS(0,i*16,’5日均线强劲向上。需观察股价所处其他均线和箱体位置,如果收盘时股价突然跌破5日均线，则需观察箱体下方支撑，提防空头陷阱，股价转向。’),COLORRED,ALIGN0,LINETHICK0;
i:=i+1;
END;
IF MSTATUS and (MA5 > REF(MA5,1) AND MA5
i:=i+1;
END;
IF MSTATUS and (MA5
i:=i+1;
END;
均线30天角度:atan((MA(C,30)/ref(MA(C,30),3)-1)*100)*180/3.14159,LINETHICK0;
均线60天角度:atan((MA(C,60)/ref(MA(C,60),3)-1)*100)*180/3.14159,LINETHICK0;
均线125天角度:atan((MA(C,125)/ref(MA(C,125),3)-1)*100)*180/3.14159,LINETHICK0;
均线250天角度:atan((MA(C,250)/ref(MA(C,250),3)-1)*100)*180/3.14159,LINETHICK0;
{DRAWTEXTABS(10,140,’■60天均线角度:’+NUMTOSTRN(均线60角度,2)+”),ColorFFFFFF;}
{DRAWTEXTABS(160,140,’■125天均线角度:’+NUMTOSTRN(均线125角度,2)+”),ColorFFFFFF;};

大智慧K线形解主图源码

1. 本站所有资源来源于用户上传和网络，如有侵权请邮件联系站长！
2. 分享目的仅供大家学习和交流，请不要用于商业用途!
3. 如果你也有好源码或者教程，可以到用户中心发布，分享有积分奖励和额外收入！
4. 本站提供的源码、模板、插件等等其他资源，都不包含技术服务请大家谅解！
5. 如有链接无法下载、失效或广告，请联系管理员处理！
6. 本站资源售价只是赞助，收取费用仅维持本站的日常运营所需！
7. 如遇到加密压缩包，默认解压密码为"dtmb.taobao.com",如遇到无法解压的请联系管理员！
8. 因为资源和程序源码均为可复制品，所以不支持任何理由的退款兑现，请斟酌后支付下载
声明：如果标题没有注明"已测试"或者"测试可用"等字样的资源源码均未经过站长测试.特别注意没有标注的源码不保证任何可用性

指标资源网 » 大智慧K线形解主图源码

常见问题FAQ

免费下载或者VIP会员专享资源能否直接商用？
本站所有资源版权均属于原作者所有，这里所提供资源均只能用于参考学习用，请勿直接商用。若由于商用引起版权纠纷，一切责任均由使用者承担。更多说明请参考 VIP介绍。
提示下载完但解压或打开不了？
最常见的情况是下载不完整: 可对比下载完压缩包的与网盘上的容量，若小于网盘提示的容量则是这个原因。这是浏览器下载的bug，建议用百度网盘软件或迅雷下载。 若排除这种情况，可在对应资源底部留言，或 联络我们.。
你们有qq群吗怎么加入？
当然有的，如果你是帝国cms、易优cms、和pbootcms系统的爱好者你可以加入我们的QQ千人交流群https://zbzy.wmsjpt.com/page-qun.html。

小编 钻石

喜欢 0
分享到：

相关推荐

发表评论

  • 41会员数(个)
  • 9241资源数(个)
  • 0本周更新(个)
  • 0 今日更新(个)
  • 1233稳定运行(天)

提供最优质的资源集合

加入VIP