incr.bas

82 sample programs written in BASCOM-8051 for 8051 developement

'--------------------------------------------------------------
'                  (c) 1997-2000 MCS Electronics
'--------------------------------------------------------------
'  file: INC.BAS
'  demo: INCR
'--------------------------------------------------------------
Dim A As Byte

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