gspt1:=(HIGH + LOW + CLOSE)/3;
gspt2:=SUM(IF(gspt1>REF(gspt1,1),gspt1*VOL,0),12)/SUM(IF(gspt1< REF(gspt1,1),gspt1*VOL,0),12);
gspt3:=100-(100/(1+gspt2));
gspt4:=gspt3;
gspt5:MA(CLOSE,3),COLORWHITE,LINETHICK3;
gspt6:=1170630;
gspt7:MA(CLOSE,13),COLORYELLOW,LINETHICK3;
gspt8:MA(CLOSE,34),COLORRED,LINETHICK3;
IF(gspt8< REF(gspt8,1),gspt8,NULL),COLORGREEN,LINETHICK3;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,3,1),COLOR770000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,2,1),COLOR990000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,2,1),COLORBB0000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,1,1),COLORDD0000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,0,1),COLORFF0000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,3 ,0),COLOR770000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,2 ,0),COLOR990000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,2 ,0),COLORBB0000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,1 ,0),COLORDD0000;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,0 ,0),COLORFF0000;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,3,1 ),COLOR0033FF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,2,1 ),COLOR0055FF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,2,1 ),COLOR0077FF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,1,1 ),COLOR0099FF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C>=O ,O ,C ,0,1 ),COLOR00BBFF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,3,0 ),COLOR0011FF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,2,0 ),COLOR0033FF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,2,0 ),COLOR0055FF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,1,0 ),COLOR0077FF;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) AND C< O ,O ,C ,0,0 ),COLOR0099FF;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,3,0 ),COLOR007700;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,2,0 ),COLOR009900;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,2 ,0 ),COLOR00BB00;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,1 ,0 ),COLOR00DD00;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,0 ,0 ),COLOR00FF00;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,3,1 ),COLOR006600;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,2,1 ),COLOR009900;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,2,1 ),COLOR00BB00;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,1 ,1 ),COLOR00DD00;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,0 ,1 ),COLOR00FF00;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,3 ,1 ),COLORBB0000;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,2 ,1 ),COLORDD0000;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,2 ,1 ),COLORFF11CC;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,1 ,1 ),COLORFF44CC;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C>=O ,O ,C ,0 ,1 ),COLORFF66CC;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,3 ,0 ),COLORFF0099;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,2 ,0 ),COLORFF22FF;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,2 ,0 ),COLORFF66FF;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,1 ,0 ),COLORFF99FF;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) AND C< O ,O ,C ,0 ,0 ),COLORFFCCFF;
STICKLINE1(gspt5>=gspt7 AND gspt8< REF(gspt8,1) ,H ,L ,0 ,0 ),COLORFF66FF;
STICKLINE1(gspt5< gspt7 AND gspt8< REF(gspt8,1) ,H ,L ,0 ,0 ),COLOR00FF00;
STICKLINE1(gspt5>=gspt7 AND gspt8>=REF(gspt8,1) ,H ,L ,0,0),COLORDD0000;
STICKLINE1(gspt5< gspt7 AND gspt8>=REF(gspt8,1) ,H ,L ,0 ,0 ),COLOR00BBFF;
gspt9:=BARSLAST(REF(CROSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120));
DRAWTEXT(gspt9,MA(C,120),'●多资金进');
gspt10:=IF((CLOSE>REF(CLOSE,1)),88,0);
gspt11:=(IF(((CLOSE)/(REF(CLOSE,1))>1) AND ((HIGH)/(CLOSE)< 1) AND (gspt10>0),91,0));
DRAWTEXT(FILTER((gspt11>90),45),(LOW)*(1),'多多 '),COLORFFFF00;
gspt12:=LLV(LOW,168);
gspt13:=HHV(HIGH,21);
gspt14:=EMA((((CLOSE - gspt12) / (gspt13 - gspt12)) * 100),5);
gspt15:=EMA((((CLOSE - gspt12) / (gspt13 - gspt12)) * 50),13);
gspt16:=CROSS(gspt14,gspt15);
DRAWTEXT((gspt16 = 1),(LOW * 1),'短底'),COLORYELLOW,FONTSIZE18,VALIGN0;
gspt17:=BARSLAST(REF(CROSS(MA(C,120),C),1)) AND CROSS(MA(C,120),MA(C,20));
DRAWTEXT(gspt17,MA(C,120)+0,'●空资金近'),COLORFF0000;
gspt18:=IF((CLOSE< REF(CLOSE,1)),88,0);
gspt19:=(IF(((CLOSE)/(REF(CLOSE,1))< 1) AND ((LOW)/(CLOSE)>1) AND (gspt18>0),91,0));
DRAWTEXT(FILTER((gspt19>90),45),(HIGH)*(1),'空空 '),COLOR00FF00;
gspt20:=HHV(HIGH,168);
gspt21:=LLV(LOW,21);
gspt22:=EMA((((CLOSE - gspt20) / (gspt21 - gspt20)) * 100),5);
gspt23:=EMA((((CLOSE - gspt20) / (gspt21 - gspt20)) * 50),13);
gspt24:=CROSS(gspt23,gspt22);
DRAWTEXT((gspt24 = 1),(HIGH * 1),'短顶'),COLOR00FFFF,FONTSIZE18,VALIGN2;