N:=55;
M:=20;
N1:=STRCAT(CON2STR(YEAR,0),' 年 ');
Y:=STRCAT(CON2STR(MONTH,0),' 月 ');
R:=STRCAT(CON2STR(DAY,0),' 日 ');
SJ:=STRCAT(STRCAT(N1,Y), R);
DRAWTEXT_FIX(C>0,0.00,0.38,0,SJ);
DRAWTEXT_FIX(1,0.11,0.24,0,FGBLOCK),COLORGRAY;
{涨跌停K线}
STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,2,0),COLORGREEN;
{斐波那契周期}
ZT:=C/REF(C,1)>1.097;
XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
STICKLINE(C,(REF(L,BH)+CZ*0.5),(REF(L,BH)+CZ*0.5),2,0),COLORRED;
STICKLINE(ZT,REF(O,BH),REF(C,BH),2,0),COLORYELLOW;
DRAWTEXT(ZT,L*1.12,'0'),COLORYELLOW;
VARZT:=BARSLAST(C/REF(C,1)>1.097);
DRAWTEXT(VARZT=1,L*0.99,'1'),COLORYELLOW;
DRAWTEXT(VARZT=2,L*0.97,'2'),COLORYELLOW;
DRAWTEXT(VARZT=3,L*0.95,'3'),COLORYELLOW;
DRAWTEXT(VARZT=5,H*1.00,'5天'),COLORYELLOW;
DRAWTEXT(VARZT=8,L*0.95,'8天'),COLORYELLOW;
DRAWTEXT(VARZT=13,H*1.00,'13天'),COLORYELLOW;
DRAWTEXT(VARZT=21,L*1.00,'21天'),COLORWHITE;
DRAWTEXT(VARZT=34,H*1.00,'34天'),COLORWHITE;
DRAWTEXT(VARZT=55,L*1.01,'55天'),COLORWHITE;
DRAWTEXT(VARZT=89,H*1.06,'89天'),COLORWHITE;
DRAWTEXT(VARZT=144,L*0.95,'144天'),COLORWHITE;
DRAWTEXT(VARZT=233,H*1.06,'233天'),COLORWHITE;
DRAWTEXT(VARZT=377,L*0.95,'377天'),COLORWHITE;
DRAWTEXT(VARZT=610,L*0.95,'610天'),COLORWHITE;
DRAWTEXT(VARZT=987,L*0.95,'987天'),COLORWHITE;
分割:=MA(CLOSE,8);
VAR1A:=LLV(LOW,N);
VAR2:=HHV(HIGH,N);
VAR3:=VAR2-VAR1A;
高点: VAR2,COLORYELLOW;
H809: VAR3*0.809+VAR1A,COLORGREEN;
H618: VAR3*0.618+VAR1A,COLORRED;
H050: VAR3*0.500+VAR1A,COLORMAGENTA;
H382: VAR3*0.382+VAR1A,COLORLIRED;
H191: VAR3*0.191+VAR1A,COLORGRAY;
低点: VAR1A,COLORYELLOW;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);
VAR4:=SUM(IF(VAR2>0 AND VAR2>VAR3,VAR2,0),25);
VAR5:=SUM(IF(VAR3>0 AND VAR3>VAR2,VAR3,0),25);
VAR6:=VAR4*100/VAR1;
VAR7:=VAR5*100/VAR1;
VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,15);
VAR9:=(VAR8+REF(VAR8,15))/2;
A:=(VAR7>VAR6 AND VAR7>25 AND VAR6<25);
B:=ZIG(3,5)*100;
G:=MA(B,2);
D:=CROSS(B,G);
W:=CROSS(G,B);
E:=REF(INDEXC,1);
VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR12:=SMA(VAR11,3,1);
VAR13:=SMA(VAR12,3,1);
VAR14:=VAR13 AND VAR13<20;
DRAWTEXT(FILTER(D=1,5),LOW-0.1,'上车'),COLORYELLOW;
DRAWTEXT(W=1,HIGH*1.02,'下车'),COLORGREEN;
STICKLINE(W=1,O,C,2,0),COLORGREEN;
STICKLINE(D=1,O,C,2,0),COLORYELLOW;
