ify"> pop cx
loop MEN
mov ROW, 24
mov COLUMN, 0
lea bp, MESSAGE
mov cx, MESSLEN
call str_out
mov COLUMN, 27
mov ah, 09
mov cx, 1
mov al, CHOICE
add al, 31H
int 10h
ret _out endp
;------------------------------------------------------------
; ВИСНОВОК РЯДКИ МЕНЮ
;------------------------------------------------------------
menu_str_out proc
; ОБЧИСЛЕННЯ?? Троках НА ЕКРАНІ
mov ax, 09
add al, BYTE PTR CHOICE
mov ROW, AL
; ОБЧИСЛЕННЯ ПУНКТУ МЕНЮ
mov al, MENLEN
mul byte ptr CHOICE
lea bp, MENPOINTS
add bp, ax
mov cx, MENLEN
; ----------------------------
mov COLOR, CHOSECOLOR
call str_out
mov COLOR, NOTCOLOR
; Позиціонування курсора
mov ah, 02
mov dl, ROW
mov dh, MESSLEN
int 10h
ret_str_out endp
;------------------------------------------------------------_ down_press PROC
inc CHOICE
cmp CHOICE, MENU_MAX + 1
je CHOICE_MIN
ret
_ MIN: mov CHOICE, 1_down_press endp
;------------------------------------------------------------_ up_press proc
cmp CHOICE, 0
jne CHOICE_DEC
mov CHOICE, MENU_MAX
ret _DEC:
dec CHOICE
ret _up_press endp
;------------------------------------------------------------_ number_press proc
cmp al, 4
jl NEXT1
ret: cmp al, 0
jg NEXT2
ret: sub al, 31h
mov CHOICE, al
ret_number_press endp
;------------------------------------------------------------ ENDSBEGIN5.
5. Список літератури
1. Пирогов В.Ю. ASSEMBLER. Навчальний курс - М: Видавництво Нолидж, +2001
. Пітер Абель, Асемблер і програмування для IBM PC
. Роберт Журден, Програмування на Assembler
. Калашников О. Асемблер? Це просто! Вчимося програмувати - Видавництво БХВ-Петербург, 2006
