文章预览
第一部分 【箱体分析】1主图 【箱体分析】 主图 编写如下： EM:=20; EMM:=40; N1:=20; DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0); {箱体主图} {一、箱体部分--支撑到波浪顶画箱体} {1、波浪高低点} TY:=H; HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10); LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10); A:=REF(H,BARSLAST(HD)); B:=REF(H,BARSLAST(LD)); T1:=BARSLAST(HD); T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD); 波浪顶:IF(T1,A,A),COLORGREEN,POINTDOT,LINETHICK1; DRAWNUMBER(波浪顶!=REF(波浪顶,1),H,波浪顶),COLORF00FF0; STICKLINE(T1,A,A,9,0){,POINTDOT},COLORF00FF0,LINETHICK1; 波浪底:=IF(T2,B,B),COLORGREEN{,POINTDOT},LINETHICK1; STICKLINE(T2,B,B,9,0){,POINTDOT},COLORCYAN,LINETHICK1; {2、支撑部分1} QA12:=REF(CLOSE,6)=LLV(CLOSE,2*6+1); QB12:=BACKSET(QA12,6+1); QC12:=FILTER(QB12,6) AND CLOSE=LLV(CLOSE,6+1); QD12:=BARSLAST(QC12); QE12:=IF(QC12,CURRBARSCOUNT,0); QF12:=IF(QD12,REF(QE12,QD12),QE12); QG12:
………………………………
