EM_LINEINDEX := 0xBB, EM_LINELENGTH := 0xC1
   EM_SETSEL := 0xB1, EM_SCROLLCARET := 0xB7
 
   Gui, Add, Edit, vEdit1 x0 y0 w110 h70 hwndhEdit1
      , Первая`nВторая не помещается в строку`nТретья`nЧетвёртая не помещается в строку`nПятая
   Gui, Add, Edit, vEdit2 x115 yp wp hp ReadOnly hwndhEdit2
   Gui, Add, Button, x82 w61, Start
   Gui, Show, w225
   Return
 
ButtonStart:
   GuiControl, Focus, Edit2
   GuiControlGet, Text1,, Edit1
   ControlGet, Count, LineCount,,, ahk_id %hEdit1%
   Loop, % Count
   {
      SendMessage, EM_LINEINDEX, A_Index - 1,,, ahk_id %hEdit1%
      Start := ErrorLevel
      SendMessage, EM_LINELENGTH, Start,,, ahk_id %hEdit1%
      Length := ErrorLevel
      End := Start + Length
      SendMessage, EM_LINEINDEX, A_Index,,, ahk_id %hEdit1%
      NextStart := ErrorLevel
      String := SubStr(Text1, 1, StrLen(String) + Length + (End = NextStart ? 0 : 1))
      GuiControl,, Edit2, %String%
      SendMessage, EM_SETSEL, End, End,, ahk_id %hEdit2%
      SendMessage, EM_SCROLLCARET,,,, ahk_id %hEdit2%
      Sleep, 3000
   }
   String = 
   Return

button:
Gui,Submit,Nohide
New = %Clipboard%

    Loop, Parse, new
    {
        Char = %A_LoopField%
        If (Asc(Char) < 128)
            PostMessage, 0x50,, 0x4090409,, A
        Else
            PostMessage, 0x50,, 0x4190419,, A
        Send, %Char%
        Sleep, 250
    }
WinClose