home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / basic / library / pb / pbwiz / pbwiz.inc < prev    next >
Encoding:
Text File  |  1994-04-10  |  15.4 KB  |  333 lines
  1.    DECLARE FUNCTION AllExtMem& ()
  2.    DECLARE FUNCTION AltPress% ()
  3.    DECLARE SUB AnsiPrint (St$)
  4.    DECLARE SUB AntiSnow (BYVAL INTEGER)
  5.    DECLARE FUNCTION ArcCosD# (DOUBLE)
  6.    DECLARE FUNCTION ArcCosHD# (DOUBLE)
  7.    DECLARE FUNCTION ArcCosHS! (SINGLE)
  8.    DECLARE FUNCTION ArcCosS! (SINGLE)
  9.    DECLARE FUNCTION ArcCotD# (DOUBLE)
  10.    DECLARE FUNCTION ArcCotHD# (DOUBLE)
  11.    DECLARE FUNCTION ArcCotHS! (SINGLE)
  12.    DECLARE FUNCTION ArcCotS! (SINGLE)
  13.    DECLARE FUNCTION ArcCscD# (DOUBLE)
  14.    DECLARE FUNCTION ArcCscHD# (DOUBLE)
  15.    DECLARE FUNCTION ArcCscHS! (SINGLE)
  16.    DECLARE FUNCTION ArcCscS! (SINGLE)
  17.    DECLARE FUNCTION ArcSecD# (DOUBLE)
  18.    DECLARE FUNCTION ArcSecHD# (DOUBLE)
  19.    DECLARE FUNCTION ArcSecHS! (SINGLE)
  20.    DECLARE FUNCTION ArcSecS! (SINGLE)
  21.    DECLARE FUNCTION ArcSinD# (DOUBLE)
  22.    DECLARE FUNCTION ArcSinHD# (DOUBLE)
  23.    DECLARE FUNCTION ArcSinHS! (SINGLE)
  24.    DECLARE FUNCTION ArcSinS! (SINGLE)
  25.    DECLARE FUNCTION ArcTanHD# (DOUBLE)
  26.    DECLARE FUNCTION ArcTanHS! (SINGLE)
  27.    DECLARE FUNCTION AscM% (STRING, BYVAL INTEGER)
  28.    DECLARE FUNCTION CalcAttr% (BYVAL INTEGER, BYVAL INTEGER)
  29.    DECLARE FUNCTION CalcSize% (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  30.    DECLARE FUNCTION CapsOn% ()
  31.    DECLARE FUNCTION CDROM% ()
  32.    DECLARE FUNCTION CeilD# (DOUBLE)
  33.    DECLARE FUNCTION CeilS! (SINGLE)
  34.    DECLARE FUNCTION Cent2Fahr! (SINGLE)
  35.    DECLARE FUNCTION CheckSum% (STRING)
  36.    DECLARE SUB Cipher (STRING, STRING)
  37.    DECLARE SUB CipherP (STRING, STRING)
  38.    DECLARE SUB ClearKbd ()
  39.    DECLARE SUB CloseA ()
  40.    DECLARE FUNCTION CommPorts% ()
  41.    DECLARE FUNCTION CosHD# (DOUBLE)
  42.    DECLARE FUNCTION CosHS! (SINGLE)
  43.    DECLARE FUNCTION CotD# (DOUBLE)
  44.    DECLARE FUNCTION CotHD# (DOUBLE)
  45.    DECLARE FUNCTION CotHS! (SINGLE)
  46.    DECLARE FUNCTION CotS! (SINGLE)
  47.    DECLARE SUB CRC16 (STRING, INTEGER, INTEGER)
  48.    DECLARE FUNCTION Crunch$ (STRING, STRING)
  49.    DECLARE FUNCTION CscD# (DOUBLE)
  50.    DECLARE FUNCTION CscHD# (DOUBLE)
  51.    DECLARE FUNCTION CscHS! (SINGLE)
  52.    DECLARE FUNCTION CscS! (SINGLE)
  53.    DECLARE FUNCTION CtrlPress% ()
  54.    DECLARE FUNCTION Date2Num& (STRING)
  55.    DECLARE FUNCTION Deg2RadD# (DOUBLE)
  56.    DECLARE FUNCTION Deg2RadS! (SINGLE)
  57.    DECLARE SUB DelayV (BYVAL INTEGER)
  58.    DECLARE FUNCTION DelimExtract$ (STRING, STRING, INTEGER)
  59.    DECLARE SUB DOSCls ()
  60.    DECLARE SUB DOSColor (BYVAL INTEGER, BYVAL INTEGER)
  61.    DECLARE SUB DOSLocate (BYVAL INTEGER, BYVAL INTEGER)
  62.    DECLARE SUB DOSPrint (STRING)
  63.    DECLARE FUNCTION DRDOS% ()
  64.    DECLARE SUB EMSclose (BYVAL INTEGER)
  65.    DECLARE FUNCTION EMSexists% ()
  66.    DECLARE FUNCTION EMSfree% ()
  67.    DECLARE SUB EMSmap (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  68.    DECLARE SUB EMSopen (BYVAL INTEGER, INTEGER, INTEGER)
  69.    DECLARE SUB EMSopt (BYVAL INTEGER)
  70.    DECLARE SUB EMSresize (BYVAL INTEGER, BYVAL INTEGER, INTEGER)
  71.    DECLARE FUNCTION EMSseg& ()
  72.    DECLARE FUNCTION EMStotal% ()
  73.    DECLARE SUB EMSver (INTEGER, INTEGER)
  74.    DECLARE FUNCTION ErfD# (DOUBLE)
  75.    DECLARE FUNCTION ErfS! (SINGLE)
  76.    DECLARE FUNCTION eD# ()
  77.    DECLARE FUNCTION eS! ()
  78.    DECLARE SUB Evaluate (STRING, SINGLE, INTEGER)
  79.    DECLARE FUNCTION FactD# (INTEGER)
  80.    DECLARE FUNCTION FactS! (INTEGER)
  81.    DECLARE FUNCTION Fahr2Cent! (SINGLE)
  82.    DECLARE SUB FindFirstA (STRING, STRING, INTEGER)
  83.    DECLARE SUB FindFirstF (STRING, STRING, BYVAL INTEGER, INTEGER)
  84.    DECLARE SUB FindNextA (INTEGER)
  85.    DECLARE SUB FindNextF (STRING, INTEGER)
  86.    DECLARE FUNCTION FloorD# (DOUBLE)
  87.    DECLARE FUNCTION FloorS! (SINGLE)
  88.    DECLARE FUNCTION Floppies% ()
  89.    DECLARE SUB FloppyType (INTEGER, INTEGER)
  90.    DECLARE SUB G13Box (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  91.    DECLARE SUB G13Cls ()
  92.    DECLARE SUB G13Color (BYVAL INTEGER, BYVAL INTEGER)
  93.    DECLARE SUB G13Ellipse (INTEGER, INTEGER, INTEGER, INTEGER)
  94.    DECLARE SUB G13GetColor (INTEGER, INTEGER)
  95.    DECLARE SUB G13GetLocate (INTEGER, INTEGER)
  96.    DECLARE FUNCTION G13GetPel% (BYVAL INTEGER, BYVAL INTEGER)
  97.    DECLARE SUB G13Line (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  98.    DECLARE SUB G13Locate (BYVAL INTEGER, BYVAL INTEGER)
  99.    DECLARE SUB G13MakeBMP (STRING, INTEGER, INTEGER, INTEGER, INTEGER, INTEGER)
  100.    DECLARE SUB G13Mode (BYVAL INTEGER)
  101.    DECLARE SUB G13Plot (BYVAL INTEGER, BYVAL INTEGER)
  102.    DECLARE SUB G13Polygon (INTEGER, INTEGER, INTEGER, INTEGER, SINGLE)
  103.    DECLARE SUB G13ShowBMP (STRING, INTEGER, INTEGER, INTEGER)
  104.    DECLARE SUB G13WrCh (BYVAL INTEGER)
  105.    DECLARE SUB G13Write (STRING)
  106.    DECLARE SUB G13WriteLn (STRING)
  107.    DECLARE FUNCTION GCDI% (INTEGER, INTEGER)
  108.    DECLARE FUNCTION GCDL& (LONG, LONG)
  109.    DECLARE SUB Get4DOSv (INTEGER, INTEGER)
  110.    DECLARE FUNCTION GetAttrF% (STRING)
  111.    DECLARE FUNCTION GetCRCA$ ()
  112.    DECLARE FUNCTION GetDateA$ ()
  113.    DECLARE FUNCTION GetDateF$ (STRING)
  114.    DECLARE SUB GetDisplay (INTEGER, INTEGER)
  115.    DECLARE SUB GetDOSv (INTEGER, INTEGER)
  116.    DECLARE SUB GetEMSm (INTEGER, INTEGER)
  117.    DECLARE SUB GetEMSv (INTEGER, INTEGER)
  118.    DECLARE FUNCTION GetExtM& ()
  119.    DECLARE FUNCTION GetNameA$ ()
  120.    DECLARE FUNCTION GetNameF$ (STRING)
  121.    DECLARE FUNCTION GetPal& (BYVAL INTEGER)
  122.    DECLARE SUB GetPalRGB (BYVAL INTEGER, INTEGER, INTEGER, INTEGER)
  123.    DECLARE SUB GetSizeA (LONG, LONG)
  124.    DECLARE FUNCTION GetSizeF& (STRING)
  125.    DECLARE FUNCTION GetStoreA$ ()
  126.    DECLARE FUNCTION GetTimeA$ ()
  127.    DECLARE FUNCTION GetTimeF$ (STRING)
  128.    DECLARE SUB GetXMSm (LONG, LONG)
  129.    DECLARE SUB GetXMSv (INTEGER, INTEGER)
  130.    DECLARE SUB GGVBox (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  131.    DECLARE SUB GGVCls ()
  132.    DECLARE SUB GGVColor (BYVAL INTEGER, BYVAL INTEGER)
  133.    DECLARE SUB GGVDone ()
  134.    DECLARE SUB GGVEllipse (INTEGER, INTEGER, INTEGER, INTEGER)
  135.    DECLARE SUB GGVGetColor (INTEGER, INTEGER)
  136.    DECLARE SUB GGVGetLocate (INTEGER, INTEGER)
  137.    DECLARE FUNCTION GGVGetPel% (BYVAL INTEGER, BYVAL INTEGER)
  138.    DECLARE SUB GGVGetRes (INTEGER, INTEGER)
  139.    DECLARE SUB GGVInit ()
  140.    DECLARE SUB GGVLine (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  141.    DECLARE SUB GGVLocate (BYVAL INTEGER, BYVAL INTEGER)
  142.    DECLARE SUB GGVMakeBMP (STRING, INTEGER, INTEGER, INTEGER, INTEGER, INTEGER)
  143.    DECLARE SUB GGVMode (BYVAL INTEGER)
  144.    DECLARE SUB GGVPlot (BYVAL INTEGER, BYVAL INTEGER)
  145.    DECLARE SUB GGVPolygon (INTEGER, INTEGER, INTEGER, INTEGER, SINGLE)
  146.    DECLARE SUB GGVShowBMP (STRING, INTEGER, INTEGER, INTEGER)
  147.    DECLARE SUB GGVWrCh (BYVAL INTEGER)
  148.    DECLARE SUB GGVWrite (STRING)
  149.    DECLARE SUB GGVWriteLn (STRING)
  150.    DECLARE SUB GN0Box (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  151.    DECLARE SUB GN0Cls ()
  152.    DECLARE SUB GN0Color (BYVAL INTEGER, BYVAL INTEGER)
  153.    DECLARE SUB GN0Ellipse (INTEGER, INTEGER, INTEGER, INTEGER)
  154.    DECLARE SUB GN0GetColor (INTEGER, INTEGER)
  155.    DECLARE SUB GN0GetLocate (INTEGER, INTEGER)
  156.    DECLARE FUNCTION GN0GetPel% (BYVAL INTEGER, BYVAL INTEGER)
  157.    DECLARE SUB GN0Line (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  158.    DECLARE SUB GN0Locate (BYVAL INTEGER, BYVAL INTEGER)
  159.    DECLARE SUB GN0MakeBMP (STRING, INTEGER, INTEGER, INTEGER, INTEGER, INTEGER)
  160.    DECLARE SUB GN0Mode (BYVAL INTEGER)
  161.    DECLARE SUB GN0Plot (BYVAL INTEGER, BYVAL INTEGER)
  162.    DECLARE SUB GN0Polygon (INTEGER, INTEGER, INTEGER, INTEGER, SINGLE)
  163.    DECLARE SUB GN0ShowBMP (STRING, INTEGER, INTEGER, INTEGER)
  164.    DECLARE SUB GN0WrCh (BYVAL INTEGER)
  165.    DECLARE SUB GN0Write (STRING)
  166.    DECLARE SUB GN0WriteLn (STRING)
  167.    DECLARE SUB GN5Box (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  168.    DECLARE SUB GN5Cls ()
  169.    DECLARE SUB GN5Color (BYVAL INTEGER, BYVAL INTEGER)
  170.    DECLARE SUB GN5Ellipse (INTEGER, INTEGER, INTEGER, INTEGER)
  171.    DECLARE SUB GN5GetColor (INTEGER, INTEGER)
  172.    DECLARE SUB GN5GetLocate (INTEGER, INTEGER)
  173.    DECLARE FUNCTION GN5GetPel% (BYVAL INTEGER, BYVAL INTEGER)
  174.    DECLARE SUB GN5GetRes (INTEGER, INTEGER)
  175.    DECLARE SUB GN5Init (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  176.    DECLARE SUB GN5Line (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  177.    DECLARE SUB GN5Locate (BYVAL INTEGER, BYVAL INTEGER)
  178.    DECLARE SUB GN5MakeBMP (STRING, INTEGER, INTEGER, INTEGER, INTEGER, INTEGER)
  179.    DECLARE SUB GN5Mode (BYVAL INTEGER)
  180.    DECLARE SUB GN5Plot (BYVAL INTEGER, BYVAL INTEGER)
  181.    DECLARE SUB GN5Polygon (INTEGER, INTEGER, INTEGER, INTEGER, SINGLE)
  182.    DECLARE SUB GN5ShowBMP (STRING, INTEGER, INTEGER, INTEGER)
  183.    DECLARE SUB GN5WrCh (BYVAL INTEGER)
  184.    DECLARE SUB GN5Write (STRING)
  185.    DECLARE SUB GN5WriteLn (STRING)
  186.    DECLARE FUNCTION GoodDate% (STRING)
  187.    DECLARE FUNCTION InsertOn% ()
  188.    DECLARE FUNCTION JButtonA1% ()
  189.    DECLARE FUNCTION JButtonA2% ()
  190.    DECLARE FUNCTION JButtonB1% ()
  191.    DECLARE FUNCTION JButtonB2% ()
  192.    DECLARE SUB JButtons (A1%, A2%, B1%, B2%)
  193.    DECLARE FUNCTION JoinRGB& (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  194.    DECLARE SUB JPos (AX%, AY%, BX%, BY%)
  195.    DECLARE FUNCTION KbdType% ()
  196.    DECLARE FUNCTION Kg2Pound! (SINGLE)
  197.    DECLARE FUNCTION LAltPress% ()
  198.    DECLARE FUNCTION LCtrlPress% ()
  199.    DECLARE FUNCTION LShiftPress% ()
  200.    DECLARE FUNCTION MatchFile% (STRING, STRING)
  201.    DECLARE SUB MouseCursorG (BYVAL INTEGER)
  202.    DECLARE SUB MouseHide ()
  203.    DECLARE FUNCTION MouseInit% ()
  204.    DECLARE FUNCTION MouseLButton% ()
  205.    DECLARE SUB MouseLClick (INTEGER, INTEGER, INTEGER)
  206.    DECLARE SUB MouseLocate (BYVAL INTEGER, BYVAL INTEGER)
  207.    DECLARE SUB MouseLRelease (INTEGER, INTEGER, INTEGER)
  208.    DECLARE FUNCTION MouseMButton% ()
  209.    DECLARE SUB MouseMClick (INTEGER, INTEGER, INTEGER)
  210.    DECLARE SUB MouseMRelease (INTEGER, INTEGER, INTEGER)
  211.    DECLARE FUNCTION MouseRButton% ()
  212.    DECLARE SUB MouseRClick (INTEGER, INTEGER, INTEGER)
  213.    DECLARE SUB MouseRRelease (INTEGER, INTEGER, INTEGER)
  214.    DECLARE SUB MouseShow ()
  215.    DECLARE FUNCTION MouseWhereX% ()
  216.    DECLARE FUNCTION MouseWhereY% ()
  217.    DECLARE SUB MouseWindow (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  218.    DECLARE FUNCTION Num2Date$ (LONG)
  219.    DECLARE FUNCTION NumOn% ()
  220.    DECLARE FUNCTION PCDate$ ()
  221.    DECLARE FUNCTION PCType% ()
  222.    DECLARE FUNCTION PiD# ()
  223.    DECLARE FUNCTION PiS! ()
  224.    DECLARE SUB PopWindow (INTEGER, INTEGER, INTEGER, INTEGER, INTEGER, INTEGER, INTEGER, INTEGER, INTEGER, STRING)
  225.    DECLARE FUNCTION Pound2Kg! (SINGLE)
  226.    DECLARE SUB PrintScreen ()
  227.    DECLARE FUNCTION Processor% ()
  228.    DECLARE FUNCTION PrtPorts% ()
  229.    DECLARE FUNCTION RAltPress% ()
  230.    DECLARE FUNCTION Rad2DegD# (DOUBLE)
  231.    DECLARE FUNCTION Rad2DegS! (SINGLE)
  232.    DECLARE FUNCTION RCtrlPress% ()
  233.    DECLARE SUB ReColorArea (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  234.    DECLARE SUB Reverse (STRING)
  235.    DECLARE SUB RInstr (STRING, STRING, INTEGER)
  236.    DECLARE FUNCTION RotateL% (BYVAL INTEGER, BYVAL INTEGER)
  237.    DECLARE FUNCTION RotateLL& (BYVAL LONG, BYVAL INTEGER)
  238.    DECLARE FUNCTION RotateR% (BYVAL INTEGER, BYVAL INTEGER)
  239.    DECLARE FUNCTION RotateRL& (BYVAL LONG, BYVAL INTEGER)
  240.    DECLARE FUNCTION RShiftPress% ()
  241.    DECLARE FUNCTION SBFreeHandles% ()
  242.    DECLARE SUB SBFreeXMS (BYVAL INTEGER)
  243.    DECLARE SUB SBGetActive (INTEGER, INTEGER, INTEGER, INTEGER, INTEGER)
  244.    DECLARE SUB SBGetDrivers (INTEGER, INTEGER, INTEGER, INTEGER, INTEGER)
  245.    DECLARE SUB SBGetVer (INTEGER, INTEGER)
  246.    DECLARE SUB SBGetVolume (BYVAL INTEGER, INTEGER, INTEGER)
  247.    DECLARE SUB SBInitSrcFile (BYVAL INTEGER, STRING, INTEGER)
  248.    DECLARE SUB SBInitSrcXMS (BYVAL INTEGER, INTEGER)
  249.    DECLARE FUNCTION SBInt% ()
  250.    DECLARE FUNCTION SBIsFree% (BYVAL INTEGER)
  251.    DECLARE SUB SBLoadXMS (STRING, INTEGER, INTEGER)
  252.    DECLARE SUB SBMapMIDI (BYVAL INTEGER)
  253.    DECLARE SUB SBPause (BYVAL INTEGER)
  254.    DECLARE SUB SBPlay (BYVAL INTEGER)
  255.    DECLARE SUB SBResume (BYVAL INTEGER)
  256.    DECLARE SUB SBSetVolume (BYVAL INTEGER, INTEGER, INTEGER)
  257.    DECLARE FUNCTION SBStatus% (BYVAL INTEGER)
  258.    DECLARE SUB SBStop (BYVAL INTEGER)
  259.    DECLARE FUNCTION ScanKey$ ()
  260.    DECLARE SUB ScreenRest0 (STRING, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  261.    DECLARE SUB ScreenRestore (STRING, INTEGER, INTEGER)
  262.    DECLARE FUNCTION ScreenSave$ (INTEGER, INTEGER, INTEGER, INTEGER)
  263.    DECLARE SUB ScreenSave0 (STRING, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  264.    DECLARE SUB ScrollDown (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  265.    DECLARE SUB ScrollLeft (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  266.    DECLARE FUNCTION ScrollOn% ()
  267.    DECLARE SUB ScrollRight (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  268.    DECLARE SUB ScrollUp (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  269.    DECLARE FUNCTION SecD# (DOUBLE)
  270.    DECLARE FUNCTION SecHD# (DOUBLE)
  271.    DECLARE FUNCTION SecHS! (SINGLE)
  272.    DECLARE FUNCTION SecS! (SINGLE)
  273.    DECLARE SUB SetCaps (BYVAL INTEGER)
  274.    DECLARE SUB SetEnhKbd (BYVAL INTEGER)
  275.    DECLARE SUB SetInsert (BYVAL INTEGER)
  276.    DECLARE SUB SetNum (BYVAL INTEGER)
  277.    DECLARE SUB SetPal (BYVAL INTEGER, BYVAL LONG)
  278.    DECLARE SUB SetPalRGB (BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  279.    DECLARE SUB SetPrtSc (BYVAL INTEGER)
  280.    DECLARE SUB SetScroll (BYVAL INTEGER)
  281.    DECLARE FUNCTION ShiftL% (BYVAL INTEGER, BYVAL INTEGER)
  282.    DECLARE FUNCTION ShiftLL& (BYVAL LONG, BYVAL INTEGER)
  283.    DECLARE FUNCTION ShiftPress% ()
  284.    DECLARE FUNCTION ShiftR% (BYVAL INTEGER, BYVAL INTEGER)
  285.    DECLARE FUNCTION ShiftRL& (BYVAL LONG, BYVAL INTEGER)
  286.    DECLARE FUNCTION SinHD# (DOUBLE)
  287.    DECLARE FUNCTION SinHS! (SINGLE)
  288.    DECLARE SUB SpeedKey (BYVAL INTEGER, BYVAL INTEGER)
  289.    DECLARE SUB SplitRGB (BYVAL LONG, INTEGER, INTEGER, INTEGER)
  290.    DECLARE FUNCTION TanHD# (DOUBLE)
  291.    DECLARE FUNCTION TanHS! (SINGLE)
  292.    DECLARE FUNCTION TCCarrier% ()
  293.    DECLARE SUB TCDone ()
  294.    DECLARE SUB TCDTR (BYVAL INTEGER)
  295.    DECLARE SUB TCFlowCtl (BYVAL INTEGER)
  296.    DECLARE SUB TCFlushIn ()
  297.    DECLARE SUB TCFlushOut ()
  298.    DECLARE SUB TCInit (BYVAL INTEGER, INTEGER)
  299.    DECLARE FUNCTION TCInkey$ ()
  300.    DECLARE FUNCTION TCInkey0% ()
  301.    DECLARE FUNCTION TCInStat% ()
  302.    DECLARE FUNCTION TCOutStat% ()
  303.    DECLARE SUB TCParms (STRING, INTEGER, INTEGER)
  304.    DECLARE SUB TCSpeed (BYVAL LONG)
  305.    DECLARE SUB TCWrite (STRING)
  306.    DECLARE SUB TCWriteLn (STRING)
  307.    DECLARE SUB TInstr (STRING, BYVAL INTEGER, INTEGER)
  308.    DECLARE SUB TypeIn (STRING)
  309.    DECLARE SUB UnCalcAttr (BYVAL INTEGER, INTEGER, INTEGER)
  310.    DECLARE FUNCTION VesaChrHeight% ()
  311.    DECLARE FUNCTION VesaChrWidth% ()
  312.    DECLARE FUNCTION VesaColors& ()
  313.    DECLARE FUNCTION VesaFindFirst% ()
  314.    DECLARE FUNCTION VesaFindNext% ()
  315.    DECLARE FUNCTION VesaIsText% ()
  316.    DECLARE FUNCTION VesaIsMono% ()
  317.    DECLARE FUNCTION VesaScrHeight% ()
  318.    DECLARE FUNCTION VesaScrWidth% ()
  319.    DECLARE SUB VesaVersion (INTEGER, INTEGER)
  320.    DECLARE FUNCTION WeekDay$ (STRING)
  321.    DECLARE SUB WinCheck (INTEGER, INTEGER)
  322.    DECLARE SUB XMSclose (BYVAL INTEGER)
  323.    DECLARE FUNCTION XMSexists% ()
  324.    DECLARE FUNCTION XMSlfree& ()
  325.    DECLARE SUB XMSopen (BYVAL LONG, INTEGER, INTEGER)
  326.    DECLARE SUB XMSread (BYVAL INTEGER, BYVAL LONG, BYVAL LONG, BYVAL INTEGER, BYVAL INTEGER)
  327.    DECLARE SUB XMSresize (BYVAL INTEGER, BYVAL LONG, INTEGER)
  328.    DECLARE FUNCTION XMStfree& ()
  329.    DECLARE SUB XMSver (INTEGER, INTEGER)
  330.    DECLARE SUB XMSwrite (BYVAL INTEGER, BYVAL LONG, BYVAL LONG, BYVAL INTEGER, BYVAL INTEGER)
  331.    DECLARE SUB XQPrint (STRING, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  332.    DECLARE SUB XQPrintOver (STRING, BYVAL INTEGER, BYVAL INTEGER, BYVAL INTEGER)
  333.