通达信计划仓位源码副图贴图

非原创，根据大神的指标改的。

计划仓位

承担风险:=10;
 N :=100;

低点:=IF(CURRBARSCOUNT<=N, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=45)),1)),DRAWNULL),COLORRED,LINETHICK3;
止损位:=IF(CURRBARSCOUNT<=N, CONST(IF(ISLASTBAR=1,LLV(低点*(100-承担风险)/100, BARSLAST(CURRBARSCOUNT=45)),1)),DRAWNULL),COLORFF8000,LINETHICK3;
止损幅度:=((低点-低点*0.01)/C-1)*100;
计划仓位:IF(承担风险/ABS(止损幅度)*100>=100,100-ABS(止损幅度),承担风险/ABS(止损幅度)*100),NODRAW,COLORRED;
 STICKLINE(计划仓位>=REF(计划仓位,1),0,计划仓位,2,0),COLORLIMAGENTA;
 STICKLINE(计划仓位<REF(计划仓位,1),0,计划仓位,2,1),COLORLIBLUE;