2016-04-03 3 views
2

Я написал этот гибрид [Batch/Vbscript] (inspired by this code)Как писать в той же строке, что и пишущая машинка?

для того, чтобы смоделировать что-то, как пишущая машинка!

Но, я не могу понять, как мы можем писать в той же строке, что и пишущая машинка?

@echo off 
Set Message=Hi ! StackOverFlow ! 
@cScript.EXE //noLogo "%~f0?.WSF" "%Message%" //job:info %~nx0%* 
pause 
<job id="info"> 
<script language="VBScript"> 
strText=wscript.arguments(0) 
intTextLen = Len(strText) 
intPause = 100 
For x = 1 to intTextLen 
    strTempText = Mid(strText,x,1) 
    wscript.echo strTempText 
    WScript.Sleep intPause 
    If intPause <= 500 Then 
     intPause = intPause + 100 
    Else 
     intPause = 100 
    End If 
Next 
</script> 
</job> 
+0

Удивительно, что с ответами, которые вы дали на [так], вам нужно будет спросить об этом? – Lankymart

ответ

4

Вы должны написать поток StdOut.

str = "hello world!" 
For i = 1 To Len(str) 
    WScript.StdOut.Write Mid(str, i, 1) 
    WScript.Sleep 50 
Next 
+0

Спасибо большое! он работает так, как я ожидал! – Hackoo

Смежные вопросы