四季牛熊主图，解开源码，分享

{公式名称: 四季牛熊

公式描述: 

无参数

公式类型: 技术指标公式-其他类型

画线方法: 主图叠加

公式版本: 0

显示小数: 缺省位数

坐标线位置: 自动

额外Y轴分界: 无

分析家公式网http://www.70822.com

参数精灵:无

用法注释:无

公式源码:}

X_1:=MAX(MAX(HIGH-LOW,ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));

X_2:=MA(X_1,10);

X_3:=(HIGH+LOW)/2;

X_4:="999999$CLOSE";

X_5:=X_3+X_2*IF(CLOSE=X_4,2.1,2.2);

X_6:=X_3-X_2*IF(CLOSE=X_4,2.1,2.2);

X_7:=REF(X_5,BARSLAST(X_5<=REF(X_5,1)));

X_8:=LLV(X_5,15);

X_9:=IF(X_8=REF(X_8,1) AND X_7<REF(X_7,1),X_7,IF(X_7=X_8,X_7,X_8));

X_10:=BARSLAST(CROSS(0.5,X_5=X_9))+1 OR BARSLAST(CROSS(1.5,X_5=X_9))+1 OR BARSLAST(CROSS(2.5,X_5=X_9))+1 OR BARSLAST(CROSS(3.5,X_5=X_9))+1;

X_11:=CROSS(COUNT(CROSS(CLOSE,X_9) AND X_5>X_9,X_10),0.5) OR CROSS(COUNT(CROSS(CLOSE,X_9) AND X_5>X_9,X_10),1.5) OR CROSS(COUNT(CROSS(CLOSE,X_9) AND X_5>X_9,X_10),2.5) OR CROSS(COUNT(CROSS(CLOSE,X_9) AND X_5>X_9,X_10),3.5) OR CROSS(COUNT(CROSS(CLOSE,X_9) AND X_5>X_9,X_10),4.5);

X_12:=BARSLAST(X_11);

X_13:=BARSLAST(CROSS(HHV(X_6,X_12+1),CLOSE));

支撑:IF(X_13>X_12,HHV(X_6,BARSLAST(CROSS(X_13,X_12))+1),DRAWNULL),COLORRED,LINETHICK2;

压力:IF(X_13<X_12,LLV(X_5,BARSLAST(CROSS(X_12,X_13))+1),DRAWNULL),COLORGREEN,LINETHICK2;

X_14:=(3*CLOSE+HIGH+LOW+OPEN)/6;

X_15:=EMA(X_14,35);

X_16:=(HHV(X_15,5)+HHV(X_15,15)+HHV(X_15,30))/3;

X_17:=(LLV(X_15,5)+LLV(X_15,15)+LLV(X_15,30))/3;

X_18:=(HHV(X_16,5)+HHV(X_16,15)+HHV(X_16,30))/3;

X_19:=(LLV(X_17,5)+LLV(X_17,15)+LLV(X_17,30))/3;

X_20:=X_19*0.9;

X_21:=X_13>X_12;

春:IF(X_21,1,DRAWNULL),NODRAW,COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE>OPEN,OPEN,CLOSE,3,1),COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE>OPEN,HIGH,CLOSE,0,1),COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE>OPEN,OPEN,LOW,0,1),COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE<OPEN,HIGH,CLOSE,0,0),COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE<OPEN,OPEN,LOW,0,0),COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE=OPEN,OPEN,CLOSE,3,0),COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE=OPEN,HIGH,CLOSE,0,0),COLOR3D3DFF;

STICKLINE(X_21 AND CLOSE=OPEN,OPEN,LOW,0,0),COLOR3D3DFF;

X_22:=NOT(X_14<X_19 AND X_14>=X_20 AND X_13<X_12) AND NOT(X_14<X_20) AND NOT(X_13>X_12);

夏:IF(X_22,1,DRAWNULL),NODRAW,COLORYELLOW;

STICKLINE(X_22 AND CLOSE>OPEN,OPEN,CLOSE,3,1),COLORYELLOW;

STICKLINE(X_22 AND CLOSE>OPEN,HIGH,CLOSE,0,1),COLORYELLOW;

STICKLINE(X_22 AND CLOSE>OPEN,OPEN,LOW,0,1),COLORYELLOW;

STICKLINE(X_22 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORYELLOW;

STICKLINE(X_22 AND CLOSE<OPEN,HIGH,CLOSE,0,0),COLORYELLOW;

STICKLINE(X_22 AND CLOSE<OPEN,OPEN,LOW,0,0),COLORYELLOW;

STICKLINE(X_22 AND CLOSE=OPEN,OPEN,CLOSE,3,0),COLORYELLOW;

STICKLINE(X_22 AND CLOSE=OPEN,HIGH,CLOSE,0,0),COLORYELLOW;

STICKLINE(X_22 AND CLOSE=OPEN,OPEN,LOW,0,0),COLORYELLOW;

X_23:=X_14<X_19 AND X_14>=X_20 AND X_13<X_12;

秋:IF(X_23,1,DRAWNULL),NODRAW,COLOR7DC739;

STICKLINE(X_23 AND CLOSE>OPEN,OPEN,CLOSE,3,1),COLOR7DC739;

STICKLINE(X_23 AND CLOSE>OPEN,HIGH,CLOSE,0,1),COLOR7DC739;

STICKLINE(X_23 AND CLOSE>OPEN,OPEN,LOW,0,1),COLOR7DC739;

STICKLINE(X_23 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLOR7DC739;

STICKLINE(X_23 AND CLOSE<OPEN,HIGH,CLOSE,0,0),COLOR7DC739;

STICKLINE(X_23 AND CLOSE<OPEN,OPEN,LOW,0,0),COLOR7DC739;

STICKLINE(X_23 AND CLOSE=OPEN,OPEN,CLOSE,3,0),COLOR7DC739;

STICKLINE(X_23 AND CLOSE=OPEN,HIGH,CLOSE,0,0),COLOR7DC739;

STICKLINE(X_23 AND CLOSE=OPEN,OPEN,LOW,0,0),COLOR7DC739;

X_24:=X_14<X_20;

冬:IF(X_24,1,DRAWNULL),NODRAW,COLORFC9D53;

STICKLINE(X_24 AND CLOSE>OPEN,OPEN,CLOSE,3,1),COLORFC9D53;

STICKLINE(X_24 AND CLOSE>OPEN,HIGH,CLOSE,0,1),COLORFC9D53;

STICKLINE(X_24 AND CLOSE>OPEN,OPEN,LOW,0,1),COLORFC9D53;

STICKLINE(X_24 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORFC9D53;

STICKLINE(X_24 AND CLOSE<OPEN,HIGH,CLOSE,0,0),COLORFC9D53;

STICKLINE(X_24 AND CLOSE<OPEN,OPEN,LOW,0,0),COLORFC9D53;

STICKLINE(X_24 AND CLOSE=OPEN,OPEN,CLOSE,3,0),COLORFC9D53;

STICKLINE(X_24 AND CLOSE=OPEN,HIGH,CLOSE,0,0),COLORFC9D53;

STICKLINE(X_24 AND CLOSE=OPEN,OPEN,LOW,0,0),COLORFC9D53;