mirror of
https://github.com/alsa-project/alsa-tools.git
synced 2025-11-05 13:29:59 -05:00
30 lines
303 B
NASM
30 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
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|