News:

MASM32 SDK Description, downloads and other helpful links
MASM32.com New Forum Link
masmforum WebSite

Problem with the following code

Started by dgonzalez, September 28, 2005, 04:05:50 PM

Previous topic - Next topic

dgonzalez

Hello friends I have a problem with the following code, when I press a key to continue the program shows to me the last number that press, who I can do so that that does not happen.

.486                                   
    .model flat, stdcall                     
    option casemap :none                     

    include \masm32\include\windows.inc     
    include \masm32\macros\macros.asm       

    include \masm32\include\masm32.inc
    include \masm32\include\gdi32.inc
    include \masm32\include\user32.inc
    include \masm32\include\kernel32.inc

    includelib \masm32\lib\masm32.lib
    includelib \masm32\lib\gdi32.lib
    includelib \masm32\lib\user32.lib
    includelib \masm32\lib\kernel32.lib

    .data
     
    .code                       
; «««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

start:                         

    call main                   

    exit

; «««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

main proc

    LOCAL var1:DWORD           

    LOCAL str1:DWORD           
    LOCAL salir:DWORD           
    LOCAL continuar:DWORD         


    mov eax, 0
    mov edx, 0
    mov ecx, 0
    print chr$(" ",13,10)       
    print chr$(" ",13,10)
    print chr$(" ",13,10)
   
    mov str1, input("      Type the first number: ")
    mov var1, sval(str1)       

    mov eax, var1

    mov edx,eax
    and edx,0Fh         
    shr eax,4         
    mov ecx,eax         
    shl ecx,3         
    shl eax,1         
    add eax,ecx         
    add eax,edx         
    and eax,0FFh             
    mov var1, eax

   
   
    not eax

    mov var1, eax

    print chr$("      the result is",13,10,"     *** ")
    print str$(var1) 
    print chr$(" ***",13,10)
    mov continuar,input("---------------Press a key to continue...-------------- ")
    jmp start
   
    ret

main endp
; «««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««««

end start

MichaelW

I think you are using an old version of macros.asm. The problem was reported here:

http://www.masmforum.com/simple/index.php?topic=434.0

A newer version is available here:

http://www.masmforum.com/simple/index.php?topic=2430.0

eschew obfuscation