Degree d^n, как организовать ввод\вывод?

[sig_GB]

;Программа возведения числа d в степень n>=1
;Вход: число и степень, в которую возводим
;Выход: результат возведения в степень числа
;===========================================
data segment para public "data"
degree dw 1
d dw ?
n dw ?
message1 db "Please, write d and n...,$"
message2 db "Degree d^n = ... ",'$'
data ends
stk segment stack
[13]    db 400 duo ("?")
stk ends
code segment para public "code"
start:
     assume cs:code,ds:data,ss:stk
     mov ax,data
     mov ds,ax ;инициализация сегментного регистра DS
     
     mov ah,9  ;ввод данных
     mov dx,offset message1
     int 21h   
     xor ax,ax
     mov ah,1h
     int 21h
     mov dl,al
[28]mov d,al
[29]mov n,dl
          
     mov cx,n ;степеь числа n в регистр cx
     xor ax,ax
cycl:   
     jcxz exit
     mov ax,degree
     mul d
     mov degree,ax
     dec cx
     jmp cycl
exit:
     mov ah,9  ;вывод данных
     mov dx,offset message2
     int 21h   
     mov ax,4c00h
     int 21h
code ends
end start

программа рабочая, а как решил организовать мало-мальский ввод\вывод - пишет ошибки: 13-value out of range\\ 28-29-operand types do not match.
В начале описано, что подаётся на ввод и вывод.
В книге искал, искал, нашёл только вывод на порты.(Юров В.И. 2-е изд.)
Приведите кусок программы [;ввод данных] на ввод пожалуйста. (& вывод результата degree)

[p51x]

13 - что еще за duo? Может все-таки dup.
28, 29 - у вас переменные dword, а вы суете в них половину регистра... Посмотрите в сторону ptr.

Про вывод:
Вы под что пишите? Скорее всего под вин.. какую? Хотя код похож на 16-битный.
Под ДОС можно прерывания использовать, а под вин - винАПИ.

[Goodwin98]

удалено...

[MalCer]

p51x, тут виндою и не пахнет, т.к. автор темы явно пишет эту прогу под DOS.
sig_GB, в интернете примеров огромная куча. Набросал для вас пример с вводом/выводом. Правда программа для маленьких чисел. Для сильно больших не охота заморачиваться, да и не нужно вам это пока. Если что то не понятно - пишите в топик.

.model tiny
.code
org 100h
.386
start:
;перходим в 3-ий режим и чистим экран
     mov ax,3
     int 10h
     mov dx,offset mes1
     mov ah,9
     int 21h 

     mov dx,offset buffer
     mov ah,0Ah
     int 21h 

     mov dx,offset crlf
     mov ah,9
     int 21h ; перевод строки

     xor di,di 
     mov ax,0h
     mov cl,blength
     xor ch,ch
     xor bx,bx
     mov si,cx 
     mov cl,10 
asc2hex:
     mov bl,byte ptr bcontents[di]
     sub bl,'0' 
     mul cx 
     add ax,bx 
     inc di 
     cmp di,si 
     jb asc2hex 
     push ax
     mov dx,offset mes2
     mov ah,9
     int 21h 


     mov dx,offset buffer
     mov ah,0Ah
     int 21h
     mov dx,offset crlf
     mov ah,9
     int 21h 

     xor di,di 
     mov ax,0h
     mov cl,blength
     xor ch,ch
     xor bx,bx
     mov si,cx 
     mov cl,10 
asc2hex2:
     mov bl,byte ptr bcontents[di]
     sub bl,'0' 
     mul cx 
     add ax,bx 
     inc di 
     cmp di,si 
     jb asc2hex2 
     mov bx,ax
     mov dx,offset mes3
     mov ah,9
     int 21h

     pop ax
     
     mov cx,ax
     mov ax,bx
     mov bx,ax
     dec cx

l1:    
    imul ax,bx            
    loop l1


     mov bx,10
     xor di,di
l2:
     xor dx,dx
     div bx
     add dl,030h
     dec di
     mov buf_end[di],dl
     cmp ax,00h
     jnz l2
     lea dx,buf_end[di]
     mov ah,09h
     int 21h
e1:
     mov ah, 0
     int 16h
exit: int 20
     ret

buf db 16 dup (?)
buf_end db'$'

mes1 db "Vvedite stepen: $"
mes2 db "Vvedite  chislo: $"
mes3 db "result: $"
crlf db 0Dh,0Ah,'$'
buffer db 6 ; максимальный размер буфера ввода
blength db ? ; размер буфера после считывания
bcontents: ; содержимое буфера располагается за концом СОМ-файла
a dw 0
b dw 0
end start

[sig_GB]

скомпилировал com-файлик - жееесть. видать я ещё не дошёл до этого.
не хотел рыскать по регистрам искать результат, а вывести на экран. но чтобы в 20 строк -хотя это ж асм.
вообщем, ушел читать.
=============================
прикрепите кто-нибудь файл(картинка, текст) с кодами и функциями (аля mov ax,9 или mov ax,040ffh или int 21h или int20h - гугл молчит) и их назначением. а то не понятно, когда int 21h для вывода на экран, а когда для окончания. В книге Юрова нет.

[MalCer]

sig_GB, гугл молчать не может. Все есть в интернете!!!

(аля mov ax,9 или mov ax,040ffh или int 21h или int20h

Правильно говорить, к примеру, функция 9, прерывания 21h - это вывод на экран. int20h - это выход в ДОС программах и тд.
Прилагаю справочники во вложении, не полные, но для начала сгодятся.
Одной книгой не отделаетесь - читайте книги параллельно. Порой нужно прочитать десяток, чтобы найти единственную, в которой поймешь что-то.
Удачи!

[sig_GB]

спасибо за советы. учту.
файлы скачал.

[sig_GB]

MalCer, (или кто-нибудь) объясните пожалуйста, что делает этот кусок:

xor di,di
mov ax,0h
mov cl,blength
xor ch,ch
xor bx,bx
mov si,cx
mov cl,10

А то при попытке использование Вашего ввода\вывода в другой программе, мне выкидывает ошибку
CS unreachable from current segment.
=================================== ================
Ткините пальцем, что не так?

18					 ;Данные для работы
     19	    0048  3D 3D	3D 3D 3D 3D 3D+	 mes0 db "=========== Матрица 7х5 ===========",'$',0Ah,0Dh
     20		  3D 3D	3D 3D 20 CC E0+
     21		  F2 F0	E8 F6 E0 20 37+
     22		  F5 35	20 3D 3D 3D 3D+
     23		  3D 3D	3D 3D 3D 3D 3D+
     24		  24 0A	0D
     25	    006E  50 6C	65 61 73 65 2C+	 mes1 db "Please, write	number of stripe: $"
     26		  20 77	72 69 74 65 20+
     27		  6E 75	6D 62 65 72 20+
     28		  6F 66	20 73 74 72 69+
     29		  70 65	3A 20 24
     30	    008F  52 65	73 75 6C 74 3A+	 mes2 db "Result: $"
     31		  20 24
     32	    0098  0D 0A	24		 crlf db 0Dh,0Ah,'$'
     33		  =0002			 size_elem=2
     34	    009B  0000			 Sum dw	0
     35	    009D  10*(??)		 buf db	16 dup (?)
     36	    00AD  24			 buf_end db '$'
     37	    00AE  06			 buffer	db 6 ; максимальный размер буфера ввода
     38	    00AF  ??			 blength db ? ;	размер буфера после считывания
     39	    00B0			 bcontents: ; содержимое буфера
**Error** lab5.asm(24) CS unreachable from current segment
     40	    00B0  0000			 a dw 0
     41	    00B2  0000			 b dw 0
     42	    0000			 stack 256h
     43	    00B4			 .code
     44					 .386

[MalCer]

;перевод числа в ASCII-формате из буфера в бинарное число в АХ, как то так
xor di,di ; DI = 0 - номер байта в буфере
mov ах,0h ; АХ = 0 - текущее значение результата
mov cl,blength
xor ch,ch  ; тут понятно ch=0
xor bx,bx  ; bx=0
mov si,cx ; SI - длина буфера
mov cl,10 ; CL = 10, множитель для MUL

CS unreachable from current segment

Название говорит само за себя: CS недоступен из текущего сегмента

Ткините пальцем, что не так?

У тебя метка bcontents: ; содержимое буфера находится в сегменте данных

Могу предложить еще процедурки для ввода/вывода
http://forum.vingrad.ru/faq/topic-15...%BB%D0%B0.html
--
хмм...перешел по ссылке работает через раз. Вот еще один вариант http://www.cyberforum.ru/assembler/thread54461.html

[sig_GB]

Тоесть, а если эту строчку заменить как-то?

bcontents: ; содержимое буфера
a dw 0
b dw 0
=====
mov bl,byte ptr bcontents[di]
...

заменить на (там же а-для первого случая, b-для второго, наверно)

a dw 0
=====
mov bl,a
...

Я не прав?