开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 金融证券系统 > 查看源码
TechTrend.cpp
资源名称：clking_src.rar　[点击查看]
上传用户：zhanglf88
上传日期：2013-11-19
资源大小：6036k
文件大小：10k
源码类别：

金融证券系统

开发平台：

Visual C++

TechTrend.cpp：源码内容
  1. /*
  2. Cross Platform Core Code.
  4. Copyright(R) 2001-2002 Balang Software.
  5. All rights reserved.
  7. */
  9. #include "StdAfx.h"
  10. #include "../Include/Stock.h"
  11. #include "../Include/Technique.h"
  13. #ifdef _DEBUG
  14. #undef THIS_FILE
  15. static char THIS_FILE[] = __FILE__;
  16. #endif
  18. #ifdef _DEBUG
  19. #define new DEBUG_NEW
  20. #endif
  22. //////////////////////////////////////////////////////////////////////
  23. // CMACD
  24. CMACD::CMACD( )
  25. {
  26. SetDefaultParameters( );
  27. }
  29. CMACD::CMACD( CKData * pKData )
  30. : CTechnique( pKData )
  31. {
  32. SetDefaultParameters( );
  33. }
  35. CMACD::~CMACD()
  36. {
  37. Clear( );
  38. }
  40. void CMACD::SetDefaultParameters( )
  41. {
  42. m_nEMA1Days = 12;
  43. m_nEMA2Days = 26;
  44. m_nDIFDays = 9;
  46. m_itsDeviateOnBottom = ITS_BUYINTENSE;
  47. m_itsDeviateOnTop = ITS_SELLINTENSE;
  48. m_itsGoldenFork = ITS_BUY;
  49. m_itsDeadFork = ITS_SELL;
  50. }
  52. void CMACD::AttachParameters( CMACD & src )
  53. {
  54. m_nEMA1Days = src.m_nEMA1Days;
  55. m_nEMA2Days = src.m_nEMA2Days;
  56. m_nDIFDays = src.m_nDIFDays;
  58. m_itsDeviateOnBottom = src.m_itsDeviateOnBottom;
  59. m_itsDeviateOnTop = src.m_itsDeviateOnTop;
  60. m_itsGoldenFork = src.m_itsGoldenFork;
  61. m_itsDeadFork = src.m_itsDeadFork;
  62. }
  64. BOOL CMACD::IsValidParameters( )
  65. {
  66. return ( VALID_DAYS(m_nEMA1Days) && VALID_DAYS(m_nEMA2Days) && VALID_DAYS(m_nDIFDays)
  67. && VALID_ITS(m_itsDeviateOnBottom) && VALID_ITS(m_itsDeviateOnTop)
  68. && VALID_ITS(m_itsGoldenFork) && VALID_ITS(m_itsDeadFork) );
  69. }
  71. void CMACD::Clear( )
  72. {
  73. CTechnique::Clear( );
  74. }
  76. int CMACD::GetSignal( int nIndex, UINT * pnCode )
  77. {
  78. if( pnCode ) *pnCode = ITSC_NOTHING;
  79. PrepareCache( 0, -1, FALSE );
  81. int nMaxDays = max( max(m_nEMA1Days,m_nEMA2Days) , m_nDIFDays );
  82. double dLiminalLow = 0, dLiminalHigh = 0;
  83. if( !IntensityPrepare( nIndex, pnCode, nMaxDays, ITS_GETMINMAXDAYRANGE, &dLiminalLow, &dLiminalHigh, 0.309, 0.682 ) )
  84. return ITS_NOTHING;
  86. double dEMA1, dEMA2, dDIF, dDEA;
  87. if( !Calculate( &dEMA1, &dEMA2, &dDIF, &dDEA, nIndex, FALSE ) )
  88. return ITS_NOTHING;
  90. if( IsDeviateOnBottom( nIndex, m_pdCache3, m_pdCache4 ) )
  91. { // 底背离
  92. if( pnCode ) *pnCode = ITSC_DEVIATEONBOTTOM;
  93. return m_itsDeviateOnBottom;
  94. }
  95. if( IsDeviateOnTop( nIndex, m_pdCache3, m_pdCache4 ) )
  96. { // 顶背离
  97. if( pnCode ) *pnCode = ITSC_DEVIATEONTOP;
  98. return m_itsDeviateOnTop;
  99. }
  100. if( dDIF < dLiminalLow && dDEA < dLiminalLow && IsGoldenFork( nIndex, m_pdCache3, m_pdCache4 ) )
  101. { // 低位金叉
  102. if( pnCode ) *pnCode = ITSC_GOLDENFORK;
  103. return m_itsGoldenFork;
  104. }
  105. if( dDIF > dLiminalHigh && dDEA > dLiminalHigh && IsDeadFork( nIndex, m_pdCache3, m_pdCache4 ) )
  106. { // 高位死叉
  107. if( pnCode ) *pnCode = ITSC_DEADFORK;
  108. return m_itsDeadFork;
  109. }
  110. if( dDIF < dLiminalLow && dDEA < dLiminalLow )
  111. { // 低位
  112. if( pnCode ) *pnCode = ITSC_GOLDENFORK;
  113. return m_itsGoldenFork;
  114. }
  115. if( dDIF > dLiminalHigh && dDEA > dLiminalHigh )
  116. { // 高位
  117. if( pnCode ) *pnCode = ITSC_DEADFORK;
  118. return m_itsDeadFork;
  119. }
  121. return ITS_NOTHING;
  122. }
  124. /***
  125. EMA  = 短期移动均值
  126. EMA2 = 长期移动均值
  127. DIF  = 短期移动均值 - 长期移动均值
  128. DEA  = DIF的移动平滑值
  129. 柱状线值 = DIF - DEA
  130. */
  131. BOOL CMACD::GetMinMaxInfo(int nStart, int nEnd, double *pdMin, double *pdMax )
  132. {
  133. STT_ASSERT_GETMINMAXINFO( m_pKData, nStart, nEnd );
  135. double dMin = 0, dMax = 0;
  136. double dEMA1 = 0, dEMA2 = 0, dDIF = 0, dDEA = 0;
  137. BOOL bFirst = TRUE;
  138. for( int k=nStart; k<=nEnd; k++ )
  139. {
  140. if( Calculate( &dEMA1, &dEMA2, &dDIF, &dDEA, k, !bFirst ) )
  141. {
  142. if( bFirst ) { dMin = dDIF; dMax = dDIF; }
  144. if( dDIF < dMin ) dMin = dDIF;
  145. if( dDEA < dMin ) dMin = dDEA;
  146. if( 2*(dDIF-dDEA) < dMin ) dMin = 2*(dDIF-dDEA); // WARNING: different
  148. if( dDIF > dMax ) dMax = dDIF;
  149. if( dDEA > dMax ) dMax = dDEA;
  150. if( 2*(dDIF-dDEA) > dMax ) dMax = 2*(dDIF-dDEA); // WARNING: different
  151. bFirst = FALSE;
  152. }
  153. }
  154. dMin -= fabs(dMin)*0.02;
  155. dMax += fabs(dMax)*0.02;
  156. if( fabs(dMin) < 1e-4 )
  157. dMin = -0.01;
  158. if( fabs(dMax) < 1e-4 )
  159. dMax = 0.01;
  160. if( dMax - dMin < 0.03 )
  161. dMax = dMin + 0.05;
  163. if( pdMin ) *pdMin = dMin;
  164. if( pdMax ) *pdMax = dMax;
  165. return TRUE;
  166. }
  168. BOOL CMACD::Calculate( double *pdEMA1, double *pdEMA2, double *pdDIF, double *pdDEA,
  169. int nIndex, BOOL bUseLast )
  170. {
  171. STT_ASSERT_CALCULATE1( m_pKData, nIndex );
  173. if( m_nEMA1Days > nIndex+1 || m_nEMA2Days > nIndex+1 || m_nDIFDays > nIndex+1 )
  174. return FALSE;
  176. if( LoadFromCache( nIndex, pdEMA1, pdEMA2, pdDIF, pdDEA ) )
  177. return TRUE;
  179. // Calculate EMA1, EMA2, DIF, DEA
  180. double dEMA1New = 0, dEMA2New = 0, dDIFNew = 0, dDEANew = 0;
  181. if( bUseLast && pdEMA1 && pdEMA2 && pdDEA )
  182. {
  183. dEMA1New = (*pdEMA1)*(m_nEMA1Days-1)/(m_nEMA1Days+1) + 2 * m_pKData->MaindataAt(nIndex) /(m_nEMA1Days+1);
  184. dEMA2New = (*pdEMA2)*(m_nEMA2Days-1)/(m_nEMA2Days+1) + 2 * m_pKData->MaindataAt(nIndex) /(m_nEMA2Days+1);
  185. dDIFNew = dEMA1New-dEMA2New;
  186. dDEANew = (*pdDEA)*(m_nDIFDays-1)/(m_nDIFDays+1) + 2 * dDIFNew/(m_nDIFDays+1);
  187. }
  188. else
  189. {
  190. double factor1 = 1, factor2 = 1;
  191. for( int k=nIndex; k > 0; k-- )
  192. {
  193. factor1 *= ((double)(m_nEMA1Days-1))/(m_nEMA1Days+1);
  194. factor2 *= ((double)(m_nEMA2Days-1))/(m_nEMA2Days+1);
  195. if( factor1 < 0.001 && factor2 < 0.001 )
  196. break;
  197. }
  198. dEMA1New = m_pKData->MaindataAt(k);
  199. dEMA2New = m_pKData->MaindataAt(k);
  200. dDIFNew = dEMA1New - dEMA2New;
  201. dDEANew = dDIFNew;
  202. for( ; k<=nIndex; k++ )
  203. {
  204. dEMA1New = dEMA1New * (m_nEMA1Days-1)/(m_nEMA1Days+1) + 2 * m_pKData->MaindataAt(k) /(m_nEMA1Days+1);
  205. dEMA2New = dEMA2New * (m_nEMA2Days-1)/(m_nEMA2Days+1) + 2 * m_pKData->MaindataAt(k) /(m_nEMA2Days+1);
  206. dDIFNew = dEMA1New - dEMA2New;
  207. dDEANew = dDEANew * (m_nDIFDays-1)/(m_nDIFDays+1) + 2 * dDIFNew / (m_nDIFDays+1);
  208. }
  209. }
  211. if( pdEMA1 ) *pdEMA1 = dEMA1New;
  212. if( pdEMA2 ) *pdEMA2 = dEMA2New;
  213. if( pdDIF ) *pdDIF = dDIFNew;
  214. if( pdDEA ) *pdDEA = dDEANew;
  215. StoreToCache( nIndex, pdEMA1, pdEMA2, pdDIF, pdDEA );
  216. return TRUE;
  217. }
  219. //////////////////////////////////////////////////////////////////////
  220. // CMIKE
  221. CMIKE::CMIKE( )
  222. {
  223. SetDefaultParameters( );
  224. }
  226. CMIKE::CMIKE( CKData * pKData )
  227. : CTechnique( pKData )
  228. {
  229. SetDefaultParameters( );
  230. }
  232. CMIKE::~CMIKE()
  233. {
  234. Clear( );
  235. }
  237. void CMIKE::SetDefaultParameters( )
  238. {
  239. m_nDays = 12;
  240. }
  242. void CMIKE::AttachParameters( CMIKE & src )
  243. {
  244. m_nDays = src.m_nDays;
  245. }
  247. BOOL CMIKE::IsValidParameters( )
  248. {
  249. return VALID_DAYS( m_nDays );
  250. }
  252. void CMIKE::Clear( )
  253. {
  254. CTechnique::Clear( );
  255. }
  257. /***
  258. H:最高价 L:最低价 C:收盘价
  259. TP ＝ (H＋L＋C)÷3
  260. 第一条窄通道的上下限计算如下：
  261. 弱阻力WR＝TP＋(TP－L) 弱支撑WS＝TP－(H－TP)
  262. 第二条通道的上下限计算如下：
  263. 中阻力MR＝TP＋(H－L) 中支撑MS＝TP－(H－L)
  264. 第三条阔通道的上下限计算如下：
  265. 强阻力SR＝H＋(H－L) 强支撑SS＝L－(H－L)
  266. */
  267. BOOL CMIKE::CalculateMIKE( double *pWR, double *pMR, double *pSR,
  268. double *pWS, double *pMS, double *pSS, int nIndex )
  269. {
  270. STT_ASSERT_CALCULATE1( m_pKData, nIndex );
  272. if( m_nDays * 2 > nIndex + 1 )
  273. return FALSE;
  275. double TP = (m_pKData->ElementAt(nIndex).m_fHigh + m_pKData->ElementAt(nIndex).m_fLow + m_pKData->ElementAt(nIndex).m_fClose)/3.0;
  276. double minN = 0, min2N = 0, maxN = 0, max2N = 0;
  277. for( int k=nIndex; k>=0; k -- )
  278. {
  279. KDATA kd = m_pKData->ElementAt(k);
  280. if( nIndex-k < m_nDays )
  281. {
  282. if( nIndex == k ) { minN = kd.m_fLow; maxN = kd.m_fHigh; }
  283. if( kd.m_fLow < minN ) minN = kd.m_fLow;
  284. if( kd.m_fHigh > maxN ) maxN = kd.m_fHigh;
  285. }
  286. if( nIndex-k < m_nDays*2 )
  287. {
  288. if( nIndex == k ) { min2N = kd.m_fLow; max2N = kd.m_fHigh; }
  289. if( kd.m_fLow < min2N ) min2N = kd.m_fLow;
  290. if( kd.m_fHigh > max2N ) max2N = kd.m_fHigh;
  291. }
  292. else
  293. {
  294. break;
  295. }
  296. }
  297. if( pWR ) *pWR = ( TP + (TP - minN) ) ;
  298. if( pMR ) *pMR = ( TP + (maxN - minN) ) ;
  299. if( pSR ) *pSR = ( TP + (max2N - minN) ) ;
  300. if( pWS ) *pWS = ( TP - (maxN - TP) ) ;
  301. if( pMS ) *pMS = ( TP - (maxN - minN) ) ;
  302. if( pSS ) *pSS = ( TP - (maxN - min2N) ) ;
  303. return TRUE;
  304. }
  306. //////////////////////////////////////////////////////////////////////
  307. // CPSY
  308. CPSY::CPSY( )
  309. {
  310. SetDefaultParameters( );
  311. }
  313. CPSY::CPSY( CKData * pKData )
  314. : CTechnique( pKData )
  315. {
  316. SetDefaultParameters( );
  317. }
  319. CPSY::~CPSY()
  320. {
  321. Clear( );
  322. }
  324. void CPSY::SetDefaultParameters( )
  325. {
  326. m_nDays = 12;
  327. m_itsSold = ITS_BUY;
  328. m_itsBought = ITS_SELL;
  329. }
  331. void CPSY::AttachParameters( CPSY & src )
  332. {
  333. m_nDays = src.m_nDays;
  334. m_itsSold = src.m_itsSold;
  335. m_itsBought = src.m_itsBought;
  336. }
  338. BOOL CPSY::IsValidParameters( )
  339. {
  340. return ( VALID_DAYS(m_nDays) && VALID_ITS(m_itsSold) && VALID_ITS(m_itsBought) );
  341. }
  343. void CPSY::Clear( )
  344. {
  345. CTechnique::Clear( );
  346. }
  348. int CPSY::GetSignal( int nIndex, UINT * pnCode )
  349. {
  350. if( pnCode ) *pnCode = ITSC_NOTHING;
  352. if( nIndex <= 0 )
  353. return ITS_NOTHING;
  355. double dPSY = 0, dPSYLast;
  356. if( !Calculate( &dPSYLast, nIndex-1, FALSE )
  357. || !Calculate( &dPSY, nIndex, FALSE ) )
  358. return ITS_NOTHING;
  359. if( dPSY < 30 && dPSY >= dPSYLast )
  360. { // 超卖
  361. if( pnCode ) *pnCode = ITSC_OVERSOLD;
  362. return m_itsSold;
  363. }
  364. if( dPSY > 70 && dPSY <= dPSYLast )
  365. { // 超买
  366. if( pnCode ) *pnCode = ITSC_OVERBOUGHT;
  367. return m_itsBought;
  368. }
  369. return ITS_NOTHING;
  370. }
  372. BOOL CPSY::GetMinMaxInfo(int nStart, int nEnd,
  373.    double *pdMin, double *pdMax )
  374. {
  375. if( pdMin ) *pdMin = 0;
  376. if( pdMax ) *pdMax = 100;
  377. return TRUE;
  378. }
  380. /***
  381.         N日内上涨的天数
  382. PSY = —————————— × 100
  383.               N
  384. */
  385. BOOL CPSY::Calculate( double * pValue, int nIndex, BOOL bUseLast )
  386. {
  387. STT_ASSERT_CALCULATE1( m_pKData, nIndex );
  389. if( m_nDays > nIndex )
  390. return FALSE;
  391. if( LoadFromCache( nIndex, pValue ) )
  392. return TRUE;
  394. double UD = 0;
  395. int nCount = 0;
  396. for( int k=nIndex; k>=1; k-- )
  397. {
  398. if( m_pKData->MaindataAt(k) > m_pKData->MaindataAt(k-1) )
  399. UD += 1;
  401. nCount ++;
  402. if( nCount == m_nDays )
  403. {
  404. if( pValue ) *pValue = UD * 100 / m_nDays;
  405. StoreToCache( nIndex, pValue );
  406. return TRUE;
  407. }
  408. }
  409. return FALSE;
  410. }