Addressing ports via offset using lookup command


Closed Thread
Results 1 to 11 of 11
  1. #1
    Join Date
    Feb 2012
    Location
    PERTH AUSTRALIA
    Posts
    838

    Default Addressing ports via offset using lookup command

    HI GUYS ,

    Hendrik some time ago showed a little trick where by port may be accessed via the lookup command using an offset

    This works because most of the ports are usually memory mapped sequentially from the base port of portA.0

    How ever if they are not can the other ports not in memory sequence be addressed in this manor , if so how ?

    cheers

    sheldon



    example chip 16f1947 has ports A-G
    portA.0 - portE.7 are arranged in memory

    Memloc - Port - Lookup offset value from portA
    00Ch port A.0-7 , 0-7
    00Dh port B.0-7 . 8-15
    00Eh Port C.0-7 , 16-23
    00Fh Port D.0-7 , 24-31
    010h Port E.0-7 , 32-39

    28Ch Port F.0-7 , ???
    28Dh Port G0.5 , ????


    As such ports A- E can be used in lookup command like this

    Code:
    For  T =  0 to 10                                     ' Select 10 ports for Pulses 
           LOOKUP T, [1,1,2,4,5,16,17,18,19,20,21],PortOffset   ' Offsets from Port A to point to PortA & PortsC ( value of offset relates to Port bits in mem map of chip)
    next T

  2. #2
    Join Date
    Oct 2005
    Location
    Sweden
    Posts
    3,580


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    Since PortA is at 00Ch and PortF is at 28Ch the "distance" between them would be 28Ch - 00Ch = 280h or 640 in decimal.

    Now, LOOKUP can only retrieve 8bit values from its table so it's not going to work. You'll have to use LOOKUP2.
    Next possible issue is that the registers for Ports F and G are not in the same bank as those for Ports A-E so I'm not sure it's work....

    /Henrik.

  3. #3
    Join Date
    Feb 2012
    Location
    PERTH AUSTRALIA
    Posts
    838


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    well it compiles ,after making the change to lookup2 , and portoffset to a word variable

    but ill have to wait for the pcbs to arrive to test it

    cheers hendrick

  4. #4
    Join Date
    Jul 2003
    Location
    Colorado Springs
    Posts
    4,959


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    When you are using the "Bit Offset from Port" method, it is using "BIT Array" operations internally.

    BIT array's have a limit of 256 elements.
    Giving it a WORD sized offset will not work.

    It will compile using a WORD, but it will only use the LowByte of that value.
    DT

  5. #5
    Join Date
    Feb 2012
    Location
    PERTH AUSTRALIA
    Posts
    838


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    ok thanks darrel is there another coding method to solve this

    Code:
     T = 0                                                  ' Ensure 0
     
           For  T =  0 to 10                                    ' Select IR LED for Pulses 
             LOOKUP2 T, [32,32,33,34,35,36,37,38,39,640,641],PortOffset   ' Offsets from Port A to point to PortE(32- 39) & PortsF (640,641) ( value of offset relats to Port bits in mem map of chip)
                Cycles = 0                                    ' Set to 0
            
             if  T = 0  then
                Pulse_cnt = 38                                 ' add 1ms(adj) Header pause ( pulse on time ) before start of IR1 only so to show its the its the Start of the scan  
               else 
                Pulse_cnt = Pulsetmp                           ' restore value  set from Volts get routin when changed by pulse T = 0 
             endif                                             ' add 1ms(adj) Header pause ( pulse on time ) before start of IR1 only so to show its the its the Start of the scan    
           
            for Cycles = 1 to Pulse_cnt                        ' Set base pulse count cycles for IR lEDs ( 9 x 26uS) -17us = 217us  
                      PORTA.0[PortOffset] = 1                  ' Set IR LED High
                      pauseus 2                                ' Remain on for 9uS  (adj)
                      PORTA.0[PortOffset] = 0                  ' Set IR LED Low
                      pauseus 9                                ' remain off for 17uS  ( adj)
            next Cycles 
          
           pauseus Pulse_off                                   ' Wait 300us (Adj 276) between pulse bursts and selecting next IR LED 
          Next T

  6. #6
    Join Date
    Sep 2009
    Posts
    754


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    You can offset from PORTE or PORTF.
    For example:
    Code:
           for Cycles = 1 to Pulse_cnt                        ' Set base pulse count cycles for IR lEDs ( 9 x 26uS) -17us = 217us
                      IF T<9 THEN
                          PORTE.0[PortOffset] = 1                  ' Set IR LED High
                          pauseus 2                                ' Remain on for 9uS  (adj)
                          PORTE.0[PortOffset] = 0                  ' Set IR LED Low
                          pauseus 9                                ' remain off for 17uS  ( adj)
                      ELSE
                          PORTF.0[PortOffset] = 1                  ' Set IR LED High
                          pauseus 2                                ' Remain on for 9uS  (adj)
                          PORTF.0[PortOffset] = 0                  ' Set IR LED Low
                          pauseus 9                                ' remain off for 17uS  ( adj)
                      ENDIF
            next Cycles
    And you need 2 lookup tables, one for PORTE another for PORTF.

  7. #7
    Join Date
    Jul 2003
    Location
    Colorado Springs
    Posts
    4,959


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    Treat them as if all the ports were contiguous.

    A = 0-7
    B = 8-15
    C = 16-23
    D = 24-31
    E = 32-39
    F = 40-47
    G = 48-55

    Then if the offset is greater than 39 ... change the port that it offsets from, and subtract 40 from the offset.
    Code:
    IF PortOffset < 40 THEN
        PORTA.0(PortOffset) = 1
    ELSE
        PORTF.0(PortOffset-40) = 1
    ENDIF
    DT

  8. #8
    Join Date
    Feb 2012
    Location
    PERTH AUSTRALIA
    Posts
    838


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    thanks guys ,
    darrel i did not think to treat them as contiguous when they are not , but by changing the start port solves that issue

    the extra if then ,else commands , may cause some delays in the timing ill have to see the output it creates to check it

    cheers sheldon

  9. #9
    Join Date
    Jul 2003
    Location
    Colorado Springs
    Posts
    4,959


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    Quote Originally Posted by longpole001 View Post
    the extra if then ,else commands , may cause some delays in the timing ill have to see the output it creates to check it
    Ha! That's funny.

    By using a PORT offset to begin with, it's doing "Array" operations that will take more time than a simple BYTE comparison and subtraction.

    The comparison takes 4 cycles if true, 5 if false.
    The subtraction takes 4 cycles if >= 40.

    The array operation takes ... 30 instruction cycles.
    DT

  10. #10
    Join Date
    Feb 2012
    Location
    PERTH AUSTRALIA
    Posts
    838


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    if you can recommend a better way to do it , please show , as it worked not aware of better way when i started to do it

  11. #11
    Join Date
    Feb 2012
    Location
    PERTH AUSTRALIA
    Posts
    838


    Did you find this post helpful? Yes | No

    Default Re: Addressing ports via offset using lookup command

    because the on and off time is short , normally would need to do it in assembler , but my asm sucks and need to learn more for sure , even more so when multi ports have to be addressed , this seemed to work ok and is still likely to as you say its only a few more cycles , and i still have pauses in this routine anyway, which can be removed

Similar Threads

  1. PicBasic Lookup command
    By queenidog in forum mel PIC BASIC
    Replies: 15
    Last Post: - 18th June 2016, 21:54
  2. 10bit ADC with offset on 16F88
    By Amoque in forum mel PIC BASIC Pro
    Replies: 4
    Last Post: - 1st April 2012, 16:11
  3. DS1820 Negative Numbers and OffSet
    By gadelhas in forum mel PIC BASIC Pro
    Replies: 5
    Last Post: - 23rd April 2011, 22:53
  4. dt int timer1 ignores offset value
    By DDDvvv in forum mel PIC BASIC Pro
    Replies: 14
    Last Post: - 15th June 2010, 10:53
  5. Offset to variable howto ?
    By RFsolution in forum mel PIC BASIC Pro
    Replies: 18
    Last Post: - 3rd October 2008, 10:36

Members who have read this thread : 0

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