Tasm Написать программу для вывода на экран нескольких строк символов.

[ChestIotVaga]

   .model compact
; Сегмент стека
s_seg segment
    db 128 dup(?)
s_seg ends
 
; Сегмент данных
d_seg segment
    str_prompt db 'Enter string: $'
    str_result db 13,10,'Chars: $'  
    tab db 256 dup(0) ; массив всех возможных символов  
d_seg ends
 
; Сегмент сода
c_seg segment 'code'
    ; привязываем метки к адресам сегментов 
    assume ds:d_seg, ss:s_seg, cs:c_seg
main:
    ; устанавливаем сегмент стека
    mov ax, s_seg
    mov ss, ax
    ; устанавливаем сегмент данных  
    mov ax, d_seg
    mov ds, ax  
 
    
    ; печатем приглашение
    mov ah, 09h
    lea dx, str_prompt
    int 21h
 
    xor bx, bx  
@1: ; читаем символ
    mov ah, 01h
    int 21h
    ; проверяем конец строки
    cmp al, 13
    je @2
    ; отмечаем в таблице
    mov bl, al
    mov tab[bx], 1
    jmp @1  
 
    ; печатем результат
@2: mov ah, 09h
    lea dx, str_result
    int 21h
    
    mov cx, 256
    xor bx, bx
@3: ; проверяем отметку в таблице
    cmp tab[bx], 1
    jne @4
    ; печатаем символ
    mov ah, 02h
    mov dl, bl
    int 21h
    ; сдвигаемся по таблице 
@4: inc bx
    loop @3 
    
    ; выход из программы    
    mov ax, 4C00h
    int 21h      
c_seg ends
 
end main

код на одну строку скажите как сделать на две может есть код как пример ?

[macomics]

1) Скопировать часть кода второй раз.
2) Добавить цикл (метку, переменную счетчик, команду инициализиции переменной счетчика, команду проверки счетчика и условную команду перехода на метку)

[ChestIotVaga]

macomics, я в написании кода в ассемблере не сильно знаю могли бы помочь

[macomics]

   .model compact
; Сегмент стека
s_seg segment
    db 128 dup(?)
s_seg ends
 
; Сегмент данных
d_seg segment
    str_count db 0
    str_prompt db 'Enter string: $'
    str_result db 13,10,'Chars: $'  
    tab db 256 dup(0) ; массив всех возможных символов  
d_seg ends
 
; Сегмент сода
c_seg segment 'code'
    ; привязываем метки к адресам сегментов 
    assume ds:d_seg, ss:s_seg, cs:c_seg
main:
    ; устанавливаем сегмент стека
    mov ax, s_seg
    mov ss, ax
    ; устанавливаем сегмент данных  
    mov ax, d_seg
    mov ds, ax  
 
; начало цикла (повторяется 2 раза от начала и до конца цикла)
    mov str_count, 2
@loop:
    cmp str_count, 0
    jbe @break
    
    ; печатем приглашение
    mov ah, 09h
    lea dx, str_prompt
    int 21h
 
    xor bx, bx  
@1: ; читаем символ
    mov ah, 01h
    int 21h
    ; проверяем конец строки
    cmp al, 13
    je @2
    ; отмечаем в таблице
    mov bl, al
    mov tab[bx], 1
    jmp @1  

; конец цикла
    dec str_count
    jmp @loop
@break:
 
    ; печатем результат
@2: mov ah, 09h
    lea dx, str_result
    int 21h
  
    mov cx, 256
    xor bx, bx
@3: ; проверяем отметку в таблице
    cmp tab[bx], 1
    jne @4
    ; печатаем символ
    mov ah, 02h
    mov dl, bl
    int 21h
    ; сдвигаемся по таблице 
@4: inc bx
    loop @3 

    ; выход из программы    
    mov ax, 4C00h
    int 21h      
c_seg ends
 
end main