Сложение двух байтов

← →
nikkkkk (2003-09-12 17:02) [0]

Народ, кто знает как сложить две переменные типа BYTE , чтобы получиллась одна переменная типа Word или SmallInt.
Заранее спасибо...

← →
nikkkkk (2003-09-12 17:04) [1]

???

← →
ZEE © (2003-09-12 17:05) [2]

var b1,b2:byte; w1:word;// или smallint ... w1:=b1+b2;
или я что-то не понял...

← →
zaporshivets (2003-09-12 17:06) [3]

var
b1, b2 : byte;
wrd : Word;
asm
mov al, b1
mov ah, b2
mov wrd, ax
end;

← →
Anatoly Podgoretsky © (2003-09-12 17:10) [4]

WordRec.Hi/WordRec.Lo

← →
Nikolay M. © (2003-09-12 17:10) [5]

Имхо, юмор в том, чтобы потом из Word получить два числа по Byte :)
Если так оно и есть, тогда
word_var := byte1 shl 8 + byte2;

← →
nikkkkk (2003-09-12 17:11) [6]

> ZEE © (12.09.03 17:05) [2]
> var
> b1,b2:byte;
> w1:word;// или smallint
> ...
> w1:=b1+b2;
> или я что-то не понял...

в этом случае если b1=255 а b2=200, w1 получится 455. А мне бы желательно узнать можна ли сложить логически: 11111111дв+11111111дв=1111111111111111дв(65536дес)???

← →
clickmaker © (2003-09-12 17:11) [7]

w := b1 or b2 shl 8;

← →
zaporshivets (2003-09-12 17:19) [8]

Ты ,по-моему вообще не понимаешь, что такое вообще сложить логически. Если ты берешь два байта и складываешь их логически ты получаешь БАЙТ, а не ворд, а если тебе надо сцепить два байта в слово, так смотри выше тебе уже вон сколько постов написали!!!

← →
nikkkkk (2003-09-12 17:20) [9]

всем агромнейшее спасибо...
вопрос закрыт.

nikkkkk (12.09.03 17:11) [6]
Ты ответы то читаешь или как?

А объясни, плз, народу, что такое, по-твоему, "сложить логически"?

рано закрыл
еще вариант до кучи, вариаций валом как видиш.
var
wrd: Word;
b : array[0..1] of byte absolute wrd;
begin
b[0]:= 1;
b[1]:= 2;

Сложение двух байтов Найти похожие ветки