; тут мы создаем окно, справка по каждой процедуре доступна по кнопке F1
; просто ставишь курсор на OpenWindow и нажимаешь F1
; увидишь все доступные параметры и за что они отвечают
; помимо этого внизу в статус-баре отображаются имена параметров
; когда ты их вводишь
OpenWindow(0,100,100,400,300,"Программуля",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)

; а тут создаем обычный гаджет для ввода строк
TextGadget(0,10,10,300,20, "Переносит текст между строками")
TextGadget(1,10,40,300,20, "Строка 1")
StringGadget(2,10,60,300,20,"Текст из строки 1")
ButtonGadget(3,10,100,300,20,"Перенести")
TextGadget(4,10,130,300,20,"Строка 2")
StringGadget(5,10,150,300,20,"Тут должен появиться Текст из строки 1")

; в винде все построено на получении ивентов и их контролировании
; поэтому мы создаем цикл с построверкой условия
; (повторять, пока не выполнится условие)
Repeat
  ; вот тут мы получаем сам ивент и пишем его в переменную ev
  ; для дальнейшей обработки
  ; если мы этого делать не будем (или наше приложение повиснет при какой-то операции)
  ; то винда будет считать что оно зависло
  ; и предложит его завершить (уверен ты такое видел не раз)
  ; можешь закомментировать эту строку и посмотреть что будет
  ev = WaitWindowEvent()

  ; стандартный во многих языках case
  ; как if-else, но для большого количества условий
  ; тут мы проверяем какой нам ивент пришел
  Select ev
    ; если это ивент от гаджета
    Case #PB_Event_Gadget
      ; смотрим что это за гаджет
      Select EventGadget()
        Case 0
          ; и что за тип ивента
          Select EventType()
            ; типы ивентов можно посмотреть в хэлпе по конкретному гаджету
            Case #PB_EventType_Change
              Debug "ты поменял текст"
            Default
              Debug "ты поменял фокус"
          EndSelect
      EndSelect
  EndSelect
; если ивент вот такой, то значит юзер нажал на крестик
; и можно завершить цикл
Until ev = #PB_Event_CloseWindow