   mov b,#7 ;Init msg length multiplier
      mul ab ;Multiply Index (Element Number) by Element size.
      ; ************************************
      ; *** One Approach to Table Access ***
      ; ************************************
      add a,dpl ;Add the Index Value to the low byte of dptr
      mov dpl,a
      mov a,dph ;Correct for any carry (cross page boundry)
      addc a,#0
      mov dph,a