奇狐社區論壇
在這個頁面顯示本主題全部的 26 個文章

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

由 yjl8895 在 2011-10-30 10:08 發表:

[問題]如何只在兩點之間畫線

問題]自動劃線
版大您好:

如何只在B22與B11之間(如圖畫圈圈的位置)自動劃線，
亦即B22紅色垂線出現後(第一個)B11紅箭頭兩點之間畫線。

謝謝您。


原碼如下

B11:之字轉向(3,n1/100)>向前引用(之字轉向(3,n1/100),1) AND
向前引用(之字轉向(3,n1/100),1)<向前引用(之字轉向(3,n1/100),2),棒狀線,COLORRED,LINETHICK2;
畫圖示(B11,最低價,4);
S11:之字轉向(3,n1/100)<向前引用(之字轉向(3,n1/100),1) AND
向前引用(之字轉向(3,n1/100),1)>向前引用(之字轉向(3,n1/100),2),棒狀線,COLORBLUE,LINETHICK2;
畫圖示(s11,最高價,5);

B22:之字轉向(3,n2)>向前引用(之字轉向(3,n2),1) AND
向前引用(之字轉向(3,n2),1)<向前引用(之字轉向(3,n2),2),棒狀線,COLORRED,LINETHICK1;
STICKLINE(B22,C*1.15,L,1,1),COLORRED,LINETHICK2;
顯示數字(b22,t5+5,最低價,1),align3,COLORred,LINETHICK2;
S22:之字轉向(3,n2)<向前引用(之字轉向(3,n2),1) AND
向前引用(之字轉向(3,n2),1)>向前引用(之字轉向(3,n2),2),棒狀線,COLORBLUE,LINETHICK1;
STICKLINE(S22,H-C*0.15,H,1,1),COLORBLUE,LINETHICK2;
顯示數字(s22,H+1,H,1),COLORblack,LINETHICK2;


UU1:=向前賦值(是否最後週期,上一次條件成立位置(B11)+1);
VV1:=UU1>向前引用(UU1,1);
WW1:=向前賦值(VV1,向前引用(上一次條件成立位置(B11),1)+2);
XX1:=WW1>向前引用(WW1,1);
畫直線(XX1,最低價,VV1,最低價,1),COLORRED,LINETHICK1;
A1:趨勢線數值(XX1,最低價,vv1,最低價,0,0),COLORRED,LINETHICK1;
XCA1:交叉函數(XC,A1);
播放聲音(XCA1,0,主路徑+'/effwav/賺錢音樂/賣1.wav');//跌破A2賣
UU2:=向前賦值(是否最後週期,上一次條件成立位置(S11)+1);
VV2:UU2>向前引用(UU2,1);
WW2:=向前賦值(VV2,向前引用(上一次條件成立位置(S11),1)+2);
XX2:=WW2>向前引用(WW2,1);
畫直線(XX2,最高價,VV2,最高價,1),COLORBLUE,LINETHICK1;
B1:趨勢線數值(XX2,最高價,vv2,最高價,0,0),COLORBLUE,LINETHICK1;
XCB1:交叉函數(XC,B1);
播放聲音(XCB1,0,主路徑+'/effwav/賺錢音樂/買1.wav');//上穿B1買
低1:向前引用(最低價,上一次條件成立位置(VV1)),COLORyellow,LINEDOT,LINETHICK1;
低2:向前引用(最低價,上一次條件成立位置(XX1)),COLORyellow,LINEDOT,LINETHICK1;
高1:向前引用(最高價,上一次條件成立位置(VV2)),COLORyellow,LINEDOT,LINETHICK1;
高2:向前引用(最高價,上一次條件成立位置(XX2)),COLORyellow,LINEDOT,LINETHICK1;
高高1乖離:=(((高1-高2)/XC-1)*100)-(-100) lINETHICK0;
低低1乖離((低2-低1)/XC-1)*100)-(-100) LINETHICK0;

UU3:=向前賦值(是否最後週期,上一次條件成立位置(B22)+1);
VV3:=UU3>向前引用(UU3,1);
WW3:=向前賦值(VV3,向前引用(上一次條件成立位置(B22),1)+2);
XX3:=WW3>向前引用(WW3,1);
畫直線(XX3,最低價,VV3,最低價,1),COLORCYAN,LINETHICK1;
A2:趨勢線數值(XX3,最低價,VV3,最低價,0,0),COLORCYAN,LINETHICK1;
UU4:=向前賦值(是否最後週期,上一次條件成立位置(S22)+1);
VV4:=UU4>向前引用(UU4,1);
WW4:=向前賦值(VV4,向前引用(上一次條件成立位置(S22),1)+2);
XX4:=WW4>向前引用(WW4,1);
畫直線(XX4,最高價,VV4,最高價,1),COLORblACK,LINETHICK1;
B2:趨勢線數值(XX4,最高價,vv4,最高價,0,0),COLORblACK,LINETHICK1;
低3:向前引用(最低價,上一次條件成立位置(VV3)),COLORyellow,LINETHICK0;
低4:向前引用(最低價,上一次條件成立位置(XX3)),COLORyellow,LINETHICK0;
高3:向前引用(最高價,上一次條件成立位置(VV4)),COLORyellow,LINETHICK0;
高4:向前引用(最高價,上一次條件成立位置(XX4)),COLORyellow,LINETHICK0;
高高2乖離:=(((高3-高4)/XC-1)*100)-(-100),COLORblue, lINETHICK0;
低低2乖離((低3-低4)/XC-1)*100)-(-100),COLORblACK, LINETHICK0;

__________________
efef55e3

由 cgjj 在 2011-10-31 09:52 發表:

回覆: [問題]如何只在兩點之間畫線

引用:
最初由 yjl8895 發表
問題]自動劃線
版大您好:

如何只在B22與B11之間(如圖畫圈圈的位置)自動劃線，
亦即B22紅色垂線出現後(第一個)B11紅箭頭兩點之間畫線。

謝謝您。


原碼如下

B11:之字轉向(3,n1/100)>向前引用(之字轉向(3,n1/100),1) AND
向前引用(之字轉向(3,n1/100),1)<向前引用(之字轉向(3,n1/100),2),棒狀線,COLORRED,LINETHICK2;
畫圖示(B11,最低價,4);
S11:之字轉向(3,n1/100)<向前引用(之字轉向(3,n1/100),1) AND
向前引用(之字轉向(3,n1/100),1)>向前引用(之字轉向(3,n1/100),2),棒狀線,COLORBLUE,LINETHICK2;
畫圖示(s11,最高價,5);

B22:之字轉向(3,n2)>向前引用(之字轉向(3,n2),1) AND
向前引用(之字轉向(3,n2),1)<向前引用(之字轉向(3,n2),2),棒狀線,COLORRED,LINETHICK1;
STICKLINE(B22,C*1.15,L,1,1),COLORRED,LINETHICK2;
顯示數字(b22,t5+5,最低價,1),align3,COLORred,LINETHICK2;
S22:之字轉向(3,n2)<向前引用(之字轉向(3,n2),1) AND
向前引用(之字轉向(3,n2),1)>向前引用(之字轉向(3,n2),2),棒狀線,COLORBLUE,LINETHICK1;
STICKLINE(S22,H-C*0.15,H,1,1),COLORBLUE,LINETHICK2;
顯示數字(s22,H+1,H,1),COLORblack,LINETHICK2;


UU1:=向前賦值(是否最後週期,上一次條件成立位置(B11)+1);
VV1:=UU1>向前引用(UU1,1);
WW1:=向前賦值(VV1,向前引用(上一次條件成立位置(B11),1)+2);
XX1:=WW1>向前引用(WW1,1);
畫直線(XX1,最低價,VV1,最低價,1),COLORRED,LINETHICK1;
A1:趨勢線數值(XX1,最低價,vv1,最低價,0,0),COLORRED,LINETHICK1;
XCA1:交叉函數(XC,A1);
播放聲音(XCA1,0,主路徑+'/effwav/賺錢音樂/賣1.wav');//跌破A2賣
UU2:=向前賦值(是否最後週期,上一次條件成立位置(S11)+1);
VV2:UU2>向前引用(UU2,1);
WW2:=向前賦值(VV2,向前引用(上一次條件成立位置(S11),1)+2);
XX2:=WW2>向前引用(WW2,1);
畫直線(XX2,最高價,VV2,最高價,1),COLORBLUE,LINETHICK1;
B1:趨勢線數值(XX2,最高價,vv2,最高價,0,0),COLORBLUE,LINETHICK1;
XCB1:交叉函數(XC,B1);
播放聲音(XCB1,0,主路徑+'/effwav/賺錢音樂/買1.wav');//上穿B1買
低1:向前引用(最低價,上一次條件成立位置(VV1)),COLORyellow,LINEDOT,LINETHICK1;
低2:向前引用(最低價,上一次條件成立位置(XX1)),COLORyellow,LINEDOT,LINETHICK1;
高1:向前引用(最高價,上一次條件成立位置(VV2)),COLORyellow,LINEDOT,LINETHICK1;
高2:向前引用(最高價,上一次條件成立位置(XX2)),COLORyellow,LINEDOT,LINETHICK1;
高高1乖離:=(((高1-高2)/XC-1)*100)-(-100) lINETHICK0;
低低1乖離((低2-低1)/XC-1)*100)-(-100) LINETHICK0;

UU3:=向前賦值(是否最後週期,上一次條件成立位置(B22)+1);
VV3:=UU3>向前引用(UU3,1);
WW3:=向前賦值(VV3,向前引用(上一次條件成立位置(B22),1)+2);
XX3:=WW3>向前引用(WW3,1);
畫直線(XX3,最低價,VV3,最低價,1),COLORCYAN,LINETHICK1;
A2:趨勢線數值(XX3,最低價,VV3,最低價,0,0),COLORCYAN,LINETHICK1;
UU4:=向前賦值(是否最後週期,上一次條件成立位置(S22)+1);
VV4:=UU4>向前引用(UU4,1);
WW4:=向前賦值(VV4,向前引用(上一次條件成立位置(S22),1)+2);
XX4:=WW4>向前引用(WW4,1);
畫直線(XX4,最高價,VV4,最高價,1),COLORblACK,LINETHICK1;
B2:趨勢線數值(XX4,最高價,vv4,最高價,0,0),COLORblACK,LINETHICK1;
低3:向前引用(最低價,上一次條件成立位置(VV3)),COLORyellow,LINETHICK0;
低4:向前引用(最低價,上一次條件成立位置(XX3)),COLORyellow,LINETHICK0;
高3:向前引用(最高價,上一次條件成立位置(VV4)),COLORyellow,LINETHICK0;
高4:向前引用(最高價,上一次條件成立位置(XX4)),COLORyellow,LINETHICK0;
高高2乖離:=(((高3-高4)/XC-1)*100)-(-100),COLORblue, lINETHICK0;
低低2乖離((低3-低4)/XC-1)*100)-(-100),COLORblACK, LINETHICK0;


看看是否為您要的結果

B11CS:=sum(B11 and b22=0,barslast(B22)+1);
DWCK1:B11 and B22=0 and B11CS=1 linethick;
DWCK2:B11 and B22=0 and B11CS=2 linethick;
DRAWLINE(DWCK1,l,DWCK2,l,0)

由 yjl8895 在 2011-10-31 10:08 發表:

大大:
謝謝麻煩

__________________
efef55e3

由 yjl8895 在 2011-10-31 10:23 發表:

版大謝謝您

__________________
efef55e3

由 yjl8895 在 2011-10-31 10:38 發表:

ㄡ 對不起

__________________
efef55e3

由 cgjj 在 2011-10-31 10:41 發表:

引用:
最初由 yjl8895 發表
大大:
謝謝麻煩


B11CS:=sum(B11 and b22=0,barslast(B22)+1);
DWCK1:B11 and B22=0 and B11CS=1 linethick;
DRAWLINE(B22,l,DWCK1,l,0);

由 yjl8895 在 2011-10-31 10:47 發表:

大大謝謝您
問題已經解決

__________________
efef55e3

由 yjl8895 在 2011-10-31 12:24 發表:

大大
再請教您
上述 DWCK1的點是在30支k棒內出現的話
又如何寫法
謝謝

__________________
efef55e3

由 cgjj 在 2011-10-31 12:48 發表:

引用:
最初由 yjl8895 發表
大大
再請教您
上述 DWCK1的點是在30支k棒內出現的話
又如何寫法
謝謝

B22sp:=barslast(B22);
B11CS:=sum(B11 and b22=0,B22sp+1);
DWCK1:=B11 and B22=0 and B11CS=1 and B22sp<30;
DRAWLINE(B22,l,DWCK1,l,0);

由 yjl8895 在 2011-10-31 13:21 發表:

大大:
非常感謝

__________________
efef55e3

由 yjl8895 在 2011-10-31 16:34 發表:

版大:
再次請教
我套用上述
B11CS:=sum(B11 and b22=0,barslast(B22)+1);
DWCK1:B11 and B22=0 and B11CS=1 linethick;
DRAWLINE(B22,l,DWCK1,l,0);
求S22與S11之間的線段(如附圖)
我套不出來 不知那裡有問題

__________________
efef55e3

由 cgjj 在 2011-10-31 17:12 發表:

引用:
最初由 yjl8895 發表
版大:
再次請教
我套用上述
B11CS:=sum(B11 and b22=0,barslast(B22)+1);
DWCK1:B11 and B22=0 and B11CS=1 linethick;
DRAWLINE(B22,l,DWCK1,l,0);
求S22與S11之間的線段(如附圖)
我套不出來 不知那裡有問題


S22sp:=barslast(S22);
S11CS:=sum(S11 and S22=0,S22sp+1);
DWCK2:=S11 and S22=0 and S11CS=1 and S22sp<30;
DRAWLINE(S22,l,DWCK2,l,0);

由 yjl8895 在 2011-10-31 17:16 發表:

大大
謝謝您
奇狐真好

__________________
efef55e3

由 yjl8895 在 2011-11-01 06:23 發表:

大大:
續上發現問題
我想在S22與S11濾掉B22
謝謝

__________________
efef55e3

由 yjl8895 在 2011-11-01 06:28 發表:

更正上文
濾掉S22與S11之間的B22

__________________
efef55e3

由 yjl8895 在 2011-11-01 14:04 發表:

煩請大大解惑

__________________
efef55e3

由 cgjj 在 2011-11-01 16:11 發表:

引用:
最初由 yjl8895 發表
更正上文
濾掉S22與S11之間的B22


B22:= if(S11CS=0,0,B22);

由 yjl8895 在 2011-11-01 20:07 發表:

大大
不知問題在何處
濾不掉
S22sp:=BARSLAST(S22);
S11CS:=SUM(S11 and S22=0,S22sp+1);
B22:= IF(S11CS=0,0,B22);
PP:S11 and S22=0 and S11CS=1 ;
DRAWLINE(S22,HIGH,PP,HIGH,0),COLORCYAN,LINETHICK2;

__________________
efef55e3

由 cgjj 在 2011-11-02 08:58 發表:

引用:
最初由 yjl8895 發表
大大
不知問題在何處
濾不掉
S22sp:=BARSLAST(S22);
S11CS:=SUM(S11 and S22=0,S22sp+1);
B22:= IF(S11CS=0,0,B22);
PP:S11 and S22=0 and S11CS=1 ;
DRAWLINE(S22,HIGH,PP,HIGH,0),COLORCYAN,LINETHICK2;


次序不對,過濾就會無效
程式要放在 B22 被用來繪線之前

由 yjl8895 在 2011-11-02 09:46 發表:

大大:
是我愚昧，
試過將B22:= IF(S11CS=0,0,B22);置放在下列各種次序位置
都沒有成功，或者可運用信號過濾(X,N); 請賜教。

S22sp:=BARSLAST(S22);
S11CS:=SUM(S11 and S22=0,S22sp+1);
PP:S11 and S22=0 and S11CS=1 ;
DRAWLINE(S22,HIGH,PP,HIGH,0),COLORCYAN,LINETHICK2;

__________________
efef55e3

由 cgjj 在 2011-11-02 09:57 發表:

引用:
最初由 yjl8895 發表
大大:
是我愚昧，
試過將B22:= IF(S11CS=0,0,B22);置放在下列各種次序位置
都沒有成功，或者可運用信號過濾(X,N); 請賜教。

S22sp:=BARSLAST(S22);
S11CS:=SUM(S11 and S22=0,S22sp+1);
PP:S11 and S22=0 and S11CS=1 ;
DRAWLINE(S22,HIGH,PP,HIGH,0),COLORCYAN,LINETHICK2;


貼出的這幾行只有片段, 且與B22繪線無關
程式碼不全, 難以協助您找問題

由 yjl8895 在 2011-11-02 10:02 發表:

大大:
全碼如后



畫漸變背景色(1,RGB顏色值(0,150,100),RGB顏色值(0,150,100),1);
XC:收盤價,LINETHICK0;
MA1:=簡單移動平均(收盤價,8);
MA2:=簡單移動平均(收盤價,13);
MA3:=簡單移動平均(收盤價,21);
MA4:=簡單移動平均(收盤價,34);
MA5:=簡單移動平均(收盤價,55);
MA6:=簡單移動平均(收盤價,89);
a7:=簡單移動平均(ma1,8),COLORblue,LINETHICK1;
b7:=簡單移動平均(ma2,13),COLORwhite,LINETHICK1;
c7:=簡單移動平均(ma3,21),COLORzyan,LINETHICK1;
d7:=簡單移動平均(ma4,34),COLORgreen,LINETHICK1;
e7:=簡單移動平均(ma5,55),COLORyellow,LINETHICK1;
f7:=簡單移動平均(ma6,89),COLORbrown,LINETHICK1;
T1:=(a7+b7+2*收盤價)/4,COLORwhite,,Linethick1;
T2:=(a7+b7+c7)/3,COLORwhite,,Linethick1;
T3:=(a7+b7+c7+d7+收盤價)/5,COLORblack,,Linethick1;
T4:=(a7+b7+C7+D7+E7)/5,COLORBLACK,,Linethick1;
T5:=(A7+B7+C7+D7+E7+F7)/6,COLORbrown,,Linethick1;
ab:=交叉函數(T1,T3),COLORwhite,LINETHICK0;
ba:=交叉函數(T3,T1),COLORwhite,LINETHICK0;
畫區間綵帶(T1>=T3,T1,T3),COLORff0099;;//綵帶
畫區間綵帶(T1<T3,T1,T3),colorFF9966;//綵帶
T1a7+b7+2*收盤價)/4,COLORyellow,,Linethick2;
T3a7+b7+C7+D7+收盤價)/5,COLORBLACK,,Linethick2;
T乖離T1-T3) LINETHICK0;
X乖離XC-T1) LINETHICK0;
多:畫柱線(T乖離>0,收盤價,開盤價,3,0),COLORwhite;
畫柱線(T乖離>0,最高價,最低價,0,0),COLORwhite;
空:畫柱線(T乖離<0,收盤價,開盤價,3,0),COLORblack;
畫柱線(T乖離<0,最高價,最低價,0,0),COLORblack;

B11:之字轉向(3,n1/100)>向前引用(之字轉向(3,n1/100),1) AND
向前引用(之字轉向(3,n1/100),1)<向前引用(之字轉向(3,n1/100),2),棒狀線,COLORRED,LINETHICK2;
畫圖示(B11,最低價,4);
S11:之字轉向(3,n1/100)<向前引用(之字轉向(3,n1/100),1) AND
向前引用(之字轉向(3,n1/100),1)>向前引用(之字轉向(3,n1/100),2),棒狀線,COLORBLUE,LINETHICK2;
畫圖示(s11,最高價,5);
B22:之字轉向(3,n2)>向前引用(之字轉向(3,n2),1) AND
向前引用(之字轉向(3,n2),1)<向前引用(之字轉向(3,n2),2),棒狀線,COLORRED,LINETHICK1;
畫柱線(B22,收盤價*1.15,最低價,1,1),COLORRED,LINETHICK2;
S22:之字轉向(3,n2)<向前引用(之字轉向(3,n2),1) AND
向前引用(之字轉向(3,n2),1)>向前引用(之字轉向(3,n2),2),棒狀線,COLORBLUE,LINETHICK1;
畫柱線(S22,最高價-收盤價*0.15,最高價,1,1),COLORBLUE,LINETHICK2;
B33:之字轉向(3,n3)>向前引用(之字轉向(3,n3),1) AND
向前引用(之字轉向(3,n3),1)<向前引用(之字轉向(3,n3),2),棒狀線,COLORRED,LINETHICK2;
畫垂直線(B33),棒狀線,COLORmagenta,LINETHICK2;
S33:之字轉向(3,n3)<向前引用(之字轉向(3,n3),1) AND
向前引用(之字轉向(3,n3),1)>向前引用(之字轉向(3,n3),2),棒狀線,COLORBLUE,LINETHICK2;
畫垂直線(S33),棒狀線,COLORblue,LINETHICK2;
B44:之字轉向(3,n4)>向前引用(之字轉向(3,n4),1) AND
向前引用(之字轉向(3,n4),1)<向前引用(之字轉向(3,n4),2),棒狀線,COLORRED,LINETHICK2;
畫垂直線(B44),棒狀線,COLORred,LINETHICK3;
畫垂直線(B44),棒狀線,COLORblack,LINETHICK1;
S44:之字轉向(3,n4)<向前引用(之字轉向(3,n4),1) AND
向前引用(之字轉向(3,n4),1)>向前引用(之字轉向(3,n4),2),棒狀線,COLORBLUE,LINETHICK2;
畫垂直線(S44),棒狀線,COLORblue,LINETHICK3;
畫垂直線(s44),棒狀線,COLORwhite,LINETHICK1;

B22sp:=上一次條件成立位置(B22);
B11CS:=求和(B11 and b22=0,B22sp+1);
S22:= 條件函數(B11CS=0,0,S22);
買點:B11 and B22=0 and B11CS=1 and B22sp<PP;
畫圖示(買點,最高價+2,1);
顯示數字(買點,最高價+1,最低價,1),COLORRED,LINETHICK2;
畫直線(B22,最低價,買點,最低價,0),COLORRED,LINETHICK2;

B33sp:=上一次條件成立位置(B33);
B11CS:=求和(B11 and b33=0,B33sp+1);
S33:= 條件函數(B11CS=0,0,S33);
最佳買點:B11 and B33=0 and B11CS=1 and B33sp<PP;
顯示文字(最佳買點,最高價+3,'最佳買點'),COLORRED;

S22sp:=上一次條件成立位置(S22);
S11CS:=求和(S11 and S22=0,S22sp+1);
B22:= 條件函數(S11CS=0,0,B22);
賣點:S11 and S22=0 and S11CS=1 and S22sp<PP;
畫圖示(賣點,最高價+2,2);
顯示數字(賣點,最高價+3,最高價,1),COLORWHITE,LINETHICK2;
畫直線(S22,最高價,賣點,最高價,0),COLORBLUE,LINETHICK2;

UU1:=向前賦值(是否最後週期,上一次條件成立位置(B11)+1);
VV1:=UU1>向前引用(UU1,1);
WW1:=向前賦值(VV1,向前引用(上一次條件成立位置(B11),1)+2);
XX1:=WW1>向前引用(WW1,1);
畫直線(XX1,最低價,VV1,最低價,1),COLORcyan,LINETHICK1;
B1:趨勢線數值(xx1,最低價,vv1,最低價,0,0),COLORcyan,LINETHICK1;
UU2:=向前賦值(是否最後週期,上一次條件成立位置(s11)+1);
VV2:=UU2>向前引用(UU2,1);
WW2:=向前賦值(VV2,向前引用(上一次條件成立位置(s11),1)+2);
XX2:=WW2>向前引用(WW2,1);
低1:向前引用(最低價,上一次條件成立位置(VV1)),COLORwhite,短虛線,LINETHICK1;
低2:向前引用(最低價,上一次條件成立位置(XX1)),COLORwhite,短虛線,LINETHICK1;
高1:向前引用(最高價,上一次條件成立位置(VV2)),COLORwhite,短虛線,LINETHICK1;
高2:向前引用(最高價,上一次條件成立位置(XX2)),COLORwhite,短虛線,LINETHICK1;
高高1乖離:=(((高1-高2)/XC-1)*100)-(-100) lINETHICK1;
低低1乖離:=(((低2-低1)/XC-1)*100)-(-100) LINETHICK1;
UU3:=向前賦值(是否最後週期,上一次條件成立位置(B22)+1);
VV3:=UU3>向前引用(UU3,1);
WW3:=向前賦值(VV3,向前引用(上一次條件成立位置(B22),1)+2);
XX3:=WW3>向前引用(WW3,1);
UU4:=向前賦值(是否最後週期,上一次條件成立位置(S22)+1);
VV4:=UU4>向前引用(UU4,1);
WW4:=向前賦值(VV4,向前引用(上一次條件成立位置(S22),1)+2);
XX4:=WW4>向前引用(WW4,1);
低3:向前引用(最低價,上一次條件成立位置(VV3)),COLORyellow,LINETHICK0;
低4:向前引用(最低價,上一次條件成立位置(XX3)),COLORyellow,LINETHICK0;
高3:向前引用(最高價,上一次條件成立位置(VV4)),COLORyellow,LINETHICK0;
高4:向前引用(最高價,上一次條件成立位置(XX4)),COLORyellow,LINETHICK0;

AA:=向前引用(最高價,m1)=最高值(最高價,2*m1+1);
AAA:=信號過濾(AA,m1);
BB:=向前賦值(AAA,m1+1);
CC1:=信號過濾(BB,m1);
CC:=CC1 OR 是否最後週期;
AA2:=向前引用(最低價,m1)=最低值(最低價,2*m1+1);
AAA2:=信號過濾(AA2,m1);
BB2:=向前賦值(AAA2,m1+1);
CC22:=信號過濾(BB2,m1);
CC2:=CC22 AND 求邏輯非(CC1);
EA:=向前賦值(CC,向前引用(上一次條件成立位置(CC2),1)+1);
EB:=EA>向前引用(EA,1); EE:=向前賦值(EB,2);
FF1:=EE>向前引用(EE,1);
EE2:=向前賦值(FF1 AND 統計總數(CC,向前引用(上一次條件成立位置(CC2),1)+2)=0,向前引用(上一次條件成立位置(CC2),1)+2);
FF2:=EE2>向前引用(EE2,1);
EE3:=向前賦值(FF2 AND 統計總數(CC,向前引用(上一次條件成立位置(CC2),1)+2)=0,向前引用(上一次條件成立位置(CC2),1)+2);
FF3:=EE3>向前引用(EE3,1);
JS:=條件函數(CC,統計總數(CC2,向前引用(上一次條件成立位置(CC),1)+1),0);
G1:=條件函數(JS=1 AND CC,上一次條件成立位置(FF1),0);
GA:=條件函數(CC AND 向前引用(最低價,上一次條件成立位置(FF1))>=向前引用(最低價,上一次條件成立位置(FF2)),上一次條件成立位置(FF2),上一次條件成立位置(FF1));
G2:=條件函數(JS=2 AND CC,GA,0);
G3:=條件函數(JS>=3 AND CC,條件函數(CC AND 向前引用(最低價,GA)>=向前引用(最低價,上一次條件成立位置(FF3)),上一次條件成立位置(FF3),GA),0);
GG:=G1+G2+G3;
JA:=向前賦值(CC,GG); JB:=JA>向前引用(JA,1); JJ:=向前賦值(JB,2);
LD:=JJ>向前引用(JJ,1);

LD1:=LD OR 是否最後週期;
hEA:=向前賦值(LD1,向前引用(上一次條件成立位置(CC),1)+1);
hEB:=hEA>向前引用(hEA,1); hEE:=向前賦值(hEB,2);
hFF1:=hEE>向前引用(hEE,1);
hEE2:=向前賦值(hFF1 AND 統計總數(LD1,向前引用(上一次條件成立位置(CC),1)+2)=0,向前引用(上一次條件成立位置(CC),1)+2);
hFF2:=hEE2>向前引用(hEE2,1);
hEE3:=向前賦值(hFF2 AND 統計總數(LD1,向前引用(上一次條件成立位置(CC),1)+2)=0,向前引用(上一次條件成立位置(CC),1)+2);
hFF3:=hEE3>向前引用(hEE3,1);
hJS:=條件函數(LD1,統計總數(CC1,向前引用(上一次條件成立位置(LD1),1)+1),0);
hG1:=條件函數(hJS=1 AND LD1,上一次條件成立位置(hFF1),0);
hGA:=條件函數(LD1 AND 向前引用(最高價,上一次條件成立位置(hFF1))<=向前引用(最高價,上一次條件成立位置(hFF2)),上一次條件成立位置(hFF2),上一次條件成立位置(hFF1));
hG2:=條件函數(hJS=2 AND LD1,hGA,0);
hG3:=條件函數(hJS>=3 AND LD1,條件函數(LD1 AND 向前引用(最高價,hGA)<=向前引用(最高價,上一次條件成立位置(hFF3)),上一次條件成立位置(hFF3),hGA),0);
hGG:=hG1+hG2+hG3;
hJA:=向前賦值(LD1,hGG); hJB:=hJA>向前引用(hJA,1); hJJ:=向前賦值(hJB,2);
HH:=hJJ>向前引用(hJJ,1);
{
DRAWICON(HD,H*1.01,10);
DRAWICON(LD,L*0.995,11);
}
畫直線(LD,最低價,HH,最高價,0),COLORblack,LINETHICK1;
畫直線(HH,最高價,LD,最低價,0),COLORblack,LINETHICK1;

__________________
efef55e3

由 cgjj 在 2011-11-02 10:36 發表:

引用:
最初由 yjl8895 發表
大大:
全碼如后

畫漸變背景色(1,RGB顏色值(0,150,100),RGB顏色值(0,150,100),1);
XC:收盤價,LINETHICK0;
MA1:=簡單移動平均(收盤價,8);
MA2:=簡單移動平均(收盤價,13);
..................................


n1, n2, pp 參數是設多少?
請舉例 在那個商品, 那個週期, 那個時間 濾不掉
這樣我比較好測試協助您

由 yjl8895 在 2011-11-02 10:56 發表:

大大:不好意思
參數如下:
N1:233
N2:13
N3:21
N4:72
PP:50
舉例如附圖
股票名稱:海華3694
8月30日的S22濾不掉

__________________
efef55e3

由 cgjj 在 2011-11-02 11:07 發表:

再看了一次您的程式, 您是要濾
　S22與S11之間的B22
　B22與B11之間的S22

我想應該是不可能濾的

因為 S22 會影響決定 B22 存不存在
而 B22 又會影響決定 S22 存不存在
彼此之間有交互, 邏輯上有衝突

由 yjl8895 在 2011-11-02 11:13 發表:

大大:
誠心謝謝您
閣下多費心了

__________________
efef55e3
全部時間均為台灣時間, 現在時間為02:30
在這個頁面顯示本主題全部的 26 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved.