Есть ли какая нибудь нормальная прога для компилирования кода на ассемблере?

ssg segment para stack 'stack'  ;Стандартный заголовок определения стека 
dw 32 dup(?)                        ;Задание глубины стека
ssg ends                                
datasg segment para 'data'          ;Стандартный заголовок определения данных
namepar label byte                         ;Имя списка параметров:
maxnlen db 30                              ;максимальная длина имени 
namelen db ?                               ;число введенных символов
namefld db 30 dup(' '),'$'       ;имя и ограничитель для вывода на экран   
strg db 'I am here, in the Shadow',13,10,'$'
namprmp db 'TEST'
 
tes db ?
cc db ?
day db ?
day1 db ?
day2 db ?
 
 
k db ?
a db ?
b db ?
c db ?
x db ?
y db ?
      
ends                                ;Конец сегмента данных                        
codesg segment para 'code'          ;Заголовок сегмента кода
begin proc far                      ;Начало программы - основной процедуры
;-------------------------------------------------------------------------
assume cs:codesg,ds:datasg,ss:ssg ; \
push ds                               ;   \
sub ax,ax                             ; Стандартный заголовок любой 
push ax                               ;        EXE - программы
mov ax,datasg                         ;   /
mov ds,ax                             ; /
mov ax,0003h; стандартный 16-цветовой режим
int 10h ;передача управления в BIOS
 
mov x,0
mov y,0
 
CIKL:
 
sub x,05
 
mov cx,0002
zero:
add x,07
add y,06
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h
       
loop zero
 
mov cx,0001
zero1:
add x,06
add y,07
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h   
 
loop zero1
 
mov cx,0001
zero2:
add x,04
add y,08
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h
 
loop zero2
 
mov cx,0001
zero3:
add x,03
add y,09
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h
 
loop zero3
 
mov cx,0001
zero4:
sub x,00
add y,09
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h
 
loop zero4
 
mov cx,0001
zero5:
sub x,03
add y,09
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h
 
loop zero5
 
mov cx,0001
zero6:
sub x,04
add y,08
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h
 
loop zero6
 
mov cx,0001
zero7:
sub x,06
add y,07
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h
 
loop zero7
 
mov cx,0001
zero8:
sub x,07
add y,06
 
mov ah,02
mov dh,x
mov dl,y
int 10h
 
mov ah,02
mov dl,2Ah
int 21h
 
loop zero8
 
MOV AH,02   ; получить код следующей нажатой клавиши
MOV DL,AL   ; переместить считанный символ из AL в DL
 
MOV  AH,00     ;    Функция ввода
INT  16H       ;        Вызвать BIOS
CMP  AL,0Dh    ;    Enter
JE   EXIT     ;         да - выйти
 
JMP CIKL
EXIT:   
    
mov ah,1
int 21h
;---------------------------------------------------------------------------
ret
begin endp      ;Стандартный конец программы
codesg ends     ;
end begin       ;