<ul id="acoas"></ul>

求助帖：用了循環語句，應用之后發生死機

作者：開拓者 TB 來源：cxh99.com 發布時間：2016年05月09日

咨詢內容： 本帖最后由 ly_w1989 于 2016-3-9 23:51 編輯

TBL新手一枚，想寫一個MACD指標面積公式，實際寫的過程中發生死機現象
TB技術人員： MACD的面積公式的實際目標樣子如圖所示，這是我在通達信上實現后的樣子
這是我寫的半成品，沒想到應用時直接發生了死機
TB客服： 本帖最后由 ly_w1989 于 2016-3-9 23:48 編輯
1. Params
2. Numeric M1(12);
3. Numeric M2(26);
4. Numeric M3(9);
5. Vars
6. NumericSeries MACD;
7. NumericSeries DIF;
8. NumericSeries DEA;
9. NumericSeries AREA;
10. Numeric NUM;
11. String STR;
12. Begin
13. DIF = EMA( Close, M1 ) - EMA( Close, M2 ) ;
14. DEA = EMA(DIF,M3);
15. MACD = (DIF-DEA)*2;
16. PlotNumeric("DIF",DIF);
17. PlotNumeric("DEA",DEA);
18. If (MACD >= 0)
19. PlotNumeric("MACD",MACD,0,Red);
20. Else
21. PlotNumeric("MACD",MACD,0,Green);
22. PlotNumeric("零線",0);
23. AREA=0;
24. NUM=1;
25. If(MACD[0]<=0 And MACD[1]>0)
26. {
27. While(MACD[NUM]>0)
28. {
29. AREA=AREA+MACD[NUM];
30. NUM=NUM+1;
31. }
32. }
33. STR=Text(AREA);
34. PlotString ("面積",STR,MACD*1.3,Green);
35. End
復制代碼
網友回復： 本帖最后由 ly_w1989 于 2016-3-9 23:59 編輯

上述代碼用到了自定義函數EMA用法，參考的是同花順和通達信的函數設定
前面22行代碼是描述MACD公式的，經過測試沒問題，后面是開始計算MACD面積的，用到了循環判斷，編譯時沒問題，但一旦加載就會死機
1. //------------------------------------------------------------------------
2. // 簡稱: EMA
3. // 名稱: 平滑移動平均
4. // 類別: 用戶函數
5. // 類型: 用戶函數
6. // 輸出: 數值型
7. //------------------------------------------------------------------------
9. Params
10. Numeric X;
11. Numeric N;
12. Vars
13. NumericSeries Num;
14. Begin
15. Num = (2*X+(N-1)*NUM[1])/(N+1);
16. Return Num;
17. End
復制代碼
網友回復： 已經想了很久了，也切換了別的寫法試過，但還是不行，希望大家幫幫我，拜托了

<ul id="okq0y"></ul>

求助帖：用了循環語句，應用之后發生死機

這是我寫的半成品，沒想到應用時直接發生了死機

求助帖：用了循環語句，應用之后發生死機

這是我寫的半成品，沒想到應用時直接發生了死機