ELSE

Top  Previous  Next

Action

Executed if the IF-THEN expression is false.

 

 

Syntax

ELSE

 

 

Remarks

You don't have to use the ELSE statement in an IF THEN .. END IF structure.

You can use the ELSEIF statement to test for another condition.

 

IF a = 1 THEN

...

ELSEIF a = 2 THEN

..

ELSEIF b1 > a THEN

...

ELSE

...

END IF

 

 

See also

IF , END IF , SELECT-CASE

 

 

Example

'-----------------------------------------------------------------------------------------

'name                     : if_then.bas

'copyright                : (c) 1995-2016, MCS Electronics

'purpose                  : demo: IF, THEN, ELSE

'micro                    : Mega48

'suited for demo          : yes

'commercial addon needed  : no

'-----------------------------------------------------------------------------------------

 

$regfile = "m48def.dat"                                   ' specify the used micro

$crystal = 4000000                                         ' 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

 

Dim A As Byte , B1 As Byte

 

Input "Number " , A                                         'ask for number

If A = 1 Then                                             'test number

Print "You got it!"

End If

 

If A = 0 Then                                             'test again

Print "Wrong"                                           'thats wrong

Else                                                       'print this if a is not 0

Print "Almost?"

End If

 

Rem You Can Nest If Then Statements Like This

B1 = 0

If A = 1 Then

If B1 = 0 Then

  Print "B1=0"

End If

Else

Print "A is not 0"

End If

 

Input "Number " , A

If A = 1 Then                                             '

Print "Ok"

Elseif A = 2 Then                                         'use elseif for more tests

Print "2" : A = 3

Elseif A = 3 Then

Print "3"

End If

 

If A.1 = 1 Then Print "Bit 1 set"                         'test for  a bit

End