Nachfrage zum Bascom und einen ATtiny13 Programieren

'Johnny Halsband
$regfile = "attiny13.dat"
$hwstack = 32
$swstack = 10
$framesize = 40






Portb = &B010000
Waitms 250


Portb = &B001000
Waitms 250


Portb = &B000100
Waitms 250


Portb = &B000010
Waitms 250


Portb = &B000001
Waitms 100


Portb = &B000001
Waitms 250


Portb = &B000010
Waitms 250


Portb = &B000100
Waitms 250


Portb = &B001000
Waitms 250


Portb = &B010000
Waitms 100




End

$regfile = "attiny13.dat"
$crystal = 4000000                                      	' Stack nicht initialisieren'$hwstack = 32                                          	' Stackinitialisierung wird durch $TINY unterdrückt
$swstack = 0                                            	' Software 0
$framesize = 0                                          	' Framesize = 0


Config Portb = Output


Portb = &B00010110
Waitms 30


Portb = &B00000000
Waitms 5


Portb = &B00001101
Waitms 10


Portb = &B00000000
Waitms 5


Portb = &B00011101
Waitms 30


Portb = &B00000000
Waitms 5


Portb = &B00001011
Waitms 30


Portb = &B00000000
Waitms 5


Portb = &B00010001
Waitms 30


Portb = &B00010101
Waitms 10


Return