Dieser Code

Code:
$regfile = "attiny2313.dat"                                 ' specify the used micro
$crystal = 8000000                                          ' used crystal frequency
$baud = 19200                                               ' 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 Portb.3 = Output

'########################## Ports deklarieren ##################################

'LED1 an PB2:
Led1 Alias Portb.2
Config Led1 = Output
'IR-LED an PB3
Config Portb.3 = Output

'######################## Variablen Deklarieren ################################
Dim Togbit As Byte
Dim Command As Byte
Dim Address As Byte



Togbit = 0
Address = 0
Command = 32

Led1 = 1
Do
   Waitms 500
   Rc5send Togbit , Address , Command
Loop

End
funktioniert bei mir ganz ausgezeichnet. Da ich keinen 1MHz zur Hand habe, musste ich auf 8MHz einstellen. Am Oszi kann man exakt die Folge der bits erkennen und auch die Trägerfrequenz von 36KHz ist zu sehen.
Ohne Config Portb.3 = Output kommt übrigens nichts.