|
自从发表“《大智慧新一代》免FEI版也可用”
■■奉献【放量横突】《分时主副图》★一组源码http://www.70822.com/soft/sort013/sort03/down-14342.html
好评如潮，不少通达信用户，在回复中或短信要求老头制作通达信版。
由于种种原因，本人真正使用通达信不超过10小时，
我装有通达信最初的原因是通达信有源码翻译功能。
众所周知，通达信分时功能不如《大智慧2》强大，所以分时指标也较少。
（好像现在通达信6.1版本增强了分时功能，由于我没试用，喜欢通达信的朋友去研究研究。）
我目前是6.06版。
今天我花了点时间，制作了一分时版面，把【放量横突】改成通达信分时。
2009111516453379014.gif
2009111516463571494.gif
公式源码：
《放量横突》副图 使用周期：分时 通达信
{指标描述：分时横突}
均线:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),
1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORYELLOW;
均线H:(均线*1.007 ),COLORFF6600;
均线L:(均线/1.005 ),COLOR00FF00;
均线横盘:=C<均线H AND C>均线L;
STICKLINE(均线横盘,均线L,均线,3,0),COLORYELLOW;
放量:=SUM(VOL,6)>REF(MA(VOL,30),1)*10;
横盘:=((HHV(CLOSE,BARSCOUNT(CLOSE))-LLV(CLOSE,BARSCOUNT(CLOSE)))/CLOSE)<1;
横涨:=横盘 AND 放量 AND (C>均线H);
横跌:=横盘 AND 放量 AND CROSS(均线L,C) ;
突破:=FILTER(横涨,100);
下破:=FILTER(横跌,50);
DRAWTEXT(突破,均线H,'★突破'),COLORFF00FF;
MA30:=EMA(CLOSE,30);
强弱界定:EMA(CLOSE,900);
STICKLINE((MA30>强弱界定),MA30,强弱界定,1,0),COLOR0000FF;
STICKLINE((MA30<强弱界定),MA30,强弱界定,1,0),COLOR00FF00;
DRAWICON(CROSS(MA30,强弱界定),H,7);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:L1+P1*7/8,COLOR00DD00;
支撑:L1+P1*0.5/8,COLOR00DD00;
CC:CLOSE,COLORWHITE,LINETHICK2;
STICKLINE(突破>0,支撑,阻力,2,0),COLORRED;
JX:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),
1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORYELLOW;
***************************************************************************
附件是分时版面和公式。
版面文件FSLL.sp 放进
D:\Program Files\tdx_level2_test\T0002\pad 中。
公式导入。（源码）
如图形压缩：请用键盘上的方向键"向下"按。
2009111516514479637.png
快捷键： 分时： 91
友情提示：
既能选择了通达信，就应当多花点时间弄明他。
求人不如求已！自己的才是最好的。
通达信，四通八达，如果通不过：
1:通达信可能版本太低，请升级
（我是：V6.06版本）。
（升级又不花银子，为什么不升级？ ）
2：没有把源码拷好。
我测试过，没有问题。
|
