把MC的源代码转换成金字塔


inputs:kai(0.4),guan(0.0),len(50),leftstrength(9),richtstrength(3),zs(100),zy(500),hc(20);
var:var0(0),var1(0),var2(0),var3(0),var4(0),var5(0),var6(0),var7(0),cc(0),aa(0);
array:arr0[10](0),arr1[10](0);

condition1=Pivot(high,len,leftstrength,richtstrength,1,1,var0,var1)<>-1;
condition2=Pivot(high,len,leftstrength,richtstrength,2,1,var2,var3)<>-1;
condition3=Pivot(low,len,leftstrength,richtstrength,1,-1,var4,var5)<>-1;
condition4=Pivot(low,len,leftstrength,richtstrength,2,-1,var6,var7)<>-1;

if condition1 and condition2 then begin
   for value1 = 9 downto 0 begin
   arr0[value1+1]= arr0[value1];
   end;
   if arr0[1]<>0 then value10=tl_delete(arr0[1]);
   if value10=0 then begin
   arr0[0]= tl_new(date[var3],time[var3],high[var3],date[var1],time[var1],high[var1]);
 
         end;
     end;
   

if condition3 and condition4 then begin
   for value2 = 9 downto 0 begin
   arr1[value2+1]= arr1[value2];
   end;
   if arr1[1]<>0 then value20=tl_delete(arr1[1]);
   if value20=0 then begin
   arr1[0]= tl_new(date[var7],time[var7],low[var7],date[var5],time[var5],low[var5]);
   
         end;
     end;