通达信自编主图股海沉浮主图源码

K线实体的二分位是一个很重要的参考价位，本主图以前一日的二分位为海平面，
 以三个点以上中阳线的开盘价为均衡线，股价沉入海面看空，浮出海面看多。
 当然要参照中线的多空线。最后一根K线处设置了以前一天K线实体的0.618位置为当日攻防价位。
{公式在线提供：www.gszx.com.cn} 
{股海沉浮}{主图}
 二分位:MIN(OPEN,CLOSE)+(MAX(OPEN,CLOSE)-MIN(OPEN,CLOSE))/2,COLORMAGENTA;
 中阳:=CLOSE/REF(CLOSE,1)>=1.03;
 AA:=BARSLAST(中阳);
 均衡:=REF(OPEN,AA);
 DRAWBAND(REF(二分位,1),RGB(155,50,50),均衡,RGB(50,50,50));
 海平面:REF(二分位,1),COLORFF9900;
 {3D K线}
 STICKLINE(CLOSE>=OPEN ,OPEN,CLOSE,3,0),COLOR000033;
 STICKLINE(CLOSE>=OPEN ,OPEN,CLOSE,2.5,0),COLOR000044;
 STICKLINE(CLOSE>=OPEN ,OPEN,CLOSE,2,0),COLOR000055;
 STICKLINE(CLOSE>=OPEN ,OPEN,CLOSE,1.5,0),COLOR000066;
 STICKLINE(CLOSE>=OPEN ,OPEN,CLOSE,1,0),COLOR000077;
 STICKLINE(CLOSE>=OPEN ,OPEN,CLOSE,0.5,0),COLOR000088;
 STICKLINE(CLOSE>=OPEN ,OPEN,CLOSE,0.2,0),COLOR000099;
 STICKLINE(CLOSE>=OPEN ,L,H,0,0),COLOR000099;
 {收阴}
 STICKLINE(CLOSE  STICKLINE(CLOSE  STICKLINE(CLOSE  STICKLINE(CLOSE  STICKLINE(CLOSE  STICKLINE(CLOSE  STICKLINE(CLOSE  STICKLINE(CLOSE  VARDQ:=((REF(CLOSE,1)=HHV(CLOSE,4)) AND (CLOSEREF(CLOSE,3)) OR (REF(CLOSE,3)=HHV(CLOSE,4)) AND (REF(CLOSE,1)>REF(CLOSE,2))) AND (REF(CLOSE,2)>=REF(CLOSE,4)) AND (CLOSE  STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),3,0),COLOR003300;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),2.6,0),COLOR005500;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),2.2,0),COLOR007700;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),1.8,0),COLOR009900;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),1.2,0),COLOR00BB00;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),0.5,0),COLOR00DD00;
 VARCQ:=((REF(CLOSE,1)=LLV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,2)) OR (REF(CLOSE,2)=LLV(CLOSE,4)) AND (REF(CLOSE,1)<=REF(CLOSE,3)) AND (REF(CLOSE,2)=REF(CLOSE,1)));
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),3,0),COLOR005500;
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),2.6,0),COLOR007700;
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),2.2,0),COLOR009900;
 STICKLINE(VARCQ,OPEN,(OPEN+CL