 |
ZBGS1:=9;
ZBGS2:=3;
ZBGS3:=3;
ZBGS4:100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)),COLOR0080FF;
ZBGS5:100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)),COLORGREEN;
ZBGS6:100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)),COLORFF8000;
ZBGS7:100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),COLOR00FFFF;
ZBGS8:=(CLOSE-LLV(LOW,ZBGS1))/(HHV(HIGH,ZBGS1)-LLV(LOW,ZBGS1))*100;
ZBGS9:=SMA(ZBGS8,ZBGS2,1);
ZBGS10:=SMA(ZBGS9,ZBGS3,1);
ZBGS11:=3*ZBGS9-2*ZBGS10;
ZBGS12:=LLV(LOW,26);
ZBGS13:=HHV(HIGH,34);
ZBGS14:=EMA((CLOSE-ZBGS12)/(ZBGS13-ZBGS12)*4,4)*25;
DRAWTEXT(ZBGS14< 10,10,'底'),COLORWHITE;
DRAWTEXT(ZBGS14>90,90,'顶'),COLORGREEN;
ZBGS15:=(C-MA(C,6))/MA(C,6)*100;
ZBGS16:=(C-MA(C,24))/MA(C,24)*100;
ZBGS17:=(C-MA(C,32))/MA(C,32)*100;
ZBGS18:=(ZBGS15+ZBGS16+ZBGS17)/3;
ZBGS19:=EMA(ZBGS18,5);
ZBGS20:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;
ZBGS21:=SMA(SMA(100-3*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1)+SMA(2*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1),15,1);
ZBGS22:=ZBGS21< REF(ZBGS21,1) AND V>REF(V,1) AND C>REF(C,1);
ZBGS23:=EMA(ZBGS19,5)*4;
ZBGS24:=EMA(ZBGS23,5),COLORMAGENTA,LINETHICK2;
ZBGS25:=ZBGS23*3-ZBGS24*2,COLORYELLOW,LINETHICK2;
ZBGS26:IF(LLV(ZBGS20,3)< ZBGS20,-15,DRAWNULL),LINETHICK2,COLORRED;
ZBGS27:IF(ZBGS20=LLV(ZBGS20,3),-15,DRAWNULL),LINETHICK2,COLORGREEN;
ZBGS28:IF(ZBGS25>ZBGS24,-10,DRAWNULL),LINETHICK2,COLORCC66FF;
ZBGS29:IF(ZBGS22>0,-5,DRAWNULL),LINETHICK2,COLORYELLOW;
ZBGS30:IF(ZBGS25< ZBGS24,-10,DRAWNULL),LINETHICK2,COLORFF9900;
ZBGS31:IF(ZBGS22=0,-5,DRAWNULL),LINETHICK2,COLOR6B8E23;
ZBGS32:=((-((100)*(HHV(H,14) - C))/(HHV(HIGH,14) - LLV(L,14))));
ZBGS33:=MA(C,18);
ZBGS34:=(C-ZBGS33)/ZBGS33*100>=-9.9 AND C< ZBGS33;
ZBGS35:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
ZBGS36:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*1;
ZBGS37:=EMA(SMA(ZBGS36,3,1),2);
ZBGS38:=SMA(ZBGS37,3,1);
ZBGS39:=SMA(ZBGS35,3,1);
ZBGS40:=SMA(ZBGS39,3,1);
ZBGS41:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
ZBGS42:=EMA(C-L,5) ;
ZBGS43:=MA((C+REF(C,1)+REF(C,1))/3+ZBGS42,5);
ZBGS44:=MA(REF(C,1)-ZBGS42,5);
ZBGS45:=MA(C,20);
ZBGS46:=MA(C,2);
ZBGS47:=MA(C,10);
ZBGS48:=MA(C,20);
ZBGS49:=EXIST(CROSS(ZBGS46,ZBGS47) AND CROSS(ZBGS46,ZBGS48),1);
ZBGS50:=(HIGH+LOW+CLOSE)/3;
ZBGS51:=(ZBGS50-MA(ZBGS50,14))*1000/(15*AVEDEV(ZBGS50,14)),COLORRED;
ZBGS52:=(ZBGS50-MA(ZBGS50,36))*1000/(15*AVEDEV(ZBGS50,36)),COLORGREEN;
DRAWTEXT(CROSS(ZBGS32,-2) AND CROSS(ZBGS39,ZBGS40) AND CROSS(ZBGS37,ZBGS38),50,'低位启动'),COLOR0000FF;
DRAWTEXT(ZBGS34 AND C/REF(C,1)>1.080,50,'起涨点'),COLORRED;
DRAWTEXT(ZBGS41>O AND O>ZBGS44 AND C>ZBGS43 AND C>ZBGS45 AND C>ZBGS41 AND ZBGS49 AND CROSS(ZBGS39,ZBGS40) AND CROSS(ZBGS37,ZBGS38),50,'突破'),COLORGREEN;
DRAWTEXT(CROSS(ZBGS51,ZBGS52) AND REF(ZBGS51,1)=LLV(ZBGS51,25) AND CROSS(ZBGS9,ZBGS10),0.4,'抄底王'),COLORYELLOW;
ZBGS53:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
ZBGS54:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
ZBGS55:=SMA(ZBGS53,3,1);
ZBGS56:=SMA(ZBGS55,3,1);
ZBGS57:=EMA(SMA(ZBGS54,3,1),2);
ZBGS58:=SMA(ZBGS57,3,1);
DRAWTEXT(CROSS(ZBGS55,ZBGS56) AND CROSS(ZBGS57,ZBGS58),35,'短线启动'),COLOR00FFFF;
STICKLINE(CROSS(ZBGS55,ZBGS56) AND CROSS(ZBGS57,ZBGS58),0,35,1,0),COLORMAGENTA;
DRAWTEXT_FIX(1,0.980,20,1,'， '),COLOR333333;
ZBGS59:=(CLOSE+HIGH+LOW)/3;
ZBGS60:=EMA(ZBGS59,10);
ZBGS61:=REF(ZBGS60,1);
STICKLINE(ZBGS60>ZBGS61,-20,-25,5,0),COLORYELLOW;
STICKLINE(ZBGS60< ZBGS61,-22,-25,5,0),COLORBLUE;
ZBGS62:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
ZBGS63:=REF(ZBGS62,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS64:=REF(ZBGS63,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS65:=REF(ZBGS64,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS66:=REF(ZBGS65,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS67:=REF(ZBGS66,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS68:=REF(ZBGS67,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS69:=REF(ZBGS68,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS70:=REF(ZBGS69,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS71:=REF(ZBGS70,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS72:=REF(ZBGS71,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS73:=REF(ZBGS72,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS74:=CLOSE< REF(CLOSE,1) AND CLOSE< REF(CLOSE,2);
ZBGS75:=REF(ZBGS74,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS76:=REF(ZBGS75,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS77:=REF(ZBGS76,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS78:=REF(ZBGS77,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS79:=REF(ZBGS78,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS80:=REF(ZBGS79,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS81:=REF(ZBGS80,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS82:=REF(ZBGS81,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS83:=REF(ZBGS82,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS84:=REF(ZBGS83,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS85:=REF(ZBGS84,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS86:=REF(ZBGS74 OR ZBGS75 OR ZBGS76 OR ZBGS77 OR ZBGS78 OR ZBGS79 OR ZBGS80 OR ZBGS81 OR ZBGS82 OR ZBGS83 OR ZBGS84 OR ZBGS85,1) AND ZBGS62;
ZBGS87:=REF(ZBGS62 OR ZBGS63 OR ZBGS64 OR ZBGS65 OR ZBGS66 OR ZBGS67 OR ZBGS68 OR ZBGS69 OR ZBGS70 OR ZBGS71 OR ZBGS72 OR ZBGS73,1) AND ZBGS74;
DRAWTEXT(ZBGS86,20,'底托'),COLORYELLOW;
ZBGS88:=1;
ZBGS89:=(2*CLOSE+HIGH+LOW)/4;
ZBGS90:=IF(YEAR>=2099 AND MONTH>2,0,1);
ZBGS91:=LLV(LOW,5);
ZBGS92:=HHV(HIGH,4);
ZBGS93:=EMA((ZBGS89-ZBGS91)/(ZBGS92-ZBGS91)*100,4)*ZBGS90*ZBGS88;
ZBGS94:=EMA(0.667*REF(ZBGS93,1)+0.333*ZBGS93,2)*ZBGS90*ZBGS88;
DRAWTEXT(CROSS(ZBGS93,ZBGS94) AND ZBGS93< 50 AND 29< ZBGS93,40,'短进'),COLORRED;
DRAWTEXT(CROSS(ZBGS93,ZBGS94) AND ZBGS93< 30,50,'低吸'),COLOR3399CC;
DRAWTEXT(CROSS(ZBGS94,ZBGS93) AND ZBGS93>70,95,'高抛'),COLORMAGENTA;
| |
