retroforth/interface/pythonista-ui.retro
crc 9c93e766fc nga-python: latest code from Arland for Pythonista UI module support
FossilOrigin-Name: 027308b773f14441c3c74a15106c1b261cb32e3b3d96facf7ceb14353130852d
2021-02-01 00:45:55 +00:00

22 lines
734 B
Forth

~~~
#941687072 'forth.works::pythonista/ui const
:ui:operation forth.works::pythonista/ui io:scan-for io:invoke ;
:ui:create-view (name,type) #0 ui:operation ;
:ui:add-view (name) #1 ui:operation ;
:ui:remove-view (name) #2 ui:operation ;
:ui:present (name) #3 ui:operation ;
:ui:set-size (h,w,name) #4 ui:operation ;
:ui:set-position (x,y,name) #5 ui:operation ;
:ui:get-size (name-h,w) #6 ui:operation ;
:ui:get-position (name-x,y) #7 ui:operation ;
:ui:set-title (title,name) #8 ui:operation ;
:ui:set-text (text,name) #9 ui:operation ;
:ui:get-title (name-title) #10 ui:operation ;
:ui:get-text (name-text) #11 ui:operation ;
:ui:set-action (action,name) #12 ui:operation ;
:ui:get-action (name-action) #13 ui:operation ;
~~~