{提示:高低点上的第一个数值,是涨跌的天数,第二个数值是涨跌的幅度,第三个数值是涨跌的价格数;红绿趋势线上的数值,是该趋势线的升跌角度,代表趋势的强度。}
gspt1:=6;
gspt2:=H=ZIG(1,gspt1) AND ZIG(1,gspt1)>REF(ZIG(1,gspt1),1);
gspt3:=H=ZIG(1,gspt1) AND ZIG(1,gspt1)< REF(ZIG(1,gspt1),1);
gspt4:=BARSLAST(gspt2)+1;
gspt5:=BARSLAST(gspt3)+1;
gspt6:=gspt2*REF(gspt5,1)+1;
gspt7:=gspt3*REF(gspt4,1)+1;
gspt8:=(H-(REF(L,gspt5-1)))/(REF(L,gspt5-1))*100;
gspt9:=((REF(H,gspt4-1))-L)/(REF(H,gspt4-1))*100;
DRAWLINE(gspt2,H,gspt3,L,0),COLORLIGREEN,LINETHICK3;
DRAWLINE(gspt3,L,gspt2,H,0),COLORLIRED,LINETHICK3;
gspt10:=(H-(REF(L,gspt5-1)));
gspt11:=((REF(H,gspt4-1))-L);
DRAWTEXT(gspt2,H*1.01,VARCAT(' ',VAR2STR(gspt10,2))),COLORMAGENTA;
DRAWTEXT(gspt2,H*1.01,VARCAT(VARCAT(VAR2STR(gspt6,0),'天'),VARCAT(VAR2STR(gspt8,2),'%'))),COLORLIRED;
DRAWTEXT(gspt3,L*0.99,VARCAT(VARCAT(VAR2STR(gspt7,0),'天'),VARCAT(VAR2STR(gspt9,2),'%'))),COLORLIGREEN;
DRAWTEXT(gspt3,L*0.99,VARCAT(' ',VAR2STR(gspt11,2))),COLORYELLOW;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台,公式源码 http://www.gspt.com'),COLOR333333;
gspt12:=REF(H,gspt1)=HHV(H,2*gspt1+1);
gspt13:=FILTER(gspt12,gspt1);
gspt14:=BACKSET(gspt13,gspt1+1);
gspt15:=FILTER(gspt14,gspt1);
gspt16:=REF(L,gspt1)=LLV(L,2*gspt1+1);
gspt17:=FILTER(gspt16,gspt1);
gspt18:=BACKSET(gspt17,gspt1+1);
gspt19:=FILTER(gspt18,gspt1);
gspt20:=(REF(LLV(L,2*gspt1),1)+REF(HHV(H,2*gspt1),1))/2;
gspt21:=(H+L)/2;
gspt22:=(gspt15 AND NOT(gspt19 AND gspt20>=gspt21)) OR ISLASTBAR OR BARSCOUNT(C)=1;
gspt23:=(gspt19 AND NOT(gspt15 AND gspt20< gspt21));
gspt24:=gspt15 AND NOT(gspt19 AND gspt20>=gspt21);
gspt25:=REF(BARSLAST(gspt22),1)+1;
gspt26:=BACKSET(gspt22 AND COUNT(gspt23,gspt25)>0,LLVBARS(IF(gspt23,L,10000),gspt25));
gspt27:=gspt26>REF(gspt26,1);
gspt28:=BACKSET(gspt27,2);
gspt29:=gspt28>REF(gspt28,1);
gspt30:=gspt29 OR ISLASTBAR OR BARSCOUNT(C)=1;
gspt31:=REF(BARSLAST(gspt30),1)+1;
gspt32:=BACKSET(gspt30 AND COUNT(gspt24,gspt31)>0,HHVBARS(IF(gspt24,H,0),gspt31));
gspt33:=gspt32>REF(gspt32,1);
gspt34:=BACKSET(gspt33,2);
gspt35:=gspt34>REF(gspt34,1);
gspt36:=BACKSET(ISLASTBAR,BARSLAST(gspt35)+1);
gspt37:=gspt36>REF(gspt36,1);
gspt38:=BACKSET(ISLASTBAR,BARSLAST(gspt29)+1);
gspt39:=gspt38>REF(gspt38,1);
gspt40:=BACKSET(gspt37,REF(BARSLAST(gspt35),1)+2);
gspt41:=gspt40>REF(gspt40,1);
gspt42:=BACKSET(gspt39,REF(BARSLAST(gspt29),1)+2);
gspt43:=gspt42>REF(gspt42,1);
ZHICHEN:DRAWLINE(gspt41,H,gspt37,H,1),LINETHICK2,COLORRED;
YALI:DRAWLINE(gspt43,L,gspt39,L,1),LINETHICK2,COLORGREEN;
gspt46:=(ATAN((ZHICHEN/REF(ZHICHEN,1)-1)*100)*180/3.14115926);
gspt47:=(ATAN((YALI/REF(YALI,1)-1)*100)*180/3.14115926);
DRAWTEXT(ISLASTBAR,ZHICHEN,VARCAT(VAR2STR(gspt46,2),'度')),COLORRED;
DRAWTEXT(ISLASTBAR,YALI,VARCAT(VAR2STR(gspt47,2),'度')),COLORGREEN;