#include #include "ts.h" bool ts_test_on_balance_volume_rate( void ) { uint_t k = TS_TEST_K; fp_t const o[] = { 10, 11, 12, 11, 12, 10, 11, 13, 12, 14 }; fp_t const h[] = { 12, 13, 14, 12, 14, 11, 12, 15, 14, 16 }; fp_t const l[] = { 8, 9, 10, 9, 10, 9, 10, 11, 10, 12 }; fp_t const c[] = { 11, 12, 10, 11, 11, 10, 12, 14, 13, 15 }; fp_t const v[] = { 100, 200, 300, 400, 500, 300, 200, 400, 300, 500 }; fp_t const * const x[] = { o, h, l, c, v }; fp_t obv_buf[10] = { 0 }; fp_t obv = 0; for( uint_t i = 1; i < 10; ++i ) { if( c[i] > c[i-1] ) { obv += v[i]; } else if( c[i] < c[i-1] ) { obv -= v[i]; } obv_buf[i] = obv; } fp_t e[4] = { 0 }; for( uint_t i = k + 1; i < 10; ++i ) { fp_t obv_prev = obv_buf[i - k]; e[i - (k + 1)] = obv_prev != 0 ? ( obv_buf[i] - obv_prev ) / obv_prev * 100 : 0; } fp_t const * const e_arr[1] = { e }; fp_t c_val = k; return ts_test(ts_on_balance_volume_rate, ts_on_balance_volume_rate_offset, x, e_arr, 10, (ts_constant_t *)&c_val, &ts_on_balance_volume_rate_p); }