-
-
Erfahrener Benutzer
Fleißiges Mitglied
$regfile = "attiny2313.dat" ' specify the used micro
$crystal = 3686400 ' used crystal frequency
$baud = 9600 ' use baud rate
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space
Config Serialout = Buffered , Size = 10
Config Com1 = Dummy , Synchrone = 0 , Parity = Even , Stopbits = 1 , Databits = 8 , Clockpol = 0
'setup to use a serial output buffer
'and reserve 20 bytes for the buffer
'Config Serialout = Buffered , Size = 10
'It is important since UDRE interrupt is used that you enable the interrupts
Enable Interrupts
'Print "Hello world"
'Print "test1"
Do
Wait 10
'notice that using the UDRE interrupt will slown down execution of waiting loops like waitms
' Print "test"
Udr = &H03
Until Ucsra.udre = 1
Loop
End
Danke für die Info,aber da ich ein Anfanger bin,kannst du vielleicht
im Programm andern.Die variante mit dem unterprogramm.
Dank im vorraus
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- Anhänge hochladen: Nein
- Beiträge bearbeiten: Nein
-
Foren-Regeln
Lesezeichen