公式网-网站导航


网站搜索:  

股票公式指标网 发表于2009/12/19 9:48:39

赛车(个股PK大盘)

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. {   
  2. 选择PK起点方式: Param#1   
  3. 1,个股上市日起点;   
  4. 2,本年初为起点;   
  5. 3,大盘波谷为起点;   
  6. 4,大盘波峰为起点;   
  7. 大盘转折幅度: Param#2 %   
  8.   
  9. 按以上格式设置参数精灵}   
  10. INPUT:选择起点(4,1,4),大盘转折幅度(30,1,99);   
  11. 起点1:=BARSCOUNT(C)-1;   
  12. 年:=年份;   
  13. 起点2:=BARSLAST(CROSS(年份=年[DATACOUNT],0.5));   
  14. 起点3:=TROUGHBARS("SH1A0001$CLOSE",大盘转折幅度,1);   
  15. 起点4:=PEAKBARS("SH1A0001$CLOSE",大盘转折幅度,1);   
  16. 起点:=IF(选择起点=1,起点1,IF(选择起点=2,起点2,IF(选择起点=3,起点3,起点4)));   
  17. 图起点:=BARPOS>=DATACOUNT-起点[DATACOUNT];   
  18. VERTLINE(起点=0 AND 图起点),LINEDASHDOT,COLORDD00DD;   
  19.   
  20. C0:=REF(C,起点)*图起点;   
  21. O0:=REF(O,起点)*图起点;   
  22. H0:=REF(H,起点)*图起点;   
  23. L0:=REF(L,起点)*图起点;   
  24. ZC:=(C)/O0; ZO:=(O)/O0; ZH:=(H)/O0; ZL:=(L)/O0;   
  25.   
  26. DC0:=REF("SH1A0001$CLOSE",起点)*图起点;   
  27. DO0:=REF("SH1A0001$OPEN",起点)*图起点;   
  28. DH0:=REF("SH1A0001$HIGH",起点)*图起点;   
  29. DL0:=REF("SH1A0001$LOW",起点)*图起点;   
  30. DZC:=("SH1A0001$CLOSE")/DO0; DZO:=("SH1A0001$OPEN")/DO0; DZH:=("SH1A0001$HIGH")/DO0; DZL:=("SH1A0001$LOW")/DO0;   
  31.   
  32. 收:=DO0*(ZC),LINETHICK;    
  33. 开:=DO0*(ZO),LINETHICK;    
  34. 高:=DO0*(ZH),LINETHICK;    
  35. 低:=DO0*(ZL),LINETHICK;    
  36. D收:=DO0*(DZC),LINETHICK;    
  37. D开:=DO0*(DZO),LINETHICK;    
  38. D高:=DO0*(DZH),LINETHICK;    
  39. D低:=DO0*(DZL),LINETHICK;    
  40.   
  41. DMA5:=MA(D收,5);   
  42. DMA20:=MA(D收,20);   
  43. DMAM2:=MA((DMA5+DMA20)/2,10);   
  44. DMA15:=MA(D收,15);   
  45. DMA30:=MA(D收,30);   
  46. DMAM3:=MA((DMA15+DMA30)/2,18);   
  47. FILLRGN(DMAM2=30,DMAM2,DMAM3),COLOR9FA9A9;   
  48. FILLRGN(DMAM2>DMAM3 AND 图起点 AND 起点>=30,DMAM2,DMAM3),COLORDDDDDD;   
  49. MA5:=MA(收,5);   
  50. MA20:=MA(收,20);   
  51. MAM2:=MA((MA5+MA20)/2,10);   
  52. MA15:=MA(收,15);   
  53. MA30:=MA(收,30);   
  54. MAM3:=MA((MA15+MA30)/2,18);   
  55. FILLRGN(MAM2=30,MAM2,MAM3),COLOR9FA9A9;   
  56. FILLRGN(MAM2>MAM3 AND 图起点 AND 起点>=30,MAM2,MAM3),COLORDDDDDD;   
  57. STICKLINE(DZC>=DZO AND 图起点,D高,D低,0,0),COLOR5050AA;   
  58. STICKLINE(DZC>=DZO AND 图起点,D收,D开,7.8,0),COLOR5050AA;   
  59. STICKLINE(DZC<DZO AND 图起点,D高,D低,0,0),COLORAAAA50;   
  60. STICKLINE(DZC<DZO AND 图起点,D收,D开,7.8,0),COLORAAAA50;   
  61. STICKLINE(C>=O AND 图起点,高,低,0,0),COLOR5050FF;   
  62. STICKLINE(C>=O AND 图起点,收,开,7.8,0),COLOR5050FF;   
  63. STICKLINE(C<O AND 图起点,高,低,0,0),COLOR6FFF50;   
  64. STICKLINE(C<O AND 图起点,收,开,7.8,0),COLOR6FFF50;   
  65. PARTLINE( 图起点 AND 起点>=20,MA(收,20)),COLOR0000FF,LINETHICK2;PARTLINE( 图起点 AND 起点>=9,SMA(MA(收,3),3,1)),COLORFFFF66,LINETHICK2;   
  66. PARTLINE( 图起点 AND 起点>=20,MA(D收,20)),COLOR0000FF,LINETHICK2;PARTLINE( 图起点 AND 起点>=9,SMA(MA(D收,3),3,1)),COLORFFFF66,LINETHICK2;   
  67. 上证指数:D收,LINETHICK;   
  68. 个股对应上证指数:收,LINETHICK;   
  69. 超车:CROSS(收,D收) AND 起点>3 ,LINETHICK;   
  70. PK方式:=IF(选择起点=1,'个股上市日起点',IF(选择起点=2,'本年初为起点',IF(选择起点=3,'大盘波谷为起点','大盘波峰为起点')));   
  71. 当日PK:(收-REF(收,1))/REF(收,1)-(D收-REF(D收,1))/REF(D收,1),LINETHICK;   
  72. 五日PK:(收-REF(收,5))/REF(收,5)-(D收-REF(D收,5))/REF(D收,5),LINETHICK;   
  73. SS:=SYSPARAM(3)-MAX(SYSPARAM(2),(DATACOUNT-起点[DATACOUNT]));   
  74. 中线DL:=LLV(D低,SS);   
  75. 中线GL:=LLV(低,SS);   
  76. 中线DH:=HHV(D高,SS);   
  77. 中线GH:=HHV(高,SS);   
  78. 中线G:=MAX(中线DH,中线GH);   
  79. 中线D:=MIN(中线DL,中线GL);   
  80. 中线:=(中线G-中线D)/2+中线D;   
  81. PARTLINE( 超车 AND 图起点,中线[SYSPARAM(3)]),CIRCLEDOT,PXUP23,COLOR00FFFF;   
  82. PARTLINE( 超车 AND 图起点,中线[SYSPARAM(3)]),CIRCLEDOT,PXUP11,COLOR0000FF;   
  83. PARTLINE( 超车 AND 图起点,中线[SYSPARAM(3)]),CIRCLEDOT,PXUP5,COLORFF00FF;   
  84.   
  85. DRAWTEXTEX(图起点,1,10,10,STKLABEL+' '+STKNAME+' P K 上证指数 P K 起点日期; '+NUMTOSTR(REF(YEAR,起点),0)+'年'+NUMTOSTR(REF(MONTH,起点),0)+'月'+NUMTOSTR(REF(DAY,起点),0)+'日'  
  86. +' 上证指数: '+NUMTOSTR(REF("SH1A0001$CLOSE",起点),0)+'点'),COLOR66AAFF;   
  87. DRAWTEXTEX(图起点 ,1,10,10,' \n \nPK方式: '+PK方式 ),COLORFFFFFF;   
  88. DRAWTEXTEX(图起点 AND 当日PK[SYSPARAM(0)]>0,1,10,10,' \n \n \n \n 当日 P K 赢' ),COLOR6666FF;   
  89. DRAWTEXTEX(图起点 AND 当日PK[SYSPARAM(0)]<0,1,10,10,' \n \n \n \n 当日 P K 输' ),COLOR66FF6F;   
  90. DRAWTEXTEX(图起点 AND 五日PK[SYSPARAM(0)]>0,1,10,10,' \n \n \n \n \n \n 五日 P K 赢' ),COLORFF66FF;   
  91. DRAWTEXTEX(图起点 AND 五日PK[SYSPARAM(0)]<0,1,10,10,' \n \n \n \n \n \n 五日 P K 输' ),COLORFFFF6F;  



网站搜索:  



Copyright © 2009-2010 gszb.com ™,All Rights Reserved. 
公式网-www.gszx.com.cn-股票指标公式网