Quelle  test.asm

; #########################################################################

Main proc

    LOCAL InputBuffer[128]:BYTE

  ; -------------------------------
  ; console mode library procedures
  ; -------------------------------

  ; ------------
  ; using macros
  ; ------------

    cls
    print "Console function test",13,10,13,10

    input "Enter Some Text > "
    invoke StdOut,eax           ; return address in eax

  ; ----------------
  ; using procedures
  ; ----------------
  
    invoke locate,10,10
    invoke StdOut,ADDR Msg1 
    invoke StdIn,ADDR InputBuffer,LENGTHOF InputBuffer

    invoke locate,10,11 
    invoke StdOut,ADDR Msg2
    invoke StdOut,ADDR InputBuffer

    ret

Main endp

; #########################################################################

    end start-------

    cls
    print "Console function test",13,10,13,10

    input "Enter Some Text > "
    invoke StdOut,eax           ; return address in eax

  ; ----------------
  ; using procedures
  ; ----------------
  
    invoke locate,10,10
    invoke StdOut,ADDR Msg1 
    invoke StdIn,ADDR InputBuffer,LENGTHOF InputBuffer

    invoke locate,10,11 
    invoke StdOut,ADDR Msg2
    invoke StdOut,ADDR InputBuffer

    ret

Main endp

; #########################################################################

    end start