D:=72; ZBVAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20; ZBVAR2:=2*Abs(ZBVAR1); ZBVAR3:=100-3*SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1); ZBVAR4:=100-3*SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1); ZBVAR5:=(HIGH+LOW+CLOSE)/3; ZBVAR6:=(ZBVAR5-MA(ZBVAR5,14))/(0.015*AVEDEV(ZBVAR5,14)); ZBVAR7:=(ZBVAR5-MA(ZBVAR5,89))/(0.015*AVEDEV(ZBVAR5,89)); ZBVAR8:=IF(ZBVAR6>=150 AND ZBVAR6<200 AND ZBVAR7>=150 AND ZBVAR7<200,10,0); ZBVAR9:=IF(ZBVAR6<=-150 AND ZBVAR6>-200 AND ZBVAR7<=-150 AND ZBVAR7>-200,-10,ZBVAR8); ZBVARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; ZBVARB:=100-ABS(ZBVARA); ZBVARC:=3*SMA((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA ((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1); ZBVARD:=3*SMA((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA ((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1); ZBVARE:=REF(LOW,1)*0.9; ZBVARF:=LOW*0.9; ZBVAR10:=(ZBVARF*vol+ZBVARE*(CAPITAL-VOL))/CAPITAL; ZBVAR11:=EMA(ZBVAR10,30); ZBVAR12:=ZBVAR11-CLOSE; ZBVAR13:=REF(CLOSE,1); ZBVAR14:=SMA(MAX(CLOSE-ZBVAR13,0),7,1)/SMA(ABS(CLOSE-ZBVAR13),7,1)*100; ZBVAR15:=SMA(MAX(CLOSE-ZBVAR13,0),13,1)/SMA(ABS(CLOSE-ZBVAR13),13,1)*100; ZBVAR16:=BARSCOUNT(CLOSE); ZBVAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100; ZBVAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2; ZBVAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100; ZBVAR1A:=(SMA(ZBVAR19,4,1)-50)*2; ZBVAR1B:=SMA(ZBVAR1A,3,1); ZBVAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100; ZBVAR1D:=SMA(ZBVAR1C,4,1); ZBVAR1E:=SMA(ZBVAR1D,3,1); ZBVAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100; ZBVAR20:=IF(ZBVAR17<=25 AND ZBVAR18<-95 AND ZBVAR1F>20 AND ZBVAR1B<-30 AND ZBVAR1E<30 AND ZBVAR12>=-0.25 AND ZBVAR14<22 AND ZBVAR15<28 AND ZBVAR16>50,80,0); 活筹OAMV: ZBVAR3,COLORFF00FF; OX: IF(ZBVARB<90,ZBVARB,100),COLORFFCC66; ZBVAR21:=IF(ZBVAR1>0,ZBVAR1,0); 核能: IF(ZBVAR1<0,ZBVAR2,0), LINESTICK; 牛角: ZBVAR20,COLORYELLOW;
预警: IF(ZBVAR7>=200 AND ZBVAR6>=150,15,IF(ZBVAR7<=-200 AND ZBVAR6<=-150,-15,ZBVAR9)) +60,COLOR00FF00; ZBVAR22:=100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)); ZBVAR23:=MA(ZBVAR22,3); ZBVAR24:=EMA(AMOUNT/VOL/100,5); ZBVAR25:=EMA(AMOUNT/VOL/100,13); ZBVAR26:=ZBVAR24-ZBVAR25; 势能: IF(1000*ZBVAR26/ZBVAR24>0,1000*ZBVAR26/ZBVAR24,0),COLORRED,LINETHICK2; STICKLINE(ZBVAR3>=REF(ZBVAR4,1),ZBVAR3,ZBVAR4,8,1),COLORRED; STICKLINE(ZBVAR3<REF(ZBVAR4,1),ZBVAR3,ZBVAR4,8,1),COLOR00FF00; ZBVAR27:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1); ZBVAR28:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1); ZBVAR29:=ZBVAR21>50 AND 预警>60 AND OX=100; ZBVAR2A:=ZBVAR21>48 AND 预警>60 AND OX<100; ZBVAR2B:=核能>38 AND 预警<55; ZBVAR2C:=牛角>50 AND OX<90; ZBVAR2D:=ZBVAR3<REF(ZBVAR4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1); ZBVAR2E:=ZBVAR3>=REF(ZBVAR4,1) AND CLOSE<REF(CLOSE,1) AND 预警=60 AND 牛角=0 AND 核能>=REF(核能,1) AND ZBVARC<REF(ZBVARD,1); DRAWTEXT(ZBVAR27 AND COUNT(ZBVAR27,30)=1,90,'持股待涨'),COLORFF00FF; DRAWTEXT(ZBVAR28 AND COUNT(ZBVAR28,30)=1,10,'出局为佳'),COLOR00FF00; DRAWTEXT(ZBVAR29 AND COUNT(ZBVAR29,30)=1,70,'上涨过急,需要调整'),COLORWHITE; DRAWTEXT(ZBVAR2A AND COUNT(ZBVAR2A,30)=1,80,'拉升在即狂牛!'),COLORYELLOW; DRAWTEXT(ZBVAR2B AND COUNT(ZBVAR2B,30)=1,20,'不必杀跌有反弹'),COLORWHITE; DRAWTEXT(ZBVAR2C AND COUNT(ZBVAR2C,30)=1,30,'角斗士,阶段底部'),COLORYELLOW; DRAWTEXT(ZBVAR2D AND COUNT(ZBVAR2D,30)=1,60,'大资金进场'),COLOR0099FF; DRAWTEXT(ZBVAR2E AND COUNT(ZBVAR2E,30)=1,40,'高点回落'),COLORFFCC66; XG:牛角=80;
D:=72;
ZBVAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
ZBVAR2:=2*Abs(ZBVAR1);
ZBVAR3:=100-3*SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1);
ZBVAR4:=100-3*SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1);
ZBVAR5:=(HIGH+LOW+CLOSE)/3;
ZBVAR6:=(ZBVAR5-MA(ZBVAR5,14))/(0.015*AVEDEV(ZBVAR5,14));
ZBVAR7:=(ZBVAR5-MA(ZBVAR5,89))/(0.015*AVEDEV(ZBVAR5,89));
ZBVAR8:=IF(ZBVAR6>=150 AND ZBVAR6<200 AND ZBVAR7>=150 AND ZBVAR7<200,10,0);
ZBVAR9:=IF(ZBVAR6<=-150 AND ZBVAR6>-200 AND ZBVAR7<=-150 AND ZBVAR7>-200,-10,ZBVAR8);
ZBVARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
ZBVARB:=100-ABS(ZBVARA);
ZBVARC:=3*SMA((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA
((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1);
ZBVARD:=3*SMA((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA
((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1);
ZBVARE:=REF(LOW,1)*0.9;
ZBVARF:=LOW*0.9;
ZBVAR10:=(ZBVARF*vol+ZBVARE*(CAPITAL-VOL))/CAPITAL;
ZBVAR11:=EMA(ZBVAR10,30);
ZBVAR12:=ZBVAR11-CLOSE;
ZBVAR13:=REF(CLOSE,1);
ZBVAR14:=SMA(MAX(CLOSE-ZBVAR13,0),7,1)/SMA(ABS(CLOSE-ZBVAR13),7,1)*100;
ZBVAR15:=SMA(MAX(CLOSE-ZBVAR13,0),13,1)/SMA(ABS(CLOSE-ZBVAR13),13,1)*100;
ZBVAR16:=BARSCOUNT(CLOSE);
ZBVAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
ZBVAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2;
ZBVAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
ZBVAR1A:=(SMA(ZBVAR19,4,1)-50)*2;
ZBVAR1B:=SMA(ZBVAR1A,3,1);
ZBVAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
ZBVAR1D:=SMA(ZBVAR1C,4,1);
ZBVAR1E:=SMA(ZBVAR1D,3,1);
ZBVAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
ZBVAR20:=IF(ZBVAR17<=25 AND ZBVAR18<-95 AND ZBVAR1F>20 AND ZBVAR1B<-30 AND ZBVAR1E<30 AND ZBVAR12>=-0.25 AND ZBVAR14<22 AND ZBVAR15<28 AND ZBVAR16>50,80,0);
活筹OAMV: ZBVAR3,COLORFF00FF;
OX: IF(ZBVARB<90,ZBVARB,100),COLORFFCC66;
ZBVAR21:=IF(ZBVAR1>0,ZBVAR1,0);
核能: IF(ZBVAR1<0,ZBVAR2,0), LINESTICK;
牛角: ZBVAR20,COLORYELLOW;
预警: IF(ZBVAR7>=200 AND ZBVAR6>=150,15,IF(ZBVAR7<=-200 AND ZBVAR6<=-150,-15,ZBVAR9))
+60,COLOR00FF00;
ZBVAR22:=100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34));
ZBVAR23:=MA(ZBVAR22,3);
ZBVAR24:=EMA(AMOUNT/VOL/100,5);
ZBVAR25:=EMA(AMOUNT/VOL/100,13);
ZBVAR26:=ZBVAR24-ZBVAR25;
势能: IF(1000*ZBVAR26/ZBVAR24>0,1000*ZBVAR26/ZBVAR24,0),COLORRED,LINETHICK2;
STICKLINE(ZBVAR3>=REF(ZBVAR4,1),ZBVAR3,ZBVAR4,8,1),COLORRED;
STICKLINE(ZBVAR3<REF(ZBVAR4,1),ZBVAR3,ZBVAR4,8,1),COLOR00FF00;
ZBVAR27:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1);
ZBVAR28:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1);
ZBVAR29:=ZBVAR21>50 AND 预警>60 AND OX=100;
ZBVAR2A:=ZBVAR21>48 AND 预警>60 AND OX<100;
ZBVAR2B:=核能>38 AND 预警<55;
ZBVAR2C:=牛角>50 AND OX<90;
ZBVAR2D:=ZBVAR3<REF(ZBVAR4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
ZBVAR2E:=ZBVAR3>=REF(ZBVAR4,1) AND CLOSE<REF(CLOSE,1) AND 预警=60 AND 牛角=0 AND 核能>=REF(核能,1) AND ZBVARC<REF(ZBVARD,1);
DRAWTEXT(ZBVAR27 AND COUNT(ZBVAR27,30)=1,90,'持股待涨'),COLORFF00FF;
DRAWTEXT(ZBVAR28 AND COUNT(ZBVAR28,30)=1,10,'出局为佳'),COLOR00FF00;
DRAWTEXT(ZBVAR29 AND COUNT(ZBVAR29,30)=1,70,'上涨过急,需要调整'),COLORWHITE;
DRAWTEXT(ZBVAR2A AND COUNT(ZBVAR2A,30)=1,80,'拉升在即狂牛!'),COLORYELLOW;
DRAWTEXT(ZBVAR2B AND COUNT(ZBVAR2B,30)=1,20,'不必杀跌有反弹 '),COLORWHITE;
DRAWTEXT(ZBVAR2C AND COUNT(ZBVAR2C,30)=1,30,'角斗士,阶段底部 '),COLORYELLOW;
DRAWTEXT(ZBVAR2D AND COUNT(ZBVAR2D,30)=1,60,'大资金进场'),COLOR0099FF;
DRAWTEXT(ZBVAR2E AND COUNT(ZBVAR2E,30)=1,40,'高点回落'),COLORFFCC66;
XG:牛角=80;