gspt01:=1;
gspt02:=BARSLAST(HOUR=9 AND MINUTE=(30+gspt01))+1;
gspt03:=SUM(V*C,0)/SUM(V,0);
gspt04:=C,COLORWHITE,LINETHICK4;
gspt05:=IF(HOUR>9 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLORRED,LINETHICK2;
gspt06:=V;
gspt07:=C>REF(C,1) AND C/gspt03>(1+0.03);
gspt08:=C<REF(C,1) AND C/gspt03<(1-0.03);
gspt09:=CROSS(SUM(gspt07,0),0.5);
gspt10:=CROSS(SUM(gspt08,0),0.5);
gspt11:=SUM(gspt09,0)*CROSS(COUNT(C<REF(C,1),BARSLAST(gspt09)),0.5);
gspt12:=SUM(gspt10,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(gspt10)),0.5);
gspt13:=CONST(SUM(IF(gspt11,REF(C,1),DRAWNULL),0))DOTLINE,COLORGREEN,LINETHICK1;
gspt14:=CONST(SUM(IF(gspt12,REF(C,1),DRAWNULL),0))DOTLINE,COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台 公式源码 http://www.gspt.com'),COLOR333333;
gspt15:=CROSS(SUM(gspt07 AND C>gspt13*1.03,0),0.5);
gspt16:=CROSS(SUM(gspt08 AND C<gspt14*0.97,0),0.5);
gspt17:=SUM(gspt15,0)*CROSS(COUNT(C<REF(C,1),BARSLAST(gspt15)),0.5);
gspt18:=SUM(gspt16,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(gspt16)),0.5);
gspt19:=CONST(SUM(IF(gspt17,REF(C,1),DRAWNULL),0))DOTLINE,COLORGREEN,LINETHICK1;
gspt20:=CONST(SUM(IF(gspt18,REF(C,1),DRAWNULL),0))DOTLINE,COLORMAGENTA,LINETHICK1;
DRAWICON(gspt12 OR gspt18,REF(C,1)*0.999,44);
DRAWICON(gspt11 OR gspt17,REF(C,1)*1.00,38);
gspt21:=EMA(CLOSE,34)-EMA(CLOSE,888);
gspt22:=EMA(gspt21,888);
DRAWICON(CROSS(gspt21,gspt22),C,25);
gspt23:=(VOL/CLOSE)/3;
gspt24:=SUM((IF(((gspt23>0.20) AND (CLOSE>(REF(CLOSE,1)))),gspt23,0)),0);
gspt25:=SUM((IF(((gspt23>0.20) AND (CLOSE<(REF(CLOSE,1)))),gspt23,0)),0);
gspt26:=gspt24+gspt25;
gspt27:=1;
gspt28:=gspt24/gspt25;
gspt29:=STRCAT(STRCAT('买= ',CON2STR((100*gspt24)/gspt26,0)),'%');
gspt30:=STRCAT(STRCAT('卖= ',CON2STR((100*gspt25)/gspt26,0)),'%');
gspt31:=STRCAT(STRCAT('差= ',CON2STR((100*(gspt24-gspt25))/gspt26,0)),'%');
DRAWTEXT_FIX(gspt27=1,0,0.04,0,gspt29),COLORRED;
DRAWTEXT_FIX(gspt27=1,0,0.12,0,gspt30),COLORGREEN;
DRAWTEXT_FIX(gspt27=1,0,0.20,0,gspt31),COLOR00FFFF;
DRAWTEXT_FIX(gspt28>2,0,0.40,0,'...省略