Changeset 3149


Ignore:
Timestamp:
Aug 10, 2012, 7:20:13 AM (3 years ago)
Author:
quozl
Message:

OLPC XO-1.5 XO-1.75 - libertas, change baseband register interpretation to match new data supplied

File:
1 edited

Legend:

Unmodified
Added
Removed
  • dev/libertas.fth

    r3139 r3149  
    21952195;
    21962196
    2197 : .bpp-antenna  ( antenna -- )
    2198    dup h# 30 =  if ."  1" drop exit  then
    2199    dup h# 70 =  if ."  2" drop exit  then
    2200    2 .r
     2197: .rx-antenna  ( antenna -- )
     2198   6 rshift
     2199   case
     2200      b# 00  of  ."  0"  endof
     2201      b# 01  of  ."  1"  endof
     2202      b# 10  of  ."  d"  endof
     2203   endcase
     2204;
     2205
     2206: .tx-antenna  ( antenna -- )
     2207   6 rshift
     2208   case
     2209      b# 00  of  ."  0"  endof
     2210      b# 01  of  ."  1"  endof
     2211      b# 10  of  ."  r"  endof
     2212   endcase
    22012213;
    22022214
     
    22102222   hex
    22112223   ."  ant" .antenna                    ( base )
    2212    ."  rx "
    2213    h# 3f bbp-reg@ .bpp-antenna
    2214    ."  tx "
    2215    h# 40 bbp-reg@ .bpp-antenna
     2224   ."  rx "  h# 3f bbp-reg@ .rx-antenna
     2225   ."  tx "  h# 40 bbp-reg@ .tx-antenna
    22162226   base !
    22172227;
Note: See TracChangeset for help on using the changeset viewer.