DRAWTEXT_FIX(C>=0,0,1,0,'█████████'),COLOR000000;
Z1:=STRCAT(HYBLOCK,' ');Z2:=STRCAT(Z1,DYBLOCK);Z3:=STRCAT(Z2,' '); DRAWTEXT_FIX(ISLASTBAR,0,1,0,STRCAT(Z3,GNBLOCK)),COLOR336836; DRAWTEXT(C=C AND CURRBARSCOUNT=60,HHV(C,120),'買點買,賣點賣'),COLORMAGENTA; HH:=REF(H,5)=HHV(H,11); LL:=REF(L,5)=LLV(L,11); FG01:=BACKSET(HH,6)>BACKSET(HH,5) ; FD01:=BACKSET(LL,6)>BACKSET(LL,5) ; FG0:=FG01 AND H=HHV(H,BARSLAST(FD01)); FD0:=FD01 AND L=LLV(L,BARSLAST(FG01)); J0:=(H+L)/2; FGH:=REF(H,BARSLAST(FG0)); FGH1:=REF(H,BARSLAST(FG0)+1); FGL1:=REF(L,BARSLAST(FG0)+1); FGH2:=REF(H,BARSLAST(FG0)+2); FGL2:=REF(L,BARSLAST(FG0)+2); FGJ0:=REF(J0,BARSLAST(FG0)); FGL:=REF(L,BARSLAST(FG0)); FDH:=REF(H,BARSLAST(FD0)); FDL:=REF(L,BARSLAST(FD0)); FDH1:=REF(H,BARSLAST(FD0)+1); FDL1:=REF(L,BARSLAST(FD0)+1); FDH2:=REF(H,BARSLAST(FD0)+2); FDL2:=REF(L,BARSLAST(FD0)+2); FDJ0:=REF(J0,BARSLAST(FD0)); FGZH:=IF(FGL<FGL1,FGH2,FGH1); FGZL:=IF(FGL<FGL1,FGL2,FGL1); FDZH:=IF(FDH>FDH1,FDH2,FDH1); FDZL:=IF(FDH>FDH1,FDL2,FDL1); FG1:=IF(((FGL>FDH AND FGH>FDZH) OR (FGH>FDH1 AND FDH1>FDH AND FDH>FDH2)),FG0 ,FG0 AND FGJ0>FDH AND FGH>FDZH); FD1:=IF(((FDH<FGL AND FDL<FGZL) OR (FDL<FGL1 AND FGL1<FGL AND FDL<FGL2)),FD0 ,FD0 AND FDJ0<FGL AND FDL<FGZL); FG2:=FG1 AND H>=HHV(H,BARSLAST(FD1)); FD2:=FD1 AND L<=LLV(L,BARSLAST(FG1)); FG:=FG2 AND KDJ.K>40;FD:=FD2 AND KDJ.K<60; BK:=IF((FGL1>=FGL AND FG0) OR (FDH1<=FDH AND FD0),4,3); G1:=FG AND BARSLAST(FD)>BK; D1:=FD AND BARSLAST(FG)>BK; G2:=G1 AND H>=HHV(H,BARSLAST(D1)); D2:=D1 AND L<=LLV(L,BARSLAST(G1)); G3:=G2 OR (FG0 AND KDJ.J>100); D3:=D2 OR (FD0 AND KDJ.J<0); G4:=G3 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2)); D4:=D3 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2)); G5:=G4 AND H=HHV(H,BARSLAST(D4)); D5:=D4 AND L=LLV(L,BARSLAST(G4)); GPB:=IF(G4,H,DRAWNULL),CIRCLEDOT,COLORYELLOW; DPB:=IF(D4,L,DRAWNULL),CIRCLEDOT,COLORYELLOW; NN:=G5;UU:=D5; DRAWLINE(UU,L,NN, H,0),COLORRED; DRAWLINE(NN,H,UU, L,0),COLORGREEN; |
|