10 ; DIV2LSR.SRC›20 ; DIVIDING BY 2 USING LSR›30 ;›40 VALUE1=$C0›50 VALUE2=$C1›60 ;›70  *=$0600›80 ;›90  LDA #6›0100  STA VALUE1›0110 ;›0120  LDA VALUE1›0130  LSR A›0140  STA VALUE2›0150  .END››