SJ:=1; LHS:=1; MA3:=MA(C,170); HH1:=IFELSE(H<REF(H,1)&&REF(H,1)<REF(H,2),REF(H,2),0); LL1:=IFELSE(L>REF(L,1)&&REF(L,1)>REF(L,2),REF(L,2),0); HH2:=VALUEWHEN(HH1>0,HH1); LL2:=VALUEWHEN(LL1>0,LL1); HH:=HHV(HIGH,1)/10*SJ+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10; LL:=LLV(LOW,1)/10*SJ+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10; H1:=IFELSE(HH<REF(HH,1)&&LL<REF(LL,1)&&REF(OPEN,1)>CLOSE&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HH,2),0); L1:=IFELSE(LL>REF(LL,1)&&HH>REF(HH,1)&&REF(OPEN,1)<CLOSE&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LL,2),0); X:=DATE; X0:=H1*LHS,LINETHICK2; X00:=L1; XXX0:=O*LHS,LINETHICK2; XXX00:=C; XXX000:=H; XXX0000:=L; H2:=VALUEWHEN(X0>0,X0)*LHS,LINETHICK2; L2:=VALUEWHEN(X00>0,X00)*LHS,LINETHICK2; K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0)); K2:=VALUEWHEN(K1<>0,K1); G:=IFELSE(K2=1,H2,L2); G1:=VALUEWHEN(ISLASTBAR,G); X000:=K2*LHS,LINETHICK2; TMP:=K2*LHS,LINETHICK2; W1:=X000*LHS,LINETHICK2; X0000:=OPEN-CLOSE*LHS,LINETHICK2; W2:=X0000*LHS,LINETHICK2; HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE)*LHS,LINETHICK2; LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE)*LHS,LINETHICK2;/* STICKLINE1(W1=1,XXX000,HT,0,0),RGB(0,172,0);//青色上影线 STICKLINE1(W1=1,XXX0000,LT,0,0),RGB(0,172,0);//青色下影线 STICKLINE1(W1=-3,XXX000,HT,0,0),RGB(255,49,49);//红色上影线 STICKLINE1(W1=-3,XXX0000,LT,0,0),RGB(255,49,49);//红色下影线 STICKLINE1(W1>0,XXX0,XXX00,3,1),RGB(0,172,0);//青色空心K线 STICKLINE1(W1<=0,XXX0,XXX00,3,1),RGB(255,49,49);//红色空心K线 STICKLINE1(W2>0&&W1<=0,XXX0,XXX00,3,0),RGB(255,49,49);//红色实心K线 STICKLINE1(W2>0&&W1>0,XXX0,XXX00,3,0),RGB(0,172,0);//青色实心K线 STICKLINE1(TMP=1&&REF(TMP,1)=1,G,REF(G,1),2,0),COLORCYAN,POINTDOT;//青色折竖线 STICKLINE1(TMP=-3&&REF(TMP,1)=-3,G,REF(G,1),2,0),COLORRED,POINTDOT;//红色折竖线 DRAWSL1(K2=1,G,0,1,0),COLORCYAN,POINTDOT;//青色折横线 DRAWSL1(K2=-3,G,0,1,0),COLORRED,POINTDOT;//红色折横线 DRAWNUMBER(ISLASTBAR,G,G,1,COLORYELLOW),ALIGN0; */ HHH:=IF(K2=1,G,NULL),NODRAW; LLL:=IF(K2=-3,G,NULL),NODRAW; N3:=BARSLAST(CROSS(W1>0,0.5))*LHS,LINETHICK2; N4:=BARSLAST(CROSS(W1<=0,0.5))*LHS,LINETHICK2; HH3:=IF(W1<=0,REF(HHV(H,N4),N3),NULL),COLORYELLOW,POINTDOT; LL3:=IF(W1>0,REF(LLV(L,N3),N4),NULL),COLORGREEN,POINTDOT; B:=CROSS(C,HH3)||REF(HH3 =NULL,1)&&C>HH3; S:=CROSS(LL3,C)||REF(LL3 =NULL,1)&&C<LL3; LC:= REF(CLOSE,1)*LHS,LINETHICK2; RSI:=SMA(MAX(CLOSE-LC, 0), 6, 1)/SMA(ABS(CLOSE-LC), 6, 1)*100*LHS,LINETHICK2; 顶周期:=20; 底周期:=20; 上内:=LLVBARS(H,顶周期); 上外:=LLVBARS(L,顶周期); 下内:=HHVBARS(L,底周期); 下外:=HHVBARS(H,底周期); 上力度:=HHV(L,上内+1)>LLV(H,上内+1); 下力度:=HHV(L,下内+1)>LLV(H,下内+1); 上包含:=COUNT(L>=REF(L,1),上外)>2 AND COUNT(H>=REF(H,1),上内)>2; 下包含:=COUNT(H<=REF(H,1),下外)>2 AND COUNT(L<=REF(L,1),下内)>2; 顶0:= 上力度 AND 上包含 AND 上外>3; 底0:= 下力度 AND 下包含 AND 下外>3; 顶:=顶0 AND H=HHV(H,BARSLAST(底0)) AND BARSLAST(底0)>3; 底:=底0 AND L=LLV(L,BARSLAST(顶0)) AND BARSLAST(顶0)>3; //DRAWLINE1(CROSS(BACKSET(顶,BARSLAST(底)+1),0.5),L*SJ,CROSS(BACKSET(底,BARSLAST(顶)+1),0.5),H*SJ,0),COLORRED,LINETHICK3; //DRAWLINE1(CROSS(BACKSET(底,BARSLAST(顶)+1),0.5),H*SJ,CROSS(BACKSET(顶,BARSLAST(底)+1),0.5),L*SJ,0),COLORGREEN,LINETHICK2; //DRAWLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(底)+1),0.5),L*SJ,CROSS(BACKSET(ISLASTBAR,BARSLAST(顶)+1),0.5),H*SJ,0),COLORRED,DOT; //DRAWLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(顶)+1),0.5),H*SJ,CROSS(BACKSET(ISLASTBAR,BARSLAST(底)+1),0.5),L*SJ,0),COLORGREEN,DOT; UP:=CROSS(BACKSET(顶,BARSLAST(底)+1),0.5)||CROSS(BACKSET(ISLASTBAR,BARSLAST(底)+1),0.5); DO:=CROSS(BACKSET(底,BARSLAST(顶)+1),0.5)||CROSS(BACKSET(ISLASTBAR,BARSLAST(顶)+1),0.5); DRAWTEXT(DO,H,'↓↓'),COLORGREEN,VALIGN2,FONTSIZE35; DRAWTEXT(UP,L,'↑↑'),COLORRED,VALIGN0,FONTSIZE35; 多:IF(BARSLAST(UP)<BARSLAST(DO),1,NULL),COLORRED,NODRAW; 空:IF(BARSLAST(UP)>BARSLAST(DO),1,NULL),COLORGREEN; |
|