:F_1
      call :Welcome
      set s=
      :F_1s
      %batbox% /g 0 7 /d ">!s!"
      %batbox% /k
      if "%errorlevel%"=="13" goto :F_1e
      cmd /c exit %errorlevel%
      set s=!s!!=exitcodeAscii!
      goto :F_1s
      :F_1e
      set tvl=%s%
      set s=%s: =IIESPACEDKFSLJDHSHDSJKLII%
      set s=%s:?=IIPOINTIDKFSLJDHSHDSJKLII%
      set s=%s:!=IIPOINTEDKFSLJDHSHDSJKLII%
      call :SepareString s
      for %%a in (!s!) do (
        set l=%%a
        if "!l!"=="IIESPACEDKFSLJDHSHDSJKLII" set "l= "
        if "!l!"=="IIPOINTIDKFSLJDHSHDSJKLII" set "l=?"
        if "!l!"=="IIPOINTEDKFSLJDHSHDSJKLII" set "l=^^!"
        (
          !AUTO!v.SendKeys^("!l!"^)
          !AUTO!wscript.sleep 200
        )>> "auto.vbs"
      )
      (
        !AUTO!v.SendKeys^("~"^)
        !AUTO!wscript.sleep 200
      )>> "auto.vbs"
      set /a totalLines+=1
      set cl_!totalLines!=!length!
      set vl_!totalLines!=%tvl%
    goto :CREATE_BODY