Incrementing Upper Nibble Only (HighNibble)

[Zebryk]

Hello Again,

How does one increment only the upper nibble of a byte?

Apparently there is no HighNibble or LowNibble function in PICBASIC?

My goal is to add 1, to the value of Bits [7654] leaving Bits [3210] alone.

And/or how to set just the high bits to some number?

Thanks!

[richard]

number var byte
number=number+16 will increment high nibble

[richard]

how to set just the high bits to some number?

number var byte
somenumber var byte

number =$11
somenumber =2

number =(number&$f) |( somenumber<<4 );note (for a meaningful result somenumber <16)

result number=$21

[Zebryk]

Richard,

Wonderful! Works beautifully!

number var byte
number=number+16 will increment high nibble

Again, very clean and easy.

Thank you very much!

Jay Zebryk
Zebryk Engineering
Southbridge, Massachusetts
www.zebryk.com