section .data
section .text
global main

write:
mov edx, 1
mov ecx, esp
add ecx, 16
mov ebx, 1
mov eax, 4
int 0x80
nop
leave
ret

is:
mov ebp,esp
sub esp,40
mov edx, ebp
add edx, 8
cmp dword [edx],0
je L1
mov edx, ebp
add edx, 8
mov ecx, dword [edx]

mov edx, ecx ; mod
LL:
cmp edx, 10
jl LE
sub edx, 10
jmp LL

LE:
add edx, 0x30
mov edi, esp
add edi, 16
mov  dword [edi], edx
div ecx, 10
sub edi, 8
mov  dword [edi], ecx
call is
call write
L1:
leave
ret

main:
push ebp
mov ebp, esp
sub esp, 80
mov edi, esp
add edi, 8
mov dword [edi], 8998
leave
ret