curselib – ncurses dialog-style interface for TeleBASIC
It's written in BASIC for Telehack. NOTE: As of January 2023 this software is ABANDONWARE.
@pub /get underwood/curselib.bas
Usage: curselib.bas <args>
--version Show version info and quit
--help Show this help
--notitle Disable the title bar
--yn Yes/No prompt
--input Prompt for user input, output to
--force Force overwrite of output file if not a temporary file
--cls Clear screen on program exit
--progress=<N> Show progress bar (N must be between 0 and 100)
--colour=<text> Foreground colour ('color' is also supported)
--width=<N> Box width
--pname=<text> Header title
--title=<text> Box title
--msg=<text> Box message
--btn=<text> Info-Box button
--out=<text> Output filename (for use with input option)
--func=<cmd> Command to execute on prompt confirmation
Examples:
@run curselib.bas --yn --func='echo foo bar'
@run curselib.bas --progress=45
The options may be supplied in any order.
As with other commands, -- is interchangeable with / and -.
Additionally, curselib will allow options with no prefix at all:
@curselib yn msg="u grok?"
BASIC example:
@basic
Dartmouth DTSS TeleBASIC (c) 1964,1966,1969,1970,1971,1979
>for i = 0 to 100 : cmd$ = "run curselib.bas progress=" + str$(i) : th_exec cmd$ : next i
use with any loop:
@basic
Dartmouth DTSS TeleBASIC (c) 1964,1966,1969,1970,1971,1979
>total = 25 : for i = 0 to total : cmd$ = "run curselib.bas progress=" + str$(i/total*100) : th_exec cmd$ : next i