Slowing down

[Scottswan]

I wanted to make a text file about 1.75meg big, so I made a quick script to type a line of text over and over fairly fast into notepad....

;Set type speed to fast!.
Opt("SendKeyDelay", 1)
; Run Notepad.
Run("notepad.exe")
; Wait for Notepad to become active.
WinWaitActive("Untitled - ")
; Define the count integer.
$count = 0
; Start the loop and specify how many counts to do.
While $count < 50000
; Count 1 on each pass
    $count = $count + 1
; Send some text to notepad on each pass.
    Send("Hey, this is a new line of text.    ")
; After the number of counts is done, end the loop.
Wend
Exit

It starts out screaming fast and does about 100 lines then it gradually slows down to a crawl.

Ok, lets try something else....

; Run Notepad.
Run("notepad.exe")
; Wait for Notepad become active.
WinWaitActive("Untitled - ")
; Define the count integer.
$count = 0
; Send some text to the clipboard.
    ClipPut("Hey, this is a new line of text.    ")
; Start the loop and specify how many counts to do.
While $count < 50000
; Count 1 on each pass
    $count = $count + 1
; Paste the text.
    Send("^v")
    Sleep(100)
; After the number of counts is done, end the loop.
Wend
Exit

This one does the same thing, starts off fast and slows down to a crawl.

It's not critical that I solve this or anything, but I was wondering if anyone could come up with a reason as to why it slows down?

Running on win98se, PIII 1ghz, 384meg ram

-Scott

[Jos]

guess its the Notepad wordwrap logic, because you are creating one line.

Try it with this statement:

Send("Hey, this is a new line of text.    {ENTER}" )

[Scottswan]

guess its the Notepad wordwrap logic, because you are creating one line.

<{POST_SNAPBACK}>

Ha! Now it's screamin....

; Run Notepad.
Run("notepad.exe")
; Wait for Notepad become active.
WinWaitActive("Untitled - ")
; Define the count integer.
$count = 0
; Send some text and 2 carrige returns to notepad on each pass.
    ClipPut("Thou shalt not deceive others.   ")
; Start the loop and specify how many counts to do.
While $count < 50000
; Count 1 on each pass
    $count = $count + 1
    Send("^v")
;   Sleep(5)
    Send("{Enter}")
; After the number of counts is done, end the loop.
Wend
Exit

I did turn wordwrap on/off, but only while the script was running.... so I mistakenly ruled that out.

Thanks

-Scott

[Wolvereness]

Why don't you use FileWrite()?

$file = FileOpen($file, 2)
$string = 'Hey, this is a new line of text.' & @CRLF
$string = $string & $string & $string & $string & $string
For $x = 1 to 10000
FileWrite($file, $string)
Next
FileClose($file);this saves the file

[Scottswan]

Why don't you use FileWrite()?

<{POST_SNAPBACK}>

Oh yea, there is a number of ways to do that, I was just wondering why the slowdown occurred. I thought it might be a 'governor' built into AutoIt that I ran into.

Thats the way it acted.

Or a memory glitch with Win98, which would not shock me.

-Scott