Adx

[Qling]

Kan någon lägga upp koden för de 5 ADX linjer som visas under ADX knappen?

[Rikard Autostock]

Såg att jag missat denna, här är koden:

$par1:=14
$par2:=25
diffh=sub(h,aref(h,1))
diffl=sub(aref(l,1),l)

dmplus=if(and(gt(diffh,diffl),gt(diffh,0)),diffh,0)
dmminus=if(and(gt(diffl,diffh),gt(diffl,0)),diffl,0)

diplus=mult(100,wild(div(dmplus,atr($par1)),$par1))
diminus=mult(100,wild(div(dmminus,atr($par1)),$par1))

adx=wild(mult(100,div(abs(sub(diplus,diminus)),abs(add(diplus,diminus)))),$par1)
draw(adx,2,dwsa)
draw(diplus,3,dgsa2)
draw(diminus,4,rsa2)
draw($par2,5,msa)

add(adx,0)