DECLARE SUB CHNGPULL (BAR%, WIND%, ATTR%) DECLARE SUB CHNGWIND (W%) DECLARE SUB CLRWIND () DECLARE SUB DELWIND (W%) DECLARE SUB DISKSIZE (DISK%, DISKSZE&, FREESPACE&) DECLARE SUB DOSOUND () DECLARE SUB FINDDIR (PATH$, TYPE$, F%) DECLARE SUB FINDPATH (PATH$) DECLARE SUB GETANS (TEXT$, CHOICE$, ANS$, TR%, LC%, ATTR%, BORDER%) DECLARE SUB GETDISK (DR%) DECLARE SUB INPTWIND (PROMPT$, CODE$, TR%, LC%, WD%, ATTR%, RESTRICT$, RTRN$, BRD%) DECLARE SUB LINEW (ROW%, TYP%) DECLARE SUB MAKEWIND (W%, LABEL$, TR%, LC%, WD%, NR%, ATTR%, BORDER%) DECLARE FUNCTION MARKED% (RTRN$, START%) DECLARE SUB MULTINPT (SCRN%, FLD%, EXIT$, AUTOEXIT%, RTRN$()) DECLARE SUB NEWCOLOR (ATTR%) DECLARE SUB PRINTW (TEXT$, TR%, LC%) DECLARE SUB PULLDOWN (A%, B%, ATTR%, HATTR%, BORDER%) DECLARE SUB RESAVE () DECLARE SUB RSTRWIND (W%, DELFLAG%) DECLARE SUB SAVEWIND (W%, TR%, LC%, WD%, NR%) DECLARE SUB SCRLWIND (LIST$(), ENTRIES%, RTRN$, RTRN%, HIATTR%) DECLARE SUB SETINPT (SCRN%, WD%, EXIT$, INPT%(), INPT$(), BACKCOL%) DECLARE SUB SETPULL (BAR$, PWIND$()) DECLARE SUB SETWIND (FAST%, SND%, SHADCOL%, NOHI%, ISDOT%) DECLARE SUB WINDSTATUS ()