TS:=130; 
 N:=99; 
 M:=3; 
 MT:=3; 
 M1:=5; 
 M2:=7; 
 M3:=21; 
 M4:=12; 
 M5:=50;  
DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS); 
 DA:=IF(CURRBARSCOUNT>DA1,0,DA1); 
 HI:=REFDATE(HHV(H,DA),DATE); 
 LO:=REFDATE(LLV(L,DA),DATE); 
 C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL); 
 GZ:=EXP(LN(HI/LO)/10);  
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA); 
 LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA); 
 LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA); 
 LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA); 
 LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA); 
 LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA); 
 LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA); 
 LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA); 
 LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA); 
 LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA); 
 L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0; 
 L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0; 
 L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0; 
 L4:=REFDATE(HHV(LH4,DA),DATE); 
 L5:=REFDATE(HHV(LH5,DA),DATE); 
 L6:=REFDATE(HHV(LH6,DA),DATE); 
 L7:=REFDATE(HHV(LH7,DA),DATE); 
 L8:=REFDATE(HHV(LH8,DA),DATE); 
 L9:=REFDATE(HHV(LH9,DA),DATE); 
 L10:=REFDATE(HHV(LH10,DA),DATE); 
 SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10); 
  
STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,(HI/GZ),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI/POW(GZ,5),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/100,HI/POW(GZ,6),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/100,HI/POW(GZ,7),1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,1,1),COLOR454545,LINETHICK1; 
 STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*N/100,1,1),COLOR454545,LINETHICK1; 
 DRAWKLINE(H,O,L,C);JJ:=(CLOSE+HIGH+LOW)/3; 
  
 今日保护价:(REF(C,2)+REF(C,1)+O)/3 ,COLOR8080FF,NODRAW; 
  
DRAWBAND(MA(C,2),RGB(250,125,50),MA(C,7),RGB(0,150,250)); 
DRAWTEXT_FIX(1,0.00,0,0,'所属行业:'),COLOR00FFFF; 
DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLOR8080FF; 
DRAWTEXT_FIX(1,0.10,0,0,'所属地区:'),COLOR00FFFF; 
DRAWTEXT_FIX(1,0.16,0,0,DYBLOCK),COLOR8080FF; 
DRAWTEXT_FIX(1,0.00,0.06,0,'主营业务:'),COLOR00FFFF; 
DRAWTEXT_FIX(1,0.06,0.06,0,EXTERNSTR(0,1)),COLOR8080FF; 
量能饱和度:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100),NODRAW; 
MA6一号线:MA(C,6),COLOR00FFFF,LINETHICK3; 
A12二号线:MA(C,12),COLORFF26FF; 
A24三号线:MA(C,24),COLOR0080FF; 
A50四号线:MA(C,50),COLOR00D2D2,LINETHICK3; 
DK:=A24三号线; 
STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORRED; 
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0),COLOR6600FF; 
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0),COLORDD33FF; 
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF55FF; 
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0),COLORFF88FF; 
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0),COLORFFAAFF; 
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0),COLORFFCCFF; 
STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORRED; 
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0),COLOR000033; 
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0),COLOR000066; 
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0),COLOR000099;  
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0),COLOR0000CC; 
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0),COLOR0000FF; 
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0),COLORCC66FF; 
STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORFFFF00; 
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0 ),COLOR990000; 
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0 ),COLORCC0000; 
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF4400; 
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0 ),COLORFF8800; 
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0 ),COLORFFCC00; 
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0 ),COLORCYAN; 
STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORWHITE; 
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0 ),COLOR555555; 
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0 ),COLOR777777;  
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0 ),COLOR999999; 
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0 ),COLOR999999; 
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0 ),COLORDDDDDD; 
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0 ),COLORFFFFFF; 
买:IF(MA6一号线>REF(MA6一号线,1),MA6一号线,DRAWNULL),COLORRED,LINETHICK3; 
卖:IF(MA6一号线<REF(MA6一号线,1),MA6一号线,DRAWNULL),COLORFFFF00,LINETHICK3; 
 
TT:=IF(ISLASTBAR,240/FROMOPEN,1); 
NN:=120; 
HH:=HHV(V*TT,NN); 
LL:=LLV(V,NN); 
最高:=CONST(HH); 
最低:=CONST(LL); 
最高2:=CONST(HHV(H,NN)); 
最低2:=CONST(LLV(L,NN)); 
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW; 
RCC1:=最高2*0.9-(最高2-最低2)*PP; 
最低3:=MIN(RCC1,最低2); 
AA:=最低3; 
MA20:MA(C,20)NODRAW,COLORRED,LINETHICK1; 
MA55:MA(C,55)NODRAW,COLORRED; 
IF(MA20<REF(MA20,1),MA20,DRAWNULL)NODRAW,COLOR00FF00,LINETHICK1; 
IF(MA55<REF(MA55,1),MA55,DRAWNULL)NODRAW,COLOR408000; 
BB:MA(MA(CLOSE,3),1)NODRAW,LINETHICK1,COLORFFFF00; 
IF(BB>=REF(BB,1),BB,DRAWNULL)NODRAW,COLOR0000FF,LINETHICK1; 
STICKLINE(BB>=REF(BB,1),AA-0.000*AA,AA-0.050*AA,3,0),COLOR000074; 
STICKLINE(BB<REF(BB,1),AA-0.010*AA,AA-0.040*AA,3,1),COLORFFFF00; 
 
  
三日最低:=EMA((REF(L,4)+REF(L,3)+REF(L,2))/3,3);  
三日最高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))/3,3),COLORWHITE;  
S:=CROSS(CROSS(三日最高,C),0.6); 
B:=CROSS(CROSS(C,三日最低),0.5); 
DRAWICON(B,LOW*0.99,34); 
DRAWICON(S,H*1.00,35); 
ARE4:=MA(C,20); ARE5:=(C>MA(C,5)); ARE6:=(MA(C,5)>MA(C,10)); ARE7:=(C>MA(C,10)); 
ARE8:=(MA(C,5)>MA(C,20)); ARE9:=(C>MA(C,20)); ARE10:=REF(ARE4,1); ARE11:=(ARE4>ARE10); 
AVX:=(((((IF(ARE5,10,(0-10))+IF(ARE6,10,(0-10)))+IF(ARE7,10,(0-10)))+IF(ARE8,10,(0-10)))+IF(ARE9,10,(0-10)))+IF(ARE11,10,(0-10))); 
DSLX:=(C/INDEXC); DSLX1:=MA(DSLX,5); DSLX2:=MA(DSLX,10);  VRE1:=MA(V,5); VRE2:=MA(V,10); 
阻力位:=IF((C>200),(C*1.01),(C*1.07)); 阻力位1:=IF((C<10),(C*1.05),阻力位); 
止损位:=IF((C>200),(C*0.99),(C*0.93)); 止损位1:=IF((C<10),(C*0.95),止损位); 
TJTS1:=ISLASTBAR AND C<500; TJTS2:=ISLAS  |