以下是MT4公式，请帮忙改编为金字塔格式（超过16240字符，请看一二楼）
#property indicator_chart_window
#property indicator_buffers 3
#property indicator_color1 White
#property indicator_color2 Red
#property indicator_color3 White
double Bi[],Highxiu[],Lowxiu[];
int i=0,j=0;//j为上一拐点以后的包含合并次数
int mark=0,xiangbao=0;//mark 为分笔方向变量，xiangbao 为K线包含关系方向变量
int Suo,Bisuo;//Suo为上一拐点的索引,Bisuo为上一线段端点的索引
int Shift,last;
double HighMid,LowMid;//HighMid为上溯第一个高点暂存，LowMid为上溯第一个低点暂存
int init()
{
SetIndexBuffer(0,Bi);
SetIndexBuffer(1,Highxiu);
SetIndexBuffer(2,Lowxiu);
SetIndexStyle(0,DRAW_SECTION);
SetIndexStyle(1,DRAW_NONE);
SetIndexStyle(2,DRAW_NONE);
SetIndexEmptyValue(0,0.0);
IndicatorDigits(Digits);
SetIndexLabel(0,"笔");
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start()
{
//----
int counted_bars=IndicatorCounted();
int Limit=Bars-counted_bars;
if(counted_bars==0 )
{
ArrayInitialize(Bi,0.0);
}
for(Shift=Limit;Shift>=0;Shift--)
{
Highxiu[Shift]=High[Shift];
Lowxiu[Shift]=Low[Shift];
switch(xiangbao)
{
case 0:
if(Highxiu[Shift]>Highxiu[Shift+1] && Lowxiu[Shift]>Lowxiu[Shift+1])
{
xiangbao=1;
}
if(Highxiu[Shift]<Highxiu[Shift+1] && Lowxiu[Shift]<Lowxiu[Shift+1])
{
xiangbao=-1;
}
break;
case 1:
if(Highxiu[Shift]<Highxiu[Shift+1] && Lowxiu[Shift]>=Lowxiu[Shift+1])
{
Highxiu[Shift]=Highxiu[Shift+1];
}
if(Highxiu[Shift]<Highxiu[Shift+1] && Lowxiu[Shift]<Lowxiu[Shift+1])
{
xiangbao=-1;
}
break;
case -1:
if(Highxiu[Shift]<=Highxiu[Shift+1] && Lowxiu[Shift]>Lowxiu[Shift+1])
{
Lowxiu[Shift]=Lowxiu[Shift+1];
}
if(Highxiu[Shift]>Highxiu[Shift+1] && Lowxiu[Shift]>Lowxiu[Shift+1])
{
xiangbao=1;
}
break;
default: return;
}
}
for(Shift=Limit;Shift>=0;Shift--)
{
switch(mark)
{
case 0:
j=0;
int x=iHighest(NULL,0,MODE_HIGH,counted_bars,Shift);
int y=iLowest(NULL,0,MODE_LOW,counted_bars,Shift);
if(x-y>=4) //如果高点在前且比低点超前4根K线
{
for(i=x-1;i>=y;i--)
{
if((High[i]!=Highxiu[i])|| (Low[i]!=Lowxiu[i])) j++;//累计合并包含K线的次数
}
if(x-y-j>=4) //如果高点在前且合并包含K线后比低点超前4根K线
{
Bi[x]=High[x]; //登记第一个顶的价格并传递给指标
HighMid=High[x]; //记录第一个顶的价格
Suo=x; //记录第一个顶的索引
mark=-1; //向上的笔结束，向下的一笔确认出现，把分笔的目标改为寻找底
}
}
if(y-x>4) //如果低点在前且比高点超前4根K线
{
for(i=y-1;i>=x;i--)
{
if((High[i]!=Highxiu[i])|| (Low[i]!=Lowxiu[i])) j++;//累计合并包含K线的次数
}
if(y-x-j>=4) //如果低点在前且合并K线后比高点超前4根K线
{
Bi[y]=Low[y]; //登记第一个底的价格并传递给指标
LowMid=Low[y]; //记录第一个底的价格
Suo=y; //记录第一个底的索引
mark=1; //向下的笔结束，向上的笔确认出现，把分笔的目标改为寻找顶
}
}
break;
case 1:
j=0;
x=iHighest(NULL,0,MODE_HIGH,Suo-Shift,Shift); //计算上一个底以来最高价所在K线的索引
y=iLowest(NULL,0,MODE_LOW,x-Shift,Shift); //计算上一个高点以来最低价所在K线的索引
if(x-y>=4)
{
for(i=x-1;i>=y;i--)
{
if((High[i]!=Highxiu[i])|| (Low[i]!=Lowxiu[i])) j++;//累计合并包含K线的次数
}
if(x-y-j>=4 && High[y]<Low[x])
{
Bi[x]=High[x]; //登记新一个顶的价格并传递给指标
HighMid=High[x]; //记录新一个顶的价格
Suo=x; //记录新一个顶的索引
mark=-1; //向上的笔结束，向下的一笔确认出现，把分笔的目标改为寻找底
last=y;
}
}
if(y-x>=4)
{
for(i=y-1;i>=x;i--)
{
if((High[i]!=Highxiu[i])|| (Low[i]!=Lowxiu[i])) j++;//累计合并包含K线的次数
}
if(y-x-j>=4 && High[y]<Low[x])
{
Bi[y]=Low[y]; //登记新一个底的价格并传递给指标
LowMid=Low[y]; //记录新一个底的价格
Suo=y; //记录新一个底的索引
mark=1; //向下的笔结束，向上的一笔确认出现，把分笔的目标改为寻找顶
last=x;
}
}
if(y-x>=3 && High[x]>HighMid) //至少第4根K线后过顶
{
Bi[y]=Low[y]; //登记新一个底的价格并传递给指标
LowMid=Low[y]; //记录新一个底的价格
Suo=y; //记录新一个底的索引
mark=1; //向下的笔结束，向上的一笔确认出现，把分笔的目标改为寻找顶
last=x;
}
if(Shift==0 && mark==-1)
{
Bi[y]=Low[y];
if(last!=y)
{
Bi[last]=0;
last=y;
}
}
break;
default: return;
}
}
//----
return(0);
}
//+------------------------------------------------------------------+
{以上1、2楼为一个完整的公式源码}
神啊 楼主你这么长的代码 恐怕很难让人免费给你写出来啊
如果你会一些金字塔代码，来询问某个功能模块怎么实现 这样比较好
一点点都不会。那说出你的代码思路总可以吧
你的代码看不懂，亲