编程思路破译输出今日换手:100*成交量(手)/当前流通股本(手),VOLSTICK X赋值:HHVALL(今日换手) 换手次数赋值:成交量(手)的历史累和/当前流通股本(手)的向下舍入 判断赋值:如果换手次数>0,返回换手次数,否则返回0 判定赋值:如果判断-1日前的判断>0,返回判断,否则返回0 输出距上次完全换手:上次判定距今天数+1,线宽为0,画绿色 VERTLINE(判定,0),画绿色 VERTLINE(数据位置状态=2,1),画绿色 标的赋值:NUMTOSTRN(距上次完全换手-1日前的判断,0) 当满足条件判定时,在X位置书写文字,COLORCCCCCC,ALIGN0 当满足条件判定时,在X*0.9位置书写文字,COLORCCCCCC,ALIGN2 当满足条件数据位置状态=2时,在X*0.9位置书写文字,COLORCCFFCC,ALIGN2 当满足条件今日换手>10AND今日换手>1日前的今日换手时,在今日换手和10位置之间画柱状线,宽度为5,0不为0则画空心柱.,画黄色 当满足条件今日换手>1日前的今日换手*2时,在1日前的今日换手和1日前的今日换手*2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF0000 程序源码今日换手:100*VOL/CAPITAL,VOLSTICK; X:=HHVALL(今日换手); 换手次数:=FLOOR(SUM(V,0)/CAPITAL); 判断:=IF(换手次数>0,换手次数,0); 判定:=IF(判断-REF(判断,1)>0,判断,0); 距上次完全换手:BARSLAST(判定)+1,LINETHICK0,COLORGREEN; VERTLINE(判定,0),COLORGREEN; VERTLINE(BARSTATUS=2,1),COLORGREEN; 标的:=NUMTOSTRN(REF(判断,距上次完全换手-1),0); DRAWTEXT(判定,X,'←'+标的+'次换手'),COLORCCCCCC,ALIGN0; DRAWTEXT(判定,X*0.9,'←距上次完全换手'+REF(距上次完全换手,1)+'天→ '),COLORCCCCCC,ALIGN2; DRAWTEXT(BARSTATUS=2,X*0.9,'←本次运行净距'+REF(距上次完全换手,1)+'天→'),COLORCCFFCC,ALIGN2; STICKLINE(今日换手>10 AND 今日换手>REF(今日换手,1),今日换手,10,5,0),COLORYELLOW; STICKLINE(今日换手>REF(今日换手,1)*2,REF(今日换手,1),REF(今日换手,1)*2,3,0),COLORFF0000; 风险提示 该公式包含未来函数:CAPITAL |
|