MAH:=(H*18+REF(H,1)*17+REF(H,2)*16+REF(H,3)*15+REF(H,4)*14+REF(H,5)*13+REF(H,6)*12+REF(H,7)*11+REF(H,8)*10+REF(H,9)*9+REF(H,10)*8+REF(H,11)*7+REF(H,12)*6+REF(H,13)*5+REF(H,14)*4+REF(H,15)*3+REF(H,16)*2+REF(H,17)*1)/171;
 
MAL:=(L*18+REF(L,1)*17+REF(L,2)*16+REF(L,3)*15+REF(L,4)*14+REF(L,5)*13+REF(L,6)*12+REF(L,7)*11+REF(L,8)*10+REF(L,9)*9+REF(L,10)*8+REF(L,11)*7+REF(L,12)*6+REF(L,13)*5+REF(L,14)*4+REF(L,15)*3+REF(L,16)*2+REF(L,17)*1)/171;
 
MA5:=MA(CLOSE,5);
 
MA10:=MA(CLOSE,10);
 
MA20:=MA(CLOSE,20);
 
MA60:=MA(CLOSE,60);
 
DK:= CLOSE>=MAH OR (C>MA5 AND C>MA10 AND C>MA20 AND C>MA60);
 
KK:= MAL>CLOSE OR (C<MA5 AND C<MA10 AND C<MA20 AND C<MA60);
 
DK1:=BARSLAST(DK);
 
KK1:=BARSLAST(KK);
 
DK2:=BARSLAST(CROSS(KK1,DK1));
 
KK2:=BARSLAST(CROSS(DK1,KK1));
 
HS:=DK2<KK2;
 
LS:=KK2<DK2;
 
STICKLINE(HS,-0.5,0.5,6,0),COLOR001050;
 
STICKLINE(LS,-0.5,0.5,6,0),COLORBLACK;
 
{红柱兰柱分阴阳}
 VARE1:=MA((VOL-REF(VOL,1))/REF(VOL,1),5);
 VARE2:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
 MY:= VARE2*(1+VARE1);
 阴阳:MA(MY,18),COLORSTICK;
 趋:MA(阴阳,5);
 
{成交买卖强弱}
 
A44:=VOL*CLOSE;
 
B44:=SUM(A44,1)/SUM(VOL,1);
 
B144:=EMA(B44,17);
 
买卖强弱:MA((B44-B144)*100/B44,18),COLORRED,LINETHICK2;
 IF(买卖强弱<REF(买卖强弱,1),买卖强弱,DRAWNULL),COLORGREEN,LINETHICK2;
 
{操盘区}
 
VAR0:=(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20))/4;
 
积极操盘区:IF(VAR0>REF(VAR0,2),VAR0,DRAWNULL), COLORRED, NODRAW;
 
持币观望区:IF(VAR0<REF(VAR0,2),VAR0,DRAWNULL), COLORGREEN, NODRAW;
 
{安全区间}
 
安全区间:=EMA((EMA(CLOSE,10)-EMA(CLOSE,60)),10),NODRAW;
 
DRAWTEXT(安全区间>REF(安全区间,1),6.5,'多'),COLORRED;
 
{量能异动}
 
VAR2Q:=REF(LOW,1);
 
VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*100;
 
VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*10,VAR3Q/10),3);
 
VAR5Q:=LLV(LOW,30);
 
VAR6Q:=HHV(VAR4Q,30);
 
VAR7Q:=IF(MA(CLOSE,58),1,0);
 
VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/999*VAR7Q;
 
火焰山:=IF(VAR8Q>100,5,VAR8Q/15);
 
STICKLINE(火焰山>0,0 ,火焰山*1.02,1,0 ),COLOR4444FF;
 
{绿色资金进入区}
 
VAR1:=INDEXA/100000000;
 
VAR2:=INDEXADV;
 
VAR3:=INDEXDEC;
 
VAR4:=VAR2/(VAR2+VAR3);
 
VAR5:=VAR3/(VAR2+VAR3);
 
VAR6:=EMA(VAR4,3);
 
VAR7:=EMA(VAR5,3);
 
VAR8:=EMA(VAR6,5);
 
VAR9:=EMA(VAR7,5);
 
资金:=EMA(VAR9,10)/150;
 
底:=BARSLAST(LLV(L,4)=LLV(L,120))<5 ;
 
安全区:STICKLINE(底,资金-0.3,资金,3,0),COLORGREEN;
 
{看空看多区间变化}
 
VAR1456:=(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*100;
 
机构做空能量线:= SMA(VAR1456,3,1)-50,LINETHICK2,COLORGREEN;
 
VAR2456:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 
机构做多能量线:= SMA(VAR2456,5,1)-8-50,LINETHICK2,COLORRED;
 
DRAWTEXT(CROSS(机构做多能量线,0),5,'<-看多'),COLORRED;
 
DRAWTEXT(CROSS(0,机构做多能量线),-5,'<-看空'),COLORGREEN;
 
DRAWTEXT(CROSS(机构做空能量线,0),-4,'<-确认看空'),COLORGREEN;
 
DRAWTEXT(CROSS(0,机构做空能量线),4,'<-确认看多'),COLORRED;
 
{生命量能}
 
生命量能:=EMA(100*(CLOSE-LLV(LOW,31))/(HHV(HIGH,31)-LLV(LOW,31)),3)/4;
 

DRAWTEXT(生命量能<1,-2.5,'<--3级买'),COLORFF1493;
 
{量能}
 
VAR21:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
 
VAR22:=SMA(ABS(LOW-VAR21),13,1)/SMA(MAX(LOW-VAR21,0),10,1);
 
VAR23:=EMA(VAR22,10);
 
VAR24:=LLV(LOW,33);
 
VAR25:=EMA(IF(LOW<=VAR24,VAR23,0),3);
 
DRAWTEXT(VAR25>REF(VAR25,1),-3,'买量'),COLORRED;
 
VAR177:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
 
VAR277:=SMA(VAR177,3,1);
 
VAR377:=SMA(VAR277,3,1);
 
趋势线:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
 
VAR777:=CROSS(VAR377,趋势线) AND VAR377>60;
 
{DRAWTEXT(FILTER(VAR777,5)=1,+3,'<-3级卖'),COLOR32CD32; }
 
{动能运行轨迹}
 
RSV:=(((CLOSE - LLV(LOW,33)) / (HHV(HIGH,33) - LLV(LOW,33))) * 100);
 
Y0:=SMA(RSV,7,1);
 
Y1:=SMA(SMA(RSV,7,1),3,1);
 
Y2:=(((CLOSE/COST(13))<=0.8)*10),COLORMAGENTA;
 
Y3:=SMA(SMA(SMA(RSV,6,1),5,1),3,1),COLORGREEN;
 
DRAWTEXT(CROSS(18,Y0) AND Y1<21,-2.5,'进底部'),COLORGREEN;
 
DRAWTEXT(CROSS(Y0,20),-3.3,'出底部'),COLORRED;
 
{解盘}
 
ARE4:=MA(C,20);
 
ARE5:=(C>MA(C,5));
 
ARE6:=(MA(C,5)>MA(C,10));
 
ARE7:=(C>MA(C,10));
 
ARE8:=(MA(C,5)>MA(C,20));
 
ARE9:=(C>MA(C,20));
 
ARE10:=REF(ARE4,1);
 
ARE11:=(ARE4>ARE10);
 
AVX:=(((((IF(ARE5,10,(0-10))+IF(ARE6,10,(0-10)))+IF(ARE7,10,(0-10)))+IF(ARE8,10,(0-10)))+IF(ARE9,10,(0-10)))+IF(ARE11,10,(0-10)));
 
DSLX:=(C/INDEXC);
 
DSLX1:=MA(DSLX,5);
 
DSLX2:=MA(DSLX,10);
 
  VRE1:=MA(V,5);
 
VRE2:=MA(V,10);
 
阻力位:=IF((C>200),(C*1.01),(C*1.07));
 
阻力位１:=IF((C<10),(C*1.05),阻力位);
 
止损位:=IF((C>200),(C*0.99),(C*0.93));
 
止损位１:=IF((C<10),(C*0.95),止损位);
 
TJTS1:=ISLASTBAR AND C<500;
 
TJTS2:=ISLASTBAR AND C>500;
 
KDAT:=REFDATE(HHV(H,45)/1.01,DATE);
 
解盘1:=CONST(IF(TJTS1 AND  ((CROSS(AVX,1) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
 
解盘2:=CONST(IF(TJTS1 AND  ((CROSS(AVX,1) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));
 
解盘3:=CONST(IF(TJTS1 AND  ((CROSS(AVX,1) AND (VRE1 > VRE2)) AND (DSLX < DSLX1)) ,1,0));
 
解盘4:=CONST(IF(TJTS1 AND  ((CROSS(AVX,1) AND (VRE1 <= VRE2)) AND (DSLX < DSLX1)) ,1,0));
 
解盘5:=CONST(IF(TJTS1 AND  ((CROSS(1,AVX) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
 
解盘6:=CONST(IF(TJTS1 AND  ((CROSS(1,AVX) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));
 
解盘7:=CONST(IF(TJTS1 AND  ((CROSS(1,AVX) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
 
解盘8:=CONST(IF(TJTS1 AND  ((CROSS(1,AVX) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));
 
解盘9:=CONST(IF(TJTS1 AND  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
 
解盘10:=CONST(IF(TJTS1 AND  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));
 
解盘11:=CONST(IF(TJTS1 AND  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
 
解盘12:=CONST(IF(TJTS1 AND  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));
 
解盘13:=CONST(IF(TJTS1 AND  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
 
解盘14:=CONST(IF(TJTS1 AND  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));
 
解盘15:=CONST(IF(TJTS1 AND  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
 
解盘16:=CONST(IF(TJTS1 AND  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));
 
解盘17:=CONST(IF(TJTS2 AND  (CROSS(AVX,1) AND (VRE1 >= VRE2)) ,1,0));
 
解盘18:=CONST(IF(TJTS2 AND  (CROSS(AVX,1) AND (VRE1 >= VRE2)) ,1,0));
 
解盘19:=CONST(IF(TJTS2 AND  (CROSS(AVX,1) AND (VRE1 < VRE2)) ,1,0));
 
解盘20:=CONST(IF(TJTS2 AND  (CROSS(AVX,1) AND (VRE1 < VRE2)) ,1,0));
 
解盘21:=CONST(IF(TJTS2 AND  (CROSS(1,AVX) AND (VRE1 >= VRE2)) ,1,0));
 
解盘22:=CONST(IF(TJTS2 AND  (CROSS(1,AVX) AND (VRE1 < VRE2)) ,1,0));
 
解盘23:=CONST(IF(TJTS2 AND  (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) ,1,0));
 
解盘24:=CONST(IF(TJTS2 AND  (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) ,1,0));
 
解盘25:=CONST(IF(TJTS2 AND  (((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) ,1,0));
 
解盘26:=CONST(IF(TJTS2 AND  (((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) ,1,0));
 
解盘文字1:=IF(解盘1=1,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右', IF(解盘2=1,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右', IF(解盘3=1,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右', IF(解盘4=1,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右', IF(解盘5=1,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望', IF(解盘6=1,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓', IF(解盘7=1,'该股放量下跌，走势明显偏弱，离场观望', IF(解盘8=1,'该股缩量下跌，走势偏弱，离场观望', IF(解盘9=1,'该股形态良好，强势明显，量能充足，可以继续持有', IF(解盘10=1,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险', IF(解盘11=1,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓', IF(解盘12=1,'该股走势趋弱，量能不足，减持大部分筹码', IF(解盘13=1,'该股形态不佳，注意成交量的变化，但目前不适合参与', IF(解盘14=1,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与', IF(解盘15=1,'该股有走强迹象，但量能不足，趋势不明，不适合操作', IF(解盘17=1,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右', IF(解盘19=1,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌 ', IF(解盘21=1,'大盘形态走坏，重仓者可以减去大部分仓位 ', IF(解盘22=1,'大盘缩量调整，注意风险，短线清仓观望', IF(解盘23=1,'大盘走势良好，量能理想，可以继续持有强势股', IF(解盘24=1,'大盘形态良好，但量能稍显不足，随时准备减仓', IF(解盘25=1,'大盘趋势不明，注意成交量变化，目前不适宜进场', IF(解盘26=1,'大盘趋势向下，量能萎缩，不适合进场',DRAWNULL)))))))))))))))))))))));
 
解盘文字2:=IF(解盘16=1,'该股走势太弱，没有参与价值',IF(解盘18=1,' 如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎', IF(解盘20=1,' 可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入',DRAWNULL)));
 
   DRAWTEXT(CURRBARSCOUNT=75{下面提示位置} AND  (解盘1=1 OR 解盘2=1 OR 解盘3=1 OR 解盘4=1 OR 解盘5=1 OR 解盘6=1 OR 解盘7=1 OR  解盘8=1 OR 解盘9=1 OR 解盘10=1 OR 解盘11=1 OR 解盘12=1 OR 解盘13=1 OR 解盘14=1 OR 解盘15=1 OR 解盘17=1 OR  解盘19=1 OR 解盘21=1 OR 解盘22=1 OR 解盘23=1 OR 解盘24=1 OR 解盘25=1 OR 解盘26=1),(4.7),解盘文字1),COLORFEFE00;
 
DRAWTEXT(CURRBARSCOUNT=75{下面提示位置} AND (解盘16=1 OR 解盘18=1 OR 解盘20=1),IF(解盘18=1 OR 解盘20=1,4.2,1),解盘文字2),COLOR0000FF;
 
{ISLASTBAR,0.00,0.12,0}
 
{资金流}
 
ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}
 
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//小筹码估算}
 
ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//小股民套牢筹码比率}
 
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}
 
ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量}
 
ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天数}
 
ZSHJJ:=EMA(ZSHTL,89);{//小股民警戒}
 
ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}
 
ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{//资金流入强度}
 
SH8:=EMA(ZSHTL,8);
 
DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);
 
RSVV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
 
K1:=SMA(RSVV,10,1);
 
D1:=SMA(K1,5,1);
 
KKK:=INTPART(K1);
 
DD:=INTPART(D1);
 
TFXXS:=KKK+DD;{//变异KD风险系数}
 
TGLD:=MOD(TFXXS,10);{//踏浪涨停概率点}
 
TGLXS:=(TFXXS-REF(TFXXS,1))*10;{//变异KD乖离系数}
 
TYCFX:=TFXXS+TGLXS;{//变异KD预测风险}
 
T1:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=1);
 
T2:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=0);
 
T3:=CONST( ZCMZL=REF(ZCMZL,1));
 
T4:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=1);
 
T5:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=0);
 
T6:=CONST(TFXXS<=50 );
 
T7:=CONST(TFXXS>=160 );
 
T8:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS<=100 );
 
T9:=CONST( TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS>100);
 
T10:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS>100 );
 
T11:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS<=100 );
 
T12:=CONST( ZSHTL>90 );
 
T13:=CONST( ZZLKP>75 );
 
T14:=CONST(CROSS(ZCMZL,ZZLJJ) AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );
 
T15:=CONST(CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );
 
T16:=CONST( CROSS(ZCMZL,ZSHTL) AND ZSHTL>ZZLKP AND ZCMZL>REF(ZCMZL,1));
 
T17:=CONST( CROSS(ZCMZL,100) AND ZCMZL>REF(ZCMZL,1));
 
T18:=CONST(REF(ZSHTL,1)>90 AND ZSHTL<90 );
 
TS1:=IF(T1=1,0+0.03,0);
 
TS2:=IF(T2=1,TS1+0.03,TS1);
 
TS3:=IF(T3=1,TS2+0.03,TS2);
 
TS4:=IF(T4=1,TS3+0.03,TS3);
 
TS5:=IF(T5=1,TS4+0.03,TS4);
 
TS6:=IF(T6=1,0+0.73,0);
 
TS7:=IF(T7=1,TS6+0.03,TS6);
 
TS8:=IF(T8=1,TS7+0.03,TS7);
 
TS9:=IF(T9=1,TS8+0.03,TS8);
 
TS10:=IF(T10=1,TS9+0.03,TS9);
 
TS11:=IF(T11=1,TS10+0.03,TS10);
 
TS12:=IF(T12,0+0.03,0);
 
TS13:=IF(T13=1,TS12+0.03,TS12);
 
TS14:=IF(T14=1,TS13+0.03,TS13);
 
TS15:=IF(T15=1,TS14+0.03,TS14);
 
TS16:=IF(T16=1,TS15+0.03,TS15);
 
TS17:=IF(T17=1,TS16+0.03,TS16);
 
TS18:=IF(T8=1,TS17+0.03,TS17);
 
{OUTSTR:=IF(T1,'★主力动向监控：主力增仓',
 
IF(T2,'★主力动向监控：主力减仓',
 
IF(T3,'★主力动向监控：多空平衡',
 
IF(T4,'★主力动向监控：主力回补',
 
IF(T5,'★主力动向监控：主力出逃',
 
IF(T6,'★操作风险提示：买入风险',
 
IF(T7,'★操作风险提示：卖出风险',
 
IF(T8,'★操作风险提示：追涨博弈',
 
IF(T9,'★操作风险提示：稳健持股',
 
IF(T10,'★操作风险提示：盘跌减仓',
 
IF(T11,'★操作风险提示：杀跌空仓',
 
IF(T12,'☆特别信号提示：筑底散兵坑',
 
IF(T13,'☆特别信号提示：铸顶风险区',
 
IF(T14,'☆特别信号提示：穿越主力',
 
IF(T15,'☆特别信号提示：穿越主力',
 
IF(T16,'☆特别信号提示：穿越散户',
 
IF(T17,'☆特别信号提示：全盘穿越',
 
IF(T18,'☆特别信号提示：神秘黑洞','无信号'))))))))))))))))));
 
DRAWTEXT_FIX(1,1,TS18,1,OUTSTR),COLOR9966FF;}
 
DRAWTEXT_FIX(T1,0.66,TS1,1,'★主力动向监控：主力增仓'),COLORRED;
 
DRAWTEXT_FIX(T2,0.66,TS2,1,'★主力动向监控：主力减仓'),COLORMAGENTA;
 
DRAWTEXT_FIX(T3,0.66,TS3,1,'★主力动向监控：多空平衡'),COLORGRAY;
 
DRAWTEXT_FIX(T4,0.66,TS4,1,'★主力动向监控：主力回补'),COLORFF9933;
 
DRAWTEXT_FIX(T5,0.66,TS5,1,'★主力动向监控：主力出逃'),COLORGREEN;
 
DRAWTEXT_FIX(T6,0.86,TS6,1,'★操作风险提示：买入风险'),COLORYELLOW;
 
DRAWTEXT_FIX(T7,0.86,TS7,1,'★操作风险提示：卖出风险'),COLORCYAN;
 
DRAWTEXT_FIX(T8,0.86,TS8,1,'★操作风险提示：追涨博弈'),COLORRED;
 
DRAWTEXT_FIX(T9,0.86,TS9,1,'★操作风险提示：稳健持股'),COLORMAGENTA;
 
DRAWTEXT_FIX(T10,0.86,TS10,1,'★操作风险提示：盘跌减仓'),COLORWHITE;
 
DRAWTEXT_FIX(T11,0.86,TS11,1,'★操作风险提示：杀跌空仓'),COLORGREEN;
 
DRAWTEXT_FIX(T12,0.36,TS12,1,'☆特别信号提示：筑底散兵坑 '),COLOR66FFCC;
 
DRAWTEXT_FIX(T13,0.36,TS13,1,'☆特别信号提示：铸顶风险区'),COLORCYAN;
 
DRAWTEXT_FIX(T14,0.36,TS14,1,'☆特别信号提示：穿越主力     '),COLORRED;
 
DRAWTEXT_FIX(T15,0.36,TS15,1,'☆特别信号提示：穿越主力 '),COLORYELLOW;
 
DRAWTEXT_FIX(T16,0.36,TS16,1,'☆特别信号提示：穿越散户  '),COLORGREEN;
 
DRAWTEXT_FIX(T17,0.36,TS17,1,'☆特别信号提示：全盘穿越  '),COLOR3399FF;
 
DRAWTEXT_FIX(T18,0.36,TS18,1,'☆特别信号提示：神秘黑洞 '),COLOR9966FF;
 
{CCI之改动}
 
TYP:=(HIGH+LOW+CLOSE)/3;
 
OUT:=(TYP-MA(TYP,5))/(0.015*AVEDEV(TYP,5));
 
OUT1:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));
 
OUT2:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));
 
OUT3:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));
 
WEI:=OUT*0.1+OUT1*0.2+OUT2*0.3+OUT3*0.4;
 
DRAWTEXT(WEI<-130,-5,'超'),COLORYELLOW;
 
DRAWTEXT(WEI<-150,-5.5,'跌'),COLORRED;
 
DRAWTEXT(WEI>130,5,'超');
 
DRAWTEXT(WEI>150,5.5,'涨'),COLORGREEN;
 
{顶底} A90:=MA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),19);
 
B90:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
 
D90:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4);
 
长期线:=A90+100,COLOR9900FF;
 
短期线:=B90+100,COLOR888888;
 
中期线:=D90+100,COLORYELLOW,LINETHICK2;
 
见顶:=((REF(中期线,1)>85 AND  REF(短期线,1)>85 AND REF(长期线,1)>65) AND CROSS(长期线,短期线));
 
顶部区域:=(中期线<REF(中期线,1) AND REF(中期线,1)>80) AND (REF(短期线,1)>95 OR REF(短期线,2)>95 ) AND 长期线>60 AND 短期线<83.5 AND 短期线<中期线 AND 短期线<长期线+4,COLORGREEN;
 
顶部:=FILTER(顶部区域,4);
 
DRAWTEXT(顶部,6,'<--短顶出现'),COLORGREEN;
 
底部区域:=FILTER((长期线<12 AND 中期线<8 AND (短期线<7.2 OR REF(短期线,1)<5) AND (中期线>REF(中期线,1) OR 短期线>REF(短期线,1))) OR (长期线<8 AND 中期线<7 AND 短期线<15 AND 短期线>REF(短期线,1)) OR (长期线<10 AND 中期线<7 AND 短期线<1),4) ,COLORGREEN;
 
DRAWTEXT(底部区域,-6,'<--短底出现'),COLORRED;
 
低位金:=50*(长期线<15 AND REF(长期线,1)<15 AND 中期线<18 AND 短期线>REF(短期线,1) AND CROSS(短期线,长期线) AND 短期线>中期线 AND (REF(短期线,1)<5 OR REF(短期线,2)<5 )  AND (中期线>=长期线 OR REF( 短期线,1)<1 ));
 
DRAWTEXT(低位金,-6.5,'<--低位金叉' ),COLORRED;
 
{大小顶}
 
V1:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
 
V2:=SMA(V1,4,1);
 
V3:=SMA(V2,4,1);
 
V4:=SMA(V3,4,1);
 
DRAWTEXT(CROSS(V3,11),-4,'←低买'),COLORRED;
 
DRAWTEXT(CROSS(V3,92),5.5,'←大风险');
 
DRAWTEXT(CROSS(V3,79),5.5,'←风险');