整理后求新K线的均价 - 公式模型编写问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

VARIABLE:dk1=0,xdk1=0;

n:=5;
上1:=wma(wma(hhv(h,n),n),n),LINETHICK1,colorred;
下1:=wma(wma(llv(l,n),n),n),LINETHICK1,colorgreen;

if cross(c,上1) then dk1:=1;
IF CROSS(下1,c) THEN DK1:=-1;
STICKLINE(dk1=-1 and CLOSE<OPEN ,OPEN,CLOSE,8,0),colorgreen;
STICKLINE(dk1=-1 and CLOSE>=OPEN ,OPEN,CLOSE,8,1),colorgreen;
STICKLINE(dk1=-1 , HIGH,MAX(OPEN,CLOSE),0,0),colorgreen;
STICKLINE(dk1=-1 , MIN(OPEN,CLOSE),LOW,0,0),colorgreen;
STICKLINE(dk1=1 and CLOSE>=OPEN ,OPEN,CLOSE,8,1),COLORMAGENTA;
STICKLINE(dk1=1 and CLOSE<OPEN ,OPEN,CLOSE,8,0),COLORMAGENTA;
STICKLINE(dk1=1 , HIGH,MAX(OPEN,CLOSE),0,0),COLORMAGENTA;
STICKLINE(dk1=1 , MIN(OPEN,CLOSE),LOW,0,0),COLORMAGENTA;

n1:=sumbars(dk1=1 and ref(dk1=-1,1),1);//红色
n2:=sumbars(dk1=-1 and ref(dk1=1,1),1);//绿色

红色开盘价:=ref(OPEN,n1-1);
红色收盘价:=ref(CLOSE,n1);

绿色开盘价:=ref(OPEN,n2-1);
绿色收盘价:=ref(CLOSE,n2);

红最高:=hhv(HIGH,n1);
绿最高:=hhv(HIGH,n2);

红最低:=llv(low,n1);
绿最低:=llv(low,n2);

计算MA(T,N)

相等于把红绿部分当作不同的新K线。T是新K线的收盘价，N是新K线的根数，求N根新K线的的均价

（原来有一个提问帖，因为太底层了，所以新开了一帖）

此主题相关图片如下：1571063020(1).png

N1,N2是现有的K线数量，要求N是红绿段的段数啊！

T是红绿段的最后价格

红绿交替位置的收盘价进行计算

len:count(a or b,0);//统计红绿转换的次数

这是统计所有转换次数啊！

要求是：右向左数 N次转换数，比如3次 MA(T,N)就是MA(ab_c,3).主要是中国3难写啊

可是按照这样写的指标，就是下面的样子，完全没有交叉位置啊！改编的MACD指标

完全没有交叉点（理论上应该有的啊！应该是和MACD差不多的样子）

主要是红色字体部分

VARIABLE:dk1=0,difc=0,deac=0,macdc=0;

n:=5;

上1:=wma(wma(hhv(h,n),n),n),LINETHICK1,colorred;

下1:=wma(wma(llv(l,n),n),n),LINETHICK1,colorgreen;

if cross(c,上1) then dk1:=1;

IF CROSS(下1,c) THEN DK1:=-1;

{STICKLINE(dk1=-1 and CLOSE<OPEN ,OPEN,CLOSE,8,0),colorgreen;

STICKLINE(dk1=-1 and CLOSE>=OPEN ,OPEN,CLOSE,8,1),colorgreen;

STICKLINE(dk1=-1 , HIGH,MAX(OPEN,CLOSE),0,0),colorgreen;

STICKLINE(dk1=-1 , MIN(OPEN,CLOSE),LOW,0,0),colorgreen;

STICKLINE(dk1=1 and CLOSE>=OPEN ,OPEN,CLOSE,8,1),COLORMAGENTA;

STICKLINE(dk1=1 and CLOSE<OPEN ,OPEN,CLOSE,8,0),COLORMAGENTA;

STICKLINE(dk1=1 , HIGH,MAX(OPEN,CLOSE),0,0),COLORMAGENTA;

STICKLINE(dk1=1 , MIN(OPEN,CLOSE),LOW,0,0),COLORMAGENTA;}

a:=dk1=1 and ref(dk1,1)=-1;

b:=dk1=-1 and ref(dk1,1)=1;

ss:=ref(c,1);

ab_c:=if(a or b,ss,0);

ma12:=SUMBARS(ab_c,12)/12;

ma26:=SUMBARS(ab_c,26)/26;

DIFF:=ma12-ma26,COLORwhite,LINETHICK1.5;

DDE:=if(a or b,DIFF,0);

madiff9:=SUMBARS(DDE,9)/9;

DEA:=madiff9,COLORYELLOW,LINETHICK1.5;

MACD:=(DIFF-DEA)*2,COLORSTICK;

if a then begin diffc:=diff;

deac:=dea;

macdc:=macd;

end;

if b then begin diffc:=diff;

deac:=dea;

macdc:=macd;

end;

aaadif:diffc;

bbbdea:deac;

cccmacd:macdc,COLORSTICK;

主题：整理后求新K线的均价