Форум программистов, компьютерный форум, киберфорум
Assembler, MASM, TASM
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 23.03.2012
Сообщений: 9
1

Помогите пожалуйста

23.03.2012, 22:05. Просмотров 551. Ответов 9
Метки нет (Все метки)

Несколько месяцев изучаю Ассемблер, понимаю что-то, но очень малую часть. Есть текст программы, который складывает два введенных с клавиатуры двоичных числа размером 2 байта, но что-то она не работает. Подскажи пожалуйста в чем моя ошибка и как ее исправить
0
Вложения
Тип файла: docx model small.docx (16.0 Кб, 18 просмотров)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.03.2012, 22:05
Ответы с готовыми решениями:

Помогите разобраться пожалуйста
*как откомпилировать эту программу и запустить ?* вот исходный текст...

Здравствуйте программисты, помогите пожалуйста прогу написать!
Составить программу, выясняющую, какой день недели соответствует введенной с клавиатуры...

Простой калькулятор.
Выполнение арифметических действий с применением процедур ассемблера Цель работы: получить...

Ребят пожалуйста отредактируйте программу пожалуйста Assembler
2.4. Дан двумерный массив целых чисел размером m*n. 1-Заменить минимальный по модулю элемент...

9
Клюг
7662 / 3177 / 383
Регистрация: 03.05.2011
Сообщений: 8,381
24.03.2012, 12:22 2
Цитата Сообщение от Алёнка
Подскажи пожалуйста в чем моя ошибка
В том, что вы не удосужились выложить текст программы.
0
0 / 0 / 0
Регистрация: 23.03.2012
Сообщений: 9
24.03.2012, 18:20  [ТС] 3
Текст проги во вложениях
0
Клюг
7662 / 3177 / 383
Регистрация: 03.05.2011
Сообщений: 8,381
24.03.2012, 18:46 4
Алёнка, Текста не обнаружил. Зато найдено 130 килобайт XML. Вы пишете проги в офисе2010? это круто. Как вы из офиса запускаете транслятор?
И да, вы считаете, что у всех вынь7 и офис? JFYI, на FreeBSD/OpenOffice ваши перлы нечитабельны.
0
Somebody
24.03.2012, 19:32
  #5

Не по теме:

Цитата Сообщение от Charles Kludge Посмотреть сообщение
на FreeBSD/OpenOffice ваши перлы нечитабельны
Я, конечно, не за то, чтобы выкладывать код в docx, но OpenOffice же вроде более-менее его переваривает (не считая формул и всяких отступов). Версия старая?

0
0 / 0 / 0
Регистрация: 23.03.2012
Сообщений: 9
24.03.2012, 19:50  [ТС] 6
2010. ставила полгода назад наверно)
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
.model small
.data
buf db 33,34 dup(0)
num1 db 4 dup(0)
num2 db 4 dup(0)
message1 db 'Vvedite 1chislo:$'
message2 db 13,10, 'Vvedite 2chislo:$'
rez db 13,10,'rezultat:$'
.stack 256 
.code
start:
   mov ax,@data
   mov ds,ax
   mov es,ax
   mov ah,9
   lea dx,message1
   int 21h
   mov ah,0ah
   mov dx, offset buf   
   int 21h
   lea si, buf [2]
   mov bl, buf[1]
  mov bh,0
  add si,bx
  dec si
  lea di,num1
  call str2bin
  mov ah,9
   lea dx, message2
  int 21h
  mov ah, 0ah
  mov dx, offset buf
  int 21h
  lea si, buf[2]
  mov bl,buf[1]
  mov bh,0
  add si,bx
  dec si
call str2bin
 lea si, num1
lea di, num2
 mov cx,4clc
sl:mov al,[di]
 adc [si],al
 inc si
inc di
loop sl
mov ah, 9
lea dx,rez
 int 21h
mov cx,4
lea si,num1[3]
ol: mov al,[si]
call printbin8
dec si
loop ol
mov ah,1
int 21h
mov ax,4c00h
int 21h
str2bin proc
mov bx,0
 ss3:mov ah,0
mov cx,0
 ss1:mov al,[si]
and al,1
shl al,cl
or ah,al
dec si
cmp si,offset buf[2]
jb ss2
inc cx
cmp cx,8
 jnz ss1
mov [di],ah
 inc di
inc bx
 cmp bx,4
 jnz ss3
jmp ss4
 ss2: mov [di],ah
 ss4:ret
 str2bin endp
printbin8 proc
push cx
mov bl,al
 mov ah,2
mov cx,8
lp2:mov dl,'0'
 rcl bl,1
adc dl,0
int 21h
loop lp2
pop cx
ret
printbin8 endp
end start
0
Клюг
7662 / 3177 / 383
Регистрация: 03.05.2011
Сообщений: 8,381
24.03.2012, 20:02 7

Не по теме:

Цитата Сообщение от Somebody
Версия старая?
7.3 патченная и многократно пересобранная под LinICE - там графика вообще не подразумевалась, но...


Похоже, придётся выкатить цитаты из моего "Руководства пользователей ЛВС для составления заявок в helpdesk":
"...заявка для инженеров службы поддержки составляется <...> в формате, доступном для прочтения всем пользователям данной ЛВС, включая мобильные приложения, таком, как простой текст(без форматирования) в кодовых страницах cp866 или cp1251..."
0
0 / 0 / 0
Регистрация: 23.03.2012
Сообщений: 9
24.03.2012, 20:28  [ТС] 8
та я уже так выложила текст проги
0
85 / 85 / 38
Регистрация: 09.12.2011
Сообщений: 174
26.03.2012, 16:40 9
Строка 42:
Assembler
1
 mov cx,4clc
Что тут должно быть ?

Добавлено через 3 часа 51 минуту
Вот, может быть коряво... но работает
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
.model small
.data
buf db 33,34 dup(0)
num1 db 4 dup(0)
num2 db 4 dup(0)
message1 db 'Vvedite 1chislo:$'
message2 db 13,10, 'Vvedite 2chislo:$'
rez db 13,10,'rezultat:$'
.stack 256 
.code
start:
   mov ax,@data
   mov ds,ax
   mov es,ax
   mov ah,9
   lea dx,message1
   int 21h
   mov ah,0ah
   mov dx, offset buf   
   int 21h
   lea si, buf [2]
   mov cl, buf[1]
  lea di,num1
  cmp cl,16
  jle mm
  sub cl,16
  call str2bin
  mov cl,16
mm:
  add di,2
  call str2bin
 
   mov ah,9
   lea dx,message2
   int 21h
   mov ah,0ah
   mov dx, offset buf   
   int 21h
   lea si, buf [2]
   mov cl, buf[1]
  lea di,num2
  cmp cl,16
  jle mm1
  sub cl,16
  call str2bin
  mov cl,16
mm1:
  add di,2
  call str2bin
  
  lea si,num1
  add si,2
  lea di,num2
  add di,2
  mov ax,[di]
  add [si],ax
  mov ax,[di-2]
  adc [si-2],ax 
 
mov ah, 9
lea dx,rez
int 21h                  
mov bx,[si-2]
call printbin8
mov bx,[si]
call printbin8
 
mov ah,1
int 21h
mov ax,4c00h
int 21h
 
str2bin proc
xor ch,ch
xor bx,bx
m1:
mov al,[si]
and al,1      
rcr al,1
rcl bx,1
inc si
loop m1
mov [di],bx
ret
 str2bin endp
 
printbin8 proc
mov cx,16
lp2:
xor dl,dl
rcl bx,1
rcl dl,1
add dl,'0'
mov ah,2
int 21h
loop lp2
ret
printbin8 endp
 
end start
Вариант для двухбайтного
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
.model small
.data
buf db 33,34 dup(0)
num1 dw 1 dup(0)
num2 dw 1 dup(0)
message1 db 'Vvedite 1chislo:$'
message2 db 13,10, 'Vvedite 2chislo:$'
rez db 13,10,'rezultat:$'
.stack 256 
.code
start:
   mov ax,@data
   mov ds,ax
   mov es,ax
   mov ah,9
   lea dx,message1
   int 21h
   mov ah,0ah
   mov dx, offset buf   
   int 21h
   lea si, buf [2]
   mov cl, buf[1]
  call str2bin
  mov num1,bx
  mov ah,9
   lea dx, message2
  int 21h
  mov ah, 0ah
  mov dx, offset buf
  int 21h
  lea si, buf[2]
  mov cl,buf[1]
call str2bin
mov num2,bx
add bx,num1
mov ah, 9
lea dx,rez
 int 21h
call printbin8
mov ah,1
int 21h
mov ax,4c00h
int 21h
 
str2bin proc
xor ch,ch
xor bx,bx
m1:
mov al,[si]
and al,1
rcr al,1
rcl bx,1
inc si
loop m1
ret
 str2bin endp
 
printbin8 proc
mov cx,16
lp2:
xor dl,dl
rcl bx,1
rcl dl,1
add dl,'0'
mov ah,2
int 21h
loop lp2
ret
printbin8 endp
 
end start
1
0 / 0 / 0
Регистрация: 23.03.2012
Сообщений: 9
26.03.2012, 17:41  [ТС] 10
там сместилось.
Assembler
1
2
mov cx,4
clc
спасибо, вроде поняла что там делается))посмотрим как отреагирует препод на этот текст, он придирается очень(
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.03.2012, 17:41

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Помогите решить пожалуйста задачи
Тема: Изучение системы команд Ассемблера. Команды обработки строк данных и команды организации...

Помогите пожалуйста уважаемые программисты найти решение программы на Assembler
1. Дан массив целых чисел, состоящий из 15 элементов. • найти удвоенную сумму положительных...

Помогите пожалуйста написать архиватор на ассемблере
Здравствуйте!! Помогите плиз написать архиватор на ассемблере или киньте ссылки на такую литературу

Помогите решить задачу пожалуйста
Здравствуйте! Помогите пожалуйста мне решить задачу. В долгу не останусь. Заранее спасибо. Вот:...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.