Holtek Encoder HT6P20


Results 1 to 22 of 22

Threaded View

  1. #1
    Join Date
    Jul 2005
    Posts
    6

    Default Holtek Encoder HT6P20

    Hello for everybody.

    My name is Carlos, and I writing from Brazil.
    This is my first time in this forum, and I would like to anticipate my excuses for my poor English.

    Well, my problem is:
    How can I decode the HT6P20B of efficient form with PBP?

    Certain time, I used the code below to decode the HT12E, but this code is very slow and not very efficient, and the HT6P20B has more code bits that the HT12E .




    '------------
    'Variables

    IRCONT VAR BYTE
    BITVALUE VAR BYTE
    DEVICECODE VAR BYTE
    DEVICEDATA VAR BYTE
    IRIN VAR PORTA.1


    '------------------
    LEIR:

    DEVICECODE = 0
    DEVICEDATA = 0

    BITVALUE = 0
    PULSIN IRIN,0,BITVALUE

    IF BITVALUE > 150 THEN

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICECODE.7 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICECODE.6 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICECODE.5 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICECODE.4 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICECODE.3 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICECODE.2 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICECODE.1 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICECODE.0 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICEDATA.0 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICEDATA.1 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICEDATA.2 = BITVALUE

    BITVALUE = 0
    PULSIN IRIN,1,BITVALUE
    GOSUB TESTABIT
    DEVICEDATA.3 = BITVALUE

    ENDIF

    RETURN

    '-------------
    TESTABIT:

    IF BITVALUE > 60 THEN
    BITVALUE = 0
    ELSE
    BITVALUE = 1
    ENDIF

    RETURN
    '--------------


    Thank you, and again, sorry for my english.

    Carlos
    Last edited by picdev; - 25th July 2005 at 23:03.

Similar Threads

  1. Quadrature encoder and ASM Interrupts. questions..
    By godfodder in forum mel PIC BASIC Pro
    Replies: 10
    Last Post: - 17th March 2013, 15:45
  2. Instant Int and encoder (Elect. Gearing)
    By boroko in forum mel PIC BASIC Pro
    Replies: 13
    Last Post: - 29th November 2009, 03:29
  3. encoder HEDL 5540
    By kutsi in forum mel PIC BASIC Pro
    Replies: 3
    Last Post: - 11th June 2007, 15:00
  4. Holtek - HT6012 Encoder
    By ero in forum mel PIC BASIC Pro
    Replies: 4
    Last Post: - 9th March 2006, 14:02
  5. encoder wowes
    By wallaby in forum mel PIC BASIC Pro
    Replies: 16
    Last Post: - 6th December 2005, 22:56

Members who have read this thread : 1

You do not have permission to view the list of names.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts