紅持,粉變,灰跌,綠買,藍拋，指令標在最后一天的K線上

GJ:=(C+H+L+O)/4;
明日阻力:=L+(GJ-L)+(C-L);
明日支撐:=L+(C-GJ);
今日阻力:=REF(明日阻力 , 1),LINETHICK0;
今日支撐:=REF(明日支撐 , 1),LINETHICK0;
年:MA(CLOSE,26),POINTDOT,COLORRED,LINETHICK5;
IF(年<REF(年,1),年,DRAWNULL),POINTDOT,COLORGREEN,LINETHICK5;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.8,0 ),COLORFFAA00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.8,0) ,COLOR000099;
VAR9Q:= (HHV(C,4) AND REF(C,1)>=REF(C,2))
OR ( HHV(C,4) AND REF(C,1)>=REF(C,3))
OR (REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2))
OR (REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1))
OR (REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2));
紅持:=VAR9Q,COLOR0000FF,LINETHICK0;
DRAWTEXT(ISLASTBAR AND 紅持,今日阻力,'——紅持'),COLOR0000DD;
STICKLINE(VAR9Q,C,(O+C)/2,2.8,0),COLOR0000DD;
VARAQ:=C>=HHV(C,4) AND (REF(C,1)=LLV(C,4));
粉變:=VARAQ;    
DRAWTEXT(ISLASTBAR AND 粉變,今日阻力,'—— 粉變'),COLORFF66FF;
STICKLINE(VARAQ,C,(O+C)/2,2.8,0),COLORFF66FF;
VARBQ:=C=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3))
OR REF(C,1)=LLV(C,4) AND C<REF(C,2)
OR REF(C,2)=LLV(C,4) AND REF(C,1) != HHV(C,4) AND C<REF(C,1)
OR REF(C,3)=LLV(C,4) AND C<REF(C,1) AND C<REF(C,2);
灰跌:=VARBQ;    
DRAWTEXT(ISLASTBAR AND 灰跌,今日支撐,'——灰跌'),COLORAAAAAA;
STICKLINE(VARBQ,C,(O+C)/2,2.8,0),COLORAAAAAA;
VARCQ:=(REF(C,1)=LLV(C,4) AND C>=REF(C,2))
OR (REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1));
綠買:=VARCQ;     
DRAWTEXT(ISLASTBAR AND 綠買,今日支撐,'—— 綠買'),COLOR008800;
STICKLINE(VARCQ,O,(O+C)/2,2.8,0),COLOR008800;
VARDQ:=REF(C,1)=HHV(C,4) AND C<REF(C,2)
OR (REF(C,2)=HHV(C,4) AND REF(C,1)>REF(C,3)AND REF(C,2)>=REF(C,4) AND C<REF(C,1))
OR (REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)
AND REF(C,2)>=REF(C,4) AND C<REF(C,1));
藍拋:=VARDQ;    
DRAWTEXT(ISLASTBAR AND 藍拋,今日阻力,'—— 藍拋'),COLOR008800;
STICKLINE(VARDQ,O,(O+C)/2,2.8,0),COLORFF6600;
STICKLINE(C>0,O,C,0,0),COLORFFFFFF;