'Branch Demonstration

'We have 5 players 0-4.  We will display each player in turn.


Player var byte 'Used to hold the current player number
Player = 0 	    'Start out as first player
 
'The main loop 
loop:
    debug ["#",dec player," "]
    Branch Player,[Mike,Joe,Fred,Bill,Jane]
    
    'Fall through because there is no player #5
    debug ["Dont know who this is.  Lets start over.",10,13,10,13]
    player = 0 'Reset to first player
    goto loop  'Now go do it again
     

'These are the branch routines
Mike:
 debug ["Mike's Turn ",13]
 Player = Player  + 1 'Get next player
 goto loop
 
Joe:
 debug ["Joe's Turn ",13]
 Player = Player  + 1 'Get next player
 goto loop
 
Fred:
 debug ["Fred's Turn ",13]
 Player = Player  + 1 'Get next player
 goto loop
 
Bill:
 debug ["Bill's Turn ",13]
 Player = Player  + 1 'Get next player
 goto loop
 
Jane:
 debug ["Jane's Turn ",13]
 Player = Player  + 1 'Get next player
 goto loop