#Window = 0
#Sci = 0
#num_indicator = 0

Define *Text, nLine, start, length

If Not InitScintilla()
    End
EndIf

If OpenWindow(#Window, 0, 0, 330, 90, "ScintillaGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    ScintillaGadget(#Sci, 5, 5, 320, 80, 0)
    *Text = UTF8("Это простой ScintillaGadget с текстом..." + #LF$ + "Больше текста" + #LF$ + "Еще больше текста!")
    ScintillaSendMessage(#Sci, #SCI_SETTEXT, 0, *Text)
    FreeMemory(*Text)
    ScintillaSendMessage(#Sci, #SCI_INDICSETSTYLE, #num_indicator, #INDIC_STRAIGHTBOX) ; первый индикатор со стилем 8 (0-19)
    ScintillaSendMessage(#Sci, #SCI_INDICSETFORE, #num_indicator, #Red) ; первый индикатор красного цвета
    ScintillaSendMessage(#Sci, #SCI_SETINDICATORCURRENT, #num_indicator, #INDIC_STRAIGHTBOX) ; делает индикатор текущим
    ScintillaSendMessage(#Sci, #SCI_INDICSETUNDER, #num_indicator, 1) ; индикатор под текстом, т.е. не затеняет его
    ScintillaSendMessage(#Sci, #SCI_INDICSETALPHA, #num_indicator, 127) ; Прозрачность
    ; ScintillaSendMessage(#Sci, #SCI_INDICGETOUTLINEALPHA, #num_indicator, 255) ; Прозрачность границ
    nLine = 1 ; номер строки начинается с 0
    start = ScintillaSendMessage(#Sci, #SCI_POSITIONFROMLINE, nLine)
    length = ScintillaSendMessage(#Sci, #SCI_GETLINEENDPOSITION, nLine) - start
    ScintillaSendMessage(#Sci, #SCI_INDICATORFILLRANGE, start, length) ; начало и длина
    ; ScintillaSendMessage(#Sci, #SCI_INDICATORFILLRANGE, 46, 9) ; начало и длина
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf