mirror of
https://github.com/alsa-project/alsa-tools.git
synced 2025-10-29 05:40:25 -04:00
29 lines
303 B
NASM
29 lines
303 B
NASM
name "Sine wave Gen"
|
|
include "emu_constants.asm"
|
|
|
|
in io
|
|
out equ in
|
|
|
|
|
|
delta control $3afa691,0,$7fffffff ; controls frequency
|
|
|
|
|
|
cosx control #1,0,#1 ; amplitude of sinewave
|
|
sinx sta 0
|
|
|
|
|
|
|
|
macs sinx,sinx,delta,cosx
|
|
macs1 cosx,cosx,delta,sinx
|
|
macmv out,cosx,C_0,C_0
|
|
|
|
|
|
end
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|