编程思路破译 VAR11赋值:3*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的5日[1日权重]移动平均-2*(收盘价-55日内最低价的最低值)/(55日内最高价的最高值-55日内最低价的最低值)*100的5日[1日权重]移动平均的3日[1日权重]移动平均 输出趋势线:VAR11的5日指数移动平均,COLORFFFFFF, 线宽为2 VAR12赋值:(趋势线-1日前的趋势线)/1日前的趋势线*100 当满足条件趋势线<13时,在0和20位置之间画柱状线,宽度为5,0不为0则画空心柱.,画黄色 当满足条件1日前的趋势线<13ANDVAR12>13时,在0和50位置之间画柱状线,宽度为5,0不为0则画空心柱.,画红色 当满足条件1日前的趋势线>90ANDVAR12<0时,在100和80位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLORFF88EE 0, 线宽为2 20,POINTDOT 80,POINTDOT 100 ,线宽为2 散户线赋值:100*(60日内最高价的最高值-收盘价)/(60日内最高价的最高值-60日内最低价的最低值),COLORF0F000,线宽为1 VAR1赋值:(收盘价+最低价+最高价)/3 VAR2赋值:((VAR1-1日前的最低价)-(最高价-VAR1))*成交量(手)/100000/(最高价-最低价)的历史累和 VAR3赋值:VAR2的1日指数移动平均 JCS赋值:VAR3 JCM赋值:VAR3的12日简单移动平均 JCL赋值:VAR3的26日简单移动平均 ZLJR赋值:(JCS-JCM)*60 VAR81赋值:500日内最高价的最高值的21日指数移动平均 VAR82赋值:250日内最高价的最高值的21日指数移动平均 VAR83赋值:90日内最高价的最高值的21日指数移动平均 VAR84赋值:500日内最低价的最低值的21日指数移动平均 VAR85赋值:250日内最低价的最低值的21日指数移动平均 VAR86赋值:90日内最低价的最低值的21日指数移动平均 VAR87赋值:(VAR84*0.96+VAR85*0.96+VAR86*0.96+VAR81*0.558+VAR82*0.558+VAR83*0.558)/6的21日指数移动平均 VAR88赋值:(VAR84*1.25+VAR85*1.23+VAR86*1.2+VAR81*0.55+VAR82*0.55+VAR83*0.65)/6的21日指数移动平均 VAR89赋值:(VAR84*1.3+VAR85*1.3+VAR86*1.3+VAR81*0.68+VAR82*0.68+VAR83*0.68)/6的21日指数移动平均 VAR8A赋值:(VAR87*3+VAR88*2+VAR89)/6*1.738的21日指数移动平均 VAR8B赋值:1日前的最低价 VAR8C赋值:最低价-VAR8B的绝对值的3日[1日权重]移动平均/最低价-VAR8B和0的较大值的3日[1日权重]移动平均*100 VAR8D赋值:如果收盘价*1.35<=VAR8A,返回VAR8C*10,否则返回VAR8C/10的3日指数移动平均 VAR8E赋值:30日内最低价的最低值 VAR8F赋值:30日内VAR8D的最高值 VAR810赋值:如果收盘价的58日简单移动平均,返回1,否则返回0 CK赋值: 如果最低价<=VAR8E,返回(VAR8D+VAR8F*2)/2,否则返回0的3日指数移动平均/618*VAR810 底部赋值:如果CK>50,返回50,否则返回CK,画红色 当满足条件底部>0时,在0和底部位置之间画柱状线,宽度为4,1不为0则画空心柱.,COLORFF00FF 程序源码 VAR11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1) -2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1); 趋势线:EMA(VAR11,5),COLORFFFFFF, LINETHICK2; VAR12:=(趋势线-REF(趋势线,1))/REF(趋势线,1)*100; STICKLINE(趋势线<13,0,20,5,0),COLORYELLOW; STICKLINE(REF(趋势线,1)<13 AND VAR12>13,0,50,5,0),COLORRED; STICKLINE(REF(趋势线,1)>90 AND VAR12<0,100,80,5,0),COLORFF88EE; 0, LINETHICK2; 20,POINTDOT; 80,POINTDOT; 100 ,LINETHICK2; 散户线:=100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)),COLORF0F000,LINETHICK1; VAR1:=(CLOSE+LOW+HIGH)/3; VAR2:=SUM(((VAR1-REF(LOW,1))-(HIGH-VAR1))*VOL/100000/(HIGH-LOW),0); VAR3:=EMA(VAR2,1); JCS:=VAR3; JCM:=MA(VAR3,12); JCL:=MA(VAR3,26); ZLJR:=(JCS-JCM)*60; VAR81:=EMA(HHV(HIGH,500),21); VAR82:=EMA(HHV(HIGH,250),21); VAR83:=EMA(HHV(HIGH,90),21); VAR84:=EMA(LLV(LOW,500),21); VAR85:=EMA(LLV(LOW,250),21); VAR86:=EMA(LLV(LOW,90),21); VAR87:=EMA((VAR84*0.96+VAR85*0.96+VAR86*0.96+VAR81*0.558+VAR82*0.558+VAR83*0.558)/6,21); VAR88:=EMA((VAR84*1.25+VAR85*1.23+VAR86*1.2+VAR81*0.55+VAR82*0.55+VAR83*0.65)/6,21); VAR89:=EMA((VAR84*1.3+VAR85*1.3+VAR86*1.3+VAR81*0.68+VAR82*0.68+VAR83*0.68)/6,21); VAR8A:=EMA((VAR87*3+VAR88*2+VAR89)/6*1.738,21); VAR8B:=REF(LOW,1); VAR8C:=SMA(ABS(LOW-VAR8B),3,1)/SMA(MAX(LOW-VAR8B,0),3,1)*100; VAR8D:=EMA(IF(CLOSE*1.35<=VAR8A,VAR8C*10,VAR8C/10),3); VAR8E:=LLV(LOW,30); VAR8F:=HHV(VAR8D,30); VAR810:=IF(MA(CLOSE,58),1,0); CK:= EMA(IF(LOW<=VAR8E,(VAR8D+VAR8F*2)/2,0),3)/618*VAR810; 底部:=IF(CK>50,50,CK),COLORRED; STICKLINE(底部>0,0,底部,4,1),COLORFF00FF 注: 馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。 发文不易,如获益,欢迎赞赏,赞赏必复! |
|