gspt1:=20;
gspt2:=20;
gspt3:=70;
gspt4:=70;
gspt5:=3;
gspt6:=CURRBARSCOUNT;
gspt7:=CONST(FINDHIGH(H,0,gspt1*10,1));
gspt8:=CONST(BARSLAST(gspt7=H))+1;
gspt9:=CONST(IF(gspt8=1,H,REF(H,gspt8-1)));
gspt10:=CONST(FINDLOW(L,0,gspt2*10,1));
gspt11:=CONST(BARSLAST(gspt10=L))+1;
gspt12:=CONST(IF(gspt11=1,L,REF(L,gspt11-1)));
gspt13:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=gspt12)+1));
gspt14:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=gspt9)+1));
gspt15:=IF(gspt5=1,gspt14,IF(gspt5=2,gspt13,IF(gspt5=3,gspt13,gspt14)));
gspt16:=gspt4/IF(C< 300,1000,10);
gspt17:=IF(gspt5=1,gspt14,IF(gspt5=2,gspt13,IF(gspt5=3,gspt14,gspt13)));
gspt18:=gspt3/IF(C< 300,1000,10);
gspt19:=((gspt9-gspt12)/8-(gspt9-gspt12)/8);
gspt20:=gspt9+(gspt9-gspt12)/8;
gspt21:=gspt12-(gspt9-gspt12)/8;
gspt22:=IF(gspt11>gspt8,gspt11,gspt8);
gspt23:=ABS(gspt8-gspt11);
gspt24:DRAWBAND(IF(gspt6<=gspt22,gspt9,DRAWNULL),RGB(0,120,120),gspt9,RGB(8,168,168));
gspt25:DRAWBAND(IF(gspt6<=gspt22,gspt12,DRAWNULL),RGB(0,120,120),gspt12,RGB(0,160,160));
STICKLINE(CURRBARSCOUNT=gspt8,gspt9,gspt12,0,0),COLOR556600;
STICKLINE(CURRBARSCOUNT=gspt11,gspt9,gspt12,0,0),COLOR666666;
STICKLINE(CURRBARSCOUNT=1,gspt9,gspt12,0,0),COLOR556600;
gspt26:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.146,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt26)*1.001,STRCAT(' 0.146%% ',CON2STR(gspt26,3))),COLOR889900;
gspt27:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.191,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt27)*1.001,STRCAT(' 0.191%% ',CON2STR(gspt27,3))),COLOR889900;
gspt28:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.236,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt28)*1.001,STRCAT(' 0.236%% ',CON2STR(gspt28,3))),COLOR889900;
gspt29:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.382,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt29)*1.001,STRCAT(' 0.382%% ',CON2STR(gspt29,3))),COLOR889900;
gspt30:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.500,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt30)*1.001,STRCAT(' 0.500%% ',CON2STR(gspt30,3))),COLOR889900;
gspt31:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.618,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt31)*1.001,STRCAT(' 0.618%% ',CON2STR(gspt31,3))),COLOR889900;
gspt32:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.764,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt32)*1.001,STRCAT(' 0.764%% ',CON2STR(gspt32,3))),COLOR889900;
gspt33:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.809,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt33)*1.001,STRCAT(' 0.809%% ',CON2STR(gspt33,3))),COLOR889900;
gspt34:IF(gspt6<=gspt22,gspt9-(gspt9-gspt12)*0.854,DRAWNULL),DOTLINE,COLOR556600;
DRAWTEXT(gspt6=gspt22,(gspt34)*1.001,STRCAT(' 0.854%% ',CON2STR(gspt34,3))),COLOR889900;
DRAWTEXT_FIX(1,0.980,20,1,'分析家公式网http://www.70822.com'),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=gspt8,gspt9*1.02,'斐波那契下跌周期'),COLOR00FF00;
DRAWTEXT(CURRBARSCOUNT=gspt8,gspt9*1.01,'1'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-2,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-2,gspt9*1.01,'3'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-4,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-4,gspt9*1.01,'5'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-7,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-7,gspt9*1.01,'8'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-12,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-12,gspt9*1.01,'13'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-20,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-20,gspt9*1.01,'21'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-33,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-33,gspt9*1.01,'34 '),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-54,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-54,gspt9*1.01,'55'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-67,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-67,gspt9*1.01,'68'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-88,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-88,gspt9*1.01,'89'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-109,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-109,gspt9*1.01,'110'),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=gspt8-143,gspt9,gspt12,0,0),COLOR556600;
DRAWTEXT(CURRBARSCOUNT=gspt8-143,gspt9*1.01,'144'),COLOR00FF00;
DRAWTEXT(CURRBARSCOUNT=gspt11,gspt12*0.96,'斐波那契上升周期'),COLOR0000FF;
DRAWTEXT(CURRBARSCOUNT=gspt11,gspt12*0.98,'1'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-2,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-2,gspt12*0.98,'3'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-4,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-4,gspt12*0.98,'5'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-7,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-7,gspt12*0.98,'8'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-12,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-12,gspt12*0.98,'13'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-20,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-20,gspt12*0.98.01,'21'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-33,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-33,gspt12*0.98,'34'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-54,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-54,gspt12*0.98,'55'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-67,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-67,gspt12*0.98,'68'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-88,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-88,gspt12*0.98,'89'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-109,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-109,gspt12*0.98,'110'),COLOR0000FF;
STICKLINE(CURRBARSCOUNT=gspt11-143,gspt9,gspt12,0,0),COLORAA00AA;
DRAWTEXT(CURRBARSCOUNT=gspt11-143,gspt12*0.98,'144'),COLOR0000FF;
JRZQ1:=FILTER(MONTH=2 AND (DAY=3 OR DAY=5 ),2);
JRZQ2:=FILTER(MONTH=2 AND (DAY=18 OR DAY=20),2);
JRZQ3:=FILTER(MONTH=3 AND (DAY=5 OR DAY=7 ),2);
JRZQ4:=FILTER(MONTH=3 AND (DAY=20 OR DAY=22),2);
JRZQ5:=FILTER(MONTH=4 AND (DAY=4 OR DAY=6 ),2);
JRZQ6:=FILTER(MONTH=4 AND (DAY=19 OR DAY=21),2);
JRZQ7:=FILTER(MONTH=5 AND (DAY=6 OR DAY=8 ),2);
JRZQ8:=FILTER(MONTH=5 AND (DAY=20 OR DAY=22),2);
JRZQ9:=FILTER(MONTH=6 AND (DAY=5 OR DAY=7 ),2);
JRZQ10:=FILTER(MONTH=6 AND (DAY=20 OR DAY=22),2);
JRZQ11:=FILTER(MONTH=7 AND (DAY=6 OR DAY=8 ),2);
JRZQ12:=FILTER(MONTH=7 AND (DAY=22 OR DAY=24),2);
JRZQ13:=FILTER(MONTH=8 AND (DAY=7 OR DAY=9 ),2);
JRZQ14:=FILTER(MONTH=8 AND (DAY=22 OR DAY=24),2);
JRZQ15:=FILTER(MONTH=9 AND (DAY=7 OR DAY=9 ),2);
JRZQ16:=FILTER(MONTH=9 AND (DAY=22 OR DAY=24),2);
JRZQ17:=FILTER(MONTH=10 AND (DAY=7 OR DAY=9 ),2);
JRZQ18:=FILTER(MONTH=10 AND (DAY=22 OR DAY=24),2);
JRZQ19:=FILTER(MONTH=11 AND (DAY=7 OR DAY=9 ),2);
JRZQ20:=FILTER(MONTH=11 AND (DAY=22 OR DAY=24),2);
JRZQ21:=FILTER(MONTH=12 AND (DAY=6 OR DAY=8 ),2);
JRZQ22:=FILTER(MONTH=12 AND (DAY=21 OR DAY=23),2);
JRZQ23:=FILTER(MONTH=1 AND (DAY=5 OR DAY=7 ),2);
JRZQ24:=FILTER(MONTH=1 AND (DAY=19 OR DAY=21),2);
DRAWTEXT(JRZQ1,HIGH*1.02,'立春'),COLORGREEN;
DRAWTEXT(JRZQ2,HIGH*1.02,'雨水'),COLORGREEN;
DRAWTEXT(JRZQ3,HIGH*1.02,'惊蛰'),COLORGREEN;
DRAWTEXT(JRZQ4,HIGH*1.02,'春分'),COLORGREEN;
DRAWTEXT(JRZQ5,HIGH*1.02,'清明'),COLORGREEN;
DRAWTEXT(JRZQ6,HIGH*1.02,'谷雨'),COLORGREEN;
DRAWTEXT(JRZQ7,HIGH*1.02,'立夏'),COLORMAGENTA;
DRAWTEXT(JRZQ8,HIGH*1.02,'小满'),COLORMAGENTA;
DRAWTEXT(JRZQ9,HIGH*1.02,'芒种'),COLORMAGENTA;
DRAWTEXT(JRZQ10,HIGH*1.02,'夏至'),COLORMAGENTA;
DRAWTEXT(JRZQ11,HIGH*1.02,'小暑'),COLORMAGENTA;
DRAWTEXT(JRZQ12,HIGH*1.02,'大署'),COLORMAGENTA;
DRAWTEXT(JRZQ13,HIGH*1.02,'立秋'),COLORYELLOW;
DRAWTEXT(JRZQ14,HIGH*1.02,'处暑'),COLORYELLOW;
DRAWTEXT(JRZQ15,HIGH*1.02,'白露'),COLORYELLOW;
DRAWTEXT(JRZQ16,HIGH*1.02,'秋分'),COLORYELLOW;
DRAWTEXT(JRZQ17,HIGH*1.02,'寒露'),COLORYELLOW;
DRAWTEXT(JRZQ18,HIGH*1.02,'霜降'),COLORYELLOW;
DRAWTEXT(JRZQ19,HIGH*1.02,'立冬'),COLORWHITE;
DRAWTEXT(JRZQ20,HIGH*1.02,'小雪'),COLORWHITE;
DRAWTEXT(JRZQ21,HIGH*1.02,'大雪'),COLORWHITE;
DRAWTEXT(JRZQ22,HIGH*1.02,'冬至'),COLORWHITE;
DRAWTEXT(JRZQ23,HIGH*1.02,'小寒'),COLORWHITE;
DRAWTEXT(JRZQ24,HIGH*1.02,'大寒'),COLORWHITE;