SupportoTecnico
Forum Admin
1261 Posts |
Posted - 18 April 2007 : 21:10:55
|
Questo piccolo esempio puņ essere usato con la finestra Trova per evidenziare una fase "UP" di un trend:
function Main() dim dVel as Numeric dim dVel1 as Numeric dim dAcc as Numeric dim dAcc1 as Numeric dim dTrend as Numeric dim dTrend1 as Numeric
dVel = Velocita(50) dVel1 = value(Velocita(50), - 1) dAcc = Accelerazione(50, 20) dAcc1 = value(Accelerazione(50, 20), - 1) dTrend = dVel - dAcc dTrend = dVel1 - dAcc1 Return ((dVel > 0) and (dAcc > 0) and (dVel > dAcc) and (dTrend > dTrend1) and (dVel > dVel1)) endfunction
Per utilizzarlo dovete anche creare 2 indicatori (Velocita e Accelerazione) nella finestra di "Gestione Indicatori Utente" in questo modo:
[Indicatore "Velocita"]
Property Periodo() as Numeric Default (0) endproperty
Function Main() Return Pic(Periodo) Endfunction
[Indicatore "Accelerazione"]
Property PeriodoPIC() as Numeric Default (0) endproperty
Property PeriodoMA() as Numeric Default (0) endproperty
Function Main() Return Pic(PeriodoPIC) - Moveav(Pic(PeriodoPIC), PeriodoMA) Endfunction
|
|