| Re: Wert von Analogeingang auf Display anzeigen Kategorie: CC-Pro Unit & Appl.Board (von uwe - 20.11.2006 23:32) | ||
| Als Antwort auf Wert von Analogeingang auf Display anzeigen von Christoph - 8.11.2006 11:35 | ||
| ||
|
' Hauptprogramm Dim ADC_Wert, ADC_Wert_alt As Word Dim ADC_Spg As Single Dim text(8), textx As Char Dim channel As Integer Sub main() LCD_Init() ' Display initialisieren LCD_ClearLCD() ' Display löschen LCD_CursorOff() ' Display Cursur ausschalten Do While 1 LCD_CursorPos(0) LCD_ClearLCD() channel=0 Do ADC_Set(ADC_VREF_VCC,channel) ADC_Wert = ADC_Read() ' // Werte von 0 - 1023 ADC_Spg = (ADC_Wert*4.927)/1000' // VCC 5.045V / 1024 = 4.927 Str_WriteFloat(ADC_Spg, 2, text, 0) ' // ADC_Spg in einen String umwandeln LCD_CursorOff() ' Display Cursur ausschalten LCD_CursorPos(0x00)' LCD_WriteText(text)' LCD_WriteChar(0x56)' // " V " ADC_Wert_alt = ADC_Wert' AbsDelay(300) ' Verzögerung um 300ms channel=channel+1 Loop While channel<1 End While End Sub Ich habe das am Conradboard mit Erfolg an AD Eingang 0 getsetet. Zur besseren Verwendung von ATMEL Prozessoren empfehle ich: STK500 Board ca 80� BASCOM Basic ca 90� oder Freeware das Buch: Programmieren der AVR RISC Mikrocontroller mit BASCOM-AVR ISBN:3-907857-04-6 | ||
Antwort schreiben Antworten: | ||
Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum