My first Bascom project
The Elektor article mentioned in the previous post presented a simple LED blinking program as the first Bascom project. The code is shown below:
[vb]
'-----------------------------------------------------------------
'LEDblink.BAS
'-----------------------------------------------------------------
$regfile = "m328pdef.dat" 'ATmega328p
$crystal = 16000000 '16 MHz
'-----------------------------------------------------------------
Config Portb = Output
Do
Portb.5 = 1 'LED on
Waitms 500 '500 ms
Portb.5 = 0 'LED off
Waitms 500 '500 ms
Loop
[/vb]
There is just one … Continue Reading ››