JIsYy9 - Online IDE & Debugging Tool

section .data
    msg_input   db 'Введите выражение (пример: 3+4*2): ', 0
    msg_result  db 10, 'Результат: ', 0
    msg_error   db 10, 'Ошибка!', 0
    msg_div_zero db 'Деление на ноль', 0
    buffer      times 256 db 0
    num_stack   times 20 dq 0   ; Стек для чисел
    op_stack    times 20 db 0   ; Стек для операторов
    num_top     dq 0            ; Вершина стека чисел
    op_top      dq 0            ; Вершина стека операторов

section .text
    global _start

_start:
    ; Вывод приглашения
    mov rax, 1
    mov rdi, 1
    mov rsi, msg_input
    mov rdx, 35
    syscall

    ; Чтение ввода
    mov rax, 0
    mov rdi, 0
    mov rsi, buffer
    mov rdx, 255
    syscall

    ; Инициализация
    mov rsi, buffer            ; Указатель на ввод
    mov qword [num_top], 0     ; Стек чисел пуст
    mov qword [op_top], 0      ; Стек операторов пуст

    ; Главный цикл разбора
process_char:
    mov al, [rsi]              ; Читаем символ
    inc rsi

    cmp al, 10                 ; Конец строки (LF)
    je process_remaining_ops
    cmp al, ' '                ; Пропускаем пробелы
    je process_char

    ; Если цифра
    cmp al, '0'
    jb not_digit
    cmp al, '9'
    ja not_digit

    ; Преобразуем символ в число
    sub al, '0'
    mov rbx, rax               ; Сохраняем цифру в RBX

    ; Читаем остальные цифры числа
read_number:
    mov al, [rsi]
    cmp al, '0'
    jb push_number
    cmp al, '9'
    ja push_number

    ; RBX = RBX * 10 + новая цифра
    imul rbx, 10
    sub al, '0'
    add rbx, rax
    inc rsi
    jmp read_number

push_number:
    ; Помещаем число в стек
    mov rax, [num_top]
    mov [num_stack + rax*8], rbx
    inc qword [num_top]
    jmp process_char

not_digit:
    ; Обработка операторов
    cmp al, '+'
    je process_op
    cmp al, '-'
    je process_op
    cmp al, '*'
    je process_op
    cmp al, '/'
    je process_op
    jmp input_error            ; Неизвестный символ

process_op:
    ; Обработка приоритетов
    cmp qword [op_top], 0
    je push_op                 ; Стек операторов пуст

    ; Сравниваем приоритеты
    mov rbx, [op_top]
    dec rbx
    mov cl, [op_stack + rbx]   ; Верхний оператор в стеке

    ; Приоритет текущего оператора (AL)
    call get_priority
    mov dl, al

    ; Приоритет оператора в стеке (CL)
    mov al, cl
    call get_priority

    ; Если приоритет в стеке >= текущего, выполняем операцию
    cmp al, dl
    jge apply_operation
    jmp push_op

apply_operation:
    call do_operation
    jmp process_op

push_op:
    ; Добавляем оператор в стек
    mov rbx, [op_top]
    mov [op_stack + rbx], al
    inc qword [op_top]
    jmp process_char

process_remaining_ops:
    ; Выполняем оставшиеся операции
    cmp qword [op_top], 0
    je print_result
    call do_operation
    jmp process_remaining_ops

print_result:
    ; Вывод результата
    mov rax, 1
    mov rdi, 1
    mov rsi, msg_result
    mov rdx, 12
    syscall

    mov rax, [num_stack]       ; Результат в вершине стека
    call print_number

    ; Перенос строки
    mov rax, 1
    mov rdi, 1
    mov rsi, 10
    push rsi
    mov rsi, rsp
    mov rdx, 1
    syscall
    pop rsi

exit:
    mov rax, 60
    xor rdi, rdi
    syscall

; --- Процедуры ---

get_priority:
    ; Возвращает приоритет оператора в AL
    cmp al, '+'
    je .low
    cmp al, '-'
    je .low
    cmp al, '*'
    je .high
    cmp al, '/'
    je .high
    mov al, 0
    ret
.low:
    mov al, 1
    ret
.high:
    mov al, 2
    ret

do_operation:
    ; Извлекаем оператор
    dec qword [op_top]
    mov rbx, [op_top]
    mov al, [op_stack + rbx]

    ; Извлекаем операнды
    dec qword [num_top]
    mov rbx, [num_top]
    mov rcx, [num_stack + rbx*8] ; Правый операнд

    dec qword [num_top]
    mov rbx, [num_top]
    mov rax, [num_stack + rbx*8] ; Левый операнд

    ; Выполняем операцию
    cmp al, '+'
    je .add
    cmp al, '-'
    je .sub
    cmp al, '*'
    je .mul
    cmp al, '/'
    je .div

.add:
    add rax, rcx
    jmp .store_result
.sub:
    sub rax, rcx
    jmp .store_result
.mul:
    imul rcx
    jmp .store_result
.div:
    cmp rcx, 0
    je division_error
    cqo
    idiv rcx

.store_result:
    mov [num_stack + rbx*8], rax
    inc qword [num_top]
    ret

print_number:
    ; Вывод числа из RAX
    mov rbx, 10
    xor rcx, rcx            ; Счётчик цифр

.div_loop:
    xor rdx, rdx
    div rbx
    add dl, '0'
    push rdx
    inc rcx
    test rax, rax
    jnz .div_loop

.print_loop:
    pop rdx
    mov [msg_result + 12], dl  ; Используем буфер для вывода
    mov rax, 1
    mov rdi, 1
    mov rsi, msg_result + 12
    mov rdx, 1
    syscall
    loop .print_loop
    ret

division_error:
    mov rax, 1
    mov rdi, 1
    mov rsi, msg_error
    mov rdx, 8
    syscall

    mov rax, 1
    mov rdi, 1
    mov rsi, msg_div_zero
    mov rdx, 14
    syscall
    jmp exit

input_error:
    mov rax, 1
    mov rdi, 1
    mov rsi, msg_error
    mov rdx, 8
    syscall
    jmp exit