Перевод числа из OCT в BIN систему счисления ассемблер - Assembler - Ответ 9972970

ФедосеевПавел · 05.01.2017, 15:32

Во первых, есть закреплённая тема Ввод и вывод чисел в различных системах счисления
Она не фонтан какая, но скопировать вывод в двоичной системе счисления можно.
Также, внизу этой темы приведены уже решённые подобные темы, например Перевод чисел из восьмеричной в десятичную систему счисления.

Не прям 8->2, но похожую задачку (10->8) как-то решал на форуме

Assembler

.MODEL  Small
 
.DATA
 
KeyBuf  db      6, 0, 6 dup(0)      ;max,len,string,CR(0dh)
CR_LF   db      0Dh, 0Ah, '$'
 
Prompt  db      'Введите число: ', '$'
Res10   db      'Введено число (десятичное  ): ', '$'
Res08   db      'Введено число (восьмеричное): ', '$'
Error01 db      'Ошибка ввода числа',0Dh, 0Ah, '$'
 
Numer   dw      ?
 
.CODE
 
; выводит число в регистре AX на экран
; входные данные:
; cx - система счисления (не больше 10)
; ax - число для отображения
Show_ax PROC
;        mov     cx, 10
        xor     di, di          ; di - кол. цифр в числе
@@Conv:
        xor     dx, dx
        div     cx              ; dl = num mod 10
        add     dl, '0'         ; перевод в символьный формат
        inc     di
        push    dx              ; складываем в стэк
        or      ax, ax
        jnz     @@conv
        ; выводим из стэка на экран
@@Show:
        pop     dx              ; dl = очередной символ
        mov     ah, 2           ; ah - функция вывода символа на экран
        int     21h
        dec     di              ; повторяем пока di<>0
        jnz     @@show
        ret
Show_ax ENDP
 
; преобразования строки в число
; на входе:
; ds:[si] - строка с числом
; ds:[di] - адрес числа
; на выходе
; ds:[di] - число
; CY - флаг переноса (при ошибке - установлен, иначе - сброшен)
Str2Num PROC
        push    ax
        push    bx
        push    cx
        push    dx
        push    ds
        push    es
 
        push    ds
        pop     es
 
        mov     cl, ds:[si]
        xor     ch, ch
 
        inc     si
 
        mov     bx, 10
        xor     ax, ax
 
@@Loop:
        mul     bx         ; умножаем ax на 10 ( dx:ax=ax*bx )
        mov     [di], ax   ; игнорируем старшее слово
        cmp     dx, 0      ; проверяем, результат на переполнение
        jnz     @@Error
 
        mov     al, [si]   ; Преобразуем следующий символ в число
        cmp     al, '0'
        jb      @@Error
        cmp     al, '9'
        ja      @@Error
        sub     al, '0'
        xor     ah, ah
        add     ax, [di]
        jc      @@Error    ; Если сумма больше 65535
        inc     si
 
        loop    @@Loop
 
        mov     [di], ax
        clc
        pop     es
        pop     ds
        pop     dx
        pop     cx
        pop     bx
        pop     ax
        ret
@@Error:
        xor     ax, ax
        mov     [di], ax
        stc
        pop     es
        pop     ds
        pop     dx
        pop     cx
        pop     bx
        pop     ax
        ret
Str2Num ENDP
 
Main    PROC    FAR
        mov     ax, @DATA
        mov     ds, ax
        mov     es, ax
 
        ; ввод числа с клавиатуры (строки)
        lea     dx, Prompt
        mov     ah, 09h
        int     21h
 
        mov     ah, 0Ah
        mov     dx, offset KeyBuf
        int     21h
 
        ; перевод строки (на новую строку)
        lea     dx, CR_LF
        mov     ah, 09h
        int     21h
 
        ; преобразование строки в число
        lea     si, KeyBuf+1
        lea     di, Numer
        call    Str2Num
 
        ; проверка на ошибку
        jnc     @@NoError
 
        ; если есть ошибка ввода - напечатать сообщение об ошибке
        lea     dx, Error01
        mov     ah, 09h
        int     21h
        jmp     @@Exit
 
        ; если нет ошибки ввода - напечатать число
@@NoError:
        ; в десятичном представлении
        lea     dx, Res10
        mov     ah, 09h
        int     21h
 
        mov     ax, Numer
        mov     cx, 10
        call    Show_ax
 
        lea     dx, CR_LF
        mov     ah, 09h
        int     21h
 
        ; в восьмеричном представлении
        lea     dx, Res08
        mov     ah, 09h
        int     21h
 
        mov     ax, Numer
        mov     cx, 8
        call    Show_ax
 
        lea     dx, CR_LF
        mov     ah, 09h
        int     21h
 
        ; выход
@@Exit:
        ; ожидание нажатия любой клавиши
        mov     ah, 01h
        int     21h
 
        mov     ax, 4c00h
        int     21h
Main    ENDP
 
.STACK  100h
 
        END     Main

Вернуться к обсуждению:
Перевод числа из OCT в BIN систему счисления ассемблер Assembler

Следующий ответ

Другие темы раздела
Assembler Простые делители числа https://www.cyberforum.ru/ asm-beginners/ thread1892779.html org 100h start: mov cx,2 mov ax, 32 push ax mov ax,a	Assembler Пример вызова подпрограммы Доброго времени суток, ну помогите пожалуйста с задачкой на tasm . Программа MAINPRO должна вызвать программу SUBPRO.В программе MAINPRO определенны переменные : QTY как DB, VALUE как DW, PRICE как DW. Программа SUBPRO должна разделить VALUE на QTY и записать частное в PRICE.
Assembler Как дальше дореверсить функцию? Мне нужно восстановить исходный код данный процедуры: .text:00768E5F var_1C = dword ptr -1Ch .text:00768E5F var_18 = dword ptr -18h .text:00768E5F var_14 = dword ptr -14h .text:00768E5F var_10 = dword ptr -10h .text:00768E5F ... https://www.cyberforum.ru/ asm-beginners/ thread1892280.html	Assembler Двоичная ССЧ. Туплю) Всем доброго дня! (И с НОВЫМ ГОДОМ!)))) С учетом праздников, вопрос, конечно, странный, но я просто в замешательстве! У меня есть число 9B5Ch. В двоичной это 1001.1011.0101.1100b. Оно беззнаковое. Если интерпретировать его как знаковое, то получается число 64A4h. И вот тут то и вопросы! Во-первых, мой Wкалькулятор утверждает, что 64A4h = 25764d, а в моем источнике это число эквивалентно -25764..... https://www.cyberforum.ru/ asm-beginners/ thread1892270.html
Закодируйте команды для сложения Assembler Доброго времени суток. Ну помогите, будьте так добры. нужно написать программу в турбо ассемблере Имеются следующие данные: DATAX DW 0148H DW 2316H DATAY DW 0237H DW 4052H Закодируйте команды для сложения: Программа MAINPRO должна вызвать программу SUBPRO.В программе MAINPRO	Assembler Команды обработки строк Доброго времени суток. Ну помогите, будьте так добры. нужно написать программу в турбо ассемблере Имеются следующие определения: DATASG SEGMENT PARA CONAME DB 'SPASE EXPLORES INS' PRLINE DB 20 DUP('')Используя команды обработки строк, выполнить: Сохранение содержимого регистра AX в области по адресу PRLINE +5 По программе есть такой вариант : MASM https://www.cyberforum.ru/ asm-beginners/ thread1891744.html
Assembler Нумерация списка https://www.cyberforum.ru/ asm-beginners/ thread1891203.html Здравствуйте, написал вот такую программу, которая выводит количество и список разделов, мне нужно сделать нумерацию списка по порядку, но у меня не получается это сделать как видно на скриншоте, подскажите как исправить ошибку .386 dseg segment use16 buffer db 446 dup (0) part1 db 16 dup(0) part2 db 16 dup(0) part3 db 16 dup(0) part4 db 16 dup(0)	Assembler Datasheet для Intel и AMD CPU Всем привет. Ребята подскажите пожалуйста, где найти техническую спецификацию (datasheet) для процессоров Intel и AMD? В которой были бы описаны регистры процессоров, в том числе их адреса в флэш памяти процессора, а также приведено описание ножек процессоров...
Assembler Обработка массива через вставку Вот тема https://www.cyberforum.ru/cpp-beginners/thread1890427.html Задание почти сделано, прошу помощи с запуском сего творения https://www.cyberforum.ru/ asm-beginners/ thread1891074.html	Assembler Нужно объединить 2 программы https://www.cyberforum.ru/ asm-beginners/ thread1890915.html Помогите сделать 1 программу из 2. Есть программа, которая находит минимальный элемент .model small .8086 .data res dw 0 A dw 5,-3,9,-4,5,6 len equ ($-A)/2
Assembler Ввод массива с клавиатуры и вывод Здравствуйте! Объявил массив mas db 4 dup(?) делаю ввод с клавиатуры: mov cx,5 xor si,si c11:	Assembler Вывести на экран содержимое файла помогите разработать программу. Вывести на экран содержимое файла. Имя вводится с клавиатуры, если файл с указанным именем не существует, то выдать соответствующее сообщение. https://www.cyberforum.ru/ asm-beginners/ thread1890546.html

	05.01.2017, 15:32