The EXT (external) modifier.


Closed Thread
Results 1 to 20 of 20

Hybrid View

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

    Default The EXT (external) modifier.

    Here's a subject where RTFM does NOT apply.
    In fact, the only place the PBP manual even mentions it is in the Reserved Words (Appendix C).

    The EXT modifier for Variables and Constants can solve many problems that seem impossible otherwise. It can save TONs of code space in certain situations. And, it can also confuse the hell out of you if you're not sure how it works. Hopefully this will help with the latter part.

    EXT's only function is to tell PBP that it doesn't need to figure out where a Variable is located, or what a Constant's value is. Because it will be handled in ASM at compile time. And, since PBP doesn't "Lock it in" we can change it to anything we want later on, even in the middle of the program if need be.

    Using EXT with Constants
    Using EXT with Labels
    Using EXT with Variables
    Typecasting Variables inside of Arrays
    Arrays within Arrays
    Limitations of EXT



    Using EXT with Constants

    @MyConstant = 1234h    ;no space between @ and Name
    MyConstant CON EXT
      ... is exactly the same as ...

    MyConstant  CON  $1234
    However, by using the EXT modifier you can change it at any point in the program. And, you can use the Power of a 32-bit assembler to calculate what those values should be.

    For instance, if you wanted to select a constant to be loaded in a timer on each interrupt depending on the crystal being used, you might do something like this
    Code:
    TimerConst  CON EXT
    
    ASM
      IF OSC == 4                       ; Constants for 100hz interrupt from Timer1
    TimerConst = 0D8F7h                 ; Executed at compile time only
      EndIF
      If OSC == 8
    TimerConst = 0B1E7h
      EndIF
      If OSC == 10
    TimerConst = 09E5Fh
      EndIF
      If OSC == 20
    TimerConst = 03CB7h
      EndIF
    ENDASM
    Or, you could let the assembler do the math ...
    Code:
    TimerConst  CON EXT
    Freq        CON 100
    @TimerConst = 65543-(OSC*1000000/4/_Freq) ; 100hz Constant for Timer1 reload
    Either way it does not use any program space in the pic. It's all done at "Compile Time".


    Using EXT with Labels ...

    One of best uses of EXT is to find out the Address of ANYTHING (that's already been declared) in the program.

    To the assembler, Variables, Constants and Labels are all the same thing. Numbers! It's how those numbers get used that makes the difference.

    A Constant is just a number.
    A variable is a number that represents the Address of a Ram location.
    And a Label is a number that represents the Address of a location in Program Space.


    So any of these items can be assigned to a constant for PBP.

    In this example, a list of 14-bit WORD values can be created in a lookup "Table".
    With DataTable defined as an "External" constant, it will be assigned the Address of the Label with the same name. This allows you to easily locate items stored in Program memory.
    Code:
    DataWord  VAR  WORD
    Offset    VAR  WORD
    DataTable CON  EXT
    
    '-----[The DATA table]--------------------------------------------------------
    GOTO OverData             ; Make sure data doesn't try to execute
    ASM
    DataTable
        DW  1234h, 2178h      ; etc.
    endasm
    OverData:
    
    '-----[Retrieve from DATA table]----------------------------------------------
    Offset = 1
    ReadCODE  (DataTable + Offset), DataWord
    
    LCDOUT  $FE, 1, HEX4 DataWord
    Or for 16-bit WORDS on an 18F, use this ReadCODE statement.
    Code:
    ReadCODE  (DataTable + (Offset<<1)), DataWord
    Absolutely HUGE tables can be created in a small fraction of the space used by LOOKUP2.

    Note: Only PIC chips that can access their own Flash memory can use ReadCODE.
          And, DW only works properly in MPASM, not PM.
    (thanks BigWumpus).


    Using EXT with Variables ...

    @MyVar = 20h
    MyVar VAR BYTE EXT
      ... is similar to ...

    MyVar   VAR  BYTE $20
    With the exception that PBP doesn't know about it.   Reading or writing to the EXT MyVar will use the RAM location at $20, but PBP will assign another variable there since it doesn't know about it yet.   So trying to use EXT to create NEW variables is pretty much useless.  
    However, using EXT to create variables that reference other variables, or other RAM/SFR locations, is Priceless.

    This example shows how to use a 16-bit timer value as if it were just another word.
    Code:
    @Timer1 = TMR1L
    Timer1  VAR  WORD EXT
    With that, and the TimerConst example shown above. Re-Loading the timer is as simple as this ...
    Code:
    T1CON.0 = 0  ; stop timer
    Timer1 = Timer1 + TimerConst
    T1CON.0 = 1  ; turn timer back on
    You should stop the timer before reading or writing it's value, or it might overflow in-between the Low and High bytes.
    Note: Do NOT enable RD16 when using a Timer value as a WORD. (T?CON.7) (Thanks Bruce!)
    On an 18F, Timer0 is always RD16. You cannot use Timer0 as a WORD value.

    Another example along the same lines ...
    Code:
    @Capture = CCPR1L
    Capture   VAR  WORD EXT
    Then the whole capture value can be used as a Word variable.

    But here's the good stuff.


    Typcasting Variables inside of Arrays

    Using the EXT modifier, you can create combinations of Word and Byte variables that point to locations inside of Array variables.

    Let's say that you received a "Packet" of information from some other device using the STR function of HSERIN. But the problem is that it's not all byte sized data, even though it was stored in a byte-sized array.
    It's received 8 bytes and you need to separate them into different WORD and BYTE sized variables.

     01  AE  7A  8B  00  00  10  2C
    \ / \ / \ /
    Arg0 Arg1 Arg2 Arg3 Arg4
    WORD BYTE WORD WORD BYTE


    With a few EXTernal variables, you can Parse the entire Packet, without a single WORD of program space.
    Code:
    MyArray  VAR BYTE[8] BANK0
    ASM
    Arg0 = _MyArray        ; word
    Arg1 = _MyArray + 2    ; byte
    Arg2 = _MyArray + 3    ; word
    Arg3 = _MyArray + 5    ; word
    Arg4 = _MyArray + 7    ; byte
    ENDASM
    
    Arg0   VAR  WORD  EXT
    Arg1   VAR  BYTE  EXT
    Arg2   VAR  WORD  EXT
    Arg3   VAR  WORD  EXT
    Arg4   VAR  BYTE  EXT
    Now you simply read the Packet into the Array, and each Arg variable will have the correct value in it. This is also much quicker to run, since it doesn't need to do all the Array indexing that PBP would normally do.

    If there are multiple types of packets being received, you can just create another set of variables pointing to the same Array space, with different combinations of bytes and words. Since they don't use any program space, you can make as many as you want.   Sure beats using 4 or 5 different HSERIN statements for the different packet types.

    And of course, it works the other way too. By setting the Arg variables first, you can easily SEND the "pre-formatted" packet with the STR function.

    If you get an "Unable to fit variable ____ in requested bank x" warning, change the BANK0 modifier to BANK1 or another bank that has room.
    The entire array must be in a single bank for this technique to work. (Thanks Charles_Leo)


    Limitations of EXT

    Since the value of an EXTernal constant/variable/label isn't known until the program is being Assembled. PBP cannot use the values itself.
    Code:
    @MyConstant = 1234h
    MyConstant  CON  EXT
    
    AnotherCON  CON  MyConstant + 100  ; This will fail
    
    MyArray  VAR BYTE[MyConstant]      ; This will fail
    Both of the lines above will fail since PBP needs to know what the value is for those statements when it's compiling. But they won't be known till it's assembled.



    This also holds true throughout the program.  The value of an EXT var/con/label must be declared prior to anything trying to use it. If a label occurs after the current point in the program, you should get an error, but it's not always evident what the problem is.
    Sometimes it will give a "Symbol not previously defined" error. Other times you might get an "Address label duplicated or different in second pass" error.

    The error will indicate the name of the Label, so it's not too hard to figure out.



    You can't use EXT with Arrays. That would just be too convenient.

    DT

  2. #2
    Join Date
    Nov 2005
    Location
    Bombay, India
    Posts
    967


    Did you find this post helpful? Yes | No

    Thumbs up

    Very good treatise on the EXT. Thank you Darrell. This is wonderful as I was trying to work out a convenient way to do structures in PBP. I guess you could consider putting this post in the announcements as a sticky. It is very useful.

    Jerson

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


    Did you find this post helpful? Yes | No

    Default

    Thanks Jerson! Here's some more to chew on.

    Arrays within Arrays

    Along with BYTEs and WORDs, you can have Arrays as part of the "Packet". It's just up to you to make sure that everything fits properly.

    Perhaps you need to send a series of A/D samples along with the previous Packet to a VB program on a PC.
    By Mapping a WORD Array inside the BYTE array, the Sample data automatically becomes part of the Packet.

    This adds a 10 WORD array to the previous Packet. And just for good measure I'll put another BYTE variable after it for a CheckSum.
    Code:
    MyArray  VAR BYTE[29] BANK0
    ASM
    Arg0 = _MyArray          ; word
    Arg1 = _MyArray + 2      ; byte
    Arg2 = _MyArray + 3      ; word
    Arg3 = _MyArray + 5      ; word
    Arg4 = _MyArray + 7      ; byte
    Samples = _MyArray + 8   ; 10 WORD array (20 bytes)
    ChkSUM  = _MyArray + 28
    ENDASM
    
    Arg0    VAR  WORD  EXT
    Arg1    VAR  BYTE  EXT
    Arg2    VAR  WORD  EXT
    Arg3    VAR  WORD  EXT
    Arg4    VAR  BYTE  EXT
    Samples VAR  WORD  EXT   ; 10 WORD array
    ChkSUM  VAR  BYTE  EXT
    Note here that you don't need to specify the array size for the Samples variable. But you do have to leave enough room for it in the array.
    And if you get an "Unable to fit variable ____ in requested bank x" warning, change the BANK0 modifier to BANK1 or another bank that has room.
    The entire array must be in a single bank for this technique to work.

    Now you can just take the A/D samples and store them in the WORD array...(which is really in the MyArray).
    Code:
    FOR X = 0 to 9
        ADCIN  0, Samples(X)
    NEXT X
    Calculate a CheckSum for the whole Packet...
    Code:
    ChkSUM = 0
    FOR X = 0 to 27
        ChkSUM = ChkSUM ^ MyArray(X)
    NEXT X
    And with very little program space used, you have a Complete Packet with 5 WORD or BYTE variables, 10 word sized A/D samples and a checksum for data integrity, ready to send with ...
    Code:
      HSEROUT ["Header", STR MyArray\29]
    And, once again, it's bi-directional. You can receive the Packet of Samples just as easily, with ...
    Code:
    HSERIN [wait("Header"), STR MyArray\29]
    DT

  4. #4
    Join Date
    May 2006
    Location
    Del Rio, TX, USA
    Posts
    343


    Did you find this post helpful? Yes | No

    Default Just what the doctor ordered!

    Thanks for your great work on this. I was looking at doing just this type of process.

    I plan to capture a series of equally timed ADCs. This data would eventually be sent to my computer. It will have a time stamp header to indicate the time of the first capture, followed by the series of ADC values, followed by a parity word. It seems you have given me just the tool I need for the task at hand. I can't wait to try it out.
    Have you been shuffling through that pile of scribbled notes on my desk?

    Thanks again for your contribution. I'm quite new to PICs and this forum, but it is clear from the reading I've done so far that you stand out as one of the top shelf folks here. I've learned a lot.

    Steve

    BTW, what about instant interrupts for the 16-bit flavors? My project requires quite a bit of RAM (more than any 14-bit PIC) and I really like what I saw reading through those threads. I even thought about trying to shoehorn them into my 18F4620, but balked. I am still quite the newbie. I know it would teach me a lot to work it out on my own, and I would enjoy the process, but I can't spare the time right now.

  5. #5
    Join Date
    Sep 2004
    Location
    montreal, canada
    Posts
    6,898


    Did you find this post helpful? Yes | No

    Default PIC18F2431 feature?

    Just found some erratic results on a 18F2431, the following work
    Code:
            '
            '       Pic Configuration
            '       =================
            ASM         
            __CONFIG _CONFIG1H, _OSC_XT_1H & _FCMEN_OFF_1H & _IESO_OFF_1H
            __CONFIG _CONFIG2L, _PWRTEN_ON_2L & _BOREN_ON_2L & _BORV_45_2L
            __CONFIG _CONFIG2H, _WDTEN_OFF_2H & _WINEN_OFF_2H ;& WDPS_32768_2
            __CONFIG _CONFIG3L, _T1OSCMX_OFF_3L & _HPOL_LOW_3L & _LPOL_HIGH_3L & _PWMPIN_OFF_3L
            __CONFIG _CONFIG3H, _MCLRE_ON_3H
            __CONFIG _CONFIG4L, _LVP_OFF_4L & _DEBUG_OFF_4L
            ENDASM
            DEFINE OSC 4
            
            '
            '       Hardware configuration
            '       ======================
                    '
                    '       I/Os
                    '       ----
                    PORTA = 0
                    LATA = 0
                    PORTB=0
                    LATB = 0
                    PORTC =0
                    LATC = 0
    
                    TRISA = 0
                    TRISB = 0
                    TRISC = 0
                    '
                    '       ADCs
                    '       ----
                    ANSEL0 = 0
                    '
                    '       Timers & pouet pouet
                    '       --------------------
                    T0CON = 0
                    T1CON = 0
                    T5CON = 0
                    CAP1CON=0
                    CAP2CON = 0
                    CAP3CON = 0
                    DFLTCON = %00111010
                    QEICON = 0
                    '        
                    '       MSSP
                    '       ----
                    SSPSTAT = 0
                    SSPCON VAR BYTE EXT
                    SSPCON = 0
    
                    '
                    '       CCP
                    '       ---
                    PTCON0=0
                    PTCON1= %10000000
                    PWMCON0 = %01001111
                    PWMCON1 = %00000001
    
                    PTPERL=$FF
                    PTPERH=$3F
    
                    DTCON = 0
                    OVDCOND= 255
                    OVDCONS=255
                    FLTCONFIG = %00000000
                    SEVTCMPL = 0
                    SEVTCMPH = 0
           
            '   
            '       Software variables
            '       ==================
            DUTY VAR WORD          
            '
            '       Software constants
            '       ==================
            Duty0   VAR WORD
            Duty0 = 16383
            
            '------------------------------< Main program >-----------------------------------
            '
    Start:
                    '   
                    '       Those bellow work 100%
                    '       ----------------------
            FOR DUTY = 0 TO Duty0
                PDC0L=DUTY.LowByte
                PDC0H=DUTY.HighByte
                PAUSEUS 50
                NEXT
            FOR DUTY = 0 TO Duty0
                PDC1L=DUTY.LowByte
                PDC1H=DUTY.HighByte
                PAUSEUS 50
                NEXT
    
            FOR DUTY = 0 TO Duty0
                PDC2L=DUTY.LowByte
                PDC2H=DUTY.HighByte
                PAUSEUS 50
                NEXT
                
            GOTO Start
    while the following work weird, and depending the code overhead, results are different...
    Code:
            '
            '       Pic Configuration
            '       =================
            ASM         
            __CONFIG _CONFIG1H, _OSC_XT_1H & _FCMEN_OFF_1H & _IESO_OFF_1H
            __CONFIG _CONFIG2L, _PWRTEN_ON_2L & _BOREN_ON_2L & _BORV_45_2L
            __CONFIG _CONFIG2H, _WDTEN_OFF_2H & _WINEN_OFF_2H ;& WDPS_32768_2
            __CONFIG _CONFIG3L, _T1OSCMX_OFF_3L & _HPOL_LOW_3L & _LPOL_HIGH_3L & _PWMPIN_OFF_3L
            __CONFIG _CONFIG3H, _MCLRE_ON_3H
            __CONFIG _CONFIG4L, _LVP_OFF_4L & _DEBUG_OFF_4L
            ENDASM
            DEFINE OSC 4 
                            
            '
            '       Hardware configuration
            '       ======================
                    '
                    '       I/Os
                    '       ----
                    PORTA = 0
                    LATA = 0
                    PORTB=0
                    LATB = 0
                    PORTC =0
                    LATC = 0
    
                    TRISA = 0
                    TRISB = 0
                    TRISC = 0
                    '
                    '       ADCs
                    '       ----
                    ANSEL0 = 0
                    '
                    '       Timers & pouet pouet
                    '       --------------------
                    T0CON = 0
                    T1CON = 0
                    T5CON = 0
                    CAP1CON=0
                    CAP2CON = 0
                    CAP3CON = 0
                    DFLTCON = %00111010
                    QEICON = 0
                    '        
                    '       MSSP
                    '       ----
                    SSPSTAT = 0
                    SSPCON VAR BYTE EXT
                    SSPCON = 0
    
                    '
                    '       CCP
                    '       ---
                    PTCON0=0
                    PTCON1= %10000000
                    PWMCON0 = %01001111
                    PWMCON1 = %00000001
    
                    PTPERL=$FF
                    PTPERH=$3F
    
                    DTCON = 0
                    OVDCOND= 255
                    OVDCONS=255
                    FLTCONFIG = %00000000
                    SEVTCMPL = 0
                    SEVTCMPH = 0
           
            '   
            '       Software variables
            '       ==================
            ASM
    PDC0REG=PDC0L
    PDC1REG=PDC1L
    PDC2REG=PDC2L
            ENDASM       
            PDC0REG VAR WORD EXT
            PDC1REG VAR WORD EXT
            PDC2REG VAR WORD EXT  
    
            DUTY VAR WORD          
            '
            '       Software constants
            '       ==================
            Duty0   VAR WORD
            Duty0 = 16383
            
            '------------------------------< Main program >-----------------------------------
            '
    Start:
            FOR DUTY = 0 TO Duty0
                PDC0REG=DUTY
                PAUSEUS 50
                NEXT
    
            FOR DUTY = 0 TO Duty0
                PDC1REG=DUTY
                PAUSEUS 50
                NEXT
    
            FOR DUTY = 0 TO Duty0
                PDC2REG=DUTY        ' wierd stuff :o(
                PAUSEUS 50
                NEXT                
            GOTO Start
    When i say weird, PDC2 PWM duty cycle seems to be affected.. work or not, blink and so on.

    Any idea?
    Steve

    It's not a bug, it's a random feature.
    There's no problem, only learning opportunities.

  6. #6
    Join Date
    Sep 2004
    Location
    montreal, canada
    Posts
    6,898


    Did you find this post helpful? Yes | No

    Default

    a LITTLE results report
    ==============================================
    DUTY =402
    DUMMY_H =01 DUMMY_L = 91
    PDC2_H =00 PDC2_L = 92
    ==============================================
    DUTY =403
    DUMMY_H =01 DUMMY_L = 92
    PDC2_H =00 PDC2_L = 93
    ==============================================
    DUTY =404

    DUMMY_H =01 DUMMY_L = 93
    PDC2_H =00 PDC2_L = 94
    ==============================================
    DUTY =405
    DUMMY_H =01 DUMMY_L = 94
    PDC2_H =00 PDC2_L = 95
    ==============================================
    DUTY =406
    DUMMY_H =01 DUMMY_L = 95
    PDC2_H =00 PDC2_L = 96
    ==============================================
    DUTY =407
    DUMMY_H =01 DUMMY_L = 96
    PDC2_H =00 PDC2_L = 97
    ==============================================
    DUTY =408
    DUMMY_H =01 DUMMY_L = 97
    PDC2_H =00 PDC2_L = 98
    ==============================================
    DUTY =409
    DUMMY_H =01 DUMMY_L = 98
    PDC2_H =00 PDC2_L = 99
    ==============================================
    DUTY =410
    DUMMY_H =01 DUMMY_L = 99
    PDC2_H =00 PDC2_L = 9A
    ==============================================
    DUTY =411
    DUMMY_H =01 DUMMY_L = 9A
    PDC2_H =00 PDC2_L = 9B
    ==============================================
    DUTY =412
    DUMMY_H =01 DUMMY_L = 9B
    PDC2_H =00 PDC2_L = 9C
    ==============================================
    as this happen on PDC2, i use the following to produce the above report
    Code:
    Start:
            FOR DUTY = 0 TO duty0
                PDC0reg=duty
                pauseus 50
                NEXT
    
            FOR DUTY = 0 TO duty0
                pdc1reg=duty
                pauseus 50
                NEXT
    
            FOR DUTY = 0 TO duty0
                pdc2reg=duty        ' wierd stuff :o(
                pauseus 50
                DUMMY=PDC2REG
                HSEROUT ["DUTY    =", DEC DUTY,13,10,_
                         "DUMMY_H =", HEX2 DUMMY.HIGHBYTE,"    DUMMY_L = ",HEX2 DUMMY.LOWBYTE, 13,10,_
                         "PDC2_H  =", HEX2 PDC2H         ,"    PDC2_L  = ",HEX2 PDC2L,13,10,_
                         "==============================================",13,10]
    
                NEXT                
            GoTo Start
    seems to don't pass the Highbyte eh!
    Steve

    It's not a bug, it's a random feature.
    There's no problem, only learning opportunities.

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


    Did you find this post helpful? Yes | No

    Default

    Yes, weirdness indeed.

    But the weirdness is why Microchip can't seem to keep things consistant between their products.

    In the case of PDCxH:L, the HighByte comes first.

    But in most other registers like TMRxL:H, the LowByte comes first.

    So unfortunately, PDCxH:L, CAPxBUF and probably others won't work with the EXT type variables.

    HTH,
    DT

Similar Threads

  1. Replies: 1
    Last Post: - 28th January 2010, 22:15
  2. TMR1 external LP xtal setup check
    By comwarrior in forum mel PIC BASIC Pro
    Replies: 4
    Last Post: - 13th October 2009, 18:11
  3. How to use an external oscillator
    By Mugelpower in forum mel PIC BASIC Pro
    Replies: 1
    Last Post: - 5th February 2008, 14:19
  4. External clock
    By Firegod in forum mel PIC BASIC Pro
    Replies: 1
    Last Post: - 17th March 2007, 00:53
  5. switching external vref+ and vdd vref
    By alejandro_halon in forum mel PIC BASIC Pro
    Replies: 5
    Last Post: - 16th February 2005, 20:13

Members who have read this thread : 2

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