how to program Farley's accumulation distribution accelerator? (see EL code)

[suedeuno]

here is the easy language:

variables:
F1( 0 ),
F2( 0 ),
ADA( 0 ),
F3( 0 );
F1 = LWAccDis - LWAccDis[1];
F2 = @XAverage(F1,14);
ADA = @XAverage(F2,7);
F3 = 0;
Plot1( ADA, "ADA" ) ;
Plot2(F3);