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;
{本文为理想论坛博主「评估老张」的帖子，转载请注明出处。
原文链接: HTTPS://WWW.55188.COM/THREAD-10596828-1-1.HTML};
