打印本文
關(guān)閉窗口
//計(jì)算收盤價(jià)的均價(jià),一個(gè)常數(shù)參數(shù),表示計(jì)算周期
//調(diào)用方法:
// "STOCKFUNC@MYMACLOSE"(5)
__declspec(dllexport) int WINAPI MYMACLOSE(CALCINFO* pData)
{
if ( pData->m_pfParam1 && //參數(shù)1有效
pData->m_nParam1Start<0 && //參數(shù)1為常數(shù)
pData->m_pfParam2==NULL ) //僅有一個(gè)參數(shù)
{
float fParam = *pData->m_pfParam1;
int nPeriod = (int)fParam; //參數(shù)1
if(nPeriod>0)
{
float fTotal;
int i, j;
for ( i = nPeriod-1; i < pData->m_nNumData; i++ )//計(jì)算nPeriod周期的均線,數(shù)據(jù)從nPeriod-1開始有效
{
fTotal = 0.0f;
for ( j = 0; j < nPeriod; j++ ) //累加
fTotal += pData->m_pData[i-j].m_fClose;
pData->m_pResultBuf[i] = fTotal/nPeriod; //平均
}
return nPeriod-1;
}
}
return -1;
}
//計(jì)算均價(jià),2個(gè)參數(shù),參數(shù)1為待求均線的數(shù)據(jù),參數(shù)2表示計(jì)算周期
//調(diào)用方法:
// "STOCKFUNC@MYMAVAR"(CLOSE-OPEN,5)
__declspec(dllexport) int WINAPI MYMAVAR(CALCINFO* pData)
{
if(pData->m_pfParam1 && pData->m_pfParam2 && //參數(shù)1,2有效
pData->m_nParam1Start>=0 && //參數(shù)1為序列數(shù)
pData->m_pfParam3==NULL) //有2個(gè)參數(shù)
{
const float* pValue = pData->m_pfParam1; //參數(shù)1
int nFirst = pData->m_nParam1Start; //有效值起始位
float fParam = *pData->m_pfParam2; //參數(shù)2
int nPeriod = (int)fParam;
if( nFirst >= 0 && nPeriod > 0 )
{
float fTotal;
int i, j;
for ( i = nFirst+nPeriod-1; i < pData->m_nNumData; i++ )
{
fTotal = 0.0f;
for ( j=0; j < nPeriod; j++ ) //累加
fTotal += pValue[i-j];
pData->m_pResultBuf[i] = fTotal/nPeriod;//平均
}
return nFirst+nPeriod-1;
}
}
return -1;
/*對(duì)于逐K線模式，的處理方式的示范代碼
if(pData->m_pfParam1 && pData->m_pfParam2)
{
//對(duì)于逐K線模式，由于傳遞數(shù)據(jù)都是數(shù)值，因此需要一個(gè)數(shù)組用來保存?zhèn)鬟f過來的參數(shù)，用來計(jì)算.
//本例只是簡單演示這個(gè)用法，如果用戶在公式多次調(diào)用了接口，則會(huì)出現(xiàn)重復(fù)使用該變量導(dǎo)致計(jì)算出錯(cuò)
//因此要根據(jù)情況做幾個(gè)這種全局靜態(tài)變量用于保存各種數(shù)據(jù)。
static std::vector<double> arMaData;
//第一個(gè)周期初始化數(shù)據(jù)
if(pData->m_dwBarpos == 0)
{
arMaData.clear();
}
double dbData = *pData->m_pfParam1;
//防止使用僅刷最后K線的反復(fù)刷新問題
if(arMaData.size() >= pData->m_nNumData)
arMaData[arMaData.size()-1] = dbData; //僅僅更新最后一個(gè)數(shù)據(jù)
else
arMaData.push_back(dbData);
DWORD dwCyc = (DWORD) *pData->m_pfParam2;
if(pData->m_dwBarpos < dwCyc-1)
{
//對(duì)于未到計(jì)算周期，返回?zé)o效數(shù)據(jù)
return -1;
}
//先累加
float fAdd = 0;
for(DWORD i = pData->m_dwBarpos-(dwCyc-1); i <= pData->m_dwBarpos; i++)
{
fAdd += arMaData[i];
}
*pData->m_pResultBuf = fAdd / dwCyc;
}
return 1;*/
}
//計(jì)算多個(gè)序列的均值,5個(gè)參數(shù),參數(shù)1-4為待求多個(gè)序列,參數(shù)5用于舉例說明數(shù)值參數(shù)的用法，實(shí)際在此例中無需該參數(shù)
/*
調(diào)用方法:
MA1:=MA(CLOSE,3);
MA2:=MA(CLOSE,6);
MA3:=MA(CLOSE,12);
MA4:=MA(CLOSE,24);
MYBBI: "STOCKFUNC@MYBBI"(MA1, MA2, MA3, MA4, 4);
*/
__declspec(dllexport) int WINAPI MYBBI(CALCINFO* pData)
{
if ( pData->m_pCalcParam[0].m_nParamStart >= 0 &&
pData->m_pCalcParam[1].m_nParamStart >= 0 &&
pData->m_pCalcParam[2].m_nParamStart >= 0 &&
pData->m_pCalcParam[3].m_nParamStart >= 0 ) //4個(gè)序列都含有效數(shù)值
{
//計(jì)算返回的序列的第一個(gè)有效值位置
int nFirst = pData->m_pCalcParam[3].m_nParamStart; //已知返回的序列的第一個(gè)有效值位置與第4個(gè)序列一致
//若不知，則
/*
int nFirst = pData->m_pCalcParam[0].m_nParamStart;
if ( nFirst < pData->m_pCalcParam[1].m_nParamStart )
nFirst = pData->m_pCalcParam[1].m_nParamStart;
if ( nFirst < pData->m_pCalcParam[2].m_nParamStart )
nFirst = pData->m_pCalcParam[2].m_nParamStart;
if ( nFirst < pData->m_pCalcParam[3].m_nParamStart )
nFirst = pData->m_pCalcParam[3].m_nParamStart;
*/
const float* pValue1 = pData->m_pCalcParam[0].m_pfParam;
const float* pValue2 = pData->m_pCalcParam[1].m_pfParam;
const float* pValue3 = pData->m_pCalcParam[2].m_pfParam;
const float* pValue4 = pData->m_pCalcParam[3].m_pfParam;
int nNum = (int)(pData->m_pCalcParam[4].m_fParam); //實(shí)際上該例中已知nNum=4，在此用于說明數(shù)值參數(shù)的用法
for( int i = nFirst; i < pData->m_nNumData; i++ )
{
pData->m_pResultBuf[i] =
(pValue1[i] + pValue2[i] + pValue3[i] + pValue4[i])/nNum;
}
return nFirst;
}
return -1;
}