Warum was ist denn damit?
Werde gleich mal gucken wegen der Referenzspannun.
Allerdings habe ich jetzt schon wieder ein Problem, und zwar macht er mit ne Fehlermeldung.
Setze den code mal eben an.
er schreibt was von
.equ not found, probably using function that are no supported bei the selected chip(ubrr)
und noch 3 fehlermeldungen
Code:$regfile = ""attiny13.dat " $crystal = 3686400 Config Portb = &B00001011 'Ausgangs Eingangszuweisung Set Portb.0 'Pull Up Funkzu Alias Pinb.0 'Alias Zuendung Alias Pinb.1 'alias Led Alias Portb.2 'alias Helligkeit Alias Pinb.3 'alias' Relais Ldr Alias Portb.4 'Alias Relais Alias Portb.5 'Alias Dim Licht As Integer Dim Helfer As Integer Config Adc = Single , Prescaler = Auto , Reference = Internal Start Adc Do Licht = Getadc(2) If Zuendung = 0 Then 'Abfrage ob zündung an ist If Funkzu = 1 Then 'abfrage ob das ZV signal anliegt Neustart: Set Relais If Licht < 200 Then Set Relais Ldr Print "Dunkelheit erreicht, schaltung aktiv!!!" End If 'For Helfer = 0 To 600 'If Funkzu = 1 Then Print "Zeit neu gestartet durch Funk Signal!!!" 'If Funkzu = 1 Then Goto Neustart 'Wenn ZV_Signal anliegt wieder zum Anfang springen 'Next Reset Relais Reset Relais Ldr 'rufe Sub Ausgang auf End If End If Ende: Loop End







Zitieren

Lesezeichen