test_shit

include C:/masm32/include/console.inc

.data
  buf db 200 dup ('$')
  sym db ?
  err db 1
.code
  begin: outstr "Input text not longer than 100 characters: "
         mov ebx, 1
  L:     inchar sym; ввод очередного символа
         cmp ebx, 200
           jb preOK
         ja ERROR
  preOK: cmp sym, '.'
           cmp ebx, 1
             je ERROR
           ja NEXT
         mov cl, sym
         mov buf[ebx], cl
         add ebx, 2
         jmp L
  NEXT:  mov ebx, 1
     V:  cmp buf[ebx], '$'
           je Q
         outchar buf[ebx]
         add ebx, 2
         jmp V
  ERROR: outstr "Incorrect input"
  Q: end begin