通达信阻击疯牛主图源码
 

GJ:=(C+H+L+O)/4;
 明日阻力:=L+(GJ-L)+(C-L);
 明日支撑:=L+(C-GJ);
 下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
 RRRSV:=SMA(下档线,3,1);
 KKK:=SMA(RRRSV,3,1);
 DDDDD:=((3 * RRRSV) - (2 * KKK));
 JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
 RSV24:=SMA(JJ12,3,1);
 K24:=SMA(RSV24,3,1);
 D24:=((3 * RSV24) - (2 * K24));
 压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;
 底部:=LLV(HIGH,30),COLOR00FF00;
 今日阻力:REF(明日阻力 , 1),NODRAW;
 今日支撑:REF(明日支撑 , 1),NODRAW;
 压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;
 底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW; 
高:=REF(HHV(H,80),3);
低:=REF(LLV(L,80),3);
 H19:=高-(高-低)*0.191;
H38:=高-(高-低)*0.382;
H中:=高-(高-低)*0.5;
H61:=高-(高-低)*0.618;
H80:=高-(高-低)*0.809;
 顶点:REFDATE(高,DATE),POINTDOT,COLORWHITE;
 疯牛19.8:REFDATE(H19,DATE),POINTDOT,COLORYELLOW;
 突破38.2:REFDATE(H38,DATE),POINTDOT,COLORMAGENTA;
 平衡50:REFDATE(H中,DATE),POINTDOT,COLORRED;
 回落61.8:REFDATE(H61,DATE),POINTDOT,COLORGREEN;
 安全80.9:REFDATE(H80,DATE),POINTDOT,COLORBLUE;
 低点:REFDATE(低,DATE),POINTDOT,COLORWHITE;
 DRAWTEXT(ISLASTBAR,顶点,'顶点'),COLORWHITE;
 DRAWTEXT(ISLASTBAR,疯牛19.8,'疯牛'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,突破38.2,'突破'),COLORMAGENTA;
 DRAWTEXT(ISLASTBAR,平衡50,'平衡'),COLORRED;
 DRAWTEXT(ISLASTBAR,回落61.8,'回落'),COLORMAGENTA;
 {DRAWTEXT(ISLASTBAR,安全80.9,'安全'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,低点,'低点'),COLORWHITE};
 VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
 VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARD:=CLOSE  VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VA