请教:把这个指标转化为金字塔指标,并加上开仓红色开多仓并且平空仓,绿色开空仓并且平多仓
永久日:=1231212;
永久:=IF(DATE<永久日,1,DRAWNULL);
STEP1:=15/20*永久;
MVALUE1:=40/8*永久;
SARLINE:=SAR(3,STEP1,MVALUE1)*永久;
A:IF(CLOSE>SARLINE,SARLINE,DRAWNULL)*永久,CIRCLEDOT,COLORRED;
B:IF(CLOSE<SARLINE,SARLINE,DRAWNULL)*永久,CIRCLEDOT,COLORGREEN;
DRAWTEXT(CROSS(C,SARLINE),L-0.05*L,'。')*永久,COLORRED;
DRAWTEXT(CROSS(SARLINE,C),H+0.05*H,'。')*永久,COLORGREEN;
STICKLINE(C>SAR(3,STEP1,MVALUE1) AND C<O,C,O,2.8,0)*永久,COLORRED;
STICKLINE(C>SAR(3,STEP1,MVALUE1) AND C>O,C,O,2.8,1)*永久,COLORRED;
STICKLINE(C>SAR(3,STEP1,MVALUE1),H,MAX(C,O),0,0)*永久,COLORRED;
STICKLINE(C>SAR(3,STEP1,MVALUE1),L,MIN(C,O),0,0)*永久,COLORRED;
STICKLINE(C<SAR(3,STEP1,MVALUE1) AND C<O,C,O,2.8,0)*永久,COLORGREEN;
STICKLINE(C<SAR(3,STEP1,MVALUE1) AND C>O,C,O,2.8,1)*永久,COLORGREEN;
STICKLINE(C<SAR(3,STEP1,MVALUE1),H,MAX(C,O),0,0),COLORGREEN;
STICKLINE(C<SAR(3,STEP1,MVALUE1),L,MIN(C,O),0,0),COLORGREEN;
Z1:=STRCAT(DYBLOCK,'');
Z2:=STRCAT(Z1,HYBLOCK);
Z3:=STRCAT(Z2,'');
DRAWTEXT_FIX(ISLASTBAR,0.70,1,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
ZTZ1:=CONST(ZTPRICE(REF(C,1),0.1));
ZTZ:=CON2STR(ZTZ1,2);
N:=2;
T0:IF(CURRBARSCOUNT<=N+6 AND CURRBARSCOUNT>2,CONST(ZTZ1),DRAWNULL),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=3,T0,ZTZ),COLORGREEN;
放下边市值:=STRCAT(STRCAT('流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
|