大伊人青草狠狠久久-大伊香蕉精品视频在线-大伊香蕉精品一区视频在线-大伊香蕉在线精品不卡视频-大伊香蕉在线精品视频75-大伊香蕉在线精品视频人碰人

開(kāi)拓者1分鐘圖里面取道5分鐘的數(shù)據(jù)的均線源碼

作者：開(kāi)拓者 TB 來(lái)源：cxh99.com 發(fā)布時(shí)間：2012年11月15日

內(nèi)容： 使用環(huán)境：
基本數(shù)據(jù)源為1分鐘，通過(guò)DataConvert可以轉(zhuǎn)化為對(duì)應(yīng)的5分鐘數(shù)據(jù)，有些朋友希望能夠在1分鐘圖里面取道5分鐘的數(shù)據(jù)的均線，效果要和單獨(dú)使用5分鐘的均線一樣。為此，提供以下函數(shù)。

1、新建一個(gè)用戶函數(shù)，TransMinsData，返回值為數(shù)值型。
參數(shù)1：要計(jì)算的數(shù)據(jù)源。
參數(shù)2：想按N分鐘來(lái)處理，本例是5分鐘，不能大于60。
參數(shù)3：希望取多少個(gè)N分鐘前的數(shù)據(jù)。
1. Params
2. NumericSeries Price(1);
3. Numeric nMinSet(5);
4. Numeric MinsAgo(2);
5. Vars
6. NumericSeries barCnt;
7. NumericSeries MinData;
8. Numeric i;
9. Numeric j;
10. Numeric nIndex(0);
11. Begin
12. If(IntPart(Minute%nMinSet)==0)
13. {
14. barCnt = 1;
15. }Else
16. {
17. barCnt = barCnt[1] + 1;
18. }
19. MinData = Price;
21. If(MinsAgo == 0)
22. {
23. return MinData;
24. }Else
25. {
26. For i = 1 To MinsAgo
27. {
28. If( i == 1)
29. {
30. j = 0;
31. }Else
32. {
33. j = j + BarCnt[j];
34. }
35. If (j > CurrentBar ) Return InvalidNumeric;
36. nIndex = nIndex + BarCnt[j];
37. }
38. Return MinData[nIndex];
39. }
40. End

<delect id="kmiik"></delect>