%include "io.inc"

section .data
    n dd 31

section .bss
    a resd 600
    number resb 32

section .text
global CMAIN
CMAIN:
    mov edx, 0
    mov [a], dword 1
    mov esi, 1          ; esi = current_index

    mov eax, 0          ; eax = i

.for_i_eax:
    cmp eax, dword [n]
        jz .stop_for_i_eax

            mov [a + 4 * esi], dword 1          ; a.append(1)
            inc esi

            mov ebx, 0                          ; ebx = j

            .for_j_ebx:
                cmp ebx, eax
                    jz .stop_for_j_ebx

                        mov edi, eax

                        inc eax
                        imul edi

                        mov ecx, 2
                        div ecx
                        add eax, ebx

                        mov ecx, [a + 4 * eax]
                        add ecx, [a + 4 * eax + 4]

                        mov [a + 4 * esi], ecx
                        inc esi

                        mov eax, edi

                    inc ebx
                    jmp .for_j_ebx

            .stop_for_j_ebx:

            mov [a + 4 * esi], dword 1          ; a.append(1)
            inc esi

        inc eax
        jmp .for_i_eax

.stop_for_i_eax:

    mov eax, 0

.print_for_eax:
    cmp eax, dword 100
        jz .stop_print_for_eax

            ;PRINT_UDEC 4, [a + 4 * eax]
            ;PRINT_CHAR ' '

        inc eax
        jmp .print_for_eax

.stop_print_for_eax:

    ;PRINT_STRING "Shalom!"
    GET_UDEC 4, eax
    ;PRINT_HEX 4, eax
    ;NEWLINE

    mov edi, eax

    mov esi, 0
    mov edx, 0

    mov ecx, 0

.for_number_ecx:
    cmp ecx, dword 32
        jz .stop_for_number_ecx

            mov edx, 0
            rol eax, 1
            mov edi, eax

            mov ebx, 2
            div ebx

            mov [number + esi], dl

            mov eax, edi
            PRINT_UDEC 1, [number + esi]
            inc esi

        inc ecx
        jmp .for_number_ecx

.stop_for_number_ecx:

    mov edx, 0
    mov esi, 0
    mov edi, 0                                    ; edi = answer

    xor eax, eax
    ret