VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))); 
VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))); 
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)); 
DIR1:=ABS(CLOSE-REF(CLOSE,5)); 
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5); 
ER1:=DIR1/VIR1; 
CS1:=ER1*(0.8-2/8)+2/8; 
CQ1:=CS1*CS1; 
DIR2:=ABS(CLOSE-REF(CLOSE,10)); 
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10); 
ER2:=DIR2/VIR2; 
CS2:=ER2*(0.8-2/24)+2/24; 
CQ2:=CS2*CS2; 
STICKLINE(VAR2 < MA(VAR3,6),LOW,HIGH,0,1),COLORLIBLUE; 
STICKLINE(VAR2 > MA(VAR3,6),LOW,HIGH,0,1),COLORRED; 
STICKLINE(((OPEN>CLOSE)AND(VAR2<MA(VAR3,6))),(CLOSE-0.03),OPEN,3.05,0),COLORLIBLUE; 
STICKLINE(((OPEN<CLOSE)AND(VAR2<MA(VAR3,6))),CLOSE,OPEN,3.05,1),COLORLIBLUE; 
STICKLINE(((OPEN>CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,(CLOSE-0.03),3.05,0),COLORRED; 
STICKLINE(((OPEN<CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,CLOSE,3.05,1),COLORRED; 
DRAWICON(CROSS(VAR2,MA(VAR3,6)),(LOW - (LOW*0.02)),7); 
DRAWICON(CROSS(MA(VAR3,6),VAR1),(HIGH+(HIGH*0.02)),8); 
PT:=REF(H,1)-REF(L,1); 
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4; 
AH:=CDP+PT; 
AL:=CDP-PT; 
NH:=CDP*2-REF(L,1); 
NL:=CDP*2-REF(H,1); 
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW; 
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORBLUE; 
M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL); 
撑:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW; 
底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW; 
 
副图如下:A:=IF((CLOSE > 126.32),(AMOUNT / 100000),VOL); 
主力:MA(A,4),NODRAW,COLOR00FFFF; 
游资:MA(A,8),NODRAW,COLOR00FF00; 
大户:MA(A,16),NODRAW,COLOR0000FF; 
散户:MA(A,32),NODRAW,COLORFFFF00; 
主动参与比例:ROUND(((主力 / (((主力 + 游资) + 大户) + 散户)) * 100)),NODRAW,COLOR00FFFF; 
游资参与比例:ROUND(((游资 / (((主力 + 游资) + 大户) + 散户)) * 100)),NODRAW,COLOR00FF00; 
大户参与比例:ROUND(((大户 / (((主力 + 游资) + 大户) + 散户)) * 100)),NODRAW,COLOR0000FF; 
散户参与比例:ROUND(((散户 / (((主力 + 游资) + 大户) + 散户)) * 100)),NODRAW,COLORFFFF00; 
警戒线:MA(A,180),COLORFF00FF; 
STICKLINE((主力 > 0),0,主力,3,0),COLOR0000FF; 
STICKLINE((主力 > 0),0,主力,2.7.5,0),COLOR001BFF; 
STICKLINE((主力 > 0),0,主力,2.4,0),COLOR0035FF; 
STICKLINE((主力 > 0),0,主力,2.1,0),COLOR0050FF; 
STICKLINE((主力 > 0),0,主力,1.8,0),COLOR0062FF; 
STICKLINE((主力 > 0),0,主力,1.5,0),COLOR007AFF; 
STICKLINE((主力 > 0),0,主力,1.2,0),COLOR0089FF; 
STICKLINE((主力 > 0),0,主力,0.9,0),COLOR009CFF; 
STICKLINE((主力 > 0),0,主力,0.6,0),COLOR00C0FF; 
STICKLINE((主力 > 0),0,主力,0.3,0),COLOR00EAFF; 
STICKLINE((游资 > 0),0,游资,3,0),COLOR007F00; 
STICKLINE((游资 > 0),0,游资,2.7,3),COLOR008B00; 
STICKLINE((游资 > 0),0,游资,2.4,0),COLOR009500; 
STICKLINE((游资 > 0),0,游资,2.1,0),COLOR00A300; 
STICKLINE((游资 > 0),0,游资,1.8,0),COLOR00AF00; 
STICKLINE((游资 > 0),0,游资,1.5,0),COLOR00C000; 
STICKLINE((游资 > 0),0,游资,1.2,0),COLOR00CA00; 
STICKLINE((游资 > 0),0,游资,0.9,0),COLOR00DB00; 
STICKLINE((游资 > 0),0,游资,0.6,0),COLOR00FF00; 
STICKLINE((大户 > 0),0,大户,3,0),COLOR102088; 
STICKLINE((大户 > 0),0,大户,2.7,0),COLOR102099; 
STICKLINE((大户 > 0),0,大户,2.4,0),COLOR1020AA; 
STICKLINE((大户 > 0),0,大户,2.1,0),COLOR1020BB; 
STICKLINE((大户 > 0),0,大户,1.8,0),COLOR1020CC; 
STICKLINE((大户 > 0),0,大户,1.5,0),COLOR1020DD; 
STICKLINE((大户 > 0),0,大户,1.2,0),COLOR1020EE; 
STICKLINE((大户 > 0),0,大户,0.9,0),COLOR1020FF; 
STICKLINE((散户 > 0),0,散户,3,0),COLORFF7700; 
STICKLINE((散户 > 0),0,散户,2.7,0),COLORFF8800; 
STICKLINE((散户 > 0),0,散户,2.4,0),COLORFF9900; 
STICKLINE((散户 > 0),0,散户,2.1,0),COLORFFAA00; 
STICKLINE((散户 > 0),0,散户,1.8,0),COLORFFBB00; 
STICKLINE((散户 > 0),0,散户,1.5,0),COLORFFCC00; 
STICKLINE((散户 > 0),0,散户,1.2,0),COLORFFDD00; 
STICKLINE((散户 > 0),0,散户,0.9,0),COLORFFEE00; 
 
再一个副图:N1:=5;N2:=10; 
STICKLINE(C>0,0,10,15,0),COLOR781816; 
LC:=REF(CLOSE,1); 
RSI5:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*10,COLORFF00FF,LINETHICK1; 
RSI10:SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*10,COLOR00FFFF; 
VAR1:=C-REF(C,1); 
VAR2:=100*EMA(EMA(VAR1,6),6)/EMA(EMA(ABS(VAR1),6),6); 
MA5:=EMA(C,5); 
MA13:=EMA(C,13); 
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS 
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS 
(MA5,MA13))+1),0),COLOR0000FF; 
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS 
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS 
(MA13,MA5))+1),0),COLOR00FF00; 
BT:(LLV(VAR2,2)=LLV(VAR2,7) AND COUNT(VAR2<0,2) AND CROSS(VAR2,MA(VAR2,2))) AND 
REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1); 
0,COLORFF00FF; 
10,COLORFF0000; 
STICKLINE(UP,0,0.2,3,0),COLOR0000FF; 
STICKLINE(DOWN,0,0.2,3,0),COLOR00FF00; 
STICKLINE(BT,0,3,2,0),COLOR000088; 
STICKLINE(BT,0,3,1,0),COLOR0000CC; 
STICKLINE(BT,0,3,0.22,0),COLOR0000FF; 
DRAWTEXT(BT,3,'短牛'),COLOR0000FF; 
TJ1:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82; 
STICKLINE(TJ1,0,2,3,0),COLOR880088; 
STICKLINE(TJ1,0,2,1.5,0),COLORAA00AA; 
STICKLINE(TJ1,0,2,0.8,0),COLORCC00CC; 
STICKLINE(TJ1,0,2,0.2,0),COLORFF00FF; 
DRAWTEXT(TJ1,2,'中牛'),COLORFF00FF; 
HR:=HHV(HIGH,55); 
HRY:=LLV(LOW,55); 
HRY11:=HR*HRY; 
HRY33:=SQRT(HRY11); 
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33; 
STICKLINE(TJ2,0,1,5,0),COLOR008888; 
STICKLINE(TJ2,0,1,2,0),COLOR00AAAA; 
STICKLINE(TJ2,0,1,1,0),COLOR00CCCC; 
STICKLINE(TJ2,0,1,0.2,0),COLOR00FFFF; 
DRAWTEXT(TJ2,1,'大牛'),COLOR00FFFF; 
ST:=REF(UP,1)>REF(UP,2) AND DOWN<REF(UP,1); 
STICKLINE(ST,10,9,5,0),COLOR008800; 
STICKLINE(ST,10,9,2,0),COLOR00AA00; 
STICKLINE(ST,10,9,1,0),COLOR00CC00; 
STICKLINE(ST,10,9,0.2,0),COLOR00FF00; 
DRAWTEXT(ST,9,'卖'),COLOR00FF00; 
 
在一个副图:()量:VOL,VOLSTICK; 
预量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),COLORFFFF00; 
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 
买:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT ; 
卖:-IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),COLORFF9088,POINTDOT; 
买卖%:ABS(买/卖),LINETHICK0,COLORWHITE; 
STICKLINE(VOL>0,VOL,0,3,0),COLORCC0000; 
STICKLINE(VOL>0,VOL,0,2,0),COLORFF4400; 
STICKLINE(VOL>0,VOL,0,1.1,0),COLORFF8800; 
STICKLINE(VOL>0,VOL,0,0.4,0),COLORFFCC00; 
STICKLINE(买>0,0,买,3,0),COLOR000066; 
STICKLINE(买>0,0,买,2,0),COLOR000099; 
STICKLINE(买>0,0,买,1.1,0),COLOR0000CC; 
STICKLINE(买>0,0,买,0.4,0),COLOR0000FF; 
 
在一个副图:(顶底先知)CS:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100; 
YJD: (EMA(CS,3)-50)*2; 
极弱:-80; 
强势:60; 
风险:80; 
弱势:-60; 
YJD,COLORSTICK; 
今日保护价:(REF(C,1)+REF(C,2)+O)/3; 
VAR1:=REF(CLOSE,1); 
VAR2:=SMA(MAX(CLOSE-VAR1,0),6,1)/SMA(ABS(CLOSE-VAR1),6,1)*100; 
STICKLINE(CROSS(75.9,VAR2),YJD+5,YJD-5,3,0),COLORYELLOW; 
DRAWTEXT(CURRBARSCOUNT=6,78,'清仓'),COLORRED; 
DRAWTEXT(CURRBARSCOUNT=6,60,'减仓'),COLORYELLOW; 
DRAWTEXT(CURRBARSCOUNT=6,0,'控盘'),COLORWHI  |