|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.06.2011, 22:11 | #1 |
Пользователь
Регистрация: 26.03.2011
Сообщений: 18
|
Как сохранять файлы???(Решение выражения)
Набрал в текстовом редакторе Начальную программу, которая решает выражение: ((D^2-A)^2\D^2+B)-20; с заданными числами A=10, B=4, D=-23. Нужно как-то через Norton Commander сохранить всё это в форматах asm, obj, lst, сделать листинг, и компанировать с помощью Link.exe.
Вот текст Начальной программы: ;-------------------------------------------- Поле стека ----------------- sseg segment 'stack' db 128 dup (?) sseg ends ;-------------------------------------------- Поля даних ----------------- dseg segment 'data' text1 db 'Програма стартувала', 13, 10, '$' text2 db '((D^2-A)^2\D^2+B)-20 = $' A dw 0Ah B dw 4 D dw 0E9h rez dw ? dseg ends ;-------------------------------------------- Текст програми ------------- cseg segment 'code' assume cs:cseg, dsseg, ss:sseg start proc far mov ax, dseg mov ds, ax ;------------------------------------------------------------------------- m1: lea dx, text1 call WrStr mov dx,offset text2 call WrStr ;------------------------------------------------------------------------- m2: mov ax,d mul ax add ax,b mov cx,ax mov ax, D mul ax sub ax, A mul ax div cx sub ax,20 mov rez,ax ;------------------------------------------------------------------------- m3: mov dl, al add dl, 30h mov ah, 02h Int 21h ;------------------------------------------------------------------------- m4: mov ah, 4ch Int 21h Start endp ;------------------------------------------------------------------------- WrStr proc near mov ah, 09h int 21h ret WrStr endp ;------------------------------------------------------------------------- Cseg ends end start Возможно есть где-то ошибки... Помогите кому по силам... |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Решение выражения ((D^2-A)^2\D^2+B)-20. | Kroleg | Помощь студентам | 3 | 27.06.2011 19:40 |
Решение логическоего выражения | TRIZER | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 7 | 17.05.2011 12:22 |
Как сохранять ключ | Умагаджи | Общие вопросы Delphi | 4 | 06.02.2011 13:16 |
Сохранять изображения и файлы в базу данных Paradox | hoba | БД в Delphi | 20 | 29.11.2009 00:55 |
решение выражения на паскале | bonys91 | Помощь студентам | 2 | 02.04.2009 22:18 |