编程思路破译 输出股:当前流通股本(手)/1000000,画白色,线宽为0 输出成交总量:成交量(手),POINTDOT,画黄色 X_1赋值:121120199 X_2赋值:成交量(手)/((最高价-最低价)*2-收盘价-开盘价的绝对值) 输出主买:如果收阳线,返回X_2*(最高价-最低价),否则返回如果收阴线,返回X_2*(最高价-开盘价+(收盘价-最低价)),否则返回成交量(手)/2,POINTDOT,画红色 输出主卖:如果收阳线,返回X_2*(最高价-收盘价+(开盘价-最低价)),否则返回如果收阴线,返回X_2*(最高价-最低价),否则返回成交量(手)/2,POINTDOT,画绿色 输出买卖差额:主买-主卖,NODRAW,画黄色 当满足条件如果日期<X_1,返回收盘价>=1日前的收盘价,否则返回无效数时,在0和成交量(手)位置之间画柱状线,宽度为2.2,1不为0则画空心柱.,画红色 当满足条件如果日期<X_1,返回收盘价<1日前的收盘价,否则返回无效数时,在0和成交量(手)位置之间画柱状线,宽度为2.2,1不为0则画空心柱.,画淡蓝色 当满足条件如果日期<X_1,返回主买>0,否则返回无效数时,在0和主买位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,画红色 输出资金异动:成交量(手)/成交量(手)的55日简单移动平均*100,画黄色 当满足条件如果日期<X_1,返回主卖>0,否则返回无效数时,在0和主卖位置之间画柱状线,宽度为1.8,0不为0则画空心柱.,画淡绿色 输出成交量比%:主买/成交量(手)*100,NODRAW,画白色 当满足条件如果日期<X_1,返回资金异动>100AND成交量比%>60,否则返回无效数时,在0和成交量(手)位置之间画柱状线,宽度为0.1,0不为0则画空心柱.,画黄色 输出当天换手率%:100*成交量(手)/(流通股本(股)/100),NODRAW,画黄色 输出五天换手率%:当天换手率%的5日简单移动平均,NODRAW,画红色,线宽为3 输出十天换手率%:当天换手率%的10日简单移动平均,NODRAW,画蓝色,线宽为3 X_3赋值:0.9上穿1/成交量(手)*1000>0.01ANDKDJ.J<0 当满足条件如果日期<X_1,返回X_3>0,否则返回无效数时,在0和成交量(手)位置之间画柱状线,宽度为0.16,0不为0则画空心柱.,画红色 X_4赋值:收盘价-1日前的收盘价和0的较大值的6日[1日权重]移动平均/收盘价-1日前的收盘价的绝对值的6日[1日权重]移动平均*100 当满足条件日期>X_1时,在横轴0.45纵轴0.2位置书写文字,画青色 程序源码 股:CAPITAL/1000000,COLORWHITE,LINETHICK0; 成交总量:VOL,POINTDOT,COLORYELLOW; X_1:=121120199; X_2:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主买:IF(CLOSE>OPEN,X_2*(HIGH-LOW),IF(CLOSE< OPEN,X_2*(HIGH-OPEN+(CLOSE-LOW)),VOL/2)),POINTDOT,COLORRED; 主卖:IF(CLOSE>OPEN,X_2*(HIGH-CLOSE+(OPEN-LOW)),IF(CLOSE< OPEN,X_2*(HIGH-LOW),VOL/2)),POINTDOT,COLORGREEN; 买卖差额:主买-主卖,NODRAW,COLORYELLOW; STICKLINE(IF(DATE< X_1,CLOSE>=REF(CLOSE,1),DRAWNULL),0,VOL,2.2,1),COLORRED; STICKLINE(IF(DATE< X_1,CLOSE< REF(CLOSE,1),DRAWNULL),0,VOL,2.2,1),COLORLIBLUE; STICKLINE(IF(DATE< X_1,主买>0,DRAWNULL),0,主买,2.2,0),COLORRED; 资金异动:VOL/MA(VOL,55)*100,COLORYELLOW; STICKLINE(IF(DATE< X_1,主卖>0,DRAWNULL),0,主卖,1.8,0),COLORLIGREEN; 成交量比%:主买/VOL*100,NODRAW,COLORWHITE; STICKLINE(IF(DATE< X_1,资金异动>100 AND 成交量比%>60,DRAWNULL),0,VOL,0.1,0),COLORYELLOW; 当天换手率%:100*VOL/(FINANCE(7)/100),NODRAW,COLORYELLOW; 五天换手率%:MA(当天换手率%,5),NODRAW,COLORRED,LINETHICK3; 十天换手率%:MA(当天换手率%,10),NODRAW,COLORBLUE,LINETHICK3; X_3:=CROSS(0.9,1/VOL*1000>0.01 AND KDJ.J< 0); STICKLINE(IF(DATE< X_1,X_3>0,DRAWNULL),0,VOL,0.16,0),COLORRED; X_4:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100; DRAWTEXT_FIX(DATE>X_1,0.45,0.2,0,2),COLORCYAN 注: 馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。 发文不易,如获益,欢迎赞赏,赞赏必复! |
|