编程思路破译
填充背景
K线
涨停赋值:如果(模糊匹配品种代码OR(模糊匹配品种代码ANDDATE>=1200824)),返回(收盘价>=计算涨停价ANDC=最高价),否则返回(收盘价>=计算涨停价ANDC=最高价)
当满足条件涨停时,在开盘价和(收盘价-开盘价)*0.333+开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画淡蓝色
当满足条件涨停时,在(收盘价-开盘价)*0.333+开盘价和(收盘价-开盘价)*0.667+开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画黄色
当满足条件涨停时,在(收盘价-开盘价)*0.667+开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色
ZTT赋值:上次涨停距今天数
当满足条件收盘价<OANDC<=ZTT日前的开盘价ANDZTT<=7时,在开盘价和收盘价位置之间画柱状线,宽度为1.8,0不为0则画空心柱.,画蓝色
输出涨停参考价:如果模糊匹配品种代码ORCODELIKE('30'),返回计算涨停价,否则返回计算涨停价NODRAW,画红色
输出明日涨停价:如果模糊匹配品种代码ORCODELIKE('30'),返回计算涨停价,否则返回计算涨停价NODRAW,画淡红色
输出龙启线:(31日内最高价的最高值*92)/100,线宽为3,画黄色
D点赋值:龙启线>=1日前的龙启线 AND 1日前的龙启线<2日前的龙启线
龙归赋值:D点 AND 涨停 AND 1日前的统计3日中满足涨停的天数<=1 AND 1日前的取反=1 AND 收盘价>龙启线
HGT赋值:上次D点距今天数
龙跃赋值:涨停 AND 收盘价>龙启线 AND 1日前的统计HGT日中满足涨停ANDC>龙启线的天数<1 AND HGT>=1 AND 最近HGT日一直存在龙启线>=1日前的龙启线 AND 1日前的统计3日中满足涨停的天数<=1 AND 1日前的取反=1
龙腾赋值:涨停 AND 收盘价>龙启线 AND 1日前的统计5日中满足涨停的天数<=1 AND 1日前的取反=1 AND (((开盘价<1日前的龙启线 OR 开盘价<龙启线) AND 1日前的最近5日一直存在龙启线=1日前的龙启线 ) OR 2日前的最近13日一直存在龙启线=1日前的龙启线)AND 1日前的5日内收盘价的最低值<5日前的44日内收盘价的最高值
妖龙A赋值:龙归OR龙跃OR龙腾的8日过滤
当满足条件妖龙A时,在最低价*0.99位置书写文字,画淡灰色
程序源码
DRAWGBK(C>0, RGB(20,10,60),RGB(350,60,150),0,'1',0);
DRAWKLINE(H,O,L,C);
涨停:=IF((CODELIKE('68') OR (CODELIKE('30') AND DATE>=1200824)),(C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H) ,(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H));
STICKLINE(涨停,O,(C-O)*0.333+O,2,0),COLORLIBLUE;
STICKLINE(涨停,(C-O)*0.333+O,(C-O)*0.667+O,2,0),COLORYELLOW;
STICKLINE(涨停,(C-O)*0.667+O,C,2,0),COLORRED;
ZTT:=BARSLAST(涨停);
STICKLINE(C<O AND C<=REF(O,ZTT) AND ZTT<=7,O,C,1.8,0),COLORBLUE;
涨停参考价:IF(CODELIKE('68') OR CODELIKE('30'),ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1))NODRAW,COLORRED;
明日涨停价:IF(CODELIKE('68') OR CODELIKE('30'),ZTPRICE(C,0.2),ZTPRICE(C,0.1))NODRAW,COLORLIRED;
龙启线:(HHV(HIGH,31)*92)/100,LINETHICK3,COLORYELLOW;
D点:=龙启线>=REF(龙启线,1) AND REF(龙启线,1)<REF(龙启线,2);
龙归:=D点 AND 涨停 AND REF(COUNT(涨停,3),1)<=1 AND REF(NOT(涨停),1)=1 AND C>龙启线;
HGT:=BARSLAST(D点);
龙跃:=涨停 AND C>龙启线 AND REF(COUNT(涨停 AND C>龙启线,HGT),1)<1 AND HGT>=1 AND EVERY(龙启线>=REF(龙启线,1),HGT) AND REF(COUNT(涨停,3),1)<=1 AND REF(NOT(涨停),1)=1;
龙腾:=涨停 AND C>龙启线 AND REF(COUNT(涨停,5),1)<=1 AND REF(NOT(涨停),1)=1 AND (((O<REF(龙启线,1) OR O<龙启线) AND REF(EVERY(龙启线=REF(龙启线,1),5),1) ) OR REF(EVERY(龙启线=REF(龙启线,1),13),2))
AND REF(LLV(C,5),1)<REF(HHV(C,44),5);
妖龙A:=FILTER(龙归 OR 龙跃 OR 龙腾,8);
DRAWTEXT(妖龙A,L*0.99,'妖龙'),COLORLIGRAY;
注:
馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。
发文不易,如获益,欢迎赞赏,赞赏必复!
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。