DING:=MAX(O,C);{实顶} DI:=MIN(O,C);{实底} YANG:=(DI>=REF(DING,1) AND C<O) OR (C>O) OR (C>REF(C,1) AND C=O);{阳线} YIN:=(C<O AND NOT(DI>=REF(DING,1))) OR (C<REF(C,1) AND C=O);{阴线} YANGSHENG:=YANG AND C>=REF(DING,BARSLAST(YIN)) AND (V>REF(V,BARSLAST(YIN)) OR (BETWEEN(V,REF(V,BARSLAST(YIN))*0.975,REF(V,BARSLAST(YIN))*1.025))),NODRAW; DRAWTEXT(YANGSHENG AND REF(NOT(YANGSHENG),1),L*0.99,'△'),COLORRED; DRAWTEXT(YANGSHENG AND REF(NOT(YANGSHENG),1) AND V<REF(V,1)*1.5,L*0.99,'▲'),COLORRED; YINSHENG:=(YIN AND C<=REF(DI,BARSLAST(YANG)) AND V>REF(V,BARSLAST(YANG))); DRAWTEXT(YINSHENG AND REF(NOT(YINSHENG),1),H*1.02,'▽'),COLORGREEN; LIANGJIABI:=V/C; BLZ:=V>REF(V,1)*1.5; PLZ:=BETWEEN(V,REF(V,1)*0.975,REF(V,1)*1.025) OR BETWEEN(V,REFX(V,1)*0.975,REFX(V,1)*1.025) OR (BETWEEN(V,REF(V,2)*0.975,REF(V,2)*1.025) AND V>REF(V,1)*1.2) OR (BETWEEN(V,REF(V,3)*0.975,REF(V,3)*1.025) AND V>REF(MA(V,2),1)*1.2 AND V>REF(HHV(V,2),1)) OR (BETWEEN(V,REF(V,4)*0.975,REF(V,4)*1.025) AND V>REF(MA(V,3),1)*1.2 AND V>REF(HHV(V,3),1)) OR (BETWEEN(V,REF(V,5)*0.975,REF(V,5)*1.025) AND V>REF(MA(V,4),1)*1.2 AND V>REF(HHV(V,4),1)) OR (BETWEEN(V,REF(V,6)*0.975,REF(V,6)*1.025) AND V>REF(MA(V,5),1)*1.2 AND V>REF(HHV(V,5),1)) OR (BETWEEN(V,REF(V,7)*0.975,REF(V,7)*1.025) AND V>REF(MA(V,6),1)*1.2 AND V>REF(HHV(V,6),1)) OR (BETWEEN(V,REF(V,8)*0.975,REF(V,8)*1.025) AND V>REF(MA(V,7),1)*1.2 AND V>REF(HHV(V,7),1)) OR (BETWEEN(V,REF(V,9)*0.975,REF(V,9)*1.025) AND V>REF(MA(V,8),1)*1.2 AND V>REF(HHV(V,8),1)) OR (BETWEEN(V,REF(V,10)*0.975,REF(V,10)*1.025) AND V>REF(MA(V,9),1)*1.2 AND V>REF(HHV(V,9),1)) OR (BETWEEN(V,REF(V,11)*0.975,REF(V,11)*1.025) AND V>REF(MA(V,10),1)*1.2 AND V>REF(HHV(V,10),1)) OR (BETWEEN(V,REF(V,12)*0.975,REF(V,12)*1.025) AND V>REF(MA(V,11),1)*1.2 AND V>REF(HHV(V,11),1)); GLZ:=V>REF(V,1)*1.1 AND V>REFX(V,1)*1.1; TLZ:=(V*1.2<REFX(V,1) AND REFX(V,1)*1.2<REFX(V,2)); JZ:=BLZ OR GLZ OR PLZ OR TLZ; JJZ:=CURRBARSCOUNT>=4 AND YANG AND (YANGSHENG) AND JZ AND REFX(LLV(C,3),3)>=DI AND REFX(MA(LIANGJIABI,3),3)<=1.5*LIANGJIABI AND REFX(C,3)>DING; HJZ1:=JJZ AND REFX(MA(C,3),3)>=DING AND REFX(MA(LIANGJIABI,3),3)<=LIANGJIABI AND REFX(C,3)>C; HJZ4:=JJZ AND REFX(LLV(C,3),3)>=DING AND REFX(MA(LIANGJIABI,3),3)<=LIANGJIABI AND REFX(YANG,3) AND (REFX(YANG,1) OR REFX(YANG,2)) AND REFX(C,3)>DING; WP:=JJZ OR HJZ1 OR HJZ4; TK:=DI>REF(DING,1) AND REF(YANGSHENG,1); CONDJJZ:=JJZ AND REF(NOT(JJZ),1) AND REFX(NOT(HJZ1 OR HJZ4),1) AND NOT(TK); CONDHJZ1:=HJZ1 AND REF(NOT(HJZ1),1) AND NOT(TK); STICKLINE(CONDJJZ,C,O,1,0),COLORYELLOW; STICKLINE(CONDHJZ1,C,O,1,0),COLORMAGENTA; DRAWTEXT(HJZ4 AND REF(NOT(HJZ4),1) AND NOT(TK),L*0.98,'H'),COLORRED; STICKLINE(REFX(TK AND JJZ,1),C,O,1,0),COLORYELLOW; STICKLINE(REFX(TK AND HJZ1,1),C,O,1,0),COLORMAGENTA; DRAWTEXT(REFX(TK AND HJZ4,1),L*0.98,'H'),COLORRED; DRAWLINE(CONDJJZ,DING,REF(CONDJJZ,1),REF(DING,1),1),COLORBROWN; DRAWLINE(CONDJJZ,DI,REF(CONDJJZ,1),REF(DI,1),1),COLORBROWN; DRAWLINE(CONDHJZ1,DING,REF(CONDHJZ1,1),REF(DING,1),1),COLORBROWN; DRAWLINE(CONDHJZ1,DI,REF(CONDHJZ1,1),REF(DI,1),1),COLORBROWN; DRAWLINE(REFX(TK AND JJZ,1),DING,REF(REFX(TK AND JJZ,1),1),REF(DING,1),1),COLORBROWN; DRAWLINE(REFX(TK AND JJZ,1),DI,REF(REFX(TK AND JJZ,1),1),REF(DI,1),1),COLORBROWN; P1DI:=REF(DI,1); P1L:=REF(L,1); P2DI:=REF(DI,2); P2L:=REF(L,2); P3DI:=REF(DI,3); P3L:=REF(L,3); P4DI:=REF(DI,4); P4L:=REF(L,4); P5DI:=REF(DI,5); P5L:=REF(L,5); P6DI:=REF(DI,6); P6L:=REF(L,6); P7DI:=REF(DI,7); P7L:=REF(L,7); P8DI:=REF(DI,8); P8L:=REF(L,8); P9DI:=REF(DI,9); P9L:=REF(L,9); P10DI:=REF(DI,10); P10L:=REF(L,10); P11DI:=REF(DI,11); P11L:=REF(L,11); P12DI:=REF(DI,12); P12L:=REF(L,12); P13DI:=REF(DI,13); P13L:=REF(L,13); P14DI:=REF(DI,14); P14L:=REF(L,14); P15DI:=REF(DI,15); P15L:=REF(L,15); P16DI:=REF(DI,16); P16L:=REF(L,16); P17DI:=REF(DI,17); P17L:=REF(L,17); P18DI:=REF(DI,18); P18L:=REF(L,18); P19DI:=REF(DI,19); P19L:=REF(L,19); P20DI:=REF(DI,20); P20L:=REF(L,20); JZX1:=ABS(DI-P1DI)<0.02 OR ABS(DI-P2DI)<0.02 OR ABS(DI-P3DI)<0.02 OR ABS(DI-P4DI)<0.02 OR ABS(DI-P5DI)<0.02 OR ABS(DI-P6DI)<0.02 OR ABS(DI-P7DI)<0.02 OR ABS(DI-P8DI)<0.02 OR ABS(DI-P9DI)<0.02 OR ABS(DI-P10DI)<0.02 OR ABS(DI-P11DI)<0.02 OR ABS(DI-P12DI)<0.02 OR ABS(DI-P13DI)<0.02 OR ABS(DI-P14DI)<0.02 OR ABS(DI-P15DI)<0.02 OR ABS(DI-P16DI)<0.02 OR ABS(DI-P17DI)<0.02 OR ABS(DI-P18DI)<0.02 OR ABS(DI-P19DI)<0.02 OR ABS(DI-P20DI)<0.02; JZX2:=ABS(DI-P1L)<0.02 OR ABS(DI-P2L)<0.02 OR ABS(DI-P3L)<0.02 OR ABS(DI-P4L)<0.02 OR ABS(DI-P5L)<0.02 OR ABS(DI-P6L)<0.02 OR ABS(DI-P7L)<0.02 OR ABS(DI-P8L)<0.02 OR ABS(DI-P9L)<0.02 OR ABS(DI-P10L)<0.02 OR ABS(DI-P11L)<0.02 OR ABS(DI-P12L)<0.02 OR ABS(DI-P13L)<0.02 OR ABS(DI-P14L)<0.02 OR ABS(DI-P15L)<0.02 OR ABS(DI-P16L)<0.02 OR ABS(DI-P17L)<0.02 OR ABS(DI-P18L)<0.02 OR ABS(DI-P19L)<0.02 OR ABS(DI-P20L)<0.02; JZX3:=ABS(L-P1DI)<0.02 OR ABS(L-P2DI)<0.02 OR ABS(L-P3DI)<0.02 OR ABS(L-P4DI)<0.02 OR ABS(L-P5DI)<0.02 OR ABS(L-P6DI)<0.02 OR ABS(L-P7DI)<0.02 OR ABS(L-P8DI)<0.02 OR ABS(L-P9DI)<0.02 OR ABS(L-P10DI)<0.02 OR ABS(L-P11DI)<0.02 OR ABS(L-P12DI)<0.02 OR ABS(L-P13DI)<0.02 OR ABS(L-P14DI)<0.02 OR ABS(L-P15DI)<0.02 OR ABS(L-P16DI)<0.02 OR ABS(L-P17DI)<0.02 OR ABS(L-P18DI)<0.02 OR ABS(L-P19DI)<0.02 OR ABS(L-P20DI)<0.02; JZX4:=ABS(L-P1L)<0.02 OR ABS(L-P2L)<0.02 OR ABS(L-P3L)<0.02 OR ABS(L-P4L)<0.02 OR ABS(L-P5L)<0.02 OR ABS(L-P6L)<0.02 OR ABS(L-P7L)<0.02 OR ABS(L-P8L)<0.02 OR ABS(L-P9L)<0.02 OR ABS(L-P10L)<0.02 OR ABS(L-P11L)<0.02 OR ABS(L-P12L)<0.02 OR ABS(L-P13L)<0.02 OR ABS(L-P14L)<0.02 OR ABS(L-P15L)<0.02 OR ABS(L-P16L)<0.02 OR ABS(L-P17L)<0.02 OR ABS(L-P18L)<0.02 OR ABS(L-P19L)<0.02 OR ABS(L-P20L)<0.02; DRAWTEXT(JZX1 OR JZX2,DI,'+'),COLORWHITE; DRAWTEXT(JZX3 OR JZX4,L,'+'),COLORWHITE; P1DING:=REF(DING,1); P1H:=REF(H,1); P2DING:=REF(DING,2); P2H:=REF(H,2); P3DING:=REF(DING,3); P3H:=REF(H,3); P4DING:=REF(DING,4); P4H:=REF(H,4); P5DING:=REF(DING,5); P5H:=REF(H,5); P6DING:=REF(DING,6); P6H:=REF(H,6); P7DING:=REF(DING,7); P7H:=REF(H,7); P8DING:=REF(DING,8); P8H:=REF(H,8); P9DING:=REF(DING,9); P9H:=REF(H,9); P10DING:=REF(DING,10); P10H:=REF(H,10); P11DING:=REF(DING,11); P11H:=REF(H,11); P12DING:=REF(DING,12); P12H:=REF(H,12); P13DING:=REF(DING,13); P13H:=REF(H,13); P14DING:=REF(DING,14); P14H:=REF(H,14); P15DING:=REF(DING,15); P15H:=REF(H,15); P16DING:=REF(DING,16); P16H:=REF(H,16); P17DING:=REF(DING,17); P17H:=REF(H,17); P18DING:=REF(DING,18); P18H:=REF(H,18); P19DING:=REF(DING,19); P19H:=REF(H,19); P20DING:=REF(DING,20); P20H:=REF(H,20); JZX5:=ABS(DI-P1DING)<0.02 OR ABS(DI-P2DING)<0.02 OR ABS(DI-P3DING)<0.02 OR ABS(DI-P4DING)<0.02 OR ABS(DI-P5DING)<0.02 OR ABS(DI-P6DING)<0.02 OR ABS(DI-P7DING)<0.02 OR ABS(DI-P8DING)<0.02 OR ABS(DI-P9DING)<0.02 OR ABS(DI-P10DING)<0.02 OR ABS(DI-P11DING)<0.02 OR ABS(DI-P12DING)<0.02 OR ABS(DI-P13DING)<0.02 OR ABS(DI-P14DING)<0.02 OR ABS(DI-P15DING)<0.02 OR ABS(DI-P16DING)<0.02 OR ABS(DI-P17DING)<0.02 OR ABS(DI-P18DING)<0.02 OR ABS(DI-P19DING)<0.02 OR ABS(DI-P20DING)<0.02; JZX6:=ABS(DI-P1H)<0.02 OR ABS(DI-P2H)<0.02 OR ABS(DI-P3H)<0.02 OR ABS(DI-P4H)<0.02 OR ABS(DI-P5H)<0.02 OR ABS(DI-P6H)<0.02 OR ABS(DI-P7H)<0.02 OR ABS(DI-P8H)<0.02 OR ABS(DI-P9H)<0.02 OR ABS(DI-P10H)<0.02 OR ABS(DI-P11H)< |
![](/soft/UploadPic/2012-11/2012111612171023909.jpg)