ma5:ma(c,5),COLORwhite; 
MA13:MA(CLOSE,13),COLOR00FF00,LINETHICK2; 
MA34:MA(CLOSE,34),COLORFF00FF,LINETHICK2; 
MA55:MA(CLOSE,55),COLOR00FFFF,LINETHICK2; 
MA89:MA(CLOSE,89); 
MA144:MA(CLOSE,144),COLORFFFF00; 
天使:EMA(C,2),COLOR000000; 
魔鬼:EMA(SLOPE(C,21)*20+C,42),COLOR000000; 
买:=CROSS(天使,魔鬼); 
卖:=CROSS(魔鬼,天使); 
DRAWICON(买,L*0.97,1); 
DRAWICON(卖,H*1.03,2); 
STICKLINE(天使>=魔鬼,LOW,HIGH,0.01,0),COLOR0000DD; 
STICKLINE(天使>=魔鬼,CLOSE,OPEN,2,1),COLORRED; 
{STICKLINE(天使>=魔鬼,CLOSE,OPEN,3,0),COLOR0000CC; 
STICKLINE(天使>=魔鬼,CLOSE,OPEN,2,0),COLOR0000DD; 
STICKLINE(天使>=魔鬼,CLOSE,OPEN,1,0),COLOR0000FF;} 
{STICKLINE(天使<魔鬼,CLOSE,OPEN,1,0),COLOREEEE00; 
STICKLINE(天使<魔鬼,CLOSE,OPEN,2,0),COLORDDDD00; 
STICKLINE(天使<魔鬼,CLOSE,OPEN,3,0),COLORCCCC00;} 
STICKLINE(天使<魔鬼,LOW,HIGH,0.01,0),COLORFFDD00; 
STICKLINE(天使<魔鬼,CLOSE,OPEN,2,0),COLORFFFF00; 
STICKLINE(CROSS(天使,魔鬼),OPEN,CLOSE,2.5,0),COLORYELLOW; 
STICKLINE(CROSS(魔鬼,天使),OPEN,CLOSE,2.5,0),COLORWHITE; 
限制:=IF(DATE<1201228,1,0); 
A6a:=REF(HIGH,6)=HHV(HIGH,2*6+1); 
B6a:=FILTER(A6a,6); 
C6a:=BACKSET(B6a,6+1); 
D6a:=FILTER(C6a,6); 
A7a:=REF(LOW,6)=LLV(LOW,2*6+1); 
B7a:=FILTER(A7a,6); 
C7a:=BACKSET(B7a,6+1); 
D7a:=FILTER(C7a,6); 
E6a:=(REF(LLV(LOW,2*6),1)+REF(HHV(HIGH,2*6),1))/2; 
E7a:=(HIGH+LOW)/2; 
H6a:=(D6a AND NOT(D7a AND E6a>=E7a)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1; 
H7a:=D6a AND NOT(D7a AND E6a>=E7a); 
L6a:=D7a AND NOT(D6a AND E6a=E7a); 
X6a:=REF(BARSLAST(H6a),1)+1; 
F6a:=BACKSET(H6a AND COUNT(L6a,X6a)>0,LLVBARS(IF(L6a,LOW,10000),X6a)); 
G6a:=F6a>REF(F6a,1); 
I6a:=BACKSET(G6a,2); 
LD2a:=I6a>REF(I6a,1); 
L7a:=LD2a OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1; 
X7a:=REF(BARSLAST(L7a),1)+1; 
F7a:=BACKSET(L7a AND COUNT(H7a,X7a)>0,HHVBARS(IF(H7a,HIGH,0),X7a)); 
G7a:=F7a>REF(F7a,1); 
I7a:=BACKSET(G7a,2); 
HD2a:=I7a>REF(I7a,1); 
UU3a:=BACKSET(BARSTATUS=2,BARSLAST(LD2a)+1); 
VV3a:=UU3a>REF(UU3a,1); 
WW3a:=BACKSET(VV3a,REF(BARSLAST(LD2a),1)+2); 
XX3a:=WW3a>REF(WW3a,1); 
DRAWLINE(XX3a and 限制,L,VV3a and 限制,L,1),Color800040; 
UU4a:=BACKSET(BARSTATUS=2,BARSLAST(HD2a)+1); 
VV4a:=UU4a>REF(UU4a,1); 
WW4a:=BACKSET(VV4a,REF(BARSLAST(HD2a),1)+2); 
XX4a:=WW4a>REF(WW4a,1); 
DRAWLINE(XX4a and 限制,H,VV4a and 限制,H,1),Color800040; 
A6b:=REF(HIGH,3)=HHV(HIGH,2*3+1); 
B6b:=FILTER(A6b,3); 
C6b:=BACKSET(B6b,3+1); 
D6b:=FILTER(C6b,3); 
A7b:=REF(LOW,3)=LLV(LOW,2*3+1); 
B7b:=FILTER(A7b,3); 
C7b:=BACKSET(B7b,3+1); 
D7b:=FILTER(C7b,3); 
E6b:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; 
E7b:=(HIGH+LOW)/2; 
H6b:=(D6b AND NOT(D7b AND E6b>=E7b)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1; 
H7b:=D6b AND NOT(D7b AND E6b>=E7b); 
L6b:=D7b AND NOT(D6b AND E6b=E7b); 
X6b:=REF(BARSLAST(H6b),1)+1; 
F6b:=BACKSET(H6b AND COUNT(L6b,X6b)>0,LLVBARS(IF(L6b,LOW,10000),X6b)); 
G6b:=F6b>REF(F6b,1); 
I6b:=BACKSET(G6b,2); 
LD2b:=I6b>REF(I6b,1); 
L7b:=LD2b OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1; 
X7b:=REF(BARSLAST(L7b),1)+1; 
F7b:=BACKSET(L7b AND COUNT(H7b,X7b)>0,HHVBARS(IF(H7b,HIGH,0),X7b)); 
G7b:=F7b>REF(F7b,1); 
I7b:=BACKSET(G7b,2); 
HD2b:=I7b>REF(I7b,1); 
UU3b:=BACKSET(BARSTATUS=2,BARSLAST(LD2b)+1); 
VV3b:=UU3b>REF(UU3b,1); 
WW3b:=BACKSET(VV3b,REF(BARSLAST(LD2b),1)+2); 
XX3b:=WW3b>REF(WW3b,1); 
DRAWLINE(XX3b and 限制,L,VV3b and 限制,L,1),Color009090; 
UU4b:=BACKSET(BARSTATUS=2,BARSLAST(HD2b)+1); 
VV4b:=UU4b>REF(UU4b,1); 
WW4b:=BACKSET(VV4b,REF(BARSLAST(HD2b),1)+2); 
XX4b:=WW4b>REF(WW4b,1); 
DRAWLINE(XX4b and 限制,H,VV4b and 限制,H,1),COLOR888888; 
A6e:=REF(HIGH,13)=HHV(HIGH,2*13+1); 
B6e:=FILTER(A6e,13); 
C6e:=BACKSET(B6e,13+1); 
D6e:=FILTER(C6e,13); 
A7e:=REF(LOW,13)=LLV(LOW,2*13+1); 
B7e:=FILTER(A7e,13); 
C7e:=BACKSET(B7e,13+1); 
D7e:=FILTER(C7e,13);{低点} 
E6e:=(REF(LLV(LOW,2*13),1)+REF(HHV(HIGH,2*13),1))/2; 
E7e:=(HIGH+LOW)/2; 
H6e:=(D6e AND NOT(D7e AND E6e>=E7e)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1; 
H7e:=D6e AND NOT(D7e AND E6e>=E7e); 
L6e:=D7e AND NOT(D6e AND E6e=E7e); 
X6e:=REF(BARSLAST(H6e),1)+1; 
F6e:=BACKSET(H6e AND COUNT(L6e,X6e)>0,LLVBARS(IF(L6e,LOW,10000),X6e)); 
G6e:=F6e>REF(F6e,1); 
I6e:=BACKSET(G6e,2); 
LD2e:=I6e>REF(I6e,1); 
L7e:=LD2e OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1; 
X7e:=REF(BARSLAST(L7e),1)+1; 
F7e:=BACKSET(L7e AND COUNT(H7e,X7e)>0,HHVBARS(IF(H7e,HIGH,0),X7e)); 
G7e:=F7e>REF(F7e,1); 
I7e:=BACKSET(G7e,2); 
HD2e:=I7e>REF(I7e,1); 
UU3e:=BACKSET(BARSTATUS=2,BARSLAST(LD2e)+1); 
VV3e:=UU3e>REF(UU3e,1); 
WW3e:=BACKSET(VV3e,REF(BARSLAST(LD2e),1)+2); 
XX3e:=WW3e>REF(WW3e,1); 
DRAWLINE(XX3e and 限制,L,VV3e and 限制,L,1),Colorred; 
UU4e:=BACKSET(BARSTATUS=2,BARSLAST(HD2e)+1); 
VV4e:=UU4e>REF(UU4e,1); 
WW4e:=BACKSET(VV4e,REF(BARSLAST(HD2e),1)+2); 
XX4e:=WW4e>REF(WW4e,1); 
DRAWLINE(XX4e and 限制,H,VV4e and 限制,H,1),Colorgreen; 
AW1:=ref(h,N)=hhv(h,2*N+1); 
BW1:=filter(AW1,N); 
CW1:=backset(BW1,N+1); 
DW1:=filter(CW1,n);{高点} 
AW2:=ref(l,N)=llv(l,2*N+1); 
BW2:=filter(AW2,N); 
CW2:=backset(BW2,N+1); 
DW2:=filter(CW2,N);{低点} 
EW1:=(ref(llv(l,2*N),1)+ref(hhv(h,2*N),1))/2; 
EW2:=(h+l)/2;{高低点出现在同一K线上时可作取舍} 
HW1:=(DW1 AND not(DW2 AND EW1>=EW2)) OR barstatus=2 OR barscount(c)=1; 
LW1:=(DW2 AND not(DW1 AND EW1<EW2)); 
HW2:=DW1 AND not(DW2 AND EW1>=EW2); 
 
MA20:=MA(CLOSE,20); 
MA25:=MA(CLOSE,35); 
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); 
DEA :=EMA(DIFF,9); 
MACD := 2*(DIFF-DEA); 
真见招:=MA(CLOSE,9); 
AA12:=MA(CLOSE,12); 
BB10:=((ATAN((真见招 - REF(真见招,1))) * 3.1416) * 10); 
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10); 
VAR1Q:=((((OPEN + LOW) + HIGH) + CLOSE) / 4); 
强力支撑:=LLV(LOW,30); 
强力压力:=HHV(HIGH,27); 
短底:=EMA(VAR1Q,5); 
支撑:=HHV(短底,60); 
压力一:=HHV(LOW,23); 
压力:=SMA(LOW,5,1); 
中线:=MA(CLOSE,3); 
DRAWTEXT(FILTER((((HIGH > 支撑) AND (CLOSE < 支撑)) AND 限制 AND ((CLOSE / OPEN) > (0 - 1.06))),5),(HIGH)*(1.02),'逃'),ALIGN1,COLOR009900; 
中轨:=(MA(HIGH,15) * 1.05); 
天:=(MA(LOW,15) * 0.985); 
人:=(MA(LOW,15) * 0.96); 
地:=(((HIGH + LOW) + CLOSE) / 3); 
B1:=HHV(地,(4 * 15)); 
B6:=LLV(地,(4 * 15)); 
B7:=(B1 - B6); 
B8:=(MA(((地 - B6) / B7),2) * 80); 
VAR1:=(((CLOSE - LLV(LOW,100)) / (HHV(HIGH,100) - LLV(LOW,100))) * 200); 
顶底线:=SMA(VAR1,3,1); 
VAR2:=SMA(顶底线,3,1); 
VAR3:=((3 * 顶底线) - (2 * VAR2)); 
VAR4:=LLV(LOW,5); 
VAR5:=HHV(HIGH,5); 
VAR6:=(EMA((((CLOSE - VAR4) / (VAR5 - VAR4)) * 100),4) * 2); 
VAR7:=EMA(((0.667 * REF(VAR6,1)) + (0.333 * VAR6)),2); 
VAR8:=((3 * VAR6) - (2 * VAR7)); 
VAR9:=(POW(MA(CLOSE,5),2) + MA(CLOSE,5)); 
VARA:=(POW(MA(LOW,5),2) + MA(LOW,5)); 
VARB:=(POW(MA(HIGH,5),2) + MA(HIGH,5)); 
VARC:=(((((VAR9 - LLV(VARA,64)) / (HHV(VARB,64) - LLV(VARA,64))) * 150) + 65) - 10); 
VARD:=((SMA(VARC,3,1) * 1.5) - 100); 
VARE:=SMA(VARD,3,1); 
VARF:=((3 * VARD) - (2 * VARE)); 
VAR10:=(((HIGH + LOW) + (CLOSE * 2)) / 4); 
VAR11:=EMA(VAR10,13); 
VAR12:=STD(VAR10,13); 
VAR13:=(((VAR10 - VAR11) * 100) / VAR12)
  |