<gpt-gadget> ( -- gadget )

Vocabulary

openai.ui

Inputs

None

Outputs

gadget

an object

Word description

Creates the gadget for the UI

Definition

USING: accessors kernel ui.gadgets ui.gadgets.editors
ui.gadgets.toolbar ui.gadgets.tracks ;

IN: openai.ui

: <gpt-gadget> ( -- gadget )
    vertical gpt-gadget new-track 1 >>fill { 10 10 } >>gap
    <editor> dup "hello world" swap set-editor-string >>ask
    <multiline-editor> 10 >>min-rows 80 >>min-cols >>response
    dup <ask> f track-add dup <response> 1 track-add
    dup <toolbar> f track-add ;