说明 1我不会编写指标,只会简单组合一些公式,初次发帖,只为感谢理想论坛各位前辈,各位老师。是他们让我得多了很多东西。 2指标仅是降低风险控制的辅助。 DRAWGBK(C>0, RGB(07,18,108),RGB(88,0,0),0,'11',0); DRAWBAND(100,RGB(170,77,87),90,RGB(630,780,8)); DRAWBAND(10,RGB(718,78,18),0,RGB(30,20,0)); D11:=YEAR AND MONTH AND DAY; AA1:=STRCAT(CON2STR(YEAR,0),'年'); AA2:=STRCAT(CON2STR(MONTH,0),'月'); AA3:=STRCAT(CON2STR(DAY,0),'日'); AA4:=STRCAT('【',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日'))))))); AA888:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】'); DRAWTEXT_FIX(D11,0.507,0.000,0.00,AA888),COLORD9D9F3; DRAWTEXT_FIX(1,0.483,0.027,0,'【★==高原明月组合专用版==★】'),COLOR0078FF; {KDJ月金} 月K:="KDJ.K#MONTH"(9,3,3); 月J:="KDJ.J#MONTH"(9,3,3); {KDJ周金} 周K:="KDJ.K#WEEK"(9,3,3); 周J:="KDJ.J#WEEK"(9,3,3); {KDJ日金} 日K:="KDJ.K#DAY"(9,3,3); 日J:="KDJ.J#DAY"(9,3,3); 月死叉:STICKLINE(月J<月K,-6,-8,4,0),COLORBLUE; 月金叉:STICKLINE(月J>月K,-4,-6,4,0),COLORRED; 周死叉:STICKLINE(周J<周K,-2,-4,4,0),COLORGREEN; 周金叉:STICKLINE(周J>周K,0,-2,4,0),COLORFF00FF; -8,DOTLINE,COLORFF6EC7; {下面四句是在指标上提示颜色含义,顺便说明下周月KJ所在位置} {【深蓝月死叉K】:REFDATE(月K,DATE),COLORBLUE; 【大红月金叉J】:REFDATE(月J,DATE),COLORRED; 【草绿周死叉K】:REFDATE(周K,DATE),COLORGREEN; 【粉红周金叉J】:REFDATE(周J,DATE),COLORFF00FF;}; RSV:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100); 神仙:MEMA(RSV,3),COLORWHITE; 魔鬼:SMA(SMA(RSV,3,1),3,1),COLORYELLOW; 轨迹:SMA(SMA(SMA(RSV,3,1),3,1),3,1),COLORMAGENTA; DRAWBAND(神仙,RGB(150, 0, 50 ), 魔鬼,RGB( 0, 60, 60)) ; DRAWBAND(魔鬼,RGB(100, 0, 0 ), 轨迹,RGB( 0, 50,0)) ; LSC:=REF(C,1); RMI:=SMA(MAX(C-LSC,0),5,1)/SMA(ABS(C-LSC),5,1)*100; RMIM:=SMA(RMI,3,1); STICKLINE(RMIM>=50,50,RMIM,4,0),COLOR000080; STICKLINE(RMIM>=50,50,RMIM,3,0),COLOR0000A6; STICKLINE(RMIM>=50,50,RMIM,2,0),COLOR0000CE; STICKLINE(RMIM>=50,50,RMIM,1,0),COLOR0000FF; STICKLINE(RMIM<50,50,RMIM,4,0),COLOR800000; STICKLINE(RMIM<50,50,RMIM,3,0),COLORB00000; STICKLINE(RMIM<50,50,RMIM,2,0),COLORD50000; STICKLINE(RMIM<50,50,RMIM,1,0),COLORFF0000; STICKLINE(RMIM>80,80,RMIM,5,0),COLORGREEN; STICKLINE(RMIM<20,20,RMIM,5,0),COLORWHITE; A:=(C*3+O+H+L)/6; XJ:=(A+0.618*REF(A,1)+0.382*REF(A,2)+0.236*REF(A,3)+0.146*REF(A,4))/2.382; LX:=REF(XJ,1); D1:=(SMA(MAX(XJ-LX,0),5,1)/SMA(ABS(XJ-LX),5,1))*100,COLOR0000FF; D2:=(SMA(MAX(XJ-LX,0),7,1)/SMA(ABS(XJ-LX),7,1))*100,COLOR00FFFF; N:=10;M1:=2;M2:=2; Q_1:=C-REF(C,1); Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6); Q_3:=CROSS(EMA(C,19),EMA(C,7)); Q_4:=CROSS(EMA(C,7),EMA(C,19)); Z1:=L=LLV(L,BARSLAST(Q_3)+1); Z2:=LLV(L,BARSLAST(Q_3)+1); Z3:=H=HHV(H,BARSLAST(Q_4)+1); Z4:=HHV(H,BARSLAST(Q_4)+1); Q_A:=DRAWLINE(Z1,Z2,Z3,Z4,0); Y1:=H=HHV(H,BARSLAST(Q_4)+1); Y2:=HHV(H,BARSLAST(Q_4)+1); Y3:=L=LLV(L,BARSLAST(Q_3)+1); Y4:=LLV(L,BARSLAST(Q_3)+1); Q_B:=DRAWLINE(Y1,Y2,Y3,Y4,0); X01:=LLV(Q_2,2)=LLV(Q_2,7) ; X2:=COUNT(Q_2<0,2); X3:=CROSS(Q_2,MA(Q_2,2)); X4:=REF(Q_B,1)<REF(Q_B,2); X5:=Q_A>REF(Q_B,1); 买进:=(X01 AND X2 AND X3) AND X4 AND X5; TJ:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0); 堪称一绝:STICKLINE(REF(TJ,1)=0 AND TJ>=1 AND CCI<-40 ,80,20,0,-1) ,COLORRED; 地狱底:0,DOTLINE,COLORGRAY; 地狱线:10,DOTLINE,COLORGRAY; 地平线:20,COLORLIMAGENTA; 天际线:80,COLORGRAY; 清仓线:90,DOTLINE; DRAWICON(CROSS(神仙,魔鬼) AND 神仙<=15,10,40); DRAWICON((CROSS(神仙,10)),5,1); DRAWICON((CROSS(魔鬼,RSI)) AND RSI>60,魔鬼,8); P:神仙;R:魔鬼;G:轨迹; 关注:IF((REF(C,2)-REF(O,2))/REF(O,2)<=-0.002 AND (REF(O,1)-REF(C,2))/REF(C,2)<=0.01 AND (REF(C,1)-REF(O,1))/REF(O,1)<=-0.001 AND (O- REF(O,1))/REF(O,1)<=0 AND (C-O)/O>=0 {AND (C-O)/O<=0.02} AND (MA(C,60)-C)/C>=0.2 AND CROSS(神仙,10),25,0); -20,DOTLINE; 110,DOTLINE; {主力} VUR1:=VOL/CAPITAL; VUR2:=1.1*(MAX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1); VUR3:=2.5*MAX(VUR1,VUR2); VUR4:=DMA(CLOSE,VUR3); VUR5:=20*(VUR4/REF(VUR4,1)-1)*38; VUR6:=EMA(VUR5,2); { VUR7:=EMA(VUR5,2); VUR8:=EMA(VUR7,3); VURS:=EMA(VUR7,8); VUR9:=1.1*(MAX(INDEXH,REF(INDEXC,1))/MIN(INDEXL,REF(INDEXC,1))-1); VURA:=2.5*MAX(VUR1,VUR9); VURB:=DMA(INDEXC,VURA); VURC:=EMA(20*(VURB/REF(VURB,1)-1),1)*38; VURD:=EMA(VURC,2); VURE:=EMA(VURC,2); } 主力:VUR6,LINETHICK0; 多头绝对:20,LINETHICK1,COLOR00AAAA,POINTDOT; 空头绝对:-20,LINETHICK1,COLOR00AA00,POINTDOT; STICKLINE(VUR6>0,0 ,VUR6*1.2,1,0 ),COLOR00AADD; STICKLINE(VUR6>0,0 ,VUR6*0.8,1,0 ),COLOR0099DD; STICKLINE(VUR6>0,0 ,VUR6*0.6,1,0 ),COLOR0066DD; STICKLINE(VUR6>0,0 ,VUR6*0.4,1,0 ),COLOR0033DD; STICKLINE(VUR6>0,0 ,VUR6*0.2,1,0 ),COLOR0000DD; STICKLINE(VUR6<0,0 ,VUR6*1.2,1,0 ),COLORAADD00; STICKLINE(VUR6<0,0 ,VUR6*0.8,1,0 ),COLOR99DD00; STICKLINE(VUR6<0,0 ,VUR6*0.6,1,0 ),COLOR66DD00; STICKLINE(VUR6<0,0 ,VUR6*0.4,1,0 ),COLOR33DD00; STICKLINE(VUR6<0,0 ,VUR6*0.2,1,0 ),COLOR00DD00; { 较强■:STICKLINE(VURD>0,0,VURD,7,0),COLORBB22EE; 超强■:STICKLINE(VUR5>0,0,VUR5,7,0),COLOR00CCCC; 极强■:STICKLINE(VUR6>0,0,VUR6,7,0),COLOR0000CC; 较弱■:STICKLINE(VURD<0,0,VURD,7,0),COLORFFAAAA; 超弱■:STICKLINE(VUR5<0,0,VUR5,7,0),COLOR00DD00; 极弱■:STICKLINE(VUR6<0,0,VUR6,7,0),COLORAAAA10}; {千钧KDJ} RSV999:=(CLOSE-LLV(LOW,14))/(HHV(HIGH,14)-LLV(LOW,14))*100; K0:=SMA(RSV999,3,1); D0:=SMA(K0,3,1); J99:=3*K0-2*D0; STICKLINE(J99>REF(J99,1),HHV(J99,3),LLV(J99,3),0,0),COLOR00AAFF; STICKLINE(J99>REF(J99,1),J99,REF(J99,1),3,0),COLOR0044FF; STICKLINE(J99>REF(J99,1),J99,REF(J99,1),1.5,0),COLOR0088FF; STICKLINE(J99>REF(J99,1),J99,REF(J99,1),0,0),COLOR00AAFF; STICKLINE(J99<REF(J99,1),HHV(J99,3),LLV(J99,3),0,0),COLORFFAA00; STICKLINE(J99<REF(J99,1),J99,REF(J99,1),3,0),COLORFF4400; STICKLINE(J99<REF(J99,1),J99,REF(J99,1),1.5,0),COLORFF8800; STICKLINE(J99<REF(J99,1),J99,REF(J99,1),0,0),COLORFFAA00; {股本市值} 总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿'); 流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿'); 全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2)); 市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿'); 上市天数:=STRCAT(' 上市天数: ',CON2STR(FINANCE(42),0)); {上市日期:=STRCAT(' 上市日期: ',CON2STR(HHV((BARSCOUNT(C)=0)*(DATE+19000000),0),0));} 股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市天数)); 板块类别:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(CODE,DYBLOCK), HYBLOCK), FGBLOCK), ZHBLOCK), GNBLOCK), FGBLOCK), ZSBLOCK);DRAWTEXT_FIX(ISLASTBAR,0.002,0.000,0,板块类别),COLORD9D9F3; DRAWTEXT_FIX(ISLASTBAR,0.002,0.023,0,股本市值),COLORMAGENTA; 总额:=AMOUNT; 买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)); 买%:=买/AMOUNT*100; 流入:=AMOUNT*买%/10000000000; 流出:=AMOUNT/100000000-流入; 净流:=(流入-流出); 总额3:=SUM(AMOUNT,3); 流入3:=SUM(流入,3); 流出3:=SUM(流出,3); 净流3:=SUM(流入-流出,3); 总额5:=SUM(AMOUNT,5); 流入5:=SUM(流入,5); 流出5:=SUM(流出,5); 净流5:=SUM(流入-流出,5); 总额10:=SUM(AMOUNT,10); 流入10:=SUM(流入,10); 流出10:=SUM(流出,10); 净流10:=SUM(流入-流出,10); 画:=CONST(FINDHIGH(总额10,0,190,1)); DRAWTEXT_FIX(1,0.71,0.07,0,'净流(亿):'),COLORMAGENTA,LINETHICK1; DRAWTEXT_FIX(1,0.78,0.05,0,'1日'),COLORMAGENTA,LINETHICK1; DRAWTEXT_FIX(1,0.83,0.05,0,'3日'),COLORMAGENTA,LINETHICK1; DRAWTEXT_FIX(1,0.88,0.05,0,'5日'),COLORMAGENTA,LINETHICK1; DRAWTEXT_FIX(1,0.93,0.05,0,'10日'),COLORMAGENTA,LINETHICK1; DRAWNUMBER_FIX(1,0.78,0.10,0,CONST((净流))),COLORYELLOW; DRAWNUMBER_FIX(1,0.83,0.10,0,CONST((净流3))),COLORYELLOW; DRAWNUMBER_FIX(1,0.88,0.10,0,CONST((净流5))),COLORYELLOW; DRAWNUMBER_FIX(1,0.93,0.10,0,CONST((净流10))),COLORYELLOW; |
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!