Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];

Вниз

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

 
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]

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


 
Anatoly Podgoretsky   (2003-09-12 17:20) [10]

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


 
Nikolay M.   (2003-09-12 17:21) [11]

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


 
sniknik   (2003-09-13 00:31) [12]

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



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.009 c
1-82307
ikivio
2003-09-13 21:01
2003.09.25
Проблемы с SW_RESTORE.


4-82562
stkatch
2003-07-22 11:04
2003.09.25
Вызов MessageBox из сервиса (службы)


3-82085
Alex_Raider
2003-09-03 17:58
2003.09.25
Стоит ли перейти с IBX на FIB?


1-82249
Dark Elf
2003-09-15 14:05
2003.09.25
Password Edit


1-82323
jiura84i
2003-09-13 16:53
2003.09.25
Тестирование и отладка приложений!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский