UNIVERSIDAD POLITECNICA SALESIANA Conversión digital analógica DAC program DAC sub procedure init trisd=0 end sub dim i as byte dim j as byte dim a as byte a=0 i=0 main: init while true a=0 i=0 j=0 for i=0 to 255 a=a+1 portd=a next i wend end.
program DAC sub procedure init trisd=0 end sub dim i as byte dim j as byte dim a as byte a=0 i=0 main: init while true a=0 i=0 j=0 for i=0 to 255 a=a-1 portd=a next i for i=0 to 254 a=a+1 portd=a next i wend end.