㈠ 求通达信分时“买卖力道”源码
通达信分时买卖力道指标公式股票软件源码如下:
A1:=(VOL/CLOSE)/3;
A2:=SUM((IF(((A1>0.29) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);
A3:=SUM((IF(((A1>0.29) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);
A4:=SUM((IF(((A1<0.29) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);
A5:=SUM((IF(((A1<0.29) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);
A6:=((A2+A3)+A4)+A5;
A7:=IF((ISLASTBAR=1),((100*A2)/A6),0);
A8:=((IF((ISLASTBAR=1),((100*A3)/A6),0)));
A9:=((IF((ISLASTBAR=1),((100*A4)/A6),0)));
A10:=((IF((ISLASTBAR=1),((100*A5)/A6),0)));
机构买盘:(A2),LINETHICK0;
机构卖盘:(A3),LINETHICK0;
散户买盘:(A4),LINETHICK0;
散户卖盘:(A5),LINETHICK0;
STICKLINE(机构买盘>0 AND 机构买盘>=机构卖盘 AND 机构买盘>=REF(机构买盘,1),20,20+100,1,0),COLORRED;
STICKLINE(机构卖盘>0 AND 机构卖盘>=机构买盘 AND 机构卖盘>=REF(机构卖盘,1),20,20+100,1,0),COLORWHITE;
STICKLINE(散户买盘>0 AND 散户买盘>=散户卖盘 AND 散户买盘>=REF(散户买盘,1),-20,-20-100,1,0),COLORLIMAGENTA;
STICKLINE(散户卖盘>0 AND 散户卖盘>=散户买盘 AND 散户卖盘>=REF(散户卖盘,1),-20,-20-100,1,0),COLORCYAN;
VAR2:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*2000;
买卖力道: SMA(VAR2,3,1),COLORLIGRAY;
VAR3:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
VAR4:=(IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2))/(IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1))-IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1)/IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2)));
VAR5:=AMOUNT/(100*VOL);
VAR6:=MA(VAR5,40);
VAR7:=100*(CLOSE-VAR6)/VAR6;
底部追击:= IF(VAR4>0 AND VAR7<-12 AND CLOSE/OPEN>1.08,300,200),COLORGREEN;
STICKLINE(VAR4>0 AND VAR7<-12 AND CLOSE/OPEN>1.08,1200,200,10,0) , COLORGREEN;
VAR8:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
VAR9:=SMA(VAR8,3,1);
VARA:=SMA(VAR9,3,1);
D: SMA(VARA,5,1)*20, COLORCYAN;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趋势线:= EMA(V11,3);
V12:=(趋势线-REF(趋势线,1))/REF(趋势线,1)*100;
BB:(趋势线<=13 AND V12>13) AND FILTER((趋势线<=13 AND V12>13),10);
买入股票:= (趋势线<=13 AND V12>13),COLORRED;
CCC:=(趋势线>=90 AND V12) AND FILTER((趋势线>=90 AND V12),10);
清仓:=FILTER(趋势线>=90 AND V12 AND CROSS(D,买卖力道),5),COLORYELLOW;
卖出区: 清仓+1800,COLORYELLOW;
中:(0+卖出区)/2, COLORGREEN;
{股旁网-股票公式网站 www.gupang.com}
STICKLINE(买卖力道>=中 AND 买卖力道>=REF(买卖力道,1),中,买卖力道+中/10,0,0),COLORMAGENTA;
STICKLINE(买卖力道>=中 AND 买卖力道< REF(买卖力道,1),中,买卖力道+中/10,0,0),COLORBROWN;
STICKLINE(买卖力道<中 AND 买卖力道>=REF(买卖力道,1),中,买卖力道-中/10,0,0),COLORGREEN;
STICKLINE(买卖力道<中 AND 买卖力道< REF(买卖力道,1),中,买卖力道-中/10,0,0),COLORBLUE;
DRAWICON(买入股票,中,15);
DRAWTEXT (BB,0,'买股'),COLORYELLOW;
DRAWTEXT(清仓,买卖力道,'顶'),COLORYELLOW;
STICKLINE(清仓,买卖力道,买卖力道+0.01,2,0),COLORBLUE;
DRAWICON(CROSS(D,中),中,13);
DRAWICON(CROSS(中,买卖力道),买卖力道,2);
DIF:=(EMA(CLOSE,13) - EMA(CLOSE,24));
DEA:=(EMA(DIF,6));
MACD:=(DIF-DEA)*3;
红线:=IF(MACD>=0 AND MACD>REF(MACD,1),中,DRAWNULL);
青线:=IF(MACD>=0 AND MACD< REF(MACD,1),中,DRAWNULL);
粉线:=IF(MACD<0 AND MACD>=REF(MACD,1),中,DRAWNULL);
蓝线:=IF(MACD<0 AND MACD< REF(MACD,1),中,DRAWNULL);
STICKLINE(红线,200,250,1,0),COLORRED,LINETHICK1;
STICKLINE(青线,200,250,1,0),COLORCYAN,LINETHICK1;
STICKLINE(粉线,200,250,1,0),COLORMAGENTA,LINETHICK1;
STICKLINE(蓝线,200,250,1,0),COLORBLUE,LINETHICK1;
DRAWICON(CROSS((A2),(A3)),200,23);
㈡ 求用在通达信软件上的选股指标,在高度控盘大于0的情况下，ASI的白线上穿黄线的选股公式
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
VAR2:=100*WINNER(CLOSE*0.95);
高度控盘:=IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0);
LC:=REF(CLOSE,1);
AA:=ABS(HIGH-LC);
BB:=ABS(LOW-LC);
CC:=ABS(HIGH-REF(LOW,1));
DD:=ABS(LC-REF(OPEN,1));
R:=IF(AA>BB AND AA>CC,AA+BB/2+DD/4,IF(BB>CC AND BB>AA,BB+AA/2+DD/4,CC+DD/4));
X:=(CLOSE-LC+(CLOSE-OPEN)/2+LC-REF(OPEN,1));
SI:=8*X/R*MAX(AA,BB);
ASI:=SUM(SI,0);
MASI:=MA(ASI,6);
高度控盘>0 AND CROSS(ASI,MASI);
㈢ 直观的显示股票买入，持股，卖入时机变色龙指标.谢谢
给你个通达信的BS买卖指标，B点买入S点卖出，找到版块儿强势股在股市上升趋势的时候做，其他时候休息，公式见下面，自己加到软件中去：
MA3:MA(C,3),COLORMAGENTA;
MA5:MA(C,5),COLORYELLOW;
MA13:MA(C,13),COLORYELLOW;
MA21:MA(C,21),COLORWHITE;
MA34:MA(C,34),COLOR399C7F;
MA55:MA(C,55),COLORBROWN;
MA89:MA(C,89),COLOR000999;
MA144:MA(C,144),COLORBLUE;
MA233:MA(C,233),COLORCYAN;
X1:=(C+L+H)/3;
X2:=EMA(X1,6);
X3:=EMA(X2,5);
DRAWICON(CROSS(X2,X3),L*0.98,7);
DRAWICON(CROSS(X3,X2),H*1.02,8);
STICKLINE(X2>=X3,LOW,HIGH,0.1,1),COLORRED;
STICKLINE(X2>=X3,CLOSE,OPEN,2,2),COLORRED;
STICKLINE(X2>=X3,CLOSE,OPEN,2,8),COLORBROWN;
STICKLINE(X2<X3,LOW,HIGH,0.1,1),COLORGREEN;
STICKLINE(X2<X3,CLOSE,OPEN,2,2),COLORGREEN;
STICKLINE(CROSS(X2,X3),OPEN,CLOSE,2,1),COLORYELLOW;
STICKLINE(CROSS(X3,X2),OPEN,CLOSE,2,1),COLORBLUE;