程序源码 H1:=MAX(REF(C,1),HIGH); L1:=MIN(REF(C,1),LOW); P1:=H1-L1; 压:=L1+P1*7/8,COLORGREEN; N:=35;N1:=3;M:=35; VARB1:=(HHV(H,N)-C)/(HHV(H,N)-LLV(LOW,N))*100- M; VARB2:=SMA(VARB1,N,1)+100; VARB3:=(C-LLV(L,N))/(HHV(H,N)- LLV(L,N))*100; VARB4:=SMA(VARB3,3,1); VARB5:=SMA(VARB4,3,1)+100; VARB6:=VARB5-VARB2; VARCD:(IF(VARB6>N1,VARB6-N1,0))*2.5,COLORRED,DOTLINE; 40,COLORMAGENTA,LINETHICK3; STICKLINE( VARCD,0,VARCD ,9,0 ),COLORYELLOW; STICKLINE( VARCD AND VARCD>85,100,VARCD ,9,0 ),COLORRED; 上价:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5; 下价:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5; 中价:=MAX(EMA(上价,1)-EMA(下价,5),0)*200; 吃庄:=EMA(中价,5); VARA:=30; 实体比例:=(CLOSE-OPEN)/REF(CLOSE,1); 冲击系数:=MA(实体比例,VARA); 冲击系数1:=MA(冲击系数,3); STICKLINE(冲击系数1>0,((冲击系数1*10000 )+吃庄)/2,0,9,0),COLORBLUE; VARP1P:=(CLOSE-LLV(LOW,55.144))/(HHV(HIGH,55.144)-LLV(LOW,55))*80; VARP2P:=SMA(VARP1P,7,1); VARP3P:=SMA(VARP2P,5,1); 飞涨:IF(crOSS(VARP2P,VARP3P) AND VARP2P<20,80,0),STICK,COLORMAGENTA,LINETHICK3; DRAWTEXT(CROSS(VARP2P,VARP3P) AND VARP2P<20,95,'即将起飞'),COLORMAGENTA; 注: 馆内各种公式为学习编程而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率,决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担。 发文不易,如获益,欢迎赞赏,赞赏必复! |
|
来自: 追梦文库 > 《主升浪起爆点拉升》