{通达信大机构至尊版源码}
VAR1:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR2:=SMA(VAR1,3,1);
VAR3:=SMA(VAR2,3,1);
VAR4:=3*VAR2-2*VAR3;
VAR5:=LLV(LOW,30);
VAR6:=HHV(HIGH,30);
VAR7:=EMA((CLOSE-VAR5)/(VAR6-VAR5)*100,5);
VAR8:=EMA(0.667*REF(VAR7,1)+0.333*VAR7,10);
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
DRAWTEXT(CROSS(VAR7,VAR8) AND VAR7<20,LOW-0.1,'机构关注'),COLORRED;
DRAWTEXT(CROSS(VAR8,VAR7) AND VAR7>80,HIGH+0.1,'机构减仓'),COLORGREEN;
STICKLINE(VAR7>=VAR8,VAR7,VAR8,2,0),COLORRED;
STICKLINE(VAR7<VAR8,VAR7,VAR8,2,0),COLORGREEN;
机构线:VAR7,COLORRED,LINETHICK2;
趋势线:VAR8,COLORGREEN,LINETHICK2;
VAR10:=EMA(CLOSE,12)-EMA(CLOSE,26);
VAR11:=EMA(VAR10,9);
VAR12:=2*(VAR10-VAR11);
DRAWTEXT(CROSS(VAR10,VAR11) AND VAR10<0,0,'金叉'),COLORRED;
DRAWTEXT(CROSS(VAR11,VAR10) AND VAR10>0,0,'死叉'),COLORGREEN;
STICKLINE(VAR12>0,0,VAR12,2,0),COLORRED;
STICKLINE(VAR12<0,0,VAR12,2,0),COLORGREEN;
DIF:VAR10,COLORWHITE;
DEA:VAR11,COLORYELLOW;
MACD:VAR12,COLORSTICK;
VAR13:=MA(CLOSE,5);
VAR14:=MA(CLOSE,10);
VAR15:=MA(CLOSE,20);
VAR16:=MA(CLOSE,30);
DRAWTEXT(CROSS(VAR13,VAR14) AND VAR13>REF(VAR13,1),LOW,'↑'),COLORRED;
DRAWTEXT(CROSS(VAR14,VAR13) AND VAR13<REF(VAR13,1),HIGH,'↓'),COLORGREEN;
DRAWTEXT(CROSS(VAR9,20) AND VAR7<20,LOW-0.2,'买'),COLORRED;
DRAWTEXT(CROSS(80,VAR9) AND VAR7>80,HIGH+0.2,'卖'),COLORGREEN;
VAR17:=REF(CLOSE,1);
VAR18:=SMA(MAX(CLOSE-VAR17,0),5,1)/SMA(ABS(CLOSE-VAR17),5,1)*100;
DRAWTEXT(CROSS(VAR18,20),LOW-0.15,'短买'),COLORRED;
DRAWTEXT(CROSS(80,VAR18),HIGH+0.15,'短卖'),COLORGREEN;
VAR19:=EMA(CLOSE,5);
VAR20:=EMA(CLOSE,10);
VAR21:=EMA(CLOSE,20);
DRAWTEXT(CROSS(VAR19,VAR20) AND VAR19>REF(VAR19,1),LOW-0.05,'多'),COLORRED;
DRAWTEXT(CROSS(VAR20,VAR19) AND VAR19<REF(VAR19,1),HIGH+0.05,'空'),COLORGREEN;
VAR22:=VOL/CAPITAL*100;
VAR23:=MA(VAR22,5);
VAR24:=MA(VAR22,10);
DRAWTEXT(CROSS(VAR23,VAR24) AND VAR23>REF(VAR23,1),LOW-0.25,'量增'),COLORRED;
DRAWTEXT(CROSS(VAR24,VAR23) AND VAR23<REF(VAR23,1),HIGH+0.25,'量减'),COLORGREEN;
VAR25:=EMA(CLOSE,60);
VAR26:=EMA(CLOSE,120);
DRAWTEXT(CROSS(VAR25,VAR26),LOW-0.3,'牛'),COLORRED;
DRAWTEXT(CROSS(VAR26,VAR25),HIGH+0.3,'熊'),COLORGREEN;
VAR27:=REF(HIGH,1);
VAR28:=REF(LOW,1);
VAR29:=MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1)));
VAR30:=MAX(VAR29,ABS(REF(CLOSE,1)-LOW));
VAR31:=IF(CLOSE>REF(CLOSE,1),VAR30,IF(CLOSE<REF(CLOSE,1),-VAR30,0));
VAR32:=SUM(VAR31,5)/SUM(VAR30,5)*100;
DRAWTEXT(CROSS(VAR32,0),LOW-0.35,'强'),COLORRED;
DRAWTEXT(CROSS(0,VAR32),HIGH+0.35,'弱'),COLORGREEN;
VAR33:=MA(CLOSE,5);
VAR34:=MA(CLOSE,10);
VAR35:=MA(CLOSE,20);
DRAWTEXT(CROSS(VAR33,VAR34) AND VAR34>VAR35,LOW-0.4,'升'),COLORRED;
DRAWTEXT(CROSS(VAR34,VAR33) AND VAR34<VAR35,HIGH+0.4,'降'),COLORGREEN;
VAR36:=EMA(CLOSE,12);
VAR37:=EMA(CLOSE,26);
VAR38:=EMA(VAR36-VAR37,9);
DRAWTEXT(CROSS(VAR36,VAR37) AND VAR38>0,LOW-0.45,'涨'),COLORRED;
DRAWTEXT(CROSS(VAR37,VAR36) AND VAR38<0,HIGH+0.45,'跌'),COLORGREEN;
VAR39:=MA(VOL,5);
VAR40:=MA(VOL,10);
DRAWTEXT(CROSS(VAR39,VAR40) AND CLOSE>OPEN,LOW-0.5,'攻'),COLORRED;
DRAWTEXT(CROSS(VAR40,VAR39) AND CLOSE<OPEN,HIGH+0.5,'守'),COLORGREEN;
VAR41:=REF(CLOSE,1);
VAR42:=SMA(MAX(CLOSE-VAR41,0),12,1)/SMA(ABS(CLOSE-VAR41),12,1)*100;
DRAWTEXT(CROSS(VAR42,30),LOW-0.55,'吸'),COLORRED;
DRAWTEXT(CROSS(70,VAR42),HIGH+0.55,'抛'),COLORGREEN;
VAR43:=EMA(CLOSE,5);
VAR44:=EMA(CLOSE,10);
VAR45:=EMA(CLOSE,20);
DRAWTEXT(CROSS(VAR43,VAR44) AND VAR44>VAR45 AND VAR43>REF(VAR43,1),LOW-0.6,'起'),COLORRED;
DRAWTEXT(CROSS(VAR44,VAR43) AND VAR44<VAR45 AND VAR43<REF(VAR43,1),HIGH+0.6,'落'),COLORGREEN;
VAR46:=VOL/MA(VOL,5);
VAR47:=IF(VAR46>1.5,1,IF(VAR46<0.5,-1,0));
DRAWTEXT(VAR47=1,LOW-0.65,'爆'),COLORRED;
DRAWTEXT(VAR47=-1,HIGH+0.65,'缩'),COLORGREEN;
VAR48:=EMA(CLOSE,5);
VAR49:=EMA(CLOSE,10);
VAR50:=EMA(CLOSE,20);
DRAWTEXT(CROSS(VAR48,VAR49) AND VAR49>VAR50 AND CLOSE>OPEN,LOW-0.7,'突'),COLORRED;
DRAWTEXT(CROSS(VAR49,VAR48) AND VAR49<VAR50 AND CLOSE<OPEN,HIGH+0.7,'破'),COLORGREEN;
VAR51:=MA(CLOSE,5);
VAR52:=MA(CLOSE,10);
VAR53:=MA(CLOSE,20);
DRAWTEXT(CROSS(VAR51,VAR52) AND VAR52>VAR53 AND VOL>REF(VOL,1),LOW-0.75,'拉'),COLORRED;
DRAWTEXT(CROSS(VAR52,VAR51) AND VAR52<VAR53 AND VOL<REF(VOL,1),HIGH+0.75,'压'),COLORGREEN;
VAR54:=EMA(CLOSE,12);
VAR55:=EMA(CLOSE,26);
VAR56:=EMA(VAR54-VAR55,9);
DRAWTEXT(CROSS(VAR54,VAR55) AND VAR56>REF(VAR56,1),LOW-0.8,'上'),COLORRED;
DRAWTEXT(CROSS(VAR55,VAR54) AND VAR56<REF(VAR56,1),HIGH+0.8,'下'),COLORGREEN;
VAR57:=MA(CLOSE,5);
VAR58:=MA(CLOSE,10);
VAR59:=MA(CLOSE,20);
DRAWTEXT(CROSS(VAR57,VAR58) AND VAR58>VAR59 AND CLOSE>VAR57,LOW-0.85,'冲'),COLORRED;
DRAWTEXT(CROSS(VAR58,VAR57) AND VAR58<VAR59 AND CLOSE<VAR57,HIGH+0.85,'回'),COLORGREEN;
VAR60:=VOL/MA(VOL,5);
VAR61:=IF(VAR60>2,1,IF(VAR60<0.5,-1,0));
DRAWTEXT(VAR61=1,LOW-0.9,'巨'),COLORRED;
DRAWTEXT(VAR61=-1,HIGH+0.9,'地'),COLORGREEN;
VAR62:=EMA(CLOSE,5);
VAR63:=EMA(CLOSE,10);
VAR64:=EMA(CLOSE,20);
DRAWTEXT(CROSS(VAR62,VAR63) AND VAR63>VAR64 AND VAR62>REF(VAR62,1) AND VOL>REF(VOL,1),LOW-0.95,'主升'),COLORRED;
DRAWTEXT(CROSS(VAR63,VAR62) AND VAR63<VAR64 AND VAR62<REF(VAR62,1) AND VOL<REF(VOL,1),HIGH+0.95,'主跌'),COLORGREEN;
VAR65:=MA(CLOSE,5);
VAR66:=MA(CLOSE,10);
VAR67:=MA(CLOSE,20);
DRAWTEXT(CROSS(VAR65,VAR66) AND VAR66>VAR67 AND CLOSE>OPEN AND VOL>REF(VOL,1) AND VAR65>REF(VAR65,1),LOW-1,'启动'),COLORRED;
DRAWTEXT(CROSS(VAR66,VAR65) AND VAR66<VAR67 AND CLOSE<OPEN AND VOL<REF(VOL,1) AND VAR65<REF(VAR65,1),HIGH+1,'结束'),COLORGREEN;
