奇狐社區論壇 - [求救]给版主和各位高手拜年，有一问题，请帮忙！谢谢！

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

由 lxfyyylrx 在 2011-02-04 16:33 發表:

[求救]给版主和各位高手拜年，有一问题，请帮忙！谢谢！

第1：关于macd一次0轴以下macd的最小值，第2小值，以及第3小值，怎么表答。和他们到现在的周期数谢谢！
如图A为macd的最小值，B为第2小值，C为第3小值小a，b，c，为macd缩短的开始【第一图】
第2：为macd中间有2次大于0，但macd再到0下时每次都比上一次数值大，也求第一次macd在0下到现在的周期数，第2次到现在的周期数【第2图】

由 lxfyyylrx 在 2011-02-04 16:41 發表:

回覆: [求救]给版主和各位高手拜年，有一问题，请帮忙！谢谢！

引用:
最初由 lxfyyylrx 發表
第1：关于macd一次0轴以下macd的最小值，第2小值，以及第3小值，怎么表答。谢谢！
如图A为macd的最小值，B为第2小值，C为第3小值小a，b，c，为macd缩短的开始【第一图】
第2：为macd中间有2次大于0，但macd再到0下时每次都比上一次数值大【第2图】

第2张图发不到主贴里就发到下面，请帮助，谢谢！！！！！！

由 cgjj 在 2011-02-07 14:27 發表:

回覆: [求救]给版主和各位高手拜年，有一问题，请帮忙！谢谢！

引用:
最初由 lxfyyylrx 發表
第1：关于macd一次0轴以下macd的最小值，第2小值，以及第3小值，怎么表答。和他们到现在的周期数谢谢！
如图A为macd的最小值，B为第2小值，C为第3小值小a，b，c，为macd缩短的开始【第一图】

//程式範例

原碼:SS:=SGN(MACD);
CKA:=SS<>ref(SS,1) or barpos=1;
CKZ:=SS<>refx(SS,1) or barpos=datacount;
高轉:=macd>0 and macd>ref(macd,1) and macd>refx(macd,1) or barpos=0;
低轉:=macd<0 and macd<ref(macd,1) and macd<refx(macd,1) or barpos=0;
WH:=C*0; WL:=WH;
for i=1 to datacount do begin
  if CKA[i] then begin
    H1:=0; L1:=0; H2:=0; L2:=0; H3:=0; L3:=0; 
    H1P:=0; L1P:=0; H2P:=0; L2P:=0; H3P:=0; L3P:=0;
  end;
  if 高轉[i] then begin
    if MACD[i]>H1 then begin
       H3:=H2; H3P:=H2P; H2:=H1; H2P:=H1P; H1:=MACD[i]; H1P:=i;
    end else if MACD[i]>H2 then begin
       H3:=H2; H3P:=H2P; H2:=MACD[i]; H2P:=i;
    end else if MACD[i]>H3 then begin
       H3:=MACD[i]; H3P:=i;
    end;
  end else if 低轉[i] then begin
    if MACD[i]<L1 then begin
       L3:=L2; L3P:=L2P; L2:=L1; L2P:=L1P; L1:=MACD[i]; L1P:=i;
    end else if MACD[i]<L2 then begin
       L3:=L2; L3P:=L2P; L2:=MACD[i]; L2P:=i;
    end else if MACD[i]<L3 then begin
       L3:=MACD[i]; L3P:=i;
    end;
  end;
  if CKZ[i] then begin
    if MACD[i]>0 then begin
      WH[H1P]:=1; WH[H2P]:=2; WH[H3P]:=3;
    end else if MACD[i]<0 then begin
      WL[L1P]:=1; WL[L2P]:=2; WL[L3P]:=3;
    end;
  end;
end;
DRAWTEXT(WH=1,0,'A') colorred pxdn10 ALIGN0;
DRAWTEXT(WH=2,0,'B') colorred pxdn10 ALIGN0;
DRAWTEXT(WH=3,0,'C') colorred pxdn10 ALIGN0;
DRAWTEXT(WL=1,0,'A') colorgreen pxup30 ALIGN0;
DRAWTEXT(WL=2,0,'B') colorgreen pxup30 ALIGN0;
DRAWTEXT(WL=3,0,'C') colorgreen pxup30 ALIGN0;

由 cgjj 在 2011-02-07 14:31 發表:

回覆: 回覆: [求救]给版主和各位高手拜年，有一问题，请帮忙！谢#

引用:
最初由 lxfyyylrx 發表
第2张图发不到主贴里就发到下面，请帮助，谢谢！！！！！！

把您要求的距離標示一下(起點和終點)
這樣比較清楚您要求的範圍, 文字易誤解

由 lxfyyylrx 在 2011-02-08 13:53 發表:

回覆: 回覆: [求救]给版主和各位高手拜年，有一问题，请帮忙！谢#

引用:

最初由 cgjj 發表
//程式範例

原碼:SS:=SGN(MACD);
CKA:=SS<>ref(SS,1) or barpos=1;
CKZ:=SS<>refx(SS,1) or barpos=datacount;
高轉:=macd>0 and macd>ref(macd,1) and macd>refx(macd,1) or barpos=0;
低轉:=macd<0 and macd<ref(macd,1) and macd<refx(macd,1) or barpos=0;
WH:=C*0; WL:=WH;
for i=1 to datacount do begin
  if CKA[i] then begin
    H1:=0; L1:=0; H2:=0; L2:=0; H3:=0; L3:=0; 
    H1P:=0; L1P:=0; H2P:=0; L2P:=0; H3P:=0; L3P:=0;
  end;
  if 高轉[i] then begin
    if MACD[i]>H1 then begin
       H3:=H2; H3P:=H2P; H2:=H1; H2P:=H1P; H1:=MACD[i]; H1P:=i;
    end else if MACD[i]>H2 then begin
       H3:=H2; H3P:=H2P; H2:=MACD[i]; H2P:=i;
    end else if MACD[i]>H3 then begin
       H3:=MACD[i]; H3P:=i;
    end;
  end else if 低轉[i] then begin
    if MACD[i]<L1 then begin
       L3:=L2; L3P:=L2P; L2:=L1; L2P:=L1P; L1:=MACD[i]; L1P:=i;
    end else if MACD[i]<L2 then begin
       L3:=L2; L3P:=L2P; L2:=MACD[i]; L2P:=i;
    end else if MACD[i]<L3 then begin
       L3:=MACD[i]; L3P:=i;
    end;
  end;
  if CKZ[i] then begin
    if MACD[i]>0 then begin
      WH[H1P]:=1; WH[H2P]:=2; WH[H3P]:=3;
    end else if MACD[i]<0 then begin
      WL[L1P]:=1; WL[L2P]:=2; WL[L3P]:=3;
    end;
  end;
end;
DRAWTEXT(WH=1,0,'A') colorred pxdn10 ALIGN0;
DRAWTEXT(WH=2,0,'B') colorred pxdn10 ALIGN0;
DRAWTEXT(WH=3,0,'C') colorred pxdn10 ALIGN0;
DRAWTEXT(WL=1,0,'A') colorgreen pxup30 ALIGN0;
DRAWTEXT(WL=2,0,'B') colorgreen pxup30 ALIGN0;
DRAWTEXT(WL=3,0,'C') colorgreen pxup30 ALIGN0;

谢谢版主帮忙，另外怎样求出MACD,A.B.C三点的具体数值。谢谢！

由 cgjj 在 2011-02-08 14:46 發表:

回覆: 回覆: 回覆: [求救]给版主和各位高手拜年，有一问题，请帮忙！ฃ

引用:
最初由 lxfyyylrx 發表
谢谢版主帮忙，另外怎样求出MACD,A.B.C三点的具体数值。谢谢！

用 ref 搭配 barslast(條件) 就可向前取值了

由 lxfyyylrx 在 2011-02-09 03:58 發表:

回覆: 回覆: 回覆: 回覆: [求救]给版主和各位高手拜年，有一问题，请帮忙！

引用:
最初由 cgjj 發表
用 ref 搭配 barslast(條件) 就可向前取值了

再次感谢版主帮助，谢谢！！！！！！

全部時間均為台灣時間, 現在時間為04:37

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