Ошибка каталог с компилятором не найден asm

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

;.686
;Система команд процессора 686       
;.MODEL FLAT,stdcall;Модель памяти плоская, стандартный вызов процедуры
;option casemap:none;Режим при котором заглавные и строчные буквы не различаются
;comment * -----------------------------------------------------
;Условие задачи:Вычислить арифметические выражения для x и y. Вычисления в словах.
.XLIST
      include masm32includemasm32rt.inc;Обеспечивает подключение всех необходимых функций и 
                                          ;макросов.    
.LIST ;Директивы .XLIST и .LIST обеспечивают правильное формирование листинга программы
.DATA
a        dw      -3
b        dw      5
c1        dw      2
.DATA?
x        dw      ?
y        dw      ?
; Выражения для Х и У
;          a^2-b^3+3*c1       b^3-x/4
;    x:=   ------------; y:= --------;
;          2*a^2-8             a
;
.CODE
lab1:
         
         mov     ax,a;ax=-3
         imul    a ;ax=a^2=9
         mov     bx,ax ;Сохраняем a^2 в bx=a^2=9
         mov     ax,b;ax=5
         imul    b;ax=b^2=25
         imul    b;ax=b^3=125
         mov     cx,ax;Сохраняем b^3 в cx=b^3=125
         mov     ax,3;ax=3
         imul    c1;ax=c1*3=6
         add     ax,bx;ax=a^2+c*3=15
         sub     ax,cx ;ax=a^2-b^3+3*c=-110, числитель а ax.
         sal     bx,1 ;bx=2*a^2=18
         sub     bx,8 ;bh=2*a^2-8=10, Знаменатель в bx.
         cwd     ;ax->(dx:ax), расширяем ax до (dx:ax)
         idiv    bx; ax=-11
         mov     x,ax; x=-11.
;Вычисляем y
         mov     bx,4
         cwd
         idiv    bx;ax=x/4=-2
         ;mov      ax,x
         ;sar      ax,2;al=x/4=-2
     
         neg     ax;ax=-ax=2;
         add     ax,cx;ax=b^3-c/4=127, числитель у
;расширяем ax до (dx:ax)
         cwd
         idiv    a;ax=ax/a=-42
         mov     y,ax;y=-42.
         ;ret
         exit
         end     lab1

1
2
3
4
5
6
7

;.686
;Система команд процессора 686       
;.MODEL FLAT,stdcall;Модель памяти плоская, стандартный вызов процедуры
;option casemap:none;Режим при котором заглавные и строчные буквы не различаются
;comment * -----------------------------------------------------
;Условие задачи:Вычислить арифметические выражения для x и y. Вычисления в словах.
.XLIST

1
2
3
4
5

.686;Система команд процессора 686       
.MODEL FLAT,stdcall;Модель памяти плоская, стандартный вызов процедуры
option casemap:none;Режим при котором заглавные и строчные буквы различаются
;Условие задачи:Вычислить арифметические выражения для x и y. Вычисления в словах.
.XLIST

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

; winurl.asm
; Пример програмы для win32.
; Запускает установленный по умолчанию броузер на адрес, указанный в строке URL
; аналогично можно запускать любую программу, документ, и любой другой файл,
; для которого определена операция open
;
        .386
        .model     flat
include E:masm32includekernel32.inc
include E:masm32includeshell32.inc
        .const
URL     db   'http://www.lionking.org/',0
        .code
_start:          ; метка точки входа должна начинаться с подчеркивания
        xor        ebx,ebx
        push       ebx          ; для исполнимых файлов - способ показа
        push       ebx          ; рабочий каталог
        push       ebx          ; командная строка
        push       offset URL   ; имя файла с путем
        push       ebx          ; операция open или print (если NULL - open)
        push       ebx          ; идентификатор окна, которое получит сообщения
        call       ShellExecute ; ShellExecute(NULL,NULL,url,NULL,NULL,NULL)
        push       ebx          ; код выхода
        call       ExitProcess  ; ExitProcess(0)
end        _start

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

    .model flat
    .data
a   db 0ffh
b   db 000h
x   dw ? ; число со знаком
    .code
public main
main proc
    ; короткий путь
    mov ax, word ptr a
    xor al, ah
    mov a, al
    jmp short quit
 
    ; длинный путь
    mov ax, word ptr a
    test al, al  ; проверяем a
    jz chek_b
    not ah
chek_b:     
    test ah, ah  ; проверяем b 
    jz false
 
true:
    mov a, 0ffh
    jmp short quit
false:
    mov a, 0
 
quit:
    xor ax, ax
    ret
main endp
end

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

Microsoft (R) Macro Assembler Version 10.00.30319.01        10/11/16 18:35:46
kod.asm                              Page 1 - 1
 
 
                .686;Система команд процессора 686       
                .MODEL FLAT,stdcall;Модель памяти плоская, стандартный вызов процедуры
                option casemap:none;Режим при котором заглавные и строчные буквы различаются
                ;Условие задачи:Вычислить арифметические выражения для x и y. Вычисления в словах.
                .XLIST
                  C       .model flat, stdcall                      ; 32 bit memory model
masm32includemasm32rt.inc(33) : warning A4011:multiple .MODEL directives found : .MODEL ignored
                .LIST ;Директивы .XLIST и .LIST обеспечивают правильное формирование листинга программы
 00000000           .DATA
 00000000 FFFD          a        dw      -3
 00000002 0005          b        dw      5
 00000004 0002          c1        dw      2
 00000000           .DATA?
 00000000 0000          x        dw      ?
 00000002 0000          y        dw      ?
                ; Выражения для Х и У
                ;          a^2-b^3+3*c1       b^3-x/4
                ;    x:=   ------------; y:= --------;
                ;          2*a^2-8             a
                ;
 00000000           .CODE
 00000000           lab1:
                         
 00000000  66| A1                mov     ax,a;ax=-3
       00000000 R
 00000006  66| F7 2D                 imul    a ;ax=a^2=9
       00000000 R
 0000000D  66| 8B D8                 mov     bx,ax ;Сохраняем a^2 в bx=a^2=9
 00000010  66| A1                mov     ax,b;ax=5
       00000002 R
 00000016  66| F7 2D                 imul    b;ax=b^2=25
       00000002 R
 0000001D  66| F7 2D                 imul    b;ax=b^3=125
       00000002 R
 00000024  66| 8B C8                 mov     cx,ax;Сохраняем b^3 в cx=b^3=125
 00000027  66| B8 0003               mov     ax,3;ax=3
 0000002B  66| F7 2D                 imul    c1;ax=c1*3=6
       00000004 R
 00000032  66| 03 C3                 add     ax,bx;ax=a^2+c*3=15
 00000035  66| 2B C1                 sub     ax,cx ;ax=a^2-b^3+3*c=-110, числитель а ax.
 00000038  66| D1 E3                 sal     bx,1 ;bx=2*a^2=18
 0000003B  66| 83 EB 08              sub     bx,8 ;bh=2*a^2-8=10, Знаменатель в bx.
 0000003F  66| 99                cwd     ;ax->(dx:ax), расширяем ax до (dx:ax)
 00000041  66| F7 FB                 idiv    bx; ax=-11
 00000044  66| A3                mov     x,ax; x=-11.
       00000000 R
                ;Вычисляем y
 0000004A  66| BB 0004               mov     bx,4
 0000004E  66| 99                cwd
 00000050  66| F7 FB                 idiv    bx;ax=x/4=-2
                         ;mov      ax,x
                         ;sar      ax,2;al=x/4=-2
                     
 00000053  66| F7 D8                 neg     ax;ax=-ax=2;
 00000056  66| 03 C1                 add     ax,cx;ax=b^3-c/4=127, числитель у
                ;расширяем ax до (dx:ax)
 00000059  66| 99                cwd
 0000005B  66| F7 3D                 idiv    a;ax=ax/a=-42
       00000000 R
 00000062  66| A3                mov     y,ax;y=-42.
       00000002 R
                         ;ret
                         exit
                         end     lab1