$regfile=  "xm128a4udef.dat".
$crystal= 14745600
$hwstack = 512
$swstack = 512
$framesize = 512
$lib "xmega.lib"
$external _xmegafix_clear
$external _xmegafix_rol_r1014


Config Osc = Enabled , Pllosc = enabled , Extosc = Enabled , Range = 12mhz_16mhz , Startup = Xtal_16kclk ,PLLSOURCE=EXTCLOCK , pllmul=1


config DACb = enabled ,Io0 = Enabled ,Io1 = disabled ,INTERNAL_OUTPUT=disabled ,  Channel  =single , Reference = AVCC  , Interval  = 1  , Refresh  = 16

Config Com4 = 4800 , Mode = Asynchroneous , Parity = None , Stopbits = 1 , Databits = 8
Open "COM4:" For Binary As #4
Do
Loop Until Osc_status.3 = 1
Set Osc_ctrl.4

Config Sysclock = pll , Prescalea = 1 , Prescalebc = 1_1

Config Priority = Static , Vector = Application , Lo = Enabled       'Interrupts

On Dma_ch3 Dma_ch3_int

config DMA=enabled , DOUBLEBUF = disabled ,Cpm = Ch0123

config dmach3=enabled , burstlen = 8 ,  CHANRPT=enabled , tci = lo , eil = off , Singleshot = enabled, Sar = Burst , _
 Sam = FIXED , Dar = Transaction , Dam = Fixed , trigger = &h6e , btc = 64 , repeat = 0 , sadr=Varptr(usartd1_data) , dadr =Varptr(dacb_ch0data)

enable interrupts
do
loop

Dma_ch3_int:
If Dma_intflags.3 = 1 Then
   Set Dma_intflags.3
    set porte.0
    waitus 100
    reset porte.0
End If

return