Stromquelle mit Atmega8

    Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

    Aufgrund technischer Veränderungen ist der Mailverkehr innerhalb des Forums (Private Nachrichten) nur noch eingeschränkt möglich. Die Einschränkung ist notwendig, um zusätzliche Betriebskosten für das Forum zu vermeiden. Näheres zu den Hintergründen im Thread "Aktuelles zum Forum".Wir bitten um Verständnis.

    Hinweis kann nach Kenntnisnahme deaktiviert werden!

    • Stromquelle mit Atmega8

      Amigos una cálida bienvenida

      He creado un pequeño programa en Bascom avr con ATmega8A, para la medición de la tensión, pero en la simulación en Proteus Mide sólo hasta 19.9Vdc y LM 317 regulador regula sólo hasta 27VCC, y la tensión restante no se muestra
      El divisor de voltaje tiene una resistencia de 10K paralelo e inédito Zener de 5V a Gnd.
      ¿Puedes verificar si mi programa es correcto para medir hasta 30Vdc o es un error del divisor de voltaje?
      Espero que me puedas ayudar y gracias

      Jose (

      $ regfile = "m8adef.dat"

      $ crystal = 4000000

      Config Lcd = 16 * 2
      Config Lcdbus = 4
      Config = LcdPin Pin, Db4 = PORTB.0, Db5 = PORTB.1, Db6 = Portb.2, Db7 = Portb.3, Rs = PortB.4, E = Portb.5
      Dim Volt As Single
      Dim Volt1 como Single
      Dim V como cadena * 4
      Dim Aux1 As Word
      Config Adc = Single, Prescaler = Auto, Referencia = Avcc
      Comience adc

      Do
      cls
      Ubica 1, 1
      LCD "FUENTE DE ALIMENTACIÓN"
      Aux1 = Getadc (0)
      Volt = Aux1 * 5
      Voltios = voltios / 1024
      Volt1 = voltios * 4
      V = fusión (volt1, "#. #")
      Localiza 2, 2
      Lcd "Vdc ="; V; "V"
      Waitm 600
      Loop
      Dateien

      Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von jose_628a ()

    • Freunde herzlich willkommen


      Ich habe in Bascom avr mit ATmega8A ein kleines Programm zur Spannungsmessung erstellt, aber in der Simulation in Proteus Measures regelt nur bis zu 19.9Vdc und LM 317 Controller nur bis zu 27VDC, und die verbleibende Spannung wird nicht angezeigt.
      Der Spannungsteiler hat einen 10K parallelen und beispiellosen Zenerwiderstand von 5V bis Gnd.
      Können Sie überprüfen, ob mein Programm korrekt ist, um bis zu 30Vdc zu messen, oder ist es ein Spannungsteilerfehler?
      Ich hoffe, Sie können mir helfen und danke.



      Übersetzt mit DeepL.com/Translator
      Komisch:Dauernd hängt sich mein Rechner auf, meine Wäsche macht das nie
    • Aus meiner Sicht ist der Spannungsteiler falsch. Wenn an der Anzapfung 5V anstehen kann, dann können am Eingang nur 20V anliegen. Pro 10k Widerstand 5V Spannungsabfall. Also bei 30V Messbereich noch 2x 10k vorschalten.
      Raum für Notizen

      -----------------------------------------------------------------------------------------------------

      -----------------------------------------------------------------------------------------------------
    • Ergänzter und geänderter Code.

      BASCOM-Quellcode

      1. $regfile = "m8def.dat"
      2. $crystal = 4000000
      3. $hwstack = 100 'ergänzt
      4. $swstack = 100 'ergänzt
      5. $framesize = 100 'ergänzt
      6. Config Lcdpin = Pin , Db4 = Portb.0 , Db5 = Portb.1 , Db6 = Portb.2 , Db7 = Portb.3 , E = Portb.5 , Rs = Portb.4 'geändert
      7. Config Lcd = 16 * 2
      8. Cursor Off , Noblink 'ergänzt
      9. Cls 'ergänzt
      10. Dim Volt As Single
      11. Dim Volt1 Como Single
      12. Dim V como cadena * 4
      13. Dim Aux1 As Word
      14. Config Adc = Single, Prescaler = Auto, Referencia = Avcc
      15. Start Adc 'geändert
      16. Do
      17. cls
      18. Ubica 1, 1
      19. LCD "FUENTE DE ALIMENTACIÓN"
      20. Aux1 = Getadc(0)
      21. Volt = Aux1 * 5
      22. Voltios = voltios / 1024
      23. Volt1 = voltios * 4
      24. V = fusión (volt1, "#. #")
      25. Localiza 2, 2
      26. Lcd "Vdc ="; V; "V"
      27. Waitm 600
      28. Loop
      Alles anzeigen
    • 1.Ich hatte meinen Verdacht, dass der Spannungsteiler die Ursache sein würde, wie kann ich das lösen, mein Freund? und danke, dass du mir has geholfen


      2: Dieses Forum richtet sich an Benutzer, die die bascom avr-Lizenz erworben haben

      3:Das Programm wurde korrigiert und danke

    • Berndt WischnewskiRichard-Wagner-Str. 4910585 Berlin
      Tel.: 030 - 3429075FAX : 030 34704037email: webmaster@peacesoftware.de

      [email=peacesoftware Berndt Wischnewski Richard-Wagner-Str. 49 10585 Berlin Tel.: 030 - 3429075 FAX : 030 34704037 email: webmaster@peacesoftware.de Einige ingenieurwissenschaftliche Werte online english Online Berechnung eines Spannungsteilers: Geben Sie die bekannten Werte ein. Mindestens eine der beiden Spannungen muß vorgegeben werden: Spannung U1: Volt Spannung U2: Volt R1: Ω R2: Ω Rges: Ω Widerstandsreihe: Parallel/Serienschaltung für R1 zulassen Parallel/Serienschaltung für R2 zulassen Input: U1: 20 Volt U2: 5 Volt R1: 10000 Ω Widerstandsreihe: 12 R2 seriell/parallel Output: R1: 10000 Ω Abweichung: 0 % R2 berechnet: 3330; Seriell: R2_1: 3300 Ω, R2_2: 33 Ω R2ges: 3330 Ω Rges: 13300 Ω]mailto:peacesoftware Berndt Wischnewski Richard-Wagner-Str. 49 10585 Berlin Tel.: 030 - 3429075 FAX : 030 34704037 email: webmaster@peacesoftware.de Einige ingenieurwissenschaftliche Werte online english Online Berechnung eines Spannungsteilers: Geben Sie die bekannten Werte ein. Mindestens eine der beiden Spannungen muß vorgegeben werden: Spannung U1: Volt Spannung U2: Volt R1: Ω R2: Ω Rges: Ω Widerstandsreihe: Parallel/Serienschaltung für R1 zulassen Parallel/Serienschaltung für R2 zulassen Input: U1: 20 Volt U2: 5 Volt R1: 10000 Ω Widerstandsreihe: 12 R2 seriell/parallel Output: R1: 10000 Ω Abweichung: 0 % R2 berechnet: 3330; Seriell: R2_1: 3300 Ω, R2_2: 33 Ω R2ges: 3330 Ω Rges: 13300 Ω[/email]

      Dieser Beitrag wurde bereits 8 mal editiert, zuletzt von ftelektro ()

    • jose_628a schrieb:

      Ich hatte meinen Verdacht, dass der Spannungsteiler die Ursache sein würde, wie kann ich das lösen
      Wenn du bis 30V messen möchtest, dann brauchst du einen Spannungsteiler, der bei 30V dann 5V als Ausgang hat. Dazu kannst du 6 Widerstände mit je 10kOhm in Reihe schalten und am Widerstand zu Gnd hin liegen dann die 0..5V an, die du dann mit dem AVR messen kannst.
      Spannungsteiler.PNG
      Das Programm musst du aber auch anpassen:

      BASCOM-Quellcode

      1. $regfile = "m8def.dat"
      2. $crystal = 4000000
      3. $hwstack = 100 'ergänzt
      4. $swstack = 100 'ergänzt
      5. $framesize = 100 'ergänzt
      6. Config Lcdpin = Pin , Db4 = Portb.0 , Db5 = Portb.1 , Db6 = Portb.2 , Db7 = Portb.3 , E = Portb.5 , Rs = Portb.4 'geändert
      7. Config Lcd = 16 * 2
      8. Cursor Off , Noblink 'ergänzt
      9. Cls 'ergänzt
      10. Dim Volt As Single
      11. Dim Volt1 Como Single
      12. Dim V como cadena * 4
      13. Dim Aux1 As Word
      14. Config Adc = Single, Prescaler = Auto, Referencia = Avcc
      15. Start Adc 'geändert
      16. Do
      17. cls
      18. Ubica 1, 1
      19. LCD "FUENTE DE ALIMENTACIÓN"
      20. Aux1 = Getadc(0)
      21. Volt = Aux1 * 5
      22. Volt = volt / 1024
      23. Volt = volt * 6
      24. V = fusión (volt, "#. #")
      25. Localiza 2, 2
      26. Lcd "Vdc ="; V; "V"
      27. Waitms 600
      28. Loop
      Alles anzeigen
      Raum für Notizen

      -----------------------------------------------------------------------------------------------------

      -----------------------------------------------------------------------------------------------------
    • jose_628a schrieb:

      Im Lcd blinkt die Nachricht sehr
      der Befehl cls löscht das display jedes mal. Das brauchst du nur, wenn etwas komplett anderes dargestellt werden soll. Also setze den Befehl cls vor das do in deinem Programm.
      Raum für Notizen

      -----------------------------------------------------------------------------------------------------

      -----------------------------------------------------------------------------------------------------