编程思路破译 输出WOL:如果到最后交易的周期=1ANDPERIOD=5,返回成交量(手)*240/当前离开盘分钟数,否则返回无效数,NODRAW 输出换手:成交量(手)/当前流通股本(手)*100,POINTDOT 输出十日换手:换手的10日累和 输出二十日换手:换手的20日累和 当满足条件到最后交易的周期=1ANDPERIOD=5时,在WOL和0位置之间画柱状线,宽度为3,-1不为0则画空心柱.,COLORFFFFFF 输出VOLUME:成交量(手),VOLSTICK VAR1赋值:成交量(手)/((最高价-最低价)*2-收盘价-开盘价的绝对值) 输出主买:如果收阳线,返回VAR1*(最高价-最低价),否则返回如果收阴线,返回VAR1*((最高价-开盘价)+(收盘价-最低价)),否则返回成交量(手)/2,画红色,POINTDOT 输出主卖:如果收阳线,返回VAR1*((最高价-收盘价)+(开盘价-最低价)),否则返回如果收阴线,返回VAR1*(最高价-最低价),否则返回成交量(手)/2,COLOR00FF00,POINTDOT 当满足条件主买>0时,在0和主买位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色 当满足条件主买<1日前的主买AND主买>0时,在0和主买位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00FFFF 输出V5:VOLUME的5日简单移动平均,线宽为3 输出V10:VOLUME的10日简单移动平均,线宽为3 输出V135:VOLUME的135日简单移动平均,线宽为3 当满足条件十日换手>30时,在-20000位置画1号图标 当满足条件十日换手>80时,在-10000位置画23号图标 当满足条件到最后交易的周期=40时,在80日内成交量(手)的最高值*0.9位置书写文字 当满足条件二十日换手>30时,在-40000位置画2号图标 当满足条件二十日换手>80时,在-30000位置画17号图标 当满足条件到最后交易的周期=80时,在80日内成交量(手)的最高值*0.95位置书写文字,COLOR00FFFF 程序源码 WOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW; 换手:VOL/CAPITAL*100,POINTDOT; 十日换手:SUM(换手,10); 二十日换手:SUM(换手,20); STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,WOL,0,3,-1),COLORFFFFFF; VOLUME:VOL,VOLSTICK; VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主买:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE- LOW)),VOL/2)),COLORRED,POINTDOT; 主卖:IF(CLOSE>OPEN,VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,VAR1*(HIGH- LOW),VOL/2)),COLOR00FF00,POINTDOT; STICKLINE(主买>0,0,主买,2,0),COLORRED; {STICKLINE(主卖>0,主买,VOL,2,1),COLOR00FF80;} STICKLINE(主买<REF(主买,1)AND 主买>0,0,主买,2,0),COLOR00FFFF; V5:MA(VOLUME,5),LINETHICK3; V10:MA(VOLUME,10),LINETHICK3; V135:MA(VOLUME,135),LINETHICK3; DRAWICON(十日换手>30,-20000,1); DRAWICON(十日换手>80,-10000,23); DRAWTEXT(CURRBARSCOUNT=40,HHV(V,80)*0.9,'10日换手>30出红箭头,>80出红十字'); DRAWICON(二十日换手>30,-40000,2); DRAWICON(二十日换手>80,-30000,17); DRAWTEXT(CURRBARSCOUNT=80,HHV(V,80)*0.95,'20日换手>30出绿箭头,>80出桔子'),COLOR00FFFF; 注: 馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。 发文不易,如获益,欢迎赞赏,赞赏必复! |
|