通达信四色主图源码公式主图源码

 {公式名称: 四色主图

公式描述:
参数数量: 4
参数1: M1, 最小: 1, 最大: 1000, 缺省: 5
参数2: M2, 最小: 1, 最大: 1000, 缺省: 13
参数3: M3, 最小: 1, 最大: 1000, 缺省: 34
参数4: M4, 最小: 1, 最大: 1000, 缺省: 55
公式类型: 技术指标公式-其他类型
画线方法: 主图叠加
公式源码:}
MA3:MA(CLOSE,M3),COLORMAGENTA,LINETHICK2;
VAR1:=BARSLAST(REF(CROSS(CLOSE,MA(CLOSE,120)),1)) AND CROSS(MA(CLOSE,34),MA(CLOSE,120));
DRAWTEXT(VAR1,MA(CLOSE,120),'53'),COLORRED,LINETHICK3;
VAR2:=120;
VAR3:=BARSLAST(CURRBARSCOUNT=VAR2);
VAR4:=CONST(IF(ISLASTBAR=1,HHV(HIGH,VAR3),0));
VAR5:=CONST(IF(ISLASTBAR=1,LLV(LOW,VAR3),0));
VAR6:=VAR4-VAR5;
高:IF(CURRBARSCOUNT<=VAR2,VAR4,DRAWNULL),POINTDOT,COLORYELLOW;
压:IF(CURRBARSCOUNT<=VAR2,VAR4-VAR6*0.191,DRAWNULL),NODRAW,COLORMAGENTA;
平衡:IF(CURRBARSCOUNT<=VAR2,VAR5+VAR6/2,DRAWNULL),NODRAW,COLORYELLOW;
支撑:IF(CURRBARSCOUNT<=VAR2,VAR5+VAR6*0.191,DRAWNULL),NODRAW,COLORGREEN;
低:IF(CURRBARSCOUNT<=VAR2,VAR5,DRAWNULL),POINTDOT,COLORGREEN;
天:BARSLAST(LOW=VAR5),NODRAW,COLORYELLOW;
STICKLINE(CURRBARSCOUNT<=VAR2,平衡,平衡,3,(-1)),COLORWHITE;
STICKLINE(CURRBARSCOUNT<=VAR2,压,压,3,(-1)),COLORRED;
STICKLINE(CURRBARSCOUNT<=VAR2,支撑,支撑,3,(-1)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,压,'54'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=1,平衡,'55'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,支撑,'56'),COLORYELLOW;

VAR7:=EMA(CLOSE,8);
VAR8:=VAR7<REF(VAR7,1);
VAR9:=IF(VAR8-1,VAR7,DRAWNULL);
VAR10:=EMA(CLOSE,3)>EMA(CLOSE,21);
VAR11:=EMA(CLOSE,3)<EMA(CLOSE,21);
VAR12:=EMA(CLOSE,3)>EMA(CLOSE,8);
VAR13:=EMA(CLOSE,3)<EMA(CLOSE,8);
STICKLINE(VAR10,LOW,HIGH,0,0),COLOR0000BB;
STICKLINE(VAR10,CLOSE,OPEN,3,0),COLOR0000BB;
STICKLINE(VAR10,CLOSE,OPEN,2.8,0),COLOR0000BB;
STICKLINE(VAR10,CLOSE,OPEN,2.5,0),COLOR0000BB;
STICKLINE(VAR10,CLOSE,OPEN,2.2,0),COLOR0000BB;
STICKLINE(VAR10,CLOSE,OPEN,1.7,0),COLOR0000BB;
STICKLINE(VAR10,CLOSE,OPEN,1.2,0),COLOR0000BB;
STICKLINE(VAR10,CLOSE,OPEN,0.6,0),COLOR0000BB;
STICKLINE(VAR10,CLOSE,OPEN,0.2,0),COLOR0000BB;
STICKLINE(VAR11,HIGH,LOW,0,1),COLORGREEN;
STICKLINE(VAR11,CLOSE,OPEN,3.2,0),COLOR006600;
STICKLINE(VAR11,CLOSE,OPEN,2.6,0),COLOR008800;
STICKLINE(VAR11,CLOSE,OPEN,1.9,0),COLOR00AA00;
STICKLINE(VAR11,CLOSE,OPEN,1.1,0),COLOR00CC00;
STICKLINE(VAR11,CLOSE,OPEN,0.3,0),COLORGREEN;
STICKLINE(VAR11 AND VAR12,HIGH,LOW,0,1),COLORFF55FF;
STICKLINE(VAR11 AND VAR12,CLOSE,OPEN,3.2,0),COLOR880088;
STICKLINE(VAR11 AND VAR12,CLOSE,OPEN,2.6,0),COLORAA00AA;
STICKLINE(VAR11 AND VAR12,CLOSE,OPEN,1.9,0),COLORCC00CC;
STICKLINE(VAR11 AND VAR12,CLOSE,OPEN,1.1,0),COLOREE00EE;
STICKLINE(VAR11 AND VAR12,CLOSE,OPEN,0.3,0),COLORFF44FF;
STICKLINE(VAR10 AND VAR13,HIGH,LOW,0,1),COLORYELLOW;
STICKLINE(VAR10 AND VAR13,CLOSE,OPEN,3.2,0),COLORYELLOW;
STICKLINE(VAR10 AND VAR13,CLOSE,OPEN,2.6,0),COLORYELLOW;
STICKLINE(VAR10 AND VAR13,CLOSE,OPEN,1.9,0),COLORYELLOW;
STICKLINE(VAR10 AND VAR13,CLOSE,OPEN,1.1,0),COLORYELLOW;
STICKLINE(VAR10 AND VAR13,CLOSE,OPEN,0.3,0),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=VAR2/2+9,VAR4-VAR6/12,'57'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=VAR2/2+9,VAR4-VAR6/3,'58'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=VAR2/2+9,VAR5+VAR6/3,'59'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=VAR2/2+9,VAR5+VAR6/10,'60'),COLORCYAN;
VAR14:=HHV(CLOSE,2);
VAR15:=LLV(CLOSE,2);
VAR16:=(3*CLOSE+LOW+OPEN+HIGH)/6;
VAR17:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR19:=REF(VAR18,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR20:=REF(VAR19,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR21:=REF(VAR20,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR22:=REF(VAR21,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR23:=REF(VAR22,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR24:=REF(VAR23,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR25:=REF(VAR24,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR26:=REF(VAR25,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR27:=REF(VAR26,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR28:=REF(VAR27,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR29:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VAR30:=REF(VAR29,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR31:=REF(VAR30,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR32:=REF(VAR31,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR33:=REF(VAR32,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR34:=REF(VAR33,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR35:=REF(VAR34,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR36:=REF(VAR35,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR37:=REF(VAR36,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR38:=REF(VAR37,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR39:=REF(VAR38,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR40:=REF(VAR39,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR41:=REF(VAR29 OR VAR30 OR VAR31 OR VAR32 OR VAR33 OR VAR34 OR VAR35 OR VAR36 OR VAR37 OR VAR38 OR VAR39 OR VAR40,1) AND VAR17;
VAR42:=REF(VAR17 OR VAR18 OR VAR19 OR VAR20 OR VAR21 OR VAR22 OR VAR23 OR VAR24 OR VAR25 OR VAR26 OR VAR27 OR VAR28,1) AND VAR29;
短买:VAR41,NODRAW,COLOR33AACC;
wwwgszxcomcn:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
DRAWTEXT(短买,REF(CLOSE,1),'61'),COLORYELLOW;
DRAWTEXT(VAR42,REF(CLOSE,1)+0.2,'22'),COLORYELLOW;
VAR43:=IF(CLOSE>REF(CLOSE,1),88,0);
VAR44:=IF(CLOSE/REF(CLOSE,1)>1.05 AND HIGH/CLOSE<1.01 AND VAR43>0,91,0);
DRAWTEXT(VAR44>90,LOW*0.99,'62'),COLORRED;
VAR45:=(MA(CLOSE,5)-MA(CLOSE,30))/MA(CLOSE,5)*100;
VAR46:=CLOSE>MA(CLOSE,5) AND OPEN<MA(CLOSE,5);
VAR47:=CLOSE>MA(CLOSE,10) AND OPEN<MA(CLOSE,10);
VAR48:=CLOSE>MA(CLOSE,30) AND OPEN<MA(CLOSE,30);
DRAWTEXT(VAR46 AND VAR48 AND VAR47,LOW*0.96,'63'),COLORRED;
JL:EMA(CLOSE,18),COLORMAGENTA,LINETHICK2;
红界:IF(JL>REF(JL,1),JL,DRAWNULL),COLORRED,LINETHICK2;
黄界:IF(JL<REF(JL,1),JL,DRAWNULL),COLORYELLOW,LINETHICK2;