loop1: jb     keypress,loop1
       lcall  wait_500ms
       jb     keypress,routine1
       lcall  wait_500ms
       jb     keypress,routine2