n:=480;
P:="sc0000$CLOSE",COLORCYAN;
MAH:=HHV(p,n),COLORGREEN;
MAL:=LLV(p,n),COLORGREEN;
MAH1:(REF(MAH,TODAYBAR)+REF(MAH,TODAYBAR+n)+REF(MAH,TODAYBAR+2*n)+REF(MAH,TODAYBAR+3*n)+REF(MAH,TODAYBAR+4*n))/5,colorbrown;
MAL1:(REF(MAL,TODAYBAR)+REF(MAL,TODAYBAR+n)+REF(MAL,TODAYBAR+2*n)+REF(MAL,TODAYBAR+3*n)+REF(MAL,TODAYBAR+4*n))/5,colorbrown;
//pp:(mah1-mal1)/p*20000+2700,colorwhite;
{
P1:ROUND(P*300-700000),COLORWHITE;
P2:ROUND(MAH1*300-700000),COLORBROWN;
P3:ROUND(MAL1*300-700000),COLORBROWN;
P4:=CALLSTOCK('sc0000',VTCLOSE,6,-1);}
B:=0;S:=0;X:=10;
IF STRCMP(STKLABEL,'sc0000') = 0 THEN BEGIN
IF P>MAH1 AND HOLDING<0 AND OPENMINUTES(TIME)>=3 THEN S:=2;
SELLSHORT(S=2,X,THISCLOSE);
IF P>MAH1 AND HOLDING=0 AND OPENMINUTES(TIME)>=3 THEN B:=1;
BUY(B=1,X,THISCLOSE);
IF P<MAL1 AND HOLDING>0 AND OPENMINUTES(TIME)>=3 THEN S:=1;
SELL(S=1,X,THISCLOSE);
IF P<MAL1 AND HOLDING=0 AND OPENMINUTES(TIME)>=3 THEN B:=2;
BUYSHORT(B=2,X,THISCLOSE);
{
DRAWLINE(B=1,P1,S=1 OR islastbar,P1,0,COLORRED,2,VTSOLID);
DRAWLINE(B=2,P1,S=2 OR islastbar,P1,0,COLORGREEN,2,VTSOLID);
开多报警:=PLAYSOUND(B=1 AND ENTERBARS<=0,'D:\IH开仓.MP3');
平多报警:=PLAYSOUND(S=1 AND EXITBARS<=1,'D:\IH平仓.MP3');
开空报警:=PLAYSOUND(B=2 AND ENTERBARS<=0,'D:\IH开仓.MP3');
平空报警:=PLAYSOUND(S=2 AND EXITBARS<=1,'D:\IH平仓.MP3');
N1:=X;
IF HOLDING<0 THEN N1:=-X;
D1:=ROUND((P-P4)*300*N1);
D2:=ROUND((P-ENTERPRICE)*300*N1);
D3:=D1;
IF DAYHOLDING<>0 THEN D3:=D2;
}
END{
D4:=ref(d2,enterbars+1),linethick0;
if exitbars<>0 then d4:=0;
//d5:sysparam(2),linethick0;
//d7:sysparam(1),linethick0;
d6:=d2+sum(d4,0),noaxis,coloryellow;
今盈:D3,LINETHICK0,COLORCYAN;
开盈:D2,LINETHICK0,COLORCYAN;
}
//累计:D2+NETPROFIT,COLORBROWN,NOAXIS;
DI:round(ASSET-5000000),noaxis,COLORyellow;
//净利润:=NETPROFIT,NOAXIS,COLORRED,LINETHICK0;