piclist 1998\12\09\181415a >
Thread: quadrature encoder
picon face BY : marbelEraseME@TakeThisOuTxs4all.nl

      Delivery Failure Report

       Your       Re: Quadrature Encoder

       was not    MCHP PicList

       because:   Router: Unable to open mailbox file
                  KILAUEA/MICROCHIP TECHNOLOGY INC. mail.box: Unable
                  to find path to server

         Reba/Microchip Technology Inc., Reba/Microchip Technology
         Inc., Reba/Microchip Technology Inc.


      To:       .....PICLISTspamBeGonespamMITVMA.MIT.EDU AT
      From:     TakeThisOuTmarbelspamBeGonespam.....XS4ALL.NL (M van der Bilt) AT
      Date:     12/08/98 02:54:00 PM
      Subject:  Re: Quadrature Encoder

      this is mij code to do quadrature encoding but shure no state
      machine I work wih mac pic so most of us will not be able to
      see the code is i
      attach it in e mail

       ; quadrature.ASM


                PIC84    equ 0x00
                PortA    equ 0x05
                PortB    equ 0x06
                Stepx    equ 0x0C
                Rightx   equ 0x00
                Countx   equ 0x0D
                Stepy    equ 0x0E
                Righty   equ 0x01
                County   equ 0x0F
                temp     equ 0x10
                temp2    equ 0x12
                F2Posi   equ 0x01
                Flags2   equ 0x11
                Xbit     equ 0x05       ; Switch adconvertor to
                Xinput PortB
                Ybit     equ 0x07       ; Switch adconvertor to
                Yinput portB

      ORG 0x05

       Table                            ; tabel to look up previous
               or next step
               addwf   PCL,f
               retlw   b'00000000'
               retlw   b'00000010'
               retlw   b'00000011'
               retlw   b'00000001'

               clrf    PortA           ;
               movlw   B'00000010'     ; make pin 2 input others
               TRIS    PortA           ; move to tristate register
               clrf    PortB           ;
               movlw   B'00000000'     ; all pin's on port B output
               TRIS    PortB           ; move to tristate register
               clrf    Stepx           ; clear step X register
               clrf    Stepy           ; clear step Y register
               clrf    TMR0            ; clear timer register
               clrf    temp            ; clear temp register
               movlw   0xff
               movwf   Countx
               movwf   County
               btfsc   PortA,F2Posi
               bsf     Flags2,F2Posi
               btfsc   PORTB,Xbit      ; test xbit= horizontal    |
               goto    RightLabel_Y    ; if lo goto y = vertical  |
               bcf     PORTB,Ybit      ; Switch Yinput off        |
               bsf     PORTB,Xbit      ; Switch Xinput on         |
               ;btfss   TMR0,7         ; this gives delay for 2.048
               ;goto    $-1
               ;clrf   TMR0
               goto    RightLabel_X

<366F0410.44757BA3@xs4all.nl> 7bit

See also: www.piclist.com/techref/io/sensors.htm?key=quadrature
Reply You must be a member of the piclist mailing list (not only a www.piclist.com member) to post to the piclist. This form requires JavaScript and a browser/email client that can handle form mailto: posts.
Subject (change) quadrature encoder

month overview.

new search...