Есть программа, но не создается файл .obj

;Определяем стек
STACKSG SEGMENT PARA    STACK   'Stack'
        DW      100    DUP(?)  ;Задаем размер стека
STACKSG ENDS
 
DECIMAL_SIZE EQU 5
 
DATA SEGMENT    ; Описание сегмента данных
 VAR_A dw 256
 VAR_B dw 16
 VAR_C dw 1
 VAR_D dw 32
 VAR_E dw 1
 VAR_RES dw ?
 
        ;Сообщение и буфер десятичного представления числа
 MESSAGE    db "Result is $"    ;Текст сообщения
 NR     db 0AH,0DH,'$'      ;Текст перевода строки
 RESULT     db DECIMAL_SIZE DUP('0');Буфер для перевода цифры в десятичную строку
DATA ENDS
 
 
 
CODE SEGMENT    ; Описание сегмента кода
  ASSUME CS:CODE,DS:DATA,SS:STACKSG
        ; Директива настройки сегментных регистров
PRINT   PROC    near            ;Печать числа в AX на терминал 
                    ;Вход в процедуру
    PUSH    BP          ;Сохранение старой базы автоматических
                    ;переменных
    MOV BP,SP           ;Установка новой базы на вершине стека
    SUB SP,DECIMAL_SIZE+1   ;Выделение памяти для буфера
                    ;(верхушку стека сдвигаем на размер буфера)
 
    MOV CX,DECIMAL_SIZE     ;Количество символов в новой строке
    DEC BP          ;Перевести базу на символ ниже (BP=BP-1)
    MOV [BP], BYTE PTR '$'  ;Занести в буфер символ конца строки
    MOV BX,10           ;База для перевода числа в десятичное
 
NEXT_C: DEC BP              ;Вычисление адреса предыдущего символа
    XOR DX,DX           ;Обнуление регистра DX (расширение операнда для деления)
    DIV BX              ;Деление на 10 (BX=10)
    ADD DL, '0'         ;Превращение остатка от деления в соответствующий символ 
    MOV [BP],DL         ;Запись символа в буфер
    DEC CX              ;Декремент счетчика буфера
    JNZ NEXT_C          ;Переход если не ноль
 
        MOV     AH,09                   ;выводим на экран сообщение
        LEA     DX, MESSAGE         ;загрузка адреса
        INT     21h                     ;вызов прерывания
    
        MOV     DX, BP              ;выводим на экран result
    PUSH    DS          ;Сохранение в стеке значение сегментного регистра
    MOV AX,SS           ;Передача нового значения DS=ES
    MOV DS,AX                   ;DS:DX должен адресовать строку
        MOV     AH,09                   ;
        INT     21h                     ;
    POP DS                      ;Востанавливаем старое значение DS
    LEA DX, NR          ;Переводим строку
    MOV AH,09
    INT 21h
                    ;Выход из процедуры
    ADD SP,DECIMAL_SIZE+1   ;Освобождаем автоматическую память в стеке
    POP BP          ;Востанавливаем старое значение базы
                    ;автоматических переменных
    RET             ;Возврат из процедуры
PRINT   ENDP
 
BEGIN PROC FAR ; Описание процедуры BEGIN
    PUSH DS ; Запись сегментного регистра DS в стек
    SUB AX,AX   ; Запись нуля (нулевой адрес) в стек
    PUSH AX
 
    MOV AX,DATA   ; Настройка сегментного регистра DS на данные
    MOV DS,AX
 
    MOV AX, VAR_A ;место для исправления(задание2)
    MOV BX, VAR_B 
    MOV CX, VAR_D
div BX
MOV DX, AX
MOV AX, VAR_C
mul CX
sub DX,AX
mul VAR_E
 
 
    
        MOV VAR_RES, AX
    CALL PRINT  ; Печать результата
 
    ;Далее идет аналог процедуры PRINT с буфером в зоне статических переменных
    ;(результат печатается второй раз)
    MOV AX, VAR_RES ;Переслать в AX результат
    MOV CX,10   ;Десятичная база
    MOV RESULT+DECIMAL_SIZE, '$'
    MOV BX,OFFSET RESULT+DECIMAL_SIZE   ; Установка базы
 
NEXT:   DEC BX
    XOR DX,DX
    DIV CX
    ADD DL, '0'
    MOV [BX],DL
    CMP BX,OFFSET RESULT
    JNE NEXT
 
        MOV     AH,09                   ;
        LEA     DX, MESSAGE         ;выводим на экран сообщение
        INT     21h                     ;
        MOV     AH,09                   ;
        LEA     DX, RESULT          ;выводим на экран result
        INT     21h                     ;
 
 ; RET      ; Возврат в ОС
 BEGIN ENDP
CODE ENDS
END BEGIN

;Определяем стек
STACKSG SEGMENT PARA    STACK   'Stack'
        DW      100    DUP(?)  ;Задаем размер стека
STACKSG ENDS
 
DECIMAL_SIZE EQU 5
 
DATA SEGMENT    ; Описание сегмента данных
 VAR_A dw 256
 VAR_B dw 16
 VAR_C dw 1
 VAR_D dw 32
 VAR_E dw 1
 VAR_RES dw ?
 
        ;Сообщение и буфер десятичного представления числа
 MESSAGE    db "Result is $"    ;Текст сообщения
 NR     db 0AH,0DH,'$'      ;Текст перевода строки
 RESULT     db DECIMAL_SIZE DUP('0');Буфер для перевода цифры в десятичную строку
DATA ENDS
 
 
 
CODE SEGMENT    ; Описание сегмента кода
  ASSUME CS:CODE,DS:DATA,SS:STACKSG
        ; Директива настройки сегментных регистров
PRINT   PROC    near            ;Печать числа в AX на терминал 
                    ;Вход в процедуру
    PUSH    BP          ;Сохранение старой базы автоматических
                    ;переменных
    MOV BP,SP           ;Установка новой базы на вершине стека
    SUB SP,DECIMAL_SIZE+1   ;Выделение памяти для буфера
                    ;(верхушку стека сдвигаем на размер буфера)
 
    MOV CX,DECIMAL_SIZE     ;Количество символов в новой строке
    DEC BP          ;Перевести базу на символ ниже (BP=BP-1)
    MOV [BP], BYTE PTR '$'  ;Занести в буфер символ конца строки
    MOV BX,10           ;База для перевода числа в десятичное
 
NEXT_C: DEC BP              ;Вычисление адреса предыдущего символа
    XOR DX,DX           ;Обнуление регистра DX (расширение операнда для деления)
    DIV BX              ;Деление на 10 (BX=10)
    ADD DL, '0'         ;Превращение остатка от деления в соответствующий символ 
    MOV [BP],DL         ;Запись символа в буфер
    DEC CX              ;Декремент счетчика буфера
    JNZ NEXT_C          ;Переход если не ноль
 
        MOV     AH,09                   ;выводим на экран сообщение
        LEA     DX, MESSAGE         ;загрузка адреса
        INT     21h                     ;вызов прерывания
    
        MOV     DX, BP              ;выводим на экран result
    PUSH    DS          ;Сохранение в стеке значение сегментного регистра
    MOV AX,SS           ;Передача нового значения DS=ES
    MOV DS,AX                   ;DS:DX должен адресовать строку
        MOV     AH,09                   ;
        INT     21h                     ;
    POP DS                      ;Востанавливаем старое значение DS
    LEA DX, NR          ;Переводим строку
    MOV AH,09
    INT 21h
                    ;Выход из процедуры
    ADD SP,DECIMAL_SIZE+1   ;Освобождаем автоматическую память в стеке
    POP BP          ;Востанавливаем старое значение базы
                    ;автоматических переменных
    RET             ;Возврат из процедуры
PRINT   ENDP
 
BEGIN PROC FAR ; Описание процедуры BEGIN
    PUSH DS ; Запись сегментного регистра DS в стек
    SUB AX,AX   ; Запись нуля (нулевой адрес) в стек
    PUSH AX
 
    MOV AX,DATA   ; Настройка сегментного регистра DS на данные
    MOV DS,AX
 
    MOV AX, VAR_A ;место для исправления(задание2)
    MOV BX, VAR_D 
    MOV CX, VAR_E
add AX, VAR_B 
sub AX,VAR_C 
div BX
mul CX
 
    
        MOV VAR_RES, AX
    CALL PRINT  ; Печать результата
 
    ;Далее идет аналог процедуры PRINT с буфером в зоне статических переменных
    ;(результат печатается второй раз)
    MOV AX, VAR_RES ;Переслать в AX результат
    MOV CX,10   ;Десятичная база
    MOV RESULT+DECIMAL_SIZE, '$'
    MOV BX,OFFSET RESULT+DECIMAL_SIZE   ; Установка базы
 
NEXT:   DEC BX
    XOR DX,DX
    DIV CX
    ADD DL, '0'
    MOV [BX],DL
    CMP BX,OFFSET RESULT
    JNE NEXT
 
        MOV     AH,09                   ;
        LEA     DX, MESSAGE         ;выводим на экран сообщение
        INT     21h                     ;
        MOV     AH,09                   ;
        LEA     DX, RESULT          ;выводим на экран result
        INT     21h                     ;
 
  RET       ; Возврат в ОС
 BEGIN ENDP
CODE ENDS
END BEGIN

mov ah,0
int 16h