DRAWGBK(C>0,RGB(10,50,10),RGB(8,60,0),0,'0',0);
DRAWGBK(C>0,RGB(20,100,40),RGB(60,00,60),0,'0',1);
DRAWGBK(C>0,RGB(40,100,40),RGB(50,00,60),0,'0',1);
GSPT1:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
GSPT2:=HIGH-REF(HIGH,1);
GSPT3:=REF(LOW,1)-LOW;
GSPT4:=EXPMEMA(IF(GSPT2>0&&GSPT2>GSPT3,GSPT2,0),14);
GSPT5:=EXPMEMA(IF(GSPT3>0&&GSPT3>GSPT2,GSPT3,0),14);
GSPT6:=GSPT4*100/GSPT1;
GSPT7:=GSPT5*100/GSPT1;
GSPT8:=EXPMEMA(ABS(GSPT7-GSPT6)/(GSPT7+GSPT6)*100,6),COLORYELLOW,LINETHICK2,NODRAW;
GSPT9:=EXPMEMA(GSPT8,6);
DRAWTEXT(ISLASTBAR,40,'中'),COLORGREEN;
DRAWTEXT(ISLASTBAR,60,'强'),COLORCYAN;
DRAWTEXT(ISLASTBAR,20,'弱'),COLORCYAN;
DRAWTEXT(ISLASTBAR,80,'龙'),COLORCYAN;
GSPT10:=GSPT6-GSPT8;
DRAWTEXT_FIX(1,0.70,0.001,0,STRCAT(STRCAT('差值:',VAR2STR(GSPT10,0)),'分')),COLORYELLOW;
DRAWTEXT_FIX(1,0.80,0.001,0,STRCAT(STRCAT('ADX:',VAR2STR(GSPT8,0)),'分')),COLORYELLOW;
DRAWTEXT_FIX(1,0.90,0.001,0,STRCAT(STRCAT('PDI:',VAR2STR(GSPT6,0)),'分')),COLORYELLOW;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台,公式源码 HTTP://WWW.GSPT.COM'),COLOR333333;
GSPT11:=(HIGH+LOW+CLOSE)/3;
GSPT12:=(GSPT11-MA(GSPT11,14))*1000/(15*AVEDEV(GSPT11,14));
GSPT13:=WEEKDAY;
GSPT14:=IF(WEEKDAY=GSPT13,HHV(H,6),0);
GSPT15:=IF(WEEKDAY=GSPT13,LLV(L,6),0);
GSPT16:=IF(WEEKDAY=GSPT13,C,0);
GSPT17:=(GSPT14+GSPT15+GSPT16)/3;
GSPT18:=(GSPT17-MA(GSPT17,45))/(0.015*AVEDEV(GSPT17,45)),LINETHICK2;
GSPT19:=DAY;
GSPT20:=IF(DAY=GSPT19,HHV(H,30),0);
GSPT21:=IF(DAY=GSPT19,LLV(L,30),0);
GSPT22:=IF(DAY=GSPT19,C,0);
GSPT23:=(GSPT20+GSPT21+GSPT22)/3;
GSPT24:=(GSPT23-EMA(GSPT23,60))/(0.015*AVEDEV(GSPT23,60)),COLORGREEN,LINETHICK2;
GSPT25:=EMA(CLOSE,12)-EMA(CLOSE,26);
GSPT26:=EMA(GSPT25,9);
GSPT27:=(GSPT25-GSPT26)*2;
GSPT28:=REF(GSPT27/2,BARSLAST(GSPT27=HHV(GSPT27,120))),COLORA67D3D,LINETHICK1;
GSPT29:=REF(GSPT27/2,BARSLAST(GSPT27=HHV(GSPT27,250))),COLORBLACK,LINETHICK1;
GSPT30:=NOT(REF(GSPT28,1)=GSPT28);
GSPT31:=NOT(REF(GSPT28,1)=REF(GSPT29,1))&&GSPT28=GSPT29;
STICKLINE(GSPT6,0,GSPT6,2,0),COLORGREEN;
STICKLINE(GSPT6>0&&GSPT6< 20,0,GSPT6,2,0),COLORGREEN;
STICKLINE(GSPT6>20,20,GSPT6,2,0),COLORMAGENTA;
STICKLINE(GSPT6>40,40,GSPT6,2,0),COLORRED;
STICKLINE(GSPT6>60,60,GSPT6,2,0),COLORYELLOW;
STICKLINE(GSPT24>180,10,20,2,0),COLORRED;
STICKLINE(GSPT18>180,0,10,2,0),COLORMAGENTA;
STICKLINE(GSPT30,GSPT7,-10,2,0),COLORYELLOW;
STICKLINE(GSPT7< 20,20,GSPT7,2,0),COLORYELLOW;
GSPT32:EXPMEMA(ABS(GSPT7-GSPT6)/(GSPT7+GSPT6)*100,6),COLORYELLOW,LINETHICK3;
GSPT33:GSPT5*100/GSPT1,LINETHICK4,COLORBLUE;
10,COLORRED;
20;
40,COLORRED;
60;
80;