奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [求救]畫線問題 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=19264)

[求救]畫線問題

AA:ZIG(3,0.3),COLORWHITE,linethick0;
BB:=REF(AA,1);

AQ:=Cross(AA,BB);
BQ:=Cross(BB,AA);

ZA:=BARSLAST(AQ)+1;
ZB:=BARSLAST(BQ)+1;

支撐:=ref(C,ZA),COLORwhite,linethick0;
壓力:=ref(C,ZB),COLORgreen,linethick0;

A線:IF(ZA<ZB,支撐,IF(ZA>ZB,壓力,0)),Coloryellow,LINETHICK0;

AA1:ZIG(3,0.1),COLORGREEN,linethick1;
BB1:=REF(AA1,1);

AQ1:=Cross(AA1,BB1);
BQ1:=Cross(BB1,AA1);

ZA1:=BARSLAST(AQ1)+1;
ZB1:=BARSLAST(BQ1)+1;

支撐1:=ref(C,ZA1),COLORwhite,linethick1;
壓力1:=ref(C,ZB1),COLORgreen,linethick1;

DRAWSL(1 and A線=Ref(A線,1),A線,0,-1,1) pxdn6 coloryellow;
DRAWSL(1 and A線=Ref(A線,1),A線,0,-1,1) pxdn6 coloryellow shift1;
STICKLINE(islastbar and AQ,A線,A線,20,0) pxdn6 coloryellow,shift1;

STICKLINE(1 and A線<>Ref(A線,1),ref(A線,1),A線,0.1,0),coloryellow,pointdot;

希望
1:"支撐"線上畫"壓力1"的水平連線至"A線<>Ref(A線,1)"為止
2:"壓力"線下畫"支撐1"的水平連線至"A線<>Ref(A線,1)"為止

回覆: [求救]畫線問題

引用:

---

最初由 mori868 發表
AA:ZIG(3,0.3),COLORWHITE,linethick0;
BB:=REF(AA,1);

AQ:=Cross(AA,BB);
BQ:=Cross(BB,AA);

ZA:=BARSLAST(AQ)+1;
ZB:=BARSLAST(BQ)+1;

支撐:=ref(C,ZA),COLORwhite,linethick0;
壓力:=ref(C,ZB),COLORgreen,linethick0;

A線:IF(ZA<ZB,支撐,IF(ZA>ZB,壓力,0)),Coloryellow,LINETHICK0;

AA1:ZIG(3,0.1),COLORGREEN,linethick1;
BB1:=REF(AA1,1);

AQ1:=Cross(AA1,BB1);
BQ1:=Cross(BB1,AA1);

ZA1:=BARSLAST(AQ1)+1;
ZB1:=BARSLAST(BQ1)+1;

支撐1:=ref(C,ZA1),COLORwhite,linethick1;
壓力1:=ref(C,ZB1),COLORgreen,linethick1;

DRAWSL(1 and A線=Ref(A線,1),A線,0,-1,1) pxdn6 coloryellow;
DRAWSL(1 and A線=Ref(A線,1),A線,0,-1,1) pxdn6 coloryellow shift1;
STICKLINE(islastbar and AQ,A線,A線,20,0) pxdn6 coloryellow,shift1;

STICKLINE(1 and A線<>Ref(A線,1),ref(A線,1),A線,0.1,0),coloryellow,pointdot;

希望
1:"支撐"線上畫"壓力1"的水平連線至"A線<>Ref(A線,1)"為止
2:"壓力"線下畫"支撐1"的水平連線至"A線<>Ref(A線,1)"為止

---