奇狐社區論壇 - 請教問題

奇狐社區論壇 (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=18108)

由 yjl8895 在 2013-11-03 09:25 發表:

請教問題

畫漸變背景色(1,RGB顏色值(0,150,100),RGB顏色值(0,150,100),1);
B22:=之字轉向(3,55/100)>向前引用(之字轉向(3,55/100),1) AND
向前引用(之字轉向(3,55/100),1)<向前引用(之字轉向(3,55/100),2);
畫垂直線(B22),棒狀線,COLORred,LINETHICK2;
S22:=之字轉向(3,55/100)<向前引用(之字轉向(3,55/100),1) AND
向前引用(之字轉向(3,55/100),1)>向前引用(之字轉向(3,55/100),2);
畫垂直線(S22),棒狀線,COLORBLUE,LINETHICK2;
SpA:=上一次條件成立位置(B22); SpB:=上一次條件成立位置(S22);
CK1:=SPB>SpA or SpB=0;CK2:=SPB<SPA;
畫柱線(CK1,最高價,最低價,4,0),COLOR111111;畫柱線(CK2,最高價,最低價,4,0),COLORGREEN;

(以5分鐘加權為例)

當紅柱條件成立時的低點(B)，反推上一次條件成立的籃柱高點(S)，從S到B點自動劃黃金分割線，S為0，B是1，依序為0.236，0.382，0.5，0.618，0.764，且始終最後週期呈現；反之亦同，當S高點出現時，求B到S點的黃金分割線，謝謝老師。

__________________
efef55e3

由 cgjj 在 2013-11-04 09:28 發表:

回覆: 請教問題

引用:
最初由 yjl8895 發表
畫漸變背景色(1,RGB顏色值(0,150,100),RGB顏色值(0,150,100),1);
B22:=之字轉向(3,55/100)>向前引用(之字轉向(3,55/100),1) AND
向前引用(之字轉向(3,55/100),1)<向前引用(之字轉向(3,55/100),2);
畫垂直線(B22),棒狀線,COLORred,LINETHICK2;
S22:=之字轉向(3,55/100)<向前引用(之字轉向(3,55/100),1) AND
向前引用(之字轉向(3,55/100),1)>向前引用(之字轉向(3,55/100),2);
畫垂直線(S22),棒狀線,COLORBLUE,LINETHICK2;
SpA:=上一次條件成立位置(B22); SpB:=上一次條件成立位置(S22);
CK1:=SPB>SpA or SpB=0;CK2:=SPB<SPA;
畫柱線(CK1,最高價,最低價,4,0),COLOR111111;畫柱線(CK2,最高價,最低價,4,0),COLORGREEN;

(以5分鐘加權為例)

當紅柱條件成立時的低點(B)，反推上一次條件成立的籃柱高點(S)，從S到B點自動劃黃金分割線，S為0，B是1，依序為0.236，0.382，0.5，0.618，0.764，且始終最後週期呈現；反之亦同，當S高點出現時，求B到S點的黃金分割線，謝謝老師。

DRAWGBK(1,COLORRGB(0,150,100),COLORRGB(0,150,100),1);
B22:=ZIG(3,55/100)>REF(ZIG(3,55/100),1) AND
REF(ZIG(3,55/100),1)<REF(ZIG(3,55/100),2);
VERTLINE(B22),STICK,COLORred,LINETHICK2;
S22:=ZIG(3,55/100)<REF(ZIG(3,55/100),1) AND
REF(ZIG(3,55/100),1)>REF(ZIG(3,55/100),2);
VERTLINE(S22),STICK,COLORBLUE,LINETHICK2;
SpA:=BARSLAST(B22); SpB:=BARSLAST(S22);
CK1:=SPB>SpA or SpB=0;CK2:=SPB<SPA;
STICKLINE(CK1,HIGH,LOW,4,0),COLOR111111;STICKLINE(CK2,HIGH,LOW,4,0),COLORGREEN;
BBSS:=B22-S22;
PPHL:=if(BBSS=1,L,H);
SP2:SUMBARS(BBSS<>0,1)-1;
SP1:SUMBARS(BBSS<>0,2)-1;
P1No:=datacount-SP1[datacount];
P2No:=datacount-SP2[datacount];
PLen:=P2No-P1No;
PSel:=barpos=P1No;
HLSP:=PPHL[P2No]-PPHL[P1No];
DRAWSL(PSel,PPHL[P1No],0,PLen,3) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL[P1No]+HLSP,0,PLen,3) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL[P1No]+HLSP*0.236,0,PLen,3) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL[P1No]+HLSP*0.382,0,PLen,3) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL[P1No]+HLSP*0.5,0,PLen,3) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL[P1No]+HLSP*0.618,0,PLen,3) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL[P1No]+HLSP*0.746,0,PLen,3) pxdn2 coloryellow linedot;

由 yjl8895 在 2013-11-04 09:41 發表:

再請教

謝謝謝！再問一個拙問題。如附，如果要每個週期呈現，該如何修改？

UU1:=向前賦值(是否最後週期,上一次條件成立位置(B22)+1);
VV1:=UU1>向前引用(UU1,1);
WW1:=向前賦值(VV1,向前引用(上一次條件成立位置(B22),1)+2);
XX1:=WW1>向前引用(WW1,1);
畫直線(XX1,最低價,VV1,最低價,1),COLORYELLOW,LINETHICK1;
UU2:=向前賦值(是否最後週期,上一次條件成立位置(s22)+1);
VV2:=UU2>向前引用(UU2,1);
WW2:=向前賦值(VV2,向前引用(上一次條件成立位置(s22),1)+2);
XX2:=WW2>向前引用(WW2,1);
畫直線(XX2,最高價,VV2,最高價,1),COLORYELLOW,LINETHICK1;

__________________
efef55e3

由 cgjj 在 2013-11-04 10:30 發表:

回覆: 再請教

引用:
最初由 yjl8895 發表
謝謝！再問一個拙問題。如附，如果要每個週期呈現，該如何修改？

UU1:=向前賦值(是否最後週期,上一次條件成立位置(B11)+1);
VV1:=UU1>向前引用(UU1,1);
WW1:=向前賦值(VV1,向前引用(上一次條件成立位置(B11),1)+2);
XX1:=WW1>向前引用(WW1,1);
畫直線(XX1,最低價,VV1,最低價,1),COLORYELLOW,LINETHICK1;
UU2:=向前賦值(是否最後週期,上一次條件成立位置(s11)+1);
VV2:=UU2>向前引用(UU2,1);
WW2:=向前賦值(VV2,向前引用(上一次條件成立位置(s11),1)+2);
XX2:=WW2>向前引用(WW2,1);
畫直線(XX2,最高價,VV2,最高價,1),COLORYELLOW,LINETHICK1;

UU1:=向前賦值(是否最後週期,上一次條件成立位置(B11)+1);
VV1:=UU1>向前引用(UU1,1);
WW1:=向前賦值(VV1,向前引用(上一次條件成立位置(B11),1)+2);
XX1:=WW1>向前引用(WW1,1);
畫直線(XX1,最低價,VV1,最低價,1),COLORYELLOW,LINETHICK1;
UU2:=向前賦值(是否最後週期,上一次條件成立位置(s11)+1);
VV2:=UU2>向前引用(UU2,1);
WW2:=向前賦值(VV2,向前引用(上一次條件成立位置(s11),1)+2);
XX2:=WW2>向前引用(WW2,1);
畫直線(XX2,最高價,VV2,最高價,1),COLORYELLOW,LINETHICK1;

這一段程式與您要問的問題, 或是前面的問題有關聯嗎? (程式不完整)

由 yjl8895 在 2013-11-04 10:41 發表:

對不起，沒有關連，更正後如下：

UU1:=向前賦值(是否最後週期,上一次條件成立位置(B22)+1);
VV1:=UU1>向前引用(UU1,1);
WW1:=向前賦值(VV1,向前引用(上一次條件成立位置(B22),1)+2);
XX1:=WW1>向前引用(WW1,1);
畫直線(XX1,最低價,VV1,最低價,1),COLORYELLOW,LINETHICK1;
UU2:=向前賦值(是否最後週期,上一次條件成立位置(s22)+1);
VV2:=UU2>向前引用(UU2,1);
WW2:=向前賦值(VV2,向前引用(上一次條件成立位置(s22),1)+2);
XX2:=WW2>向前引用(WW2,1);
畫直線(XX2,最高價,VV2,最高價,1),COLORYELLOW,LINETHICK1;

__________________
efef55e3

由 cgjj 在 2013-11-04 10:54 發表:

引用:
最初由 yjl8895 發表
對不起，沒有關連，更正後如下：

UU1:=向前賦值(是否最後週期,上一次條件成立位置(B22)+1);
VV1:=UU1>向前引用(UU1,1);
WW1:=向前賦值(VV1,向前引用(上一次條件成立位置(B22),1)+2);
XX1:=WW1>向前引用(WW1,1);
畫直線(XX1,最低價,VV1,最低價,1),COLORYELLOW,LINETHICK1;
UU2:=向前賦值(是否最後週期,上一次條件成立位置(s22)+1);
VV2:=UU2>向前引用(UU2,1);
WW2:=向前賦值(VV2,向前引用(上一次條件成立位置(s22),1)+2);
XX2:=WW2>向前引用(WW2,1);
畫直線(XX2,最高價,VV2,最高價,1),COLORYELLOW,LINETHICK1;

沒有關連, 為何還要更正??
搞不清楚您要做什麼@@

若與問題無關, 請不要貼上此段
若與問題有關, 請說明用意
不然我會當它不存在

由 cgjj 在 2013-11-04 15:54 發表:

回覆: 再請教

引用:
最初由 yjl8895 發表
謝謝謝！再問一個拙問題。如附，如果要每個週期呈現，該如何修改？

DRAWGBK(1,COLORRGB(0,150,100),COLORRGB(0,150,100),1);
B22:=ZIG(3,55/100)>REF(ZIG(3,55/100),1) AND
REF(ZIG(3,55/100),1)<REF(ZIG(3,55/100),2);
VERTLINE(B22),STICK,COLORred,LINETHICK2;
S22:=ZIG(3,55/100)<REF(ZIG(3,55/100),1) AND
REF(ZIG(3,55/100),1)>REF(ZIG(3,55/100),2);
VERTLINE(S22),STICK,COLORBLUE,LINETHICK2;
SpA:=BARSLAST(B22); SpB:=BARSLAST(S22);
CK1:=SPB>SpA or SpB=0;CK2:=SPB<SPA;
STICKLINE(CK1,HIGH,LOW,4,0),COLOR111111;STICKLINE(CK2,HIGH,LOW,4,0),COLORGREEN;
BBSS:=B22-S22;
PPHL:=if(BBSS=1,L,H);
PSel:=BBSS<>0;
PLEN:SUMBARS(PSel,2)-1;
HLSP:=ref(PPHL,PLEN)-PPHL;
DRAWSL(PSel,PPHL,0,PLEN,1) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL+HLSP,0,PLen,1) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL+HLSP*0.236,0,PLen,1) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL+HLSP*0.382,0,PLen,1) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL+HLSP*0.5,0,PLen,1) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL+HLSP*0.618,0,PLen,1) pxdn2 coloryellow linedot;
DRAWSL(PSel,PPHL+HLSP*0.746,0,-PLen,1) pxdn2 coloryellow linedot;

由 yjl8895 在 2013-11-04 22:45 發表:

謝謝版大問題解決

__________________
efef55e3

全部時間均為台灣時間, 現在時間為00:57

在這個頁面顯示本主題全部的 8 個文章