DRAWGBK(CLOSE>0,COLORRGB(0,0,0),COLORRGB(0,0,0),1); 
VERTLINE(HHV(HIGH,5)>=REF(HHV(HIGH,5),1)),POINTDOT,color808080; 
 
PT:=REF(HIGH,1)-REF(LOW,1); 
CDP:=(HIGH+LOW+CLOSE)/3; 
AH:=CDP+PT; 
AL:=CDP-PT; 
NH:=2*CDP-LOW; 
NL:=2*CDP-HIGH; 
STICKLINE(CLOSE>OPEN AND ISLASTBAR,AL,AH,1,0),SHIFT1,colorFF00FF; 
STICKLINE(CLOSE>OPEN AND ISLASTBAR,NL,NH,1,0),SHIFT1,colorFF00FF; 
STICKLINE(CLOSE>OPEN AND ISLASTBAR,AL,NH,7,1),SHIFT1,colorFF00FF; 
STICKLINE(CLOSE<=OPEN AND ISLASTBAR,AL,NH,7,0),SHIFT1,colorFF0000; 
STICKLINE(CLOSE<=OPEN AND ISLASTBAR,NL,AH,1,0),SHIFT1,colorFF0000; 
DRAWTEXT(SYSPARAM(3)=BARPOS AND CLOSE<=OPEN AND ISLASTBAR,HIGH,'\n明\n日\n预\n测'),ALIGN1,SHIFT2,colorFF0000; 
DRAWTEXT(SYSPARAM(3)=BARPOS AND CLOSE>OPEN AND ISLASTBAR,CLOSE,'\n明\n日\n预\n测'),ALIGN1,SHIFT2,colorFF00FF; 
X:=EMA(SLOPE(CLOSE,21)*20+CLOSE,68); 
Y:=EMA(CLOSE,10); 
LL:=REF(CLOSE,2); 
MM:=(SMA(MAX(CLOSE-LL,0),6,1))/(SMA(ABS(CLOSE-LL),6,1))*100; 
DB:=IF(MM<REF(MM,1) AND MM>79,MM,0); 
DRAWICON(CROSS(Y,X),LOW*0.985,1),PXUP6,colorFF; 
DRAWICON(CROSS(X,Y),HIGH*1.02,2),PXUP4,colorFF00; 
DRAWTEXT(DB,HIGH*1.02,'↓顶'),PXUP4,colorFF00; 
VAR1:=LLV(LOW,21); 
VAR2:=HHV(HIGH,21); 
AK1:=EMA((CLOSE-VAR1)/(VAR2-VAR1)*100,5); 
AK:=EMA((CLOSE-VAR1)/(VAR2-VAR1)*50,13); 
DD:=EMA(0.667*REF(AK1,1)+0.333*AK1,2); 
VAR3:=LLV(LOW,55); 
VAR4:=HHV(HIGH,34); 
VAR5:=EMA((CLOSE-VAR3)/(VAR4-VAR3)*100,3); 
VAR6:=(AK+VAR5)/2; 
VAR7:=EMA(0.667*REF(VAR5,1)+0.333*AK1,2); 
VAR8:=EMA(VAR6,5); 
BB:=EMA(0.667*REF(VAR8,1)+0.333*VAR8,2); 
AB:=CROSS(AK1,AK); 
BB1:=CROSS(AK1,BB) AND BB<30; 
CD:=BB1*0.6; 
DRAWTEXT(CD=0.6,LOW*0.99,'↑底2'),PXUP2,color33CC99; 
DRAWTEXT(AB=1,LOW*0.99,'↑底1'),PXUP2,colorFFFFFF; 
C1:=(CLOSE+LOW+HIGH)/3; 
C2:=EMA(C1,6); 
C3:=EMA(C2,5); 
C4:=CROSS(C2,C3); 
DRAWTEXT(C4,LOW/1.01,'★'),PXUP6,colorFF; 
C5:=CROSS(C3,C2); 
DRAWTEXT(C5,HIGH*1.03,'★'),PXUP6,colorFF0000; 
JJ1:=LLV(LOW,10); 
JJ2:=HHV(HIGH,25); 
警戒线:=2.7; 
减仓线:=3.13; 
卖出线:=3.43; 
空头线:=2.7; 
动力线:=EMA((CLOSE-JJ1)/(JJ2-JJ1)*4,4); 
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,空头线),1,0),LOW*0.998,'与虎谋皮 '),colorFFFF; 
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,警戒线),1,0),HIGH,'预警 '),colorFFFFFF; 
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,减仓线),1,0),HIGH,'减磅? '),colorFFFF; 
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,卖出线),1,0),HIGH*1.001,'出局?'),colorFF00; 
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(卖出线,动力线),1,0),HIGH,'出局确认'),colorFFFF00; 
AA1:=WMA(CLOSE,2); 
BB1:=EMA(AA1,2); 
A0:=MA(BB1,3); 
AA2:=WMA((HIGH+CLOSE+OPEN)/3,18); 
DD3:=A0>=AA2 AND CLOSE>AA2; 
DD4:=A0<AA2; 
DD5:=A0>AA2; 
STICKLINE((DD4 OR DD5) AND OPEN<=CLOSE,HIGH,LOW,0.5,0),colorCC99; 
STICKLINE((DD4 OR DD5) AND OPEN<=CLOSE,CLOSE,OPEN,7,0),colorCC99; 
STICKLINE((DD4 OR DD5) AND OPEN>=CLOSE,HIGH,LOW,0.5,0),color3F8C3A; 
STICKLINE((DD4 OR DD5) AND OPEN>=CLOSE,CLOSE,OPEN,7,0),color3F8C3A; 
STICKLINE((DD3 OR CLOSE>AA2) AND OPEN<=CLOSE,CLOSE,OPEN,7,0),colorFF; 
STICKLINE((DD3 OR CLOSE>AA2) AND OPEN<=CLOSE,HIGH,LOW,0.5,0),colorFF; 
STICKLINE((DD3 OR CLOSE>AA2) AND OPEN>=CLOSE,CLOSE,OPEN,7,0),colorFF33FF; 
STICKLINE((DD3 OR CLOSE>AA2) AND OPEN>=CLOSE,HIGH,LOW,0.5,0),colorFF33FF; 
STICKLINE(MA(CLOSE,13)>OPEN AND CLOSE>MA(CLOSE,13) AND OPEN<CLOSE,OPEN,CLOSE,8,0),colorFFFF; 
STICKLINE(MA(CLOSE,13)>OPEN AND CLOSE>MA(CLOSE,13),HIGH,LOW,0.8,1),colorFFFF; 
FBARS:=SYSPARAM(0); 
F1:=BARSSINCE(CLOSE)=FBARS-1; 
预测值高:=MA(REF(HIGH,1)/REF(CLOSE,2),27)*REF(CLOSE,1); 
预测值低:=MA(REF(LOW,1)/REF(CLOSE,2),27)*REF(CLOSE,1); 
SZ1:='开盘预测当天最高价参考:'+NUMTOSTR(预测值高[SYSPARAM(1)],2); 
DRAWTEXT(BARPOS=SYSPARAM(2),CLOSE,SZ1),ALIGN4,colorFF; 
SZ:='\n  \n开盘预测当天最低价参考:'+NUMTOSTR(预测值低[SYSPARAM(1)],2); 
DRAWTEXT(BARPOS=SYSPARAM(2),CLOSE,SZ),ALIGN4,color9C00; 
N1:=SYSPARAM(3); 
N:=N1-SYSPARAM(2)+1; 
HH:=HHV(HIGH,N); 
LL:=LLV(LOW,N); 
最高:=HH[N1]; 
最低:=LL[N1]; 
低:=最低+(最高-最低)*0.191; 
PARTLINE(CLOSE,低),POINTDOT,colorFF8900; 
中:=最低+(最高-最低)*0.5; 
PARTLINE(CLOSE,中),POINTDOT,colorFF00FF; 
高:=最低+(最高-最低)*0.809; 
PARTLINE(CLOSE,高),POINTDOT,colorFF; 
MM:=BARSCOUNT(VOL); 
VV:=IF(RANGE(STKTYPE,0,13),AMOUNT/100,CLOSE*VOL); 
前N期:=IF(MM<=NN,SUM(VV,MM)/SUM(VOL,MM),REF(SUM(VV,NN)/SUM(VOL,NN),IF(MM<2*NN,MM-NN,NN-1))); 
后N期:=SUM(VV,NN)/SUM(VOL,NN); 
XS:=(SYSPARAM(4)-SYSPARAM(5))/30; 
STICKLINE(BARPOS=SYSPARAM(1)-5,前N期[SYSPARAM(1)],前N期[SYSPARAM(1)],120,0),LINETHICK2,colorFFFFFF; 
DRAWTEXT(BARPOS=SYSPARAM(1)-11,前N期[SYSPARAM(1)]-XS,'前N期成本'+NUMTOSTR(前N期[SYSPARAM(1)],2)),colorFFFFFF; 
IF MM[SYSPARAM(1)]>NN THEN  
STICKLINE(BARPOS=SYSPARAM(1)-5,后N期[SYSPARAM(1)],后N期[SYSPARAM(1)],120,0),LINETHICK2,colorFFFF; 
IF MM[SYSPARAM(1)]>NN THEN  
DRAWTEXT(BARPOS=SYSPARAM(1)-11 AND MM>NN,后N期[SYSPARAM(1)]-XS,'后N期成本'+NUMTOSTR(后N期[SYSPARAM(1)],2)),colorFFFF; 
DPZX:=EMA(CLOSE,1); 
GGZX:=AMOUNT/VOL/100; 
重心:=IF(CAPITAL>0,GGZX,DPZX); 
ZC1:=LLV(重心,2); 
支撑1:REF(LOW,ZC1),LINETHICK0,PRECISION2,colorFFFF00; 
STICKLINE(1,ZC1,ZC1,10,0),colorFFFF00; 
ZC2:=LLV(重心,4); 
支撑2:REF(LOW,ZC2),LINETHICK0,PRECISION2,colorFF0000; 
STICKLINE(1,ZC2,ZC2,10,0),colorFF0000; 
AS0:=(CLOSE-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3)); 
AS1:=SMA(AS0,2,1); 
AS2:=SMA(AS1,2,1); 
AS3:=3*AS1-2*AS2; 
AS4:=2*AS3-0.5; 
AS5:=CLOSE*(1-(AS4-AS2)/15); 
生命线:AS5,LINETHICK0,PRECISION2,colorCA85DE; 
PARTLINE(重心<生命线,生命线),colorFFFFFF; 
PARTLINE(重心>生命线,生命线),LINETHICK2,colorCA85DE; 
SRZ1:=HHV(HIGH,13); 
SRZ2:=LLV(LOW,13); 
KC:=CLOSE; 
KH:=HIGH; 
KL:=LOW; 
FOR I=1 TO DATACOUNT DO BEGIN  
IF KH[I]>SRZ1[I-1] AND KC[I]>KC[I-1] THEN  
E[I]:=SRZ2[I];ELSE  
IF KL[I]<SRZ2[I-1] AND KC[I]<KC[I-1] THEN  
E[I]:=SRZ1[I];ELSE  
E[I]:=E[I-1]; 
END; 
PARTLINE(CLOSE>E,E),LINETHICK2,color98FF; 
PARTLINE(CLOSE<E,E),LINETHICK2,colorFF0000; 
SRZ11:=HHV(HIGH,4); 
SRZ12:=LLV(LOW,4); 
KC1:=CLOSE; 
KH1:=HIGH; 
KL1:=LOW; 
FOR I=1 TO DATACOUNT DO BEGIN  
IF KH1[I]>SRZ11[I-1] AND KC1[I]>KC1[I-1] THEN  
E1[I]:=SRZ12[I];ELSE  
IF KL1[I]<SRZ12[I-1] AND KC1[I]<KC1[I-1] THEN  
E1[I]:=SRZ11[I];ELSE  
E1[I]:=E1[I-1]; 
END; 
PARTLINE(CLOSE>E1,E1),LINETHICK2,colorFF; 
PARTLINE(CLOSE<E1,E1),LINETHICK2,colorFFFF00; 
F:=100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1); 
今小昨:=IF(CLOSE<REF(OPEN,1) AND F<0,1,0); 
P1:=今小昨; 
今小前:=IF(CLOSE<REF(OPEN,2) AND F<0,1,0); 
P2:=今小前; 
L1:=(CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100; 
L2:=SMA(L1,3,1)/3; 
L3:=SMA(L2,3,1); 
K:=(3*L2-2*L3)*2.5; 
D:=MA(K,3); 
L4:=CROSS(D,K) AND D>50; 
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); 
DI:=CLOSE<REF(CLOSE,1) AND DIF>REF(DIF,1); 
DI1:=FILTER(DI,2); 
DRAWICON(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,LOW,'J42'); 
DRAWTEXT(BARPOS=SYSPARAM(2),低*0.99,'低: '+NUMTOSTR(低,2)),colorFF8900; 
DRAWTEXT(BARPOS=S
  |