;;;                                                                                                                                
stack: equ $1ff0
ymcontrol: equ $4000
ymdata: equ $4001

    ld sp, stack

    ld a, $0

    ld ix, $4000

    ld (ix), $2B
    ld (ix+1), $FF

    ld (ix), $2A
redo:
    ld hl, sine
    ld a, $FF
loop:
    ld b, (hl)
    ld (ix+1), b
    inc hl
    dec a
    jp z, redo
    jp loop
sine:
    incbin "sine.bin"    