卖公式超长代码自用

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,'←风险');