home *** CD-ROM | disk | FTP | other *** search
- ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
- ' Include file for PDS 7.1 version of Basic Programmer's Toolbox '
- ' Copyright (c) 1992 by Bill Smith '
- ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
- DECLARE FUNCTION altpressed% ()
- DECLARE SUB caplockoff ()
- DECLARE SUB caplockon ()
- DECLARE SUB center (word$)
- DECLARE FUNCTION checkdrive% (drive$)
- DECLARE FUNCTION checkreboot% ()
- DECLARE SUB clearsavedscreens ()
- DECLARE FUNCTION clock$ ()
- DECLARE SUB closewindow ()
- DECLARE FUNCTION commas$ (number#, places%)
- DECLARE SUB copyfile (from$, to$)
- DECLARE SUB copymem (segment%, fromoffset%, tooffset%, words%)
- DECLARE FUNCTION ctrlpressed% ()
- DECLARE FUNCTION curdrive$ ()
- DECLARE FUNCTION currentchar$ ()
- DECLARE SUB currentcolor (fg%, bg%)
- DECLARE FUNCTION date2number& (day$)
- DECLARE FUNCTION dayofweek$ (day$)
- DECLARE FUNCTION diskcapacity& (drive$)
- DECLARE FUNCTION diskspace& (drive$)
- DECLARE FUNCTION dosversion! ()
- DECLARE FUNCTION driveokay% (drive$)
- DECLARE FUNCTION faded% ()
- DECLARE SUB fadein ()
- DECLARE SUB fadeout ()
- DECLARE FUNCTION fileexists% (name$)
- DECLARE SUB fileinfo (dta$, name$, size&, day$)
- DECLARE SUB filesearch (path$, name$(), size&(), when$(), count%)
- DECLARE SUB findfirstfile (path$, dta$, result%)
- DECLARE SUB findnextfile (path$, dta$, result%)
- DECLARE FUNCTION firstcap$ (word$)
- DECLARE SUB flushkeyboardbuff ()
- DECLARE SUB getcolor (fg%, bg%)
- DECLARE SUB getinput (word$, length%, scode%)
- DECLARE SUB inputbox (word$, length%, scode%, fg%, bg%)
- DECLARE FUNCTION keypressed$ ()
- DECLARE SUB leftscroll (a$)
- DECLARE SUB menubar (menu$())
- DECLARE FUNCTION mousebutton% ()
- DECLARE FUNCTION mousehorz% ()
- DECLARE FUNCTION mouseinstalled% ()
- DECLARE SUB mouseoff ()
- DECLARE SUB mouseon ()
- DECLARE SUB mouseshow ()
- DECLARE FUNCTION mousevert% ()
- DECLARE SUB msgwindow (msg$())
- DECLARE SUB noreboot ()
- DECLARE FUNCTION number2date$ (number&)
- DECLARE SUB numlockoff ()
- DECLARE SUB numlockon ()
- DECLARE SUB pageup (page%)
- DECLARE SUB pagedown (page%)
- DECLARE FUNCTION password% (word$)
- DECLARE FUNCTION pickwindow% (title$, msg$())
- DECLARE SUB pulldown (menu$(), mainmenu%, submenu%)
- DECLARE SUB reboot ()
- DECLARE SUB restorescreen ()
- DECLARE SUB rightscroll (a$)
- DECLARE SUB runprogram (a$)
- DECLARE FUNCTION savedscreens% ()
- DECLARE SUB savescreen ()
- DECLARE SUB setsaved (number%)
- DECLARE SUB shadow (number%)
- DECLARE SUB tree (drive$, display$(), dirname$(), count%)
- DECLARE FUNCTION userchoice$ (list$, f%, m%)
- DECLARE FUNCTION videomode% ()
- DECLARE FUNCTION videopage% ()
- DECLARE FUNCTION videosegment% ()
- DECLARE SUB windowcolor (fg%, bg%)