GetTickCount

uint  GetTickCount();

#define MAX_SIZE 40

//+------------------------------------------------------------------+

//| 测量40个裴波那契数列计算时间的脚本                                    |

//+------------------------------------------------------------------+

void OnStart()

  {

//--- 牢记初始值

   uint start=GetTickCount();

//--- 在裴波那契数列获得下一个数列的变量

   long fib=0;

//--- 循环计算来自裴波那契数列的指定数列量

   for(int i=0;i<MAX_SIZE;i++) fib=TestFibo(i);

//--- 获取毫秒为单位的所用时间

   uint time=GetTickCount()-start;

//--- 导出信息到专家日志

   PrintFormat("Calculating %d first Fibonacci numbers took %d ms",MAX_SIZE,time);

//--- 已完成脚本

   return;

  }

//+------------------------------------------------------------------+

//| 通过数列号获得裴波那契数列的函数                                      |

//+------------------------------------------------------------------+

long TestFibo(long n)

  {

//--- 裴波那契数列的第一个成员

   if(n<2) return(1);

//--- 所有其他成员通过以下公式计算

   return(TestFibo(n-2)+TestFibo(n-1));

  }