成本均线[其他软件公式]

相关标签:

 

MID:=(OPEN+CLOSE)/2;
HSL:=IF(CAPITAL=0,VOL/SUM(VOL,0),VOL/CAPITAL);
IF CAPITAL=0 THEN BEGIN
HSL:=VOL/SUM(VOL,0);
A:=SETLBOUND(4,1);
FOR I=1 TO MIN(-1,DATACOUNT) DO BEGIN
HSL[I]:=0;
END;
END;
LJHS[1]:=HSL[1];
CYC1[1]:=MID[1];
LJHS2[1]:=HSL[1];
CYC2[1]:=MID[1];
LJHS3[1]:=HSL[1];
CYC3[1]:=MID[1];
LJHSM[1]:=HSL[1];
CYC∞[1]:=MID[1];
DD:=MID[1]*(BARPOS<0);
FOR I=LBOUND(HSL)+1 TO DATACOUNT DO BEGIN
LJHS[I]:=(LJHS[I-1])*(1-HSL[I])*(N1-1)/N1+HSL[I];
CYC1[I]:=(MID[I]*HSL[I]+(CYC1[I-1])*(LJHS[I-1])*(1-HSL[I])*(N1-1)/N1)/LJHS[I]+DD[I];
LJHS2[I]:=(LJHS2[I-1])*(1-HSL[I])*(N2-1)/N2+HSL[I];
CYC2[I]:=(MID[I]*HSL[I]+(CYC2[I-1])*(LJHS2[I-1])*(1-HSL[I])*(N2-1)/N2)/LJHS2[I]+DD[I];
LJHS3[I]:=(LJHS3[I-1])*(1-HSL[I])*(N3-1)/N3+HSL[I];
CYC3[I]:=(MID[I]*HSL[I]+(CYC3[I-1])*(LJHS3[I-1])*(1-HSL[I])*(N3-1)/N3)/LJHS3[I]+DD[I];
LJHSM[I]:=(LJHSM[I-1])*(1-HSL[I])+HSL[I];
CYC∞[I]:=(MID[I]*HSL[I]+(CYC∞[I-1])*(LJHSM[I-1])*(1-HSL[I]))/LJHSM[I]+DD[I];
END;
CYC1,colorFFFF;
CYC2,colorFF00FF;
CYC3,colorFF00;
CYC∞:CYC∞,LINETHICK2,colorFF0000;
MA240:EMA(CLOSE,240),LINETHICK2,colorFFFF00;
LTPBD:=SELFDATA('LSTQ');
STICKLINE(LTPBD-REF(LTPBD,1)<>0,OPEN,CLOSE,8,0),colorFF00FF;
STICKLINE(LTPBD-REF(LTPBD,1)<>0,HIGH,LOW,1,0),colorFF00FF;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】

 

 

有思路，想编写各种指标公式，交易模型，选股公式，还原公式的朋友

可联系技术人员 QQ: 262069696  或微信：cxhjy888 进行 有偿收费 编写！(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)

（怎么收费，代编流程等详情请点击查阅！）

(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)