--  作者:NaturalLaw 
        --  发布时间:2017/3/9 14:08:44 
        
        --   
        //问题:为啥数组最小下标是0? 
	RUNMODE:0;//运行模式为逐K线计算 
	VARIABLE:arrSHV[] = 0;//短期波峰数组 VARIABLE:arrSHT[] = 0;//短期波峰周期位置数组 VARIABLE:arrSLV[] = 0;//短期波谷数组 VARIABLE:arrSLT[] = 0;//短期波谷周期位置数组 
	//===短期波峰=================================================================================== IF BARPOS > 2 THEN BEGIN SHIF:=H[BARPOS-2] <= H[BARPOS-1] AND H[BARPOS-1] >= H[BARPOS];//判断波峰的条件 IF SHIF THEN BEGIN  arrSHV:=H[BARPOS-1];  //波峰值   arrSHT:=BARPOS-1;     //波峰位置 END  SHN:UBOUND(arrSHV),NODRAW;//波峰个数  SH:arrSHV,COLORGREEN;//短期波峰轨道 
	//===短期波谷===================================================================================== SLIF:=L[BARPOS-2] >= L[BARPOS-1] AND L[BARPOS-1] <= L[BARPOS];//判断波谷的条件 IF SLIF THEN BEGIN  arrSLV:=L[BARPOS-1];  //波谷值  arrSLT:=BARPOS-1;     //波谷位置 END SLN:UBOUND(arrSLV),NODRAW;//波谷个数 SL:arrSLV,COLORRED;//短期波谷轨道 
	END 
	波峰数组最大上标:UBOUND(arrSHV),NODRAW; 波峰数组最小下标:LBOUND(arrSHV),NODRAW; 波谷数组最大上标:UBOUND(arrSLV),NODRAW; 波谷数组最小下标:LBOUND(arrSLV),NODRAW; 
	  
	  
         
       |