源码: 
{机构专用}  
日:=150;昨前:=3; 
高1:=REF(HHV(H,日),昨前); 
低1:=REF(LLV(L,日),昨前); 
H1:=高1-(高1-低1)*0.191; 
H2:=高1-(高1-低1)*0.382; 
H3:=高1-(高1-低1)*0.5; 
H4:=高1-(高1-低1)*0.618; 
H5:=高1-(高1-低1)*0.809; 
顶:REFDATE(高1,DATE),COLORRED; 
一0.809:REFDATE(H1,DATE),COLORYELLOW; 
二0.618:REFDATE(H2,DATE),COLORMAGENTA; 
三0.500:REFDATE(H3,DATE),COLORWHITE; 
四0.382:REFDATE(H4,DATE),COLORGREEN; 
五0.191:REFDATE(H5,DATE),COLORYELLOW; 
低:REFDATE(低1,DATE),COLORRED; 
{吸筹} 
VAR2S:=(2*CLOSE+HIGH+LOW)/4;  
VAR3S:=IF(YEAR>=2099 AND MONTH>2,0,1);  
VAR4S:=LLV(LOW,5);  
VAR5S:=HHV(HIGH,4);  
散户:=EMA((VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S;  
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3S;  
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L-0.05,'←吸'),COLORRED; 
{均线设定}  
n:=30; 
N日均线:MA(CLOSE,N),LINETHICK2; 
{顶100-底0} 
量能饱和度:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100),NODRAW; 
{小均线} 
O1:=(SUM(EMA((CLOSE+LOW)/2,1)/3,3)),COLOR00FFFF,LINETHICK1; 
O2:=EMA(O1,3),COLORFF00FF,LINETHICK1; 
O3:=EMA(O2,3),COLOR00FF00,LINETHICK1; 
{波段B\C} 
HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6; 
HHJSJDB:=(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6) 
+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12) 
+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+ 
REF(HHJSJDA,20))/210,COLORYELLOW; 
HHJSJDC:=MA(HHJSJDB,5),COLORRED;  
{神秘心理指标} 
均价:=(OPEN+HIGH+LOW+CLOSE*2)/5,NODRAW; 
突破:均价+HIGH-LOW,NODRAW; 
阻力:均价*2-LOW,NODRAW; 
支撑:=均价*2-HIGH,NODRAW; 
下降:=均价-HIGH+LOW,NODRAW; 
心理:=(均价+突破+阻力+支撑+下降)/5,NODRAW,COLORRED; 
趋势:=EXPMA(CLOSE,12),NODRAW,COLORYELLOW; 
{涨停不破价} 
ZT:=C/REF(C,1)>1.097; 
ZTBPJ:=REF(C,BARSLAST(ZT)+1)*0.98;{涨停不破价} 
ZTBP:=BARSLAST(ZT)<30 AND (LLV(C,BARSLAST(ZT))>=ZTBPJ OR 
LLV(C,BARSLAST(ZT))=ZTBPJ);{涨停不破价} 
STICKLINE(ZTBP,REF(C,BARSLAST(ZT)+1)-REF(C,BARSLAST(ZT)+1)*0.001,REF(C,BARSLAST(ZT)+1),1,0),COLORYELLOW; 
不破价:=REF(L,BARSLAST(ZT)); 
LS0:=BARSLAST(ZT);LS11:=IF(2,LS0=2,ZT); 
LS21:=IF(2,LLV(L,2)>REF(L,2),1); 
ZT不破2:=LS11 AND LS21; 
DRAWTEXT(ZT不破2,不破价-不破价*0.02,'3'),COLORGREEN; 
LS14:=IF(4,LS0=4,ZT); 
LS24:=IF(4,LLV(L,4)>REF(L,4),1); 
ZT不破4:=LS14 AND LS24; 
DRAWTEXT(ZT不破4,不破价-不破价*0.02,'5'),COLORGREEN; 
LS17:=IF(7,LS0=7,ZT); 
LS27:=IF(7,LLV(L,7)>REF(L,7),1); 
ZT不破7:=LS17 AND LS27; 
DRAWTEXT(ZT不破7,不破价-不破价*0.02,'8'),COLORGREEN; 
LS22:=IF(12,LS0=12,ZT); 
LS32:=IF(12,LLV(L,12)>REF(L,12),1); 
ZT不破12:=LS22 AND LS32; 
DRAWTEXT(ZT不破12,不破价-不破价*0.02,'13'),COLORGREEN; 
XH:=FILTER(ZT,13); 
BH:=BARSLAST(ZT); 
CZ:=REF(H,BH)-REF(L,BH); 
迫线:=C>O AND V>REF(V,1)  AND L>REF(C,1) AND REF(ZT,1); 
小阳:=C>O AND V>REF(V,1) AND REF(ZT,1); 
起爆:=REF(HHV(V,8),1)/V>=1.97 AND REF(HHV(小阳,8),1)  AND C>O; 
STICKLINE(ZT,REF(O,BH),REF(C,BH),2,0),COLORYELLOW; 
STICKLINE(迫线,O,C,2,0),COLORMAGENTA; 
{短线-买、卖} 
MMM:=MA(CLOSE,20); 
PEAK1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2); 
VAR21:=REF(PEAK1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR31:=REF(VAR21,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VAR4:=REF(VAR31,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2); 
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); 
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); 
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND PEAK1; 
VAR1A:=REF(PEAK1 OR VAR21 OR VAR31 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD; 
DRAWICON(FILTER(VAR19=1,2),LOW*0.975,1); 
DRAWICON(FILTER(VAR1A=1,3),HIGH*1.03,2); 
{压力支撑线\主力成本} 
VAR41:=(2*CLOSE+HIGH+LOW+OPEN)/5; 
压力支撑线:(EMA(VAR41,3)+EMA(VAR41,6)+EMA(VAR41,12)+EMA(VAR41,24))/4 COLORRED,LINETHICK2;  
主力成本: EMA(COST(9),250),COLOR00FFFF,NODRAW; 
{∠45上升} 
X1P:=(C+L+H)/3; 
BB13:=ATAN(EMA(X1P,13)-REF(EMA(X1P,13),1))*3.1416*10; 
EMA8:=EMA(C,8); 
DRAWTEXT(FILTER(BB13>1 AND EMA(X1P,13)>REF(EMA(X1P,8),1),10),EMA8,'∠45上升'),COLORWHITE; 
{反弹\加仓} 
X11:=(3*CLOSE+HIGH+LOW+OPEN)/6; 
X12:=EMA(X11,10); 
X13:=REF(X12,1); 
XL1:=EMA(CLOSE,10)/100; 
XL2:=MA((XL1-REF(XL1,10))/REF(XL1,10),3)*100; 
XL3:=MA(XL2,3); 
XL4:=SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1); 
DRAWTEXT(IF(CROSS(3*XL4-2*SMA(XL4,3,1),8),87,0) AND X12>X13,LOW,'←反弹'),COLOR0000FF; 
DRAWTEXT(IF(CROSS(2*(EMA((CLOSE*2+HIGH+LOW)/4,12)-EMA((CLOSE*2+HIGH+LOW)/4,26)-(EMA(EMA((CLOSE*2+HIGH+LOW)/4,12)-EMA((CLOSE*2+HIGH+LOW)/4,26),2)))*5.8,0.47),LOW,0) AND X12>X13,LOW,'←加仓'),COLORFF5ED8; 
 
 
主图2 
{短期底部} 
A:=(3*C+L+O+H)/6; 
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+ 
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12) 
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+ 
REF(A,20))/210; 
S2:=SMA(C,3,1); 
S6:=SMA(C,5,1); 
DK:=2*(S2-S6); 
主力成本1:EMA(X,13),COLORFF00FF,LINETHICK0; 
短期底部:LLV(HIGH,30),LINETHICK2,COLORFFCC00; 
 
IF(MA(C,9),MA(C,9),DRAWNULL),COLORMAGENTA,LINETHICK2; 
IF(MA(C,23.5),MA(C,23.5),DRAWNULL),COLORWHITE; 
DRAWKLINE(HIGH,OPEN,LOW,CLOSE); 
{追涨} 
MA5:=MA(C,5); 
MA10:=MA(C,10); 
MA30:=MA(C,30); 
FA:=BARSLAST(CROSS(MA10,MA5)) AND CROSS(MA5,MA10); 
FB:=FA AND MA5>MA30 AND MA10>MA30  AND MA10>REF(MA10,1); 
DRAWTEXT(FB,L-0.58,'★追涨'),COLORRED; 
{牛起步} 
V1:=EMA(CLOSE  |