$inc fvmstd.fp

proc main
  while 1 do
    if :getuint 37 == not then
      "Number 1 incorrect" :puts :newline
      continue
    endif
    if :getuint 42 == not then
      "Number 2 incorrect" :puts :newline
      continue
    endif
    if :getuint 69 == not then
      "Number 3 incorrect" :puts :newline
      continue
    endif
    break
  endwhile
  "You've logged in" :puts :newline
endproc