Hallo,

das Programm was ich geschrieben habe war irgendwo falsch gewesen. Ausserdem gibt es in Bascom eine vie einfachere Variante der Umwandlung.

Code:
Declare Sub Write_Port
...
Write_port Dac                                              'Wertübergabe an DA Wandler
...


Sub Write_port(x As Byte)

Portd.2 = X.7
Portd.3 = X.6
Portd.4 = X.5
Portd.5 = X.4
Portd.6 = X.3
Portd.7 = X.2
Portc.1 = X.1
Portc.0 = X.0

End Sub
Das ist nur ein Auszug aus dem Programm. Du gibst also ein Wert für den DAC vor. Den Übergibst du in das Unterprogramm was dann die einzelnen Ports richtig setzt.

Hoffe das Hilft dir weiter.

cu Arno