Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RFpro.ru: Ассемблер? Это просто! Учимся программировать


РАССЫЛКИ ПОРТАЛА RFPRO.RU

Лучшие эксперты в разделе

solowey
Статус: Бакалавр
Рейтинг: 377
∙ повысить рейтинг »
Evgen aka Chuma
Статус: 6-й класс
Рейтинг: 0
∙ повысить рейтинг »
cain52
Статус: 3-й класс
Рейтинг: 0
∙ повысить рейтинг »

∙ Assembler

Номер выпуска:1751
Дата выхода:26.10.2019, 22:45
Администратор рассылки:Лысков Игорь Витальевич (Старший модератор)
Подписчиков / экспертов:79 / 25
Вопросов / ответов:1 / 1

Консультация # 196755: Доброго времени суток уважаемые эксперты! Пожалуйста, ответьте на вопрос: Осталось последнее задание, а понять не как не могу что я делаю не так. Видимо я что-то упустила. Задание: Ввести с клавиатуры строку символов. Вывести на экран её двоичное представление. Вот что я написала. Программа работает, но не правильно, помогите пожалуйста ...

Консультация # 196755:

Доброго времени суток уважаемые эксперты! Пожалуйста, ответьте на вопрос:
Осталось последнее задание, а понять не как не могу что я делаю не так. Видимо я что-то упустила.
Задание: Ввести с клавиатуры строку символов. Вывести на экран её двоичное представление.
Вот что я написала. Программа работает, но не правильно, помогите пожалуйста smile

format PE console 4.0
 
include 'win32a.inc'
section '.text' code readable executable
start:
invoke printf, req
    invoke scanf, sap, A       ; ввод A
    mov eax,[A]
    RCL eax,1

    invoke printf, sap
invoke getchar
invoke ExitProcess, 0
section '.data' data readable writeable
req db  'Enter simvol:',0
sap db  '%d',0
A   dd  0

section '.idata' import data readable
library kernel, 'KERNEL32.DLL', msvcrt, 'msvcrt.dll' 
import msvcrt, printf,'printf', getchar,'getchar', scanf,'scanf' 
import kernel, ExitProcess,'ExitProcess'


Дата отправки: 21.10.2019, 22:43
Вопрос задал: Алина (Посетитель)
Всего ответов: 1
Страница онлайн-консультации »


Консультирует Зенченко Константин Николаевич (Старший модератор):

Здравствуйте, Алина!

Как-то так:

Код (Assembler) :: выделить код
format PE console 4.0 
 
include 'D:\CAT\_Lang\fasm\Fasm.17160\INCLUDE\win32a.inc' 
 
section '.text' code readable executable
start:
invoke printf, req
    mov        ebx,str_inp
    mov        edx,sap
    invoke scanf,sap,str_inp
;    À DB 20 DUP(?) 
     mov  esi,str_inp
     mov edi,str_out
@@00:lodsb 
     or al,al 
     jz @@02 
     mov ah,al 
     mov ecx,8 
@@01:xor al,al 
     shl ah,1 
     adc al,'0' 
     stosb 
     loop @@01 
     mov al,' ' 
     stosb 
     jmp @@00 
@@02:
    invoke printf, sap,str_out
invoke getchar
invoke ExitProcess, 0 
section '.data' data readable writeable
req db  'Enter string:',0 
sap db  '%s',0 
str_inp DB 20 DUP(?) 
str_out    db 200 dup(?) 
section '.idata' import data readable
library kernel, 'KERNEL32.DLL', msvcrt, 'msvcrt.dll' 
import msvcrt, printf,'printf', getchar,'getchar', scanf,'scanf' 
import kernel, ExitProcess,'ExitProcess' 


D:\CAT\_Lang\fasm\Fasm.17160\INCLUDE\ - это мой путь к инклудам. В папке fasm у меня много различных версий, я использовал Fasm.17160.

Удачи!

Консультировал: Зенченко Константин Николаевич (Старший модератор)
Дата отправки: 25.10.2019, 20:50
Рейтинг ответа:

НЕ одобряю 0 одобряю!


Оценить выпуск | Задать вопрос экспертам

главная страница  |  стать участником  |  получить консультацию
техническая поддержка

Дорогой читатель!
Команда портала RFPRO.RU благодарит Вас за то, что Вы пользуетесь нашими услугами. Вы только что прочли очередной выпуск рассылки. Мы старались. Пожалуйста, оцените его. Если совет помог Вам, если Вам понравился ответ, Вы можете поблагодарить автора - для этого в каждом ответе есть специальные ссылки. Вы можете оставить отзыв о работе портале. Нам очень важно знать Ваше мнение. Вы можете поближе познакомиться с жизнью портала, посетив наш форум, почитав журнал, который издают наши эксперты. Если у Вас есть желание помочь людям, поделиться своими знаниями, Вы можете зарегистрироваться экспертом. Заходите - у нас интересно!
МЫ РАБОТАЕМ ДЛЯ ВАС!


В избранное