Convert decial to binary in MASM32. Help me
include \masm32\include\masm32rt.inc
.code
start:
  call main
  exit
main proc
  LOCAL var1: DWORD
  LOCAL dem: DWORD
    
  mov var1, sval(input("Enter Binary Number: "))
  mov dem, strlen(str$(var1))
  mov ecx, dem
  mov ebx, 1
  mov dec, 0
  
lbl0:
  DEC ecx
  cmp ecx, 0
  jl lbl1
  
  mov eax, var1
  and eax, ebx
  mov edx, eax
  shl edx, cl
  add dec, edx
  shl ebx, 1
  jmp lbl0
  
lbl1:
  print chr$(13,10)
  print chr$("Decimal Equivalent: ")
  print str$(dec)
  print chr$(13,10)
  
  ret
  main endp
  
end start
here r my code but it don't work
 
     
    