N:1 1000 200 m:1 34 13 DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'12',0); 生命线:=MA(C,60); 牛熊线:=MA(C,120); DRAWBAND(生命线,RGB(200,50,55),牛熊线,RGB(0,100,50)); DRAWKLINE(H,O,L,C); 股价96:="Y395"; 增幅96:=XMA(XMA(XMA(股价96,3),3),3)-REF(XMA(XMA(XMA(股价96,3),3),3),1); X396:=XMA(股价96,3); J396:=(XMA(股价96,3)*3+0.5*股价96-0.5*REF(股价96,1)+增幅96)/3; Y396:IFF(CURRBARSCOUNT=1,J396,X396),LINETHICK2,COLORGREEN; IF(Y396>REF(Y396,1),Y396,DRAWNULL),COLORRED,LINETHICK2; 高险区1:Y396*1.1,COLORLIRED,COLORFFFF00; 高风区2:Y396*1.125,COLORLIRED,COLORFF0000; 高风区3:Y396*1.15,COLORLIRED,COLOR00FF00; 良机区1:Y396*0.9,COLORLIBLUE,COLOR00FFFF; 良机区2:Y396*0.875,COLORLIBLUE,COLORFF00FF; 良机区3:Y396*0.85,COLOR0000FF; WSR1:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100; WSR2:=CROSS(WSR1,5); WSR3:=CROSS(8,WSR1); WSR4:=CROSS(WSR1,-5); WSR5:=CROSS(WSR1,-8); WSR6:=WSR3; WSR7:=WSR4 OR WSR5; WSR8:=WSR7 AND FILTER(WSR7,5); WSR10:DRAWICON(WSR8,L-0.01,1); WSR9:=WSR6 AND FILTER(WSR6,5); WSR11:DRAWICON(WSR9,H+0.01,2); WSR12:=O<良机区3; DRAWICON(WSR12 AND FILTER(WSR12,12),L-0.03,9); W1:=C>REF(C,1) AND MACD<REF(MACD,1) AND MACD>0 AND V<REF(V,1); W2:=C>REF(C,1) AND MACD<0 AND MACD<REF(MACD,1) AND V<REF(V,1); XG:=W1 OR W2; VAR1:=AMOUNT/VOL/7; VAR2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7; VAR3:=SUM(AMOUNT,10)/VAR1/7; VAR4:=DMA(VAR2,VOL/VAR3); VAR5:=(CLOSE-VAR4)/VAR4*100,COLORLIMAGENTA; XG1:=CROSS(VAR5,MA(VAR5,2)) AND VAR5<0 AND C<(HHV(H,5)*0.88) AND REF(O>C,1) AND REF(O>C,2); XG3:=XG AND XG1 AND L<良机区1; WSR13:=O>良机区3 AND L<良机区1 OR XG3; DRAWICON(WSR13 AND FILTER(WSR13,10),L-0.03,23); WSR14:=H>高风区3;DRAWICON(WSR14 AND FILTER(WSR14,15),H+0.03,19); WSR15:=H<高风区3 AND H>高风区2;DRAWICON(WSR15 AND FILTER(WSR15,5),H+0.03,15); WSR16:=(INDEXC-MA(INDEXC,3))/MA(INDEXC,3); WSR17:=(INDEXC-MA(INDEXC,8))/MA(INDEXC,8); WSR18:=(INDEXC-MA(INDEXC,18))/MA(INDEXC,18); WSR19:=(WSR16 + WSR17 + WSR18)/3; WSR20:=(C-MA(C,3))/MA(C,3); WSR21:=(C-MA(C,8))/MA(C,8); WSR22:=(C-MA(C,18))/MA(C,18); WSR23:=(WSR20 + WSR21 + WSR22)/3; WSR24:=(WSR19>REF(WSR19,1) AND CROSS(WSR23,WSR19))*50; WSR25:=(INDEXC-MA(INDEXC,6))/MA(INDEXC,6); WSR26:=(INDEXC-MA(INDEXC,12))/MA(INDEXC,12); WSR27:=(INDEXC-MA(INDEXC,24))/MA(INDEXC,24); WSR28:=(WSR25 + WSR26 + WSR27)/3; WSR29:=(C-MA(C,6))/MA(C,6); WSR30:=(C-MA(C,12))/MA(C,12); WSR31:=(C-MA(C,24))/MA(C,24); WSR32:=(WSR29 + WSR30 + WSR31)/3; WSR33:=(WSR28>REF(WSR28,1) AND CROSS(WSR32,WSR28))*20; WSR34:=(INDEXC-MA(INDEXC,13))/MA(INDEXC,13); WSR35:=(INDEXC-MA(INDEXC,34))/MA(INDEXC,34); WSR36:=(INDEXC-MA(INDEXC,55))/MA(INDEXC,55); WSR37:=(WSR34 + WSR35 + WSR36)/3; WSR38:=(C-MA(C,13))/MA(C,13); WSR39:=(C-MA(C,34))/MA(C,34); WSR40:=(C-MA(C,55))/MA(C,55); WSR41:=(WSR38 + WSR39 + WSR40)/3; WSR42:=(WSR37>REF(WSR37,1) AND CROSS(WSR41,WSR37)); WSR43:=(INDEXC-MA(INDEXC,13))/MA(INDEXC,13); WSR44:=(INDEXC-MA(INDEXC,34))/MA(INDEXC,34); WSR45:=(INDEXC-MA(INDEXC,55))/MA(INDEXC,55); WSR46:=(WSR43 + WSR44 + WSR45)/3; WSR47:=(C-MA(C,30))/MA(C,30); WSR48:=(C-MA(C,60))/MA(C,60); WSR49:=(C-MA(C,90))/MA(C,90); WSR50:=(WSR47 + WSR48 + WSR49)/3; WSR51:=(WSR46>REF(WSR46,1) AND CROSS(WSR50,WSR46)); WSR52:=(INDEXC-MA(INDEXC,34))/MA(INDEXC,34); WSR53:=(INDEXC-MA(INDEXC,55))/MA(INDEXC,55); WSR54:=(INDEXC-MA(INDEXC,89))/MA(INDEXC,89); WSR55:=(WSR52 + WSR53 + WSR54)/3; WSR56:=(C-MA(C,60))/MA(C,60); WSR57:=(C-MA(C,120))/MA(C,120); WSR58:=(C-MA(C,220))/MA(C,220); WSR59:=(WSR56 + WSR57 + WSR58)/3; WSR60:=(WSR59>REF(WSR59,1) AND CROSS(WSR59,WSR55)); WSR61:=WSR24 OR WSR33 OR WSR42 OR WSR51 OR WSR60; DRAWTEXT(WSR61 AND H<Y396 AND FILTER(WSR61,5),良机区3,'★'),COLOR00FFFF; DRAWTEXT(WSR61 AND H<Y396 AND FILTER(WSR61,5),良机区3*0.97,'机'),COLOR00FFFF; 时间之窗:=HHVBARS(ZIG(3,M)>REF(ZIG(3,M),1) AND REF(ZIG(3,M), 1)<REF(ZIG(3,M), 2),N); DRAWTEXT(时间之窗=2,L*0.94,'★3天'),COLORRED; DRAWTEXT(时间之窗=4,H*1.06,'★5天'),COLORGREEN; DRAWTEXT(时间之窗=7,L*0.94,'★8天'),COLORRED; DRAWTEXT(时间之窗=12,H*1.06,'★13天'),COLORGREEN; DRAWTEXT(时间之窗=20,L*0.94,'★21天'),COLORLIRED; DRAWTEXT(时间之窗=33,H*1.06,'★34天'),COLORLIGREEN; DRAWTEXT(时间之窗=54,L*0.94,'★55天'),COLORLIRED; {DRAWTEXT(时间之窗=88,H*1.06,'★89天'),COLORLIGREEN; DRAWTEXT(时间之窗=143,L*0.94,'★144天'),COLORLIRED; DRAWTEXT(时间之窗=232,H*1.06,'★233天'),COLORLIGREEN; DRAWTEXT(时间之窗=376,L*0.94,'★377天'),COLORLIRED; DRAWTEXT(时间之窗=609,H*1.06,'★610天'),COLORLIGREEN; } GET:=ZIG(3,3),COLORFFFFFF; PL5:=ZIG(3,5); EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3); EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3); PL10:=ZIG(3,10); EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3); EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3); PL20:=ZIG(3,20); EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3); EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3); PL40:=ZIG(3,40); 走强1:=BARSLAST(PL5<REF(PL5,1)); 走弱1:=BARSLAST(PL5>REF(PL5,1)); 走强2:=BARSLAST(PL10<REF(PL10,1)); 走弱2:=BARSLAST(PL10>REF(PL10,1)); 走强3:=BARSLAST(PL20<REF(PL20,1)); 走弱3:=BARSLAST(PL20>REF(PL20,1)); ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0); ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0); DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0); DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0); ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0); ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0); DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0); DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0); DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'(A)'),COLORFFFF00; DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'(B)'),COLORFF00FF; DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'(C)'),COLOR0000FF; DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLOR0000FF; DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR0000FF; DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLOR0000FF; DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR0000FF; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLOR0000FF; DRAWTEXT(EN2 AND DTJZ10=1,L*0.93,'Ⅰ'),COLORFF00FF; DRAWTEXT(EX2 AND DTJD10=2,H*1.05,'Ⅱ'),COLORFFFF00; DRAWTEXT(EN3 AND ZTJZ10=1,L*0.93,'Ⅲ'),COLOR0000FF; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.03,'①'),LINETHICK3,COLOR00FFFF; DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.95,'②'),LINETHICK3,COLOR00FFFF; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.03,'③'),LINETHICK3,COLOR00FFFF; DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.95,'④'),LINETHICK3,COLOR00FFFF; V1:=(C+H+L)/3; MA3:=MA(V1,2); MA5:=MA(V1,5); DRAWBAND(MA2,RGB(200,50,55),MA5,RGB(0,100,50)); 遵:IF(MA2>=MA5,MA2,DRAWNULL),COLORRED; 守:IF(MA5>=MA2,MA5,DRAWNULL),COLORFF9900; 纪:IF(MA2>=MA5,MA5,DRAWNULL),COLOR00FFFF; 律:IF(MA5>=MA2,MA2,DRAWNULL),COLOR00FF00; DRAWTEXT_FIX(1,0.0,0.00,0,EXTERNSTR(0,1))COLOR0077FF; ================================================== 引用的公式,如下,请先建立引用公式,然后建立上面的主图公式。 ====================================================== {Y395} 股价67:="Y366"; 增幅67:=XMA(XMA(XMA(股价67,3),3),3)-REF(XMA(XMA(XMA(股价67,3),3),3),1); X367:=XMA(股价67,3); J367:=(XMA(股价67,3)*3+0.5*股价67-0.5*REF(股价67,1)+增幅67)/3; Y367:=IFF(CURRBARSCOUNT=1,J367,X367); 股价68:=Y367; 增幅68:=XMA(XMA(XMA(股价68,3),3),3)-REF(XMA(XMA(XMA(股价68,3),3),3),1); X368 |
- 软件大小:2.00 KB
- 推荐星级:
- 更新时间:2012-03-29 01:27:08
- 软件类别: 国产软件 / 通达信公式
- 软件语言:简体中文
- 授权方式: 免费版
- 联系方式:暂无联系方式
- 官方主页: Home Page
- 点击大图: 【一键转帖到论坛】
- 插件情况:
- 运行环境:Win9X/Win2000/WinXP/Win2003/
- 相关Tags:指标公式 股票软件,公式源码
-
(0)0%(0)0%
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!