通达信CYC成本均线主图源码 贴图
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
通达信CYC成本均线主图源码贴图
PC:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYN AINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01)
&& JJJ>(DYNAINFO(6)-0.01)));
CYC5:IF(JJJT,0.01*EXPMA(AMOUNT,5)/EXPMA(AMOU NT/(100*PC),5),EMA((HIGH+LOW+CLOSE)/3,5));
CYC13:IF(JJJT,0.01*EXPMA(AMOUNT,13)/EXPMA(AMO UNT/(100*PC),13),EMA((HIGH+LOW+CLOSE)/3,13));
CYC34:IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(AMO UNT/(100*PC),34),EMA((HIGH+LOW+CLOSE)/3,34));
CYC500:IF(JJJT,0.01*EXPMA(AMOUNT,500)/EXPMA(A MOUNT/(100*PC),500),EMA((HIGH+LOW+CLOSE)/3,500 )),COLORRED;
CYC∞:IF(JJJT,DMA(PC,100*VOL/FINANCE(7)),EMA((HIG H+LOW+CLOSE)/3,120)),COLORGREEN;
倍量:=VOL>=REF(V,1)*1.91 AND C>O;
缩量:=REF(V,1)>=VOL*1.91 AND C<O; STICKLINE(倍量,OPEN,CLOSE,2,0),COLORRED; STICKLINE(缩量,OPEN,CLOSE,2,0),COLORGREEN;
C2:=REF(C,1);
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORMAGENTA;
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
筹码峰值均
价:SSRP.SSRP,COLOR40408F,LINETHICK1,COLORYE LLOW,CROSSDOT; DRAWTEXT_FIX(1,0.00,0.00,0,'主题投资:')COLOR0000FF;
DRAWTEXT_FIX(1,0.07,0.00,0,EXTERNSTR(0,1))COLO R0000FF;
DRAWTEXT_FIX(1,0.00,0.08,0,'主营业务:
'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.07,0.08,0,EXTERNSTR(0,2)),COLO RMAGENTA;
DRAWTEXT_FIX(C>0,0.00,0.16,0,STRCAT('所属概念:',GNBLOCK)),COLORYELLOW;
DRAWTEXT_FIX(C>0,0.00,0.24,0,STRCAT('所属行业:',HYBLOCK)),COLORYELLOW; GJ:=(C+H+L+O)/4;
明阻:=L+(GJ-L)+(C-L)+0.03;
明撑:=L+(C-GJ)+0.01;
今阻:REF(明阻, 1),NODRAW;
今撑:REF(明撑, 1),NODRAW;
KLH:=IF( PERIOD=5,0.015,0);
前天均
价:=REF(AMOUNT,1)/REF(VOL*100,1),LINETHICK0;
STICKLINE(CURRBARSCOUNT=1,今阻+KLH,今
阻,6,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT=1,今撑,今撑
-KLH,6,0),COLORRED;