#MAINCHART
INPUT:
上角(0),   
下角(0);  
u1:=SYSPARAM(3);
u:=u1-SYSPARAM(2)+1;
hh:=HHV(H,u);
ll:=LLV(L,u);
最高:=hh[DATACOUNT-u1],COLORYELLOW,ColorC0C0C0;
最低:=ll[DATACOUNT-u1],COLORred,ColorC0C0C0;
YB:=SYSPARAM(2);
a:=SYSPARAM(3);
P:=(a - YB);
{www.70822.com}
S4:=SYSPARAM(4);
S5:=SYSPARAM(5);
HH:=HHVBARS(H,(P + 1));
LL:=LLVBARS(L,(P + 1));
z:=(BARPOS = (a - HH[DATACOUNT-a]));
Y:=(BARPOS = (a - LL[DATACOUNT-a]));
K:=((S4 - S5) / (a - YB));
kk:=BARPOS =  MIN((a - HH[DATACOUNT-a]),(a -ll[DATACOUNT-a]));
DRAWSL(kk,最低+(最高-最低)*1/8,0,0,0),POINTDOT,COLORYELLOW;
DRAWSL(kk,最低+(最高-最低)*1/4,0,0,0),POINTDOT,COLORYELLOW;
DRAWSL(kk,最低+(最高-最低)*3/8,0,0,0),POINTDOT,COLORYELLOW;
DRAWSL(kk,最低+(最高-最低)*5/8,0,0,0),POINTDOT,COLORYELLOW;
DRAWSL(kk,最低+(最高-最低)*7/8,0,0,0),POINTDOT,COLORYELLOW;
DRAWSL(kk,最低+(最高-最低)*6/8,0,0,0),POINTDOT,COLORYELLOW;
DRAWSL(kk,最低+(最高-最低)*4/8,0,0,0),POINTDOT,COLORred;
DRAWTEXT(kk,REF((最低+(最高-最低)*1/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),' 江恩1/8(875).'+NUMTOSTR(最低+(最高-最低)*1/8,2)),COLORYELLOW;
DRAWTEXT(kk,REF((最低+(最高-最低)*1/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),' 江恩 1/4(75).'+NUMTOSTR(最低+(最高-最低)*1/4,2)),COLORYELLOW;
DRAWTEXT(kk,REF((最低+(最高-最低)*3/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),' 江恩3/8(625).'+NUMTOSTR(最低+(最高-最低)*3/8,2)),COLORYELLOW;
DRAWTEXT(kk,REF((最低+(最高-最低)*5/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),' 江恩5/8(375).'+NUMTOSTR(最低+(最高-最低)*5/8,2)),COLORYELLOW;
DRAWTEXT(kk,REF((最低+(最高-最低)*7/8)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'江恩 7/8(125).'+NUMTOSTR(最低+(最高-最低)*7/8,2)),COLORYELLOW;
DRAWTEXT(kk,REF((最低+(最高-最低)*3/4)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),' 江恩3/4(25).'+NUMTOSTR(最低+(最高-最低)*3/4,2)),COLORYELLOW;
DRAWTEXT(kk,REF((最低+(最高-最低)*1/2)*0.996,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),' 江恩1/2(5).'+NUMTOSTR(最低+(最高-最低)*1/2,2)),COLORred;
DRAWTEXT(kk,REF(最低,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'(1)'),ALIGN2,COLORYELLOW;
DRAWTEXT(kk,REF(最高,BARSLAST(BARSCOUNT(C)=SYSPARAM(2))),'(0)'),ALIGN2,COLORYELLOW;

DRAWSL(z,H,(0 - ((15 * K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((40 * K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((60 * K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((100 * K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((135* K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((200 * K) / 60)),0,0),colorFFFF00;
DRAWSL(z,H,(0 - ((300* K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((400 * K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((600 * K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((1000 * K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(z,H,(0 - ((1600 * K) / 60)),0,0),POINTDOT,colorFFFF00;
DRAWSL(Y,L,((15 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((25 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((50 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((65 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((95 * K) / 60),0,0),colorFF00FF;
DRAWSL(Y,L,((120 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((150 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((180 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((210 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((50 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((65 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((95 * K) / 60),0,0),colorFF00FF;
DRAWSL(Y,L,((120 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((150 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((180 * K) / 60),0,0),POINTDOT,colorFF00FF;
DRAWSL(Y,L,((210 * K) / 60),0,0),POINTDOT,colorFF00FF;
VERTLINE(Y),POINTDOT,colorFF00FF,shift1,linethick2;
VERTLINE(Y),POINTDOT,colorFF00FF,shift3;
VERTLINE(Y),POINTDOT,colorFF00FF,shift5;
VERTLINE(Y),POINTDOT,colorFF00FF,shift8;
VERTLINE(Y),POINTDOT,colorFF00FF,shift13;
VERTLINE(Y),POINTDOT,colorFF00FF,shift21;
VERTLINE(Y),POINTDOT,colorFF00FF,shift34;
VERTLINE(Y),POINTDOT,colorFF00FF,shift55;
VERTLINE(Y),POINTDOT,colorFF00FF,shift89;
VERTLINE(Y),POINTDOT,colorFF00FF,shift144;
VERTLINE(Y),POINTDOT,colorFF00FF,shift233;
VERTLINE(Y),POINTDOT,colorFF00FF,shift377;
VERTLINE(Y),POINTDOT,colorFF00FF,shift610;
VERTLINE(Y),POINTDOT,colorFF00FF,shift987;
DRAWTEXT(Y,SYSPARAM(5),'斐波那契上升周期'),COLORRED,ALIGN2;
DRAWTEXT(Y,SYSPARAM(5),'1'),COLORRED,shift1,linethick2;
DRAWTEXT(Y,SYSPARAM(5),'3'),COLORRED,shift3;
DRAWTEXT(Y,SYSPARAM(5),'5'),COLORRED,shift5;
DRAWTEXT(Y,SYSPARAM(5),'8'),COLORRED,shift8;
DRAWTEXT(Y,SYSPARAM(5),'13'),COLORRED,shift13;
DRAWTEXT(Y,SYSPARAM(5),'21'),COLORRED,shift21;
DRAWTEXT(Y,SYSPARAM(5),'34'),COLORRED,shift34;
DRAWTEXT(Y,SYSPARAM(5),'55'),COLORRED,shift55;
DRAWTEXT(Y,SYSPARAM(5),'89'),COLORRED,shift89;
DRAWTEXT(Y,SYSPARAM(5),'144'),COLORRED,shift144;
DRAWTEXT(Y,SYSPARAM(5),'233'),COLORRED,shift233;
DRAWTEXT(Y,SYSPARAM(5),'377'),COLORRED,shift377;
DRAWTEXT(Y,SYSPARAM(5),'610'),COLORRED,shift610;
DRAWTEXT(Y,SYSPARAM(5),'987'),COLORRED,shift987;
VERTLINE(z),POINTDOT,colorFFFF00,shift1,linethick2;
VERTLINE(z),POINTDOT,colorFFFF00,shift3;
VERTLINE(z),POINTDOT,colorFFFF00,shift5;
VERTLINE(z),POINTDOT,colorFFFF00,shift8;
VERTLINE(z),POINTDOT,colorFFFF00,shift13;
VERTLINE(z),POINTDOT,colorFFFF00,shift21;
VERTLINE(z),POINTDOT,colorFFFF00,shift34;
VERTLINE(z),POINTDOT,colorFFFF00,shift55;
VERTLINE(z),POINTDOT,colorFFFF00,shift89;
VERTLINE(z),POINTDOT,colorFFFF00,shift144;
VERTLINE(z),POINTDOT,colorFFFF00,shift233;
VERTLINE(z),POINTDOT,colorFFFF00,shift377;
VERTLINE(z),POINTDOT,colorFFFF00,shift610;
VERTLINE(z),POINTDOT,colorFFFF00,shift987;
DRAWTEXT(z,SYSPARAM(4),'斐波那契下跌周期'),COLOR00FF00,ALIGN2;
DRAWTEXT(z,SYSPARAM(4),'1'),COLOR00FF00,shift1,linethick2;
DRAWTEXT(z,SYSPARAM(4),'3'),COLOR00FF00,shift3;
DRAWTEXT(z,SYSPARAM(4),'5'),COLOR00FF00,shift5;
DRAWTEXT(z,SYSPARAM(4),'8'),COLOR00FF00,shift8;
DRAWTEXT(z,SYSPARAM(4),'13'),COLOR00FF00,shift13;
DRAWTEXT(z,SYSPARAM(4),'21'),COLOR00FF00,shift21;
DRAWTEXT(z,SYSPARAM(4),'34'),COLOR00FF00,shift34;
DRAWTEXT(z,SYSPARAM(4),'55'),COLOR00FF00,shift55;
DRAWTEXT(z,SYSPARAM(4),'89'),COLOR00FF00,shift89;
DRAWTEXT(z,SYSPARAM(4),'144'),COLOR00FF00,shift144;
DRAWTEXT(z,SYSPARAM(4),'233'),COLOR00FF00,shift233;
DRAWTEXT(z,SYSPARAM(4),'377'),COLOR00FF00,shift377;
DRAWTEXT(z,SYSPARAM(4),'610'),COLOR00FF00,shift610;
DRAWTEXT(z,SYSPARAM(4),'987'),COLOR00FF00,shift987;
STICKLINE(C>=O,C,O,8,0),COLOR0000AA;
STICKLINE(C>=O,C,O,6,0),COLOR0000bb ;
STICKLINE(C>=O,C,O,4,0),COLOR0000cc ;
STICKLINE(C>=O,C,O,2,0),COLOR0000ee;
STICKLINE(C>=O,H,L,0,0),COLOR0000ff;
STICKLINE(C<=O,C,O,8,0),Color7B7b00;
STICKLINE(C<=O,C,O,6,0),Color909000;
STICKLINE(C<=O,C,O,4,0),ColorA8a800;
STICKLINE(C<=O,C,O,2,0),COLORcece00;
STICKLINE(C<=O,H,L,0,0),COLORffff00;