X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));

　　G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1); {長期低點，也可供引用}

　　L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1;

　　X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));

　　G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1);{長期高點，也可供引用}

　　DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;

　　DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK1;{長期連線}

　　K1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1);

　　DRAWLINE(K2,IF(HZ,H,L),BARSTATUS=2,C,0),COLORGREEN,LINETHICK1; {最后的長期連線，連在收盤價上}

　　UU:=BACKSET(BARSTATUS=2,BARSLAST(LD)+1);

　　VV:=UU>REF(UU,1);

　　WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);

　　XX:=WW>REF(WW,1);

　　DRAWLINE(XX,L,VV,L,1),COLORMAGENTA,LINETHICK1;

　　UU2:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);

　　VV2:=UU2>REF(UU2,1);

　　WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);

　　XX2:=WW2>REF(WW2,1);

　　DRAWLINE(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;

　　前一低:REF(L,BARSLAST(VV)),COLOR99FF66,POINTDOT,LINETHICK3;

　　前二低:REF(L,BARSLAST(XX)),COLORFF66FF,POINTDOT,LINETHICK3;

　　前一高:REF(H,BARSLAST(VV2)),COLOR99FF66,POINTDOT,LINETHICK3;

　　前二高:REF(H,BARSLAST(XX2)),COLORFF66FF,POINTDOT,LINETHICK3;

　　短高:=REF(H,BARSLAST(VV2));

　　短低:=REF(L,BARSLAST(VV));

　　短比: (C-短低)/(短高-短低),LINETHICK0;

　　{以下語句為三角形部分}

　　底:REF(L,BARSLAST(VV)),COLORred,LINETHICK2;

　　頂:REF(H,BARSLAST(VV2)),COLORGreen,LINETHICK2;

　　{下迭三角形：藍(lán)色三角形畫完介入}

　　StickLine(VV,頂,底,0,0),Colorff6633,linethick3;{}

　　DRAWLINE(VV2,H,VV,L,0),Colorff6633,linethick3;{斜}

　　DRAWLINE(VV2,H,VV,頂,0),Colorff6633,linethick3;{?}

　　{DRAWLINE(c>0,H,VV,L,0),Colorcyan,linethick2;}{斜}

　　{DRAWLINE(c>1,H,VV,頂,0),Colorcyan,linethick2;}{?}

　　{上漲三角形：紅色三角形畫完出局}

　　StickLine(VV2 ,頂,底,0,0),Colorred,linethick3;{}

　　DRAWLINE(VV,L,VV2,H,0),Colorred,linethick3;{斜}

　　DRAWLINE(VV,L,VV2,底,0),Colorred,linethick3;{?};

上一頁  [1] [2]