Averages/Simple moving average: Difference between revisions

Content added Content deleted
m (→‎{{header|360 Assembly}}: Superfluous blanks suppressed)
Line 66: Line 66:
STH R7,N n=i
STH R7,N n=i
XDECO R7,C i
XDECO R7,C i
MVC MVC+1(5),C+7
MVC BUF+1(5),C+7
MVC P,=H'3' p=3
MVC P,=H'3' p=3
BAL R14,SMA
BAL R14,SMA
MVC C(13),EDMASK
MVC C(13),EDMASK
ED C(13),SS sma(3,i)
ED C(13),SS sma(3,i)
MVC MVC+7(11),C+2
MVC BUF+7(11),C+2
MVC P,=H'5' p=5
MVC P,=H'5' p=5
BAL R14,SMA
BAL R14,SMA
MVC C(13),EDMASK
MVC C(13),EDMASK
ED C(13),SS sma(5,i)
ED C(13),SS sma(5,i)
MVC MVC+19(11),C+2
MVC BUF+19(11),C+2
XPRNT MVC,30 output i,sma3,sma5
XPRNT BUF,30 output i,sma3,sma5
LA R7,1(R7)
LA R7,1(R7)
B LOOP
B LOOP
Line 120: Line 120:
N DS H
N DS H
C DS CL16
C DS CL16
MVC DC CL30' '
BUF DC CL30' ' buffer
EDMASK DC X'4020202020202021204B202020' CL13
EDMASK DC X'4020202020202021204B202020' CL13
YREGS
YREGS
Retrieved from "https://rosettacode.org/wiki/Averages/Simple_moving_average"