INB.asm

; adaptação do programa do capitulo 4 do livro
; linguagem assembly para IBM PC - Peter Norton.
; Imprimindo numeros binários
; 02 de agosto de 2012 - Cacio josé gazola

    SECTION .data
descri: db "Adaptação do programa 'imprimindo números binários', CAP 4, \
livro Linguagem assembly para IBM PC",10," de Peter Norton e John Socha"
cdes: equ $-descri
ind: equ 8d
dado: db 0x45
;buf: db 0,0,0,0,0,0,0,0    ; não resolveu truncagem


    SECTION .bss
buf: resb 8                 ; buffer com 0's e 1's


    SECTION .text
    global main

imprime:
    mov     edx,8           ; imprime dados do buffer
    mov     ecx,buf
    mov     ebx,1
    mov     eax,4
    int     0x80            ; usando a syscall write
    ret

main:
    mov     edx,cdes        ; imprime texto inicial do programa
    mov     ecx,descri
    mov     ebx,1
    mov     eax,4
    int     0x80            ; usando a syscall write
    mov     si,buf          ; si aponta para o inicio do buffer
    mov     cl,ind          ; cl conta 8 bytes do buffer
aqui:
    mov     al,0            ; prepara o temporario
    rcl     byte[dado],1    ; roda bit para carry
    adc     al,0x1e         ; transforma bit em byte ASCII em al
    mov     [si],al         ; move al para buf
    inc     si              ; si aponta para proximo byte no buffer
    loop    aqui            ; roda 8 vezes
    call    imprime         ; imprime buffer
    ret