AD-Wandler im 2333

Hier ist ein Beispiel mit BASCOM-AVR:

'--------------------------------------------------------------------
'                  ADC.BAS
'  demonstration of GETADC() function for 8535 micro
'--------------------------------------------------------------------
'configure single mode and auto prescaler setting
'The single mode must be used with the GETADC() function

'The prescaler divides the internal clock by 2,4,8,15,32,64 or 128
'Because the ADC needs a clock from 50-200 KHz
'The AUTO feature, will select the highest clockrate possible
Config Adc = Single , Prescaler = Auto
'Now give power to the chip
Start Adc

'With STOP ADC, you can remove the power from the chip
'Stop Adc

Dim W As Word , Channel As Byte

Channel = 0
'now read A/D value from channel 0
Do
  W = Getadc(channel)
  Print "Channel " ; Channel ; " value " ; W
  Incr Channel
  If Channel > 7 Then Channel = 0
Loop
End

Das hat ihm wohl richtig geholfen :-)

Wie viel kostet der Atmel-2333 jetzt und wo kann ich ihn bekommen?

Der 2333er wird nicht mehr hergestellt, entweder 4433er oder atmega8
verwenden.

Gruß
Roland