decr.bas

82 sample programs written in BASCOM-8051 for 8051 developement

'--------------------------------------------------------------
'                     (c) 1997-2001 MCS Electronics
'--------------------------------------------------------------
'  file: DECR.BAS
'  Demo: DECR
'--------------------------------------------------------------
Dim A As Byte

A = 5                                   'assign value to a
Decr A                                  'decrease (by one)
Print A                                 'print it
End