公式网 股票指标公式源码分享 登录 注册
公式指标平网
未来函数检测
首页 金钻指标 通达信公式 大智慧公式 同花顺公式 文华财经公式 东财通公式 飞狐公式 操盘手公式 其他公式 公式解答 股票软件 股票池
当前位置:→ 公式网 > 通达信公式 > 正文 → 正文

大智慧神熬系列源码

发布时间:2009/11/2 0:40:15  浏览次数:

 

C/C++ Code复制内容到剪贴板
  1. 大智慧神熬四线源码   
  2. DRAWTEXTREL(50,10,' 代码: '+STKLABEL+'   '+STKNAME+'    日期: '+YEAR+'年'+MONTH+'月 '+DAY+'日 '),linethick2,ColorFFFF80;   
  3. DRAWTEXTREL(650,10,'㊣十二星座*神獒赢富㊣'),linethick1,COLOR00EEff;   
  4. a1:=SUM((ORDERVOL(1,3)),0);   
  5. a2:=SUM((ORDERVOL(2,3)),0);   
  6. a3:=(SUM((ORDERVOL(1,2)),0)) - a1;   
  7. a4:=(SUM((ORDERVOL(2,2)),0)) - a2;   
  8. a5:=(SUM((ORDERVOL(1,1)),0)) - (SUM((ORDERVOL(1,2)),0));   
  9. a6:=(SUM((ORDERVOL(2,1)),0)) - (SUM((ORDERVOL(2,2)),0));   
  10. a7:=(SUM((ORDERVOL(1,0)),0)) - (SUM((ORDERVOL(1,1)),0));   
  11. a8:=(SUM((ORDERVOL(2,0)),0)) - (SUM((ORDERVOL(2,1)),0));   
  12. a9:=(SUM((ORDERVOL(1,0)),0)) + (SUM((ORDERVOL(2,0)),0));   
  13. a10:=a7 - a8;   
  14. a11:=a5 - a6;   
  15. a12:=a3 - a4;   
  16. a13:=a1 - a2;   
  17. a14:=(SUM((ORDERVOL(1,2)),0)) - (SUM((ORDERVOL(2,2)),0));   
  18. a15:=(100 * a7) / a9;   
  19. a16:=(100 * a8) / a9;   
  20. a17:=(100 * a5) / a9;   
  21. a18:=(100 * a6) / a9;   
  22. a19:=(100 * a3) / a9;   
  23. a20:=(100 * a4) / a9;   
  24. a21:=(100 * a1) / a9;   
  25. 中户筹码:A11,linethick1,colorGreen;   
  26. 大户筹码:A12,linethick1,colorYellow;   
  27. 机构筹码:A13,linethick1,ColorFF0000;   
  28. 主力筹码:A14,linethick2,colorRed;   
  29. a22:=(100 * a2) / a9;   
  30. a23:=(100 * (SUM((ORDERVOL(1,2)),0))) / a9;   
  31. a24:=(100 * (SUM((ORDERVOL(2,2)),0))) / a9;   
  32. a25:=(100 * a10) / a9;   
  33. a26:=(100 * a11) / a9;   
  34. a27:=(100 * a12) / a9;   
  35. a28:=(100 * a13) / a9;   
  36. a29:=(100 * a14) / a9;   
  37. a30:=(a1);   
  38. a31:=(a2);   
  39. a32:=(a3);   
  40. a33:=(a4);   
  41. a34:=(a5);   
  42. a35:=(a6);   
  43. a36:=(a7);   
  44. a37:=(a8);   
  45. a38:=((SUM((ORDERVOL(1,2)),0)));   
  46. a39:=((SUM((ORDERVOL(2,2)),0)));   
  47. a40:=(a10);   
  48. a41:=500 / (MAX(a30,a31,a32,a33,a34,a35,a36,a37,a40,中户筹码,大户筹码,机构筹码));   
  49. a42:=550 / (MAX(a38,a39,主力筹码));   
  50. a43:=600 - (a30 * a41);   
  51. a44:=600 - (a31 * a41);   
  52. a45:=600 - (a32 * a41);   
  53. a46:=600 - (a33 * a41);   
  54. a47:=600 - (a34 * a41);   
  55. a48:=600 - (a35 * a41);   
  56. a49:=600 - (a36 * a41);   
  57. a50:=600 - (a37 * a41);   
  58. a51:=600 - (a38 * a42);   
  59. a52:=600 - (a39 * a42);   
  60. a53:=600 - (a40 * a41);   
  61. a54:=600 - (中户筹码 * a41);   
  62. a55:=600 - (大户筹码 * a41);   
  63. a56:=600 - (机构筹码 * a41);   
  64. a57:=600 - (主力筹码 * a42);   
  65. DRAWRECTREL(50,a49,70,600,250),colorYellow;   
  66. DRAWRECTREL(70,a50,90,600,9213440),colorYellow;   
  67. DRAWRECTREL(90,a53,110,600,(IF((a10 >= 0),3289855,8584960))),colorYellow;   
  68. DRAWRECTREL(160,a47,180,600,250),colorYellow;   
  69. DRAWRECTREL(180,a48,200,600,9213440),colorYellow;   
  70. DRAWRECTREL(200,a54,220,600,(IF((a11 >= 0),3289855,8584960))),colorYellow;   
  71. DRAWRECTREL(270,a45,290,600,250),colorYellow;   
  72. DRAWRECTREL(290,a46,310,600,9213440),colorYellow;   
  73. DRAWRECTREL(310,a55,330,600,(IF((a12 >= 0),3289855,8584960))),colorYellow;   
  74. DRAWRECTREL(380,a43,400,600,250),colorYellow;   
  75. DRAWRECTREL(400,a44,420,600,9213440),colorYellow;   
  76. DRAWRECTREL(420,a56,440,600,(IF((a13 >= 0),3289855,8584960))),colorYellow;   
  77. DRAWRECTREL(925,a51,945,600,255),colorYellow;   
  78. DRAWRECTREL(945,a52,965,600,9213440),colorYellow;   
  79. DRAWRECTREL(965,a57,985,600,(IF((a14 >= 0),3289855,8584960))),colorYellow;   
  80. DRAWRECTREL(0,600,445,604,255),colorWhite;   
  81. DRAWTEXTREL(18,450,'散户'),ColorDDFFFF;   
  82. DRAWTEXTREL(125,450,'中户'),ColorDDFFFF;   
  83. DRAWTEXTREL(235,450,'大户'),ColorDDFFFF;   
  84. DRAWTEXTREL(345,450,'机构'),ColorDDFFFF;   
  85. DRAWTEXTREL(888,450,'主力'),ColorDDFFFF;   
  86. DRAWTEXTREL(2,720,'机构买:'+NUMTOSTR(a21)+'%'+' 大户买:'+NUMTOSTR(a19)+'%'+' 中户买:'+NUMTOSTR(a17)+'%'+' 散户买:'+NUMTOSTR(a15)+'%'),colorRed;   
  87. DRAWTEXTREL(2,790,'机构卖:'+NUMTOSTR(a22)+'%'+' 大户卖:'+NUMTOSTR(a20)+'%'+' 中户卖:'+NUMTOSTR(a18)+'%'+' 散户卖:'+NUMTOSTR(a16)+'%'),colorGreen;   
  88. DRAWTEXTREL(2,860,'机构差:'+NUMTOSTR(a28)+'%'+' 大户差:'+NUMTOSTR(a27)+'%'+' 中户差:'+NUMTOSTR(a26)+'%'+' 散户差:'+NUMTOSTR(a25)+'%'),colorWhite;   

 

C/C++ Code复制内容到剪贴板
  1. 神獒炎律 乱码已修复   
  2. input:N(5,1,100);   
  3. 幅度:=ABS((C-REF(C,1))/REF(C,1));   
  4. 转折:=IF(C>=O,幅度,0-幅度);   
  5. 变异速度:=转折*1000000/INDEXC;   
  6. 神獒:SUM(变异速度,n),linethick2,COLORRED;   
  7. 定律:SUM(0-变异速度,n),linethick2,coloryellow;   
  8. LC:=REF(CLOSE,1);   
  9. DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);   
  10. DEA:= EMA(DIFF,9);   
  11. MACD:= 2*(DIFF-DEA);   
  12. 容量比率:=SUM(IF(CLOSE>LC,VOL,0),26)*100/SUM(IF(CLOSE<=LC,VOL,0),26);   
  13. 审判:(容量比率<70 OR CROSS(DIFF,DEA)) AND CROSS(神獒,定律) AND C/L>1.02,linethick2,colorwhite;   
  14. DRAWICON(审判,0,7);   
  15.   
  16. Var1:=EMA(HHV(HIGH,500),21);    
  17. Var2:=EMA(HHV(HIGH,250),21);    
  18. Var3:=EMA(HHV(HIGH,90),21);    
  19. Var4:=EMA(LLV(LOW,500),21);    
  20. Var5:=EMA(LLV(LOW,250),21);    
  21. Var6:=EMA(LLV(LOW,90),21);    
  22. Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21);    
  23. Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21);    
  24. Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21);    
  25. VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21);    
  26. VarB:=REF(LOW,1);    
  27. VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100;    
  28. VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);    
  29. VarE:=LLV(LOW,30);    
  30. VarF:=HHV(VarD,30);    
  31. Var10:=IF(MA(CLOSE,58),1,0);    
  32. 神炎:EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10,coloryellow;    
  33. 邪炎:=STICKLINE(神炎>0 ,0 ,神炎 ,4 ,1);    
  34. ㊣:神炎,colorred;    
  35. STICKLINE(神炎>0,0 ,㊣*1.2,8,0 ),COLOR00EEff;    
  36. STICKLINE(神炎>0,0 ,㊣*0.8,8,0 ),COLOR00BBff;    
  37. STICKLINE(神炎>0,0 ,㊣*0.6,8,0 ),COLOR0099ff;    
  38. STICKLINE(神炎>0,0 ,㊣*0.4,8,0 ),COLOR0066ff;    
  39. STICKLINE(神炎>0,0 ,㊣*0.2,8,0 ),COLOR0000ff;   
  40.   
  41. M5:=EMA(C,43);   
  42. M6:=EMA(C,55);   
  43. M7:=MA(C,78);   
  44. M8:=EMA(M7,3);   
  45. M9:=EMA(M8,3);   
  46. M11:=EMA(M9,3);   
  47. MA47:=EMA(CLOSE,46);   
  48. MA60:=EMA(CLOSE,60);   
  49. Y:=(H+L)/2;   
  50. AO:=MA(Y,5)-MA(Y,34 );   
  51. DU0:=CROSS(AO,0);   
  52. UD0:=CROSS(0,AO);   
  53. TDU0:=BARSLAST(DU0);   
  54. TUD0:=BARSLAST(UD0);   
  55. DU3:=REF(DU0,1);   
  56. UD3:=REF(UD0,1);   
  57. TDU3:=BARSLAST(DU3);   
  58. TUD3:=BARSLAST(UD3);   
  59. UDGLINE:=IF(TDU3<TUD3,REF(HHV(H,2),TDU3),REF(LLV(L,2),TUD3));   
  60. JDU0:=REF(C,1)<=REF(UDGLINE,1) AND C>UDGLINE AND TDU0<TUD0;   
  61. JUD0:=REF(C,1)>=REF(UDGLINE,1) AND C<UDGLINE AND TUD0<TDU0;   
  62. JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;   
  63. JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;   
  64. JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);   
  65. JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);   
  66. JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);   
  67. JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);   
  68. ㊣神:JDU2 AND M9*0.90,colorwhite;   
  69. DRAWTEXT(㊣神,(LOW * 0.98),'㊣'),linethick2,ALIGN1,coloryellow;   
  70. DRAWTEXTREL(10,800,'㊣赢富㊣'),linethick1,COLOR00EEff;   
  71. DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));   

 

C/C++ Code复制内容到剪贴板
  1. 神獒掌控波段操作   
  2. {㊣神獒掌控㊣}   
  3. input:N(88,1,1111),N1(888,1,1111);   
  4. DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));   
  5. a1:=IF((CLOSE < 800),((AMOUNT / VOL) / 100),((((CLOSE * 2) + HIGH) + LOW) / 4));   
  6. a2:=((HHV(HIGH,15)) + (LLV(LOW,30))) / 2;   
  7. a3:=EMA((MA(a1,5)),10);   
  8. a4:=EMA((MA(a1,15)),10);   
  9. a5:=EMA((MA(a1,13)),21);   
  10. a6:=((a3 + a4) + a5) / 3;   
  11. 决策线:EMA((MA(CLOSE,5)),3),colorGreen;   
  12. PARTLINE(决策线,决策线 > (REF(决策线,3)),RGB(255,0,0)),linethick1,colorRed;   
  13. 多空带:((((REF(a6,1)) + a6) + (REF(a6,2))) / 3),linethick0;   
  14. a7:=(((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 1.191;   
  15. a8:=(((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 1.236;   
  16. a9:=(((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 0.809;   
  17. a10:=(((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 0.764;   
  18. a11:=(((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 0.618;   
  19. 地线:(a9),linethick1,Coloryellow;   
  20. 天线:(a7),linethick1,ColorFF0000;   
  21. 支撑线:(a10),linethick2,Color73740F;   
  22. 阻力线:(a8),linethick2,Color509046;   
  23. a12:=((EMA((MA(a1,3)),3)) + (WMA(a1,5))) / 2;   
  24. a13:=REF(a12,1);   
  25. a14:=BARSCOUNT(CLOSE);   
  26. a15:=IF((a14 = 1),0,(((a12 - a13) / a13) * 100));   
  27. a16:=REF(CLOSE,1);   
  28. a17:=IF((a14 = 1),0,(((CLOSE - a16) / a16) * 100));   
  29. a18:=IF((a14 = 1),((CLOSE + OPEN) / 2),a13);   
  30. a19:=REF(a12,2);   
  31. a20:=((a12 + a13) + a19) / 3;   
  32. a21:=((ABS((a12 - a20)) + ABS((a13 - a20))) + ABS((a19 - a20))) / 3;   
  33. a22:=IF((a14 < 3),0,((a21 / a12) * 100));   
  34. a23:=IF((((a15 > 0.5) AND ((a22 > 0.215) OR (LOW > a18))) AND (CLOSE >= OPEN)),1,0);   
  35. a24:=IF((((a15 < (0 - 0.3)) AND ((a22 > 0.2) OR (HIGH < a18))) AND ((OPEN >= CLOSE) OR (a17 < -1))),1,0);   
  36. FILLRGN((((REF(a6,1)) + a6) + (REF(a6,2))) / 3,(((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 0.985,CLOSE > a2,RGB(250,0,0),CLOSE < a2,RGB(101,0,185));   
  37. B:((COUNT(a23,BARSLAST(a24))) = 1) AND a23,linethick0;   
  38. D:((COUNT(a24,BARSLAST(a23))) = 1) AND a24,linethick0;   
  39. DRAWTEXT(B,(LOW * 0.98),'㊣'),linethick3,ALIGN1,colorWhite;   
  40. DRAWTEXT(D,(HIGH * 1.035),'S'),linethick3,ALIGN1,colorGreen;   
  41. STICKLINE(((B > 0) OR (D > 0)),a1,(a1 * 0.998),8,0),ColorFF0000;   
  42. a25:=(EMA(CLOSE,12)) - (EMA(CLOSE,26));   
  43. a26:=EMA(a25,9);   
  44. a27:=2 * (a25 - a26);   
  45. a28:=IF((((((((REF(a27,1)) < (REF(a27,2))) AND ((REF(a27,2)) < (REF(a27,3)))) AND (a27 > (REF(a27,1)))) AND (a27 >= 0)) AND ((LLV(a27,4)) > 0)) AND (COUNT((a27 < 0.18),5))),(a27 * 2),0);   
  46. a29:=IF(((COUNT((CROSS(a26,a25)),8)) AND (CROSS(a25,a26))),(a27 * 4),0);   
  47. a30:=(a28 > 0) AND (CLOSE >= (((REF(a6,1)) + a6) + (REF(a6,2))) / 3);   
  48. DRAWICON(a30,LOW,12),ALIGN1;   
  49. a31:=(((CLOSE / a16) - 1) * 100) >= 7;   
  50. a32:=HIGH - ((HIGH - LOW) / 3);   
  51. a33:=LOW + ((HIGH - LOW) / 3);   
  52. a34:=(CLOSE > 0) AND a31;   
  53. a35:=((HIGH - LOW) * 0.618) + LOW;   
  54. a36:=((HIGH - LOW) * 0.382) + LOW;   
  55. STICKLINE(a34,a32,a33,8,0),colorYellow;   
  56. STICKLINE(a34,((HIGH + LOW) / 2),((HIGH + LOW) / 2),8,0);   
  57. STICKLINE(a34,CLOSE,a35,8,0),colorRed;   
  58. STICKLINE(a34,CLOSE,a35,7,0),Color1414FF;   
  59. STICKLINE(a34,CLOSE,a35,6,0),Color2828FF;   
  60. STICKLINE(a34,CLOSE,a35,5,0),Color3D3DFF;   
  61. STICKLINE(a34,CLOSE,a35,4,0),Color5151FF;   
  62. STICKLINE(a34,CLOSE,a35,3,0),Color6565FF;   
  63. STICKLINE(a34,CLOSE,a35,2,0),Color7A7AFF;   
  64. STICKLINE(a34,CLOSE,a35,1,0),Color8E8EFF;   
  65. STICKLINE(a34,a36,OPEN,8,0),colorGreen;   
  66. STICKLINE(a34,a36,OPEN,7,0),Color28FF28;   
  67. STICKLINE(a34,a36,OPEN,6,0),Color3DFF3D;   
  68. STICKLINE(a34,a36,OPEN,5,0),Color51FF51;   
  69. STICKLINE(a34,a36,OPEN,4,0),Color65FF65;   
  70. STICKLINE(a34,a36,OPEN,3,0),Color7AFF7A;   
  71. STICKLINE(a34,a36,OPEN,2,0),Color8EFF8E;   
  72. STICKLINE(a34,a36,OPEN,1,0),ColorA2FFA2;   
  73. a37:=((CLOSE - (EMA(a1,25))) / (EMA(a1,25))) * 100;   
  74. DRAWTEXT(((a37 > 12) AND (CROSS(决策线,CLOSE))),HIGH,'卖出');   
  75. a38:=BIGORDER(1,2);   
  76. a39:=BIGORDER(2,2);   
  77. a40:=(((a38 - a39) * VOL) / CAPITAL) * 500;   
  78. DRAWTEXT(((a40 > 0.5) OR (LAST((a40 > 0)) > 1)),((((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 1.002),'● '),colorYellow;   
  79. DRAWTEXT((a40 > 1),((((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 1.002),'★'),ColorFF0087;   
  80. DRAWTEXT((a40 > 2),((((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 1.002),'★'),colorBlack;   
  81. DRAWTEXT((((((REF(a40,1)) >= (HHV(a40,20))) AND (a40 >= (LLV(a40,20)))) AND ((REF(a40,1)) > 2.5)) AND (a40 < -2.5)),(HIGH * 1.02),'◤反转'),colorGreen;   
  82. DRAWTEXT(((((OPEN / a16) > 1.03) AND (CLOSE < OPEN)) AND (a40 < 0)),HIGH,'出货'),colorMagenta;   
  83. a41:=LOW < a11;   
  84. DRAWICON(a41,LOW,1);   
  85. DRAWICON((((CROSS(CLOSE,(REF(a9,1)))) AND (a15 < -3)) OR (((LOW < 支撑线) AND (CLOSE > 支撑线)) AND (a15 < -3.5))),LOW,7),ALIGN1;   
  86. DRAWICON(((CROSS((REF(a7,1)),CLOSE)) AND (a40 < 0)),(HIGH * 1.015),8),ALIGN1;   
  87. DRAWTEXT(((CROSS(CLOSE,(REF(a9,1)))) AND (a40 > 0)),LOW,'1/3仓'),colorMagenta;   
  88. DRAWTEXT(((CROSS((REF(a7,1)),CLOSE)) AND (a40 < 0)),(HIGH * 1.05),'1/3仓出'),Color00DB00;   
  89. DRAWTEXT((CROSS(CLOSE,(REF(a10,1)))),(LOW * 0.96),'仓1/2'),colorYellow;   
  90. DRAWTEXT((CROSS(CLOSE,(REF(((((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 0.681),1)))),(LOW * 0.98),'1/2仓'),Color005EFF;   
  91. STICKLINE(((CLOSE > 0) AND (DISPSTATUS = 2)),((((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 1.15),((((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 1.15),20,0),colorWhite;   
  92. STICKLINE(((CLOSE > 0) AND (DISPSTATUS = 2)),((((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 0.85),((((REF(a6,1)) + a6) + (REF(a6,2))) / 3 * 0.85),20,0);   
  93. DRAWTEXT(a41,HIGH,'满仓出击');   
  94. a42:=(CYC(8) - (REF(CYC(8),1))) / (REF(CYC(8),1));   
  95. a43:=((SMA((MAX((CLOSE - a16),0)),5,1)) / (SMA(ABS((CLOSE - a16)),5,1))) * 100;   
  96. DRAWTEXT(((((CROSS(90,a43)) AND (a40 < 0)) AND ((CLOSE / OPEN) <= 0.985)) OR (((a43 > 90) AND (a40 < 0)) AND ((CLOSE / OPEN) <= 0.985))),(HIGH * 1.04),'▼'),ALIGN1,colorGreen;   
  97. DRAWTEXT(((((CROSS(a43,10)) AND (a40 > 0)) OR ((a43 < 10) AND (a40 > 0))) OR (((LOW < 支撑线) AND (CLOSE > 支撑线)) AND (a40 > 0))),(LOW * 0.97),'▲'),ALIGN1,colorRed;   
  98. DRAWTEXT(((CROSS(a43,10)) AND (a15 < -4)),(LOW * 0.92),'◢◣'),ALIGN1,colorRed;   
  99. DRAWTEXT((((a15 < -5) AND (a37 < -24)) AND (a43 < 12)),(LOW * 0.95),'▲'),ALIGN1,colorMagenta;   
  100. DRAWTEXT(((((a15 < -3) AND (a40 > 0)) AND (LOW <= 地线)) AND (CLOSE > 地线)),(LOW * 0.94),'◆'),ALIGN1,colorYellow;   
  101. DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(决策线 * 0.9),'多空价:'+REF(a6,1)),MOVE10,ALIGN2,colorYellow;   
  102. DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(a7 * 1.05),'天线:'+a7),MOVE10,ALIGN2,ColorFF8748;   
  103. DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(a9 * 0.96),'地线:'+a9),MOVE10,ALIGN2,Color766A6C;   
  104. DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(决策线 * 0.95),'决策价:'+决策线),MOVE10,ALIGN2,colorRed;   
  105. PARTLINE(支撑线,(MA(a1,10)) > (MA(a1,240)),RGB(255,0,255)),linethick2,colorMagenta;   
  106. a44:=LOW > (REF(HIGH,1));   
  107. a45:=HIGH < (REF(LOW,1));   
  108. PARTLINE(地线,(MA(a1,10)) > (MA(a1,72)),RGB(255,255,0)),linethick1,colorYellow;   
  109. DRAWTEXT(a44,((REF(HIGH,1)) * 1.003),'─'),ALIGN1,colorWhite;   
  110. DRAWTEXT(a44,(LOW * 1.003),'─'),ALIGN1,colorWhite;   
  111. DRAWTEXT(a45,((REF(LOW,1)) * 1.003),'─'),ALIGN1,colorGreen;   
  112. DRAWTEXT(a45,(HIGH * 1.003),'─'),ALIGN1,colorGreen;   
  113. DRAWTEXTREL(0,0,'评级:'+Extrastring('评级')),colorCyan;   
  114. DRAWTEXTABS(1,15,'所属板块:'+BKNAME),ColorAFFF00;   
  115. DRAWTEXTREL(0,130,'每股收益:'+NUMTOSTRN(FINANCE2(3),3)+'元'+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'元'+' 市净率:'+NUMTOSTRN((CLOSE / FINANCE2(4)),2)+'元'+' 净资产:'+NUMTOSTRN(FINANCE2(4),2)+'元'),Color00C0FF;   
  116. DRAWTEXTREL(10,900,'㊣十二星座*神獒赢富㊣'),linethick1,COLOR00EEff;   

 

C/C++ Code复制内容到剪贴板
  1. {神獒霸气}   
  2. {45度异动}   
  3. x1:=(C+L+H)/3;   
  4. bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;   
  5. ema8:=ema(c,8);   
  6. DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),   
  7. ema8,'∠45上升'),coloryellow;   
  8. ah:hhvall(h);  al:llvall(l);    
  9. ahl:=ah-al;   
  10. a23:al+ahl*0.236,COLORYELLOW,POINTDOT;    
  11. a38:al+ahl*0.382,COLOREE00EE,POINTDOT;    
  12. a50:al+ahl*0.50,COLORYELLOW,POINTDOT;    
  13. a61:al+ahl*0.618,COLOREE00EE,POINTDOT;    
  14. a76:al+ahl*0.764,COLORYELLOW,POINTDOT;    
  15. {标注数字}y:=999;   
  16. DRAWTEXTREL(500,0,'100%  '+ah),COLOREE00EE;   
  17. DRAWTEXTREL(500,y*0.236,'76.4%  '+a76),COLORYELLOW;   
  18. DRAWTEXTREL(500,y*0.382,'61.8%  '+a61),COLOREE00EE;   
  19. DRAWTEXTREL(500,y*0.50,'50%  '+a50),COLORYELLOW;   
  20. DRAWTEXTREL(500,y*0.618,'38.2%  '+a38),COLOREE00EE;   
  21. DRAWTEXTREL(500,y*0.764,'23.6%  '+a23),COLORYELLOW;   
  22. DRAWTEXTREL(500,y-30,'最低  '+al),COLOREE00EE;   
  23.   
  24. DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));   
  25. varl13:=("macd.diff#WEEK"(26,12,9));   
  26. varl14:=("macd.dea#WEEK"(26,12,9));   
  27. VL:=REF(LOW,1); VH:=REF(H,1);   
  28. Var1:=SMA(ABS(H-Vh),13,1)/SMA(MAX(H-Vh,0),13,1)*100;    
  29. Var2:=SMA(ABS(L-VL),13,1)/SMA(MAX(L-VL,0),13,1)*100;   
  30. Var3:=MA(Var1,13);    
  31. Var4:=MA(Var2,13);   
  32. Var5:=LLV(L,34);   
  33. Var6:=HHV(H,34);   
  34. Var7:=EMA(IF(H>=Var6,Var3,0),3);   
  35. Var8:=EMA(IF(L<=Var5,Var4,0),3);   
  36. var9:=(SMA(SMA((((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54))) * 100),7,1),5,1));   
  37. var10:=((SMA(((CLOSE - LLV(LOW,54)) / (HHV(HIGH,54) - LLV(LOW,54)) * 100),7,1)) * 16.18) - (var9* 10.9);   
  38. Var11:=FILTER(IF(var10<=var9 AND Var8>REF(Var8,1),Var8*8,0),55);   
  39. Var21:=LLV(LOW,60);   
  40. Var31:=HHV(HIGH,60);   
  41. Var41:=EMA((CLOSE-Var21)/(Var31-Var21)*100,13);   
  42. Var51:=EMA(0.667*REF(Var41,1)+0.333*Var41,21);   
  43. varl2:=FILTER(CROSS(Var51,Var41) AND Var41>84,13);   
  44. 持股线:MA(C,26),LINETHICK3,coloryellow;   
  45. 趋势线:MA(CLOSE,13),linethick5,colorred;   
  46. qjj:FILTER((CROSS(varl13,varl14) and varl14<0 and CROSS(c,持股线)),90),LINETHICK0;   
  47. DRAWTEXTREL(10,900,'㊣十二星座*神獒赢富㊣'),linethick1,COLOR00EEff;   
  48. DD:=FINANCE2(35);   
  49. SS:=FINANCE2(37);   
  50. GG:=FINANCE2(3);   
  51. TH:=DYNAINFO(39);   
  52. DRAWTEXTREL(10,720,'总股本:'+NUMTOSTRn(DD,0)+'万股' +' 流通A股:'+NUMTOSTRn(SS,0)+'万股'+'市盈率:'+NUMTOSTRn(TH,2)+' 倍'+'  每股收益:'+NUMTOSTRn(GG,3)+' 元'),ColorFFFF00;   
  53. DRAWTEXT(var11,C*0.98,'㊣'),linethick4,ColorFFFF00;   
  54. DRAWICON(qjj,C*1.09,1);   
  55. DRAWTEXT(qjj,l*0.78,'霸占大牛股'),COLOR00FFFF;   
  56. DRAWTEXT(varl2,C*1.04,'逃跑'),Colorgreen;   
  57. 获利比例:=(WINNER(C)*1000)/10;   
  58. 平均成本:=(COST(50)*100)/100;   
  59. 穿透力:=(winner(C)-winner(ref(C,1)))/v*capital;   
  60. 90%成本:=FLOOR(COST(50-90/2)*100)/100;   
  61. ~:=CEILING(COST(50+90/2)*100)/100;   
  62. 90集中度:=INTPART((~-90%成本)/(~+90%成本)*1000)/10;   
  63. 70%成本:=FLOOR(COST(50-70/2)*100)/100;   
  64. ~~:=CEILING(COST(50+70/2)*100)/100;   
  65. 70集中度:=INTPART((~~-70%成本)/(~~+70%成本)*1000)/10;   
  66. DRAWTEXTABS(0,12,'  获利比例:'+STR(获利比例)),COLOR44bbff;   
  67. DRAWTEXTABS(0,24,'  平均成本:'+STR(平均成本)),COLOR44bbff;   
  68. DRAWTEXTABS(0,36,'    穿透力:'+STR(穿透力)),COLOR44bbff;   
  69. DRAWTEXTABS(0,48,'90%成本:'+STR(90%成本)+'-'+STR(~)),COLOR44bbff;   
  70. DRAWTEXTABS(0,60,'90集中度:'+STR(90集中度)),COLOR44bbff;   
  71. DRAWTEXTABS(0,72,'70%成本:'+STR(70%成本)+'-'+STR(~~)),COLOR44bbff;   
  72. DRAWTEXTABS(0,84,'70集中度:'+STR(70集中度)),COLOR44bbff;   
  73. gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);   
  74. 明日阻力:=l+(gj-l)+(c-l);   
  75. 明日支撑:=l+(c-gj);   
  76. 今日阻力:=REF(明日阻力 , 1);   
  77. 今日支撑:=REF(明日支撑 , 1);   
  78. STICKLINE(DISPSTATUS=2  and c>=今日阻力,今日阻力,今日阻力,20,0),Color0000FF;   
  79. STICKLINE(DISPSTATUS=2  and c<今日阻力,今日阻力,今日阻力,20,0),Color00FF00;   
  80. STICKLINE(DISPSTATUS=2  and c>=今日支撑,今日支撑,今日支撑,20,0),ColorFF00FF;   
  81. STICKLINE(DISPSTATUS=2  and c<今日支撑,今日支撑,今日支撑,20,0),ColorFF9900;   
  82. DRAWTEXTREL(770,5,'今日支撑:'+NUMTOSTRN(今日支撑 ,2 )),Colorred;   
  83. DRAWTEXTREL(630,5,'今日阻力:'+NUMTOSTRN(今日阻力 ,2 )),ColorGREEN;   
  84. DRAWTEXTREL(1,800,'所属板块:'+BKNAME),ColorAFFF00;   
  85. DRAWTEXTREL(1,850,'每股收益:'+NUMTOSTRN(FINANCE2(3),3)+'元'+' 市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'元'+' 市净率:'+NUMTOSTRN((CLOSE / FINANCE2(4)),2)+'元'+' 净资产:'+NUMTOSTRN(FINANCE2(4),2)+'元'),Color00C0FF;   
资源下载链接   资源大小:55KB

手机移动版 - 关于我们 - 联系我们 - 广告合作 - 下载声明 - 网站帮助 - 友情链接 - 网站地图 - TOP
湘ICP备09016573号-3 增值电信业务经营ICP许可证:湘B2-20210269 湘公网安备43108102000039号
Copyright © GSZX.COM.CN ,All Rights Reserved.
股票公式,股票指标,股票软件,股票知识