home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / PROG / PASCAL / TPFAST30.ZIP / TPFAST.TXT < prev   
Encoding:
Text File  |  1990-09-26  |  61.9 KB  |  1,798 lines
  1.                                 TpFast.Txt
  2.                                ============
  3.  
  4.                 CopyRight (c) 1989,1990    Steven Lutrov
  5.  
  6.  
  7.  
  8.           The following text is organised as follows :=  The name  of
  9.           the function or procedure is on the far left and  the  name
  10.           of the assembler source file it  resides in  is  on the far
  11.           right.  A brief description is  then added  followed by the
  12.           decleration syntax and then a description of the  variables
  13.           passed as parameters.
  14.  
  15.  
  16.  
  17. {------------------------------------------------------------------------------}
  18. AltKeyDown                                                           FastKbd.Asm
  19.  
  20.  
  21. Description  :    Report if <Alt> Key is Pressed
  22.  
  23. Declerations :    Function Altkeydown: Boolean;
  24.  
  25.  
  26. Parameters   :    None
  27.  
  28. {------------------------------------------------------------------------------}
  29. BackGround                                                           FastScr.Asm
  30.  
  31.  
  32. Description  :    Set up the Background Colour Attribute.
  33.  
  34. Declerations :    Procedure Background(Code: Char);
  35.  
  36.  
  37. Parameters   :    Code          Character Code from Table in Remarks.
  38.  
  39.  
  40. Remarks      :    k     Black           K       Light  Black (Grey)
  41.                   b     Blue            B       Light  Blue
  42.                   g     Green           G       Light  Green
  43.                   c     Cyan            C       Light  Cyan
  44.                   r     Red             R       Light  Red
  45.                   m     Magenta         M       Light  Magenta
  46.                   y     Yellow          Y       Bright Yellow
  47.                   w     White           W       Bright White
  48.  
  49.  
  50. Also Note That Monochrome attributes are possible  e.g.
  51.  
  52.  
  53.      Attribute                       ForeGround      BackGround
  54.      =========                       ==========      ==========
  55.  
  56.      Normal                              w               k
  57.      Intense                             W               k
  58.      Underlined                          b               k
  59.      Underlined & Intense                B               k
  60.      Reverse                             k               w
  61.      Blinking                            w               K
  62.      Blinking & Intense                  W               K
  63.      Blinking & Underlined               b               K
  64.      Blinking & Intense & Inderlined     B               K
  65.      Blinking & Reverse                  k               W
  66.        
  67.  
  68. See Also ForeGround
  69.  
  70. {------------------------------------------------------------------------------}
  71. Blinkoff                                                             FastScr.Asm
  72.  
  73.  
  74. Description  :    Set Text Attribute To Not Blink.
  75.  
  76. Declerations :    Procedure BlikOff;
  77.  
  78.  
  79. Parameters   :    None
  80.  
  81. {------------------------------------------------------------------------------}
  82. Blinkon                                                              FastScr.Asm
  83.  
  84.  
  85. Description  :    Set Text Attribute To Blink;
  86.  
  87. Declerations :    Procedure BlinkOn;
  88.  
  89.  
  90.  
  91. Parameters   :    None
  92.  
  93. {------------------------------------------------------------------------------}
  94. Bytetohex                                                            FastBit.Asm
  95.  
  96.  
  97. Description  :    Convert a Byte Variable To Hex.
  98.  
  99. Declerations :    Function ByteToHex (Work_ : Byte) :Stype;
  100.  
  101.  
  102. Parameters   :    Work_         The Byte that is converted
  103.  
  104.  
  105. {------------------------------------------------------------------------------}
  106. CapsLockDown                                                         FastKbd.Asm
  107.  
  108.  
  109. Description  :    Report if <Caps Lock> Key is Pressed
  110.  
  111. Declerations :    Function CapsLockdown: Boolean;
  112.  
  113.  
  114. Parameters   :    None
  115.  
  116.  
  117. {------------------------------------------------------------------------------}
  118. CapsLockOn                                                           FastKbd.Asm
  119.  
  120.  
  121. Description  :    Report if <Caps Lock> Key is Currently On
  122.  
  123. Declerations :    Function CapsLockdOn: Boolean;
  124.  
  125.  
  126. Parameters   :    None
  127.  
  128.  
  129. {------------------------------------------------------------------------------}
  130. ClearBuffer                                                          FastKbd.Asm
  131.  
  132.  
  133. Description  :    Clears The Keyboard Buffer.
  134.  
  135. Declerations :    Procedure Clearbuffer;
  136.  
  137.  
  138. Parameters   :    None
  139.  
  140.  
  141. {------------------------------------------------------------------------------}
  142. ClearPage                                                            FastGrp.Asm
  143.  
  144.  
  145. Description  :    Clears a previously Saved Page from memory.
  146.  
  147. Declerations :    Procedure Clearpage(Pagenumber,Colour: Byte);
  148.  
  149.  
  150. Parameters   :    PageNumber    The Page Number
  151.                   Colour        The Colour Attribute to which the page is
  152.                                 cleared.
  153.  
  154. Notes        :    See GetPage.
  155.  
  156. {------------------------------------------------------------------------------}
  157. ClearCapslock                                                        FastKbd.Asm
  158.  
  159.  
  160. Description  :    Turn Off The <Caps Lock> Key.
  161.  
  162. Declerations :    Procedure Clearcapslock;
  163.  
  164.  
  165. Parameters   :    None
  166.  
  167. {------------------------------------------------------------------------------}
  168. ClearIns                                                             FastKbd.Asm
  169.  
  170.  
  171. Description  :    Turn Off The <Ins> Key.
  172.  
  173. Declerations :    Procedure Clearins;
  174.  
  175.  
  176. Parameters   :    None
  177.  
  178. {------------------------------------------------------------------------------}
  179. ClearNumLock                                                         FastKbd.Asm
  180.  
  181.  
  182. Description  :    Turn Off The <Num Lock> Key.
  183.  
  184. Declerations :    Procedure ClearNumLock;
  185.  
  186.  
  187. Parameters   :    None
  188.  
  189. {------------------------------------------------------------------------------}
  190. ClearScrollLock                                                      FastKbd.Asm
  191.  
  192.  
  193. Description  :    Turn Off The <Scroll Lock> Key.
  194.  
  195. Declerations :    Procedure ClearScrollLock;
  196.  
  197.  
  198. Parameters   :    None
  199.  
  200. {------------------------------------------------------------------------------}
  201. CloseFile                                                           FastFile.Asm
  202.  
  203. Description  :    Closes a File
  204.  
  205. Declerations :    Function CloseFile(Handle:Integer):Boolean;
  206.  
  207.  
  208. Parameters   :    Handle        The Dos Handle Returned when the file was
  209.                                 created. (See CreateFile)
  210.  
  211.  
  212. Remarks      :    CloseFile Returns a Boolean Value as follows
  213.                                 True  : File Closed Ok
  214.                                 False : File Didn't Close Ok
  215.  
  216.  
  217. {------------------------------------------------------------------------------}
  218. ChangeChar                                                           FastStr.Asm
  219.  
  220.  
  221. Description  :    Changes every instance of a character in a string.
  222.  
  223. Declerations :    Procedure ChangeChar(Var Strx: Stype; Search,Replace: Char);
  224.  
  225.  
  226.  
  227. Parameters   :    Strx          The String to be manipulated
  228.                   Search        Character that is searched
  229.                   Replace       Character that replaces Search
  230.  
  231. ErrReturn    :                  0 - Ok
  232.                                 1 - Character not Found
  233.  
  234. Remarks      :    None
  235.  
  236. {------------------------------------------------------------------------------}
  237. Colourx                                                              FastScr.Asm
  238.  
  239.  
  240.  
  241. Description  :    Change The Attribute of a Column of Text.
  242.  
  243. Declerations :    Procedure Colourx(X_Pos,Y_Pos,Y_Num,Colour: Byte);
  244.  
  245.  
  246.  
  247. Parameters   :    X_Pos         Column Position Coordinate
  248.                   Y_Pos         Row Position Coordinate
  249.                   Y_Num         Number of Columns Deep affecting Attribute
  250.                   Colour        The Attribute (0-255)
  251.  
  252.  
  253. Remarks      :    The Text inside the area is left un altered.
  254.  
  255.  
  256. {------------------------------------------------------------------------------}
  257. Compare                                                              FastStr.Asm
  258.  
  259.  
  260. Description  :    Compares two Strings
  261.  
  262. Declerations :    Function Compare(Strx1,Strx2: Stype): Boolean;
  263.  
  264.  
  265. Parameters   :    Strx1         First Compare String
  266.                   Strx2         Second Compare String
  267.  
  268.  
  269. Remarks      :    Returns TRUE or FALSE if compare was successfull.
  270.                   The case of the characters is ignored.
  271.  
  272. {------------------------------------------------------------------------------}
  273. CopyClear                                                            FastGrp.Asm
  274.  
  275.  
  276. Description  :    Copy the Contents of a Screen Area into a Byte Array
  277.                   and Then clear the Area.
  278.  
  279. Declerations :    Procedure CopyClear (Box: Pointer;
  280.                                      X_Pos,Y_pos,X_Num,Y_Num,Colour: Byte);
  281.  
  282.  
  283. Parameters   :    Box           Byte Array Pointer that holds Screen Contents
  284.                   X_Pos         The Top left Column position
  285.                   Y_pos         The Top left Row Position
  286.                   X_Num         The Number of Colums of the Screen
  287.                   Y_Num         The Number of Rows of the Screen
  288.                   Colour        The Colour Attribute of the Area.
  289.  
  290. {------------------------------------------------------------------------------}
  291. CreateFile                                                          FastFile.Asm
  292.  
  293. Description  :    Create a File with Specified Attributes
  294.  
  295. Declerations :    Function CreateFile(Fname:String; Attribute:Integer):Integer;
  296.  
  297.  
  298. Parameters   :    Fname         The Name of the File to be Created
  299.                   Attribute     The Attribute of the File to be Created
  300.                                 0 = Read Only
  301.                                 1 = Hidden
  302.                                 2 = System File
  303.                                 3 = Volume Label Entry
  304.                                 4 = Subdirectory
  305.                                 5 = Archive File
  306.  
  307. Remarks      :    CreateFile Return an Integer Value specifing the following
  308.                   instances. If Greater or equal to 0 the the integer value
  309.                   will designate the handle of the Created file. This is
  310.                   needed to close the file with CloseFile.
  311.  
  312.                              >= 0 : Ok (Returns Handle)
  313.                                -3 : Path Not Found
  314.                                -4 : Too Many Open Files
  315.                                -5 : Access Denied
  316.  
  317.  
  318. {------------------------------------------------------------------------------}
  319. CtrlKeyDown                                                          FastKbd.Asm
  320.  
  321.  
  322. Description  :    Report if <Ctrl> Key is Pressed
  323.  
  324. Declerations :    Function CtrlKeydown: Boolean;
  325.  
  326.  
  327. Parameters   :    None
  328.  
  329. {------------------------------------------------------------------------------}
  330. Cursordown                                                           FastScr.Asm
  331.  
  332.  
  333. Description  :    Move Cursor Down
  334.  
  335. Declerations :    Procedure Cursordown(Rows: Integer);
  336.  
  337.  
  338.  
  339. Parameters   :    Rows          Number of Rows to move down.
  340.  
  341. {------------------------------------------------------------------------------}
  342. Cursorleft                                                           FastScr.Asm
  343.  
  344.  
  345. Description  :    Move Cursor Left
  346.  
  347. Declerations :    Procedure Cursorleft(Columns: Integer);
  348.  
  349.  
  350.  
  351. Parameters   :    Columns       Number of Columns to move Left.
  352.  
  353. {------------------------------------------------------------------------------}
  354. Cursoroff                                                            FastScr.Asm
  355.  
  356.  
  357. Description  :    Turn Cursor Off
  358.  
  359. Declerations :    Procedure CursorOff;
  360.  
  361.  
  362.  
  363. Parameters   :    None
  364.  
  365. {------------------------------------------------------------------------------}
  366. Cursoron                                                             FastScr.Asm
  367.  
  368.  
  369. Description  :    Turn Cursor On
  370.  
  371. Declerations :    Procedure CursorOn;
  372.  
  373.  
  374.  
  375. Parameters   :    None
  376.  
  377. {------------------------------------------------------------------------------}
  378. Cursorright                                                          FastScr.Asm
  379.  
  380.  
  381. Description  :    Move Cursor Right
  382.  
  383. Declerations :    Procedure Cursorright(Columns: Integer);
  384.  
  385.  
  386.  
  387. Parameters   :    Columns       Number of Columns to move Right.
  388.  
  389. {------------------------------------------------------------------------------}
  390. Cursorup                                                             FastScr.Asm
  391.  
  392.  
  393. Description  :    Move Cursor Up
  394.  
  395. Declerations :    Procedure Cursorup(Rows: Integer);
  396.  
  397.  
  398.  
  399. Parameters   :    Rows          Number of Rows to move up.
  400.  
  401. {------------------------------------------------------------------------------}
  402. Deletechar                                                           FastStr.Asm
  403.  
  404.  
  405. Description  :    Deletes all occurances of a specified character.
  406.  
  407. Declerations :    Procedure Deletechar(Var Strx: Stype; Ch: Char);
  408.  
  409.  
  410. Parameters   :    Strx          The String to be manipulated.
  411.                   Ch            The Character to be deleted.
  412.  
  413. ErrReturn    :                  0 - Ok
  414.                                 1 - Character not Found
  415.  
  416.  
  417. {------------------------------------------------------------------------------}
  418. Deleteleft                                                           FastStr.Asm
  419.  
  420.  
  421. Description  :    Deletes all characters from the begining of a string
  422.                   until a specified character is reached.
  423.  
  424. Declerations :    Procedure Deleteleft(Var Strx: Stype; Border: Char);
  425.  
  426.  
  427. Parameters   :    Strx          The String to be manipulated.
  428.                   Border        The Character at which deletion stops
  429.  
  430. ErrReturn    :                  0 - Ok
  431.                                 1 - Character not Found
  432.  
  433.  
  434. {------------------------------------------------------------------------------}
  435. DrawBox                                                              FastGrp.Asm
  436.  
  437.  
  438. Description  :    Draws a Simple Box on the Screen.
  439.  
  440. Declerations :    Procedure Drawbox (Char_X ,Char_Y :Char;
  441.                                      X_Pos,Y_pos,X_Num,Y_Num,Colour:Byte);
  442.  
  443.  
  444. Parameters   :    Char_X        The Character used for Horizontal Lines
  445.                   Char_Y        The Character used for Vertical Lines
  446.                   X_Pos         The Top left Column position
  447.                   Y_pos         The Top left Row Position
  448.                   X_Num         The Number of Colums of the Screen
  449.                   Y_Num         The Number of Rows of the Screen
  450.                   Colour        The Colour Attribute of the Characters.
  451.  
  452.  
  453. {------------------------------------------------------------------------------}
  454. Deleteright                                                          FastStr.Asm
  455.  
  456.  
  457. Description  :    Deletes all characters from the end of a string
  458.                   until a specified character is reached.
  459.  
  460. Declerations :    Procedure Deleteright(Var Strx: Stype; Border: Char);
  461.  
  462.  
  463. Parameters   :    Strx          The String to be manipulated.
  464.                   Border        The Character at which deletion stops
  465.  
  466. ErrReturn    :                  0 - Ok
  467.                                 1 - Character not Found
  468.  
  469.  
  470. {------------------------------------------------------------------------------}
  471. Dsp                                                                  FastScr.Asm
  472.  
  473. Description  :    Write and Memory-map Strings to the screen.
  474.  
  475. Declerations :    Procedure Dsp(Strx: Stype);
  476.  
  477.  
  478.  
  479. Parameters   :    Strx          The String to write
  480.  
  481. Remarks      :    The String can be written to any page.
  482.                   The Colour Attribute of the string is set to
  483.                   the global variable TEXTATTR.
  484.                   No CR+LF is sent (see Dspln).
  485.  
  486.  
  487. {------------------------------------------------------------------------------}
  488. DspAt                                                                FastScr.Asm
  489.  
  490.  
  491. Description  :    Writes Strings on the screen
  492.  
  493. Declerations :    Procedure DspAt(Strx: Stype; X_Pos,Y_Pos,Colour: Byte);
  494.  
  495.  
  496. Parameters   :    Strx          The String to Write
  497.                   X_Pos         The Column Location Position
  498.                   Y_Pos         The Row Location Position
  499.                   Colour        The Colour Attribute of the String (0-255)
  500.  
  501.  
  502. {------------------------------------------------------------------------------}
  503. DspColour                                                            FastScr.Asm
  504.  
  505.  
  506. Description  :    Write and Memory-map Strings to the screen.
  507.  
  508. Declerations :    Procedure DspColour(Strx: Stype; Colour: Byte);
  509.  
  510.  
  511.  
  512. Parameters   :    Strx          The String to write
  513.                   Colour        The Colour Attribute of the string (0-255)
  514.  
  515. Remarks      :    The String can be written to any page.
  516.                   No CR+LF is sent (see DspLnColour).
  517.  
  518. {------------------------------------------------------------------------------}
  519. DspEnd                                                               FastScr.Asm
  520.  
  521.  
  522. Description  :    Write a string and clear the remaining specified length.
  523.  
  524. Declerations :    Procedure DspEnd(Strx: Stype; X_Pos,Y_Pos,Length,Colour: Byte);
  525.  
  526.  
  527.  
  528. Parameters   :    Strx          The String to write
  529.                   X_Pos         The Column position starting coordinate
  530.                   Y_Pos         The row position starting coordinate
  531.                   Length        The length of the line
  532.  
  533. Remarks      :    This will write a string on a specified position
  534.                   and will the clear characters following the string
  535.                   until the Length is met.
  536.  
  537. {------------------------------------------------------------------------------}
  538. DspJust                                                              FastScr.Asm
  539.  
  540.  
  541. Description  :    Write a String with justified positions.
  542.  
  543. Declerations :    Procedure DspJust(Strx: Stype; X_Pos,Y_Pos,Colour: Byte);
  544.  
  545.  
  546.  
  547. Parameters   :    Strx          The String to write
  548.                   X_Pos         The Column Staring position
  549.                   Y_Pos         The Row staring position
  550.                   Colour        The Colour Attribute of the string (0-255)
  551.  
  552. Remarks      :    This will write a string and justify it against a
  553.                   specified column and row position.
  554.  
  555. {------------------------------------------------------------------------------}
  556. Dspln                                                                FastScr.Asm
  557.  
  558.  
  559. Description  :    Write and Memory-map Strings to the screen.
  560.  
  561. Declerations :    Procedure Dspln(Strx: Stype);
  562.  
  563.  
  564.  
  565. Parameters   :    Strx          The String to write
  566.  
  567. Remarks      :    The String can be written to any page.
  568.                   The Colour Attribute of the string is set to
  569.                   the global variable TEXTATTR.
  570.                   A CR+LF is sent to the end of he String.
  571.  
  572. {------------------------------------------------------------------------------}
  573. DspLnColour                                                          FastScr.Asm
  574.  
  575.  
  576. Description  :    Write and Memory-map Strings to the screen.
  577.  
  578. Declerations :    Procedure DspLnColour(Strx: Stype; Colour: Byte);
  579.  
  580.  
  581.  
  582. Parameters   :    Strx          The String to write
  583.                   Colour        The Colour Attribute of the string (0-255)
  584.  
  585. Remarks      :    The String can be written to any page.
  586.                   A CR+LF is sent to the end of the string automatically.
  587.  
  588. {------------------------------------------------------------------------------}
  589. DspPart                                                              FastScr.Asm
  590.  
  591.  
  592. Description  :    Write and Portion of a string to the screen.
  593.  
  594. Declerations :    Procedure DspPart (Strx: Stype; Start,Numch,
  595.                                           X_Pos,Y_Pos,Colour: Byte);
  596.  
  597.  
  598. Parameters   :    Strx          The String to write
  599.                   Start         Starting position in Strx
  600.                   NumCh         Number of characters to write
  601.                   X_Pos         The Column Staring position
  602.                   Y_Pos         The row starting position
  603.                   Colour        The Colour Attribute of the string (0-255)
  604.  
  605. Remarks      :    Like the Copy and write commands in the run time library
  606.                   but much faster execution.
  607.  
  608.  
  609. {------------------------------------------------------------------------------}
  610. DspVert                                                              FastScr.Asm
  611.  
  612.  
  613.  
  614. Description  :    Write and String vertically on the screen.
  615.  
  616. Declerations :    Procedure DspVert(Strx: Stype; X_Pos,Y_Pos,Colour: Byte);
  617.  
  618.  
  619.  
  620. Parameters   :    Strx          The String to write
  621.                   X_Pos         The Column Staring position
  622.                   Y_Pos         The Row staring position
  623.                   Colour        The Colour Attribute of the string (0-255)
  624.  
  625. {------------------------------------------------------------------------------}
  626. EraseFile                                                           FastFile.Asm
  627.  
  628. Description  :    Erases a Specified File
  629.  
  630. Declerations :    Function EraseFile(Name:String):Integer;
  631.  
  632.  
  633. Parameters   :    Name          The Name of the File to be Erased
  634.  
  635. Remarks      :    EraseFile Return an Integer Value specifing the following
  636.                   instances.
  637.  
  638.                                 0 : Ok
  639.                                -2 : File Not Found
  640.                                -5 : Access Denied
  641.  
  642. {------------------------------------------------------------------------------}
  643. FMovePointer                                                        FastFile.Asm
  644.  
  645.  
  646. Description  :    Change Logical Read/Write Position in a File
  647.  
  648. Declerations :    Function FMovePointer(Handle:Integer; Mode:Integer;
  649.                                         Offset:Longint; Var Location:
  650.                                         Longint):Boolean;
  651.  
  652.  
  653. Parameters   :    Handle        Handle Identifier Of The File
  654.                   Mode          Method Code of Pointer Movement e.g.
  655.                                 0 = Move To Pos Cx:Dx
  656.                                 Bytes From The Beginning Of File
  657.  
  658.                                 1 = Move To Pos Cx:Dx
  659.                                 Bytes Beyond Current Position
  660.  
  661.                                 2 = Move To Pos Cx:Dx
  662.                                 Bytes Beyond End Of File
  663.  
  664.                   Offset        Offset in File Relative To Mode
  665.                   Location      New File Pointer Location After Move
  666.  
  667.  
  668. Remarks      :    FMovePointer Returns a Boolean Value specifing if the
  669.                   Move was successful. e.g
  670.  
  671.                                 True  : Move Ok
  672.                                 False : Something went wrong
  673.  
  674. {------------------------------------------------------------------------------}
  675. FillScreen                                                           FastGrp.Asm
  676.  
  677.  
  678. Description  :    Fills an Area of the Screen with a specified Character.
  679.  
  680. Declerations :    Procedure FillScreen (Ch: Char; X_Pos,Y_Pos,X_Num,Y_Num,
  681.                                      Colour: Byte);
  682.  
  683.  
  684. Parameters   :    Ch            The Character used for filling
  685.                   X_Pos         The Top Left Column Position of the Screen
  686.                   Y_Pos         The Top Left Row Position of the Screen
  687.                   X_Num         The Number of Colums of the Screen
  688.                   Y_Num         The Number of Rows of the Screen
  689.                   Colour        The Colour Attribute of the Character.
  690.  
  691. {------------------------------------------------------------------------------}
  692. FreshChar                                                            FastKbd.Asm
  693.  
  694.  
  695. Description  :    Clears The Keyboard Buffer and Returns Next KeyStroke.
  696.  
  697. Declerations :    Function FreshChar: Char;
  698.  
  699.  
  700. Parameters   :    None
  701.  
  702. Notes        :    If an Extended code was used then Chr(0) is returned only.
  703.  
  704. {------------------------------------------------------------------------------}
  705. Foreground                                                           FastScr.Asm
  706.  
  707.  
  708. Description  :    Set up the Foreround Colour Attribute.
  709.  
  710. Declerations :    Procedure ForeGound(Code: Char);
  711.  
  712.  
  713. Parameters   :    Code  :       Character Code from Table in Remarks.
  714.  
  715.  
  716. Remarks      :    k     Black           K       Grey
  717.                   b     Blue            B       Light Blue
  718.                   g     Green           G       Light Green
  719.                   c     Cyan            C       Light Cyan
  720.                   r     Red             R       Light Red
  721.                   m     Magenta         M       Light Magenta
  722.                   y     Brown           Y       Yellow
  723.                   w     White           W       Bright White
  724.  
  725.  
  726. Also Note That Monochrome attributes are possible  e.g.
  727.  
  728.  
  729.      Attribute                       ForeGround      BackGround
  730.      =========                       ==========      ==========
  731.  
  732.      Normal                              w               k
  733.      Intense                             W               k
  734.      Underlined                          b               k
  735.      Underlined & Intense                B               k
  736.      Reverse                             k               w
  737.      Blinking                            w               K
  738.      Blinking & Intense                  W               K
  739.      Blinking & Underlined               b               K
  740.      Blinking & Intense & Inderlined     B               K
  741.      Blinking & Reverse                  k               W
  742.        
  743.  
  744. See Also BackGround
  745.  
  746. {------------------------------------------------------------------------------}
  747. Formatleft                                                           FastScr.Asm
  748.  
  749.  
  750. Description  :    Writes Strings on the screen with Formatting
  751.  
  752. Declerations :    Procedure Formatleft(Strx: Stype; How_Many: Integer; Colour: Byte);
  753.  
  754.  
  755. Parameters   :    Strx          The String to Write
  756.                   How_Many      Distance between Starting cursor position
  757.                                 and return cursor position.
  758.                   Colour        The Colour Attribute of the String (0-255)
  759.  
  760.  
  761. Remarks      :    This will write a String and move the cursor to a
  762.                   position specified by How_Many. If How_Many is a positive
  763.                   value then cursor is offset to the right from the initial
  764.                   position. If How_Many is negative then the cursor is
  765.                   moved to a position directly below the starting point.
  766.  
  767. {------------------------------------------------------------------------------}
  768. FormatRight                                                          FastScr.Asm
  769.  
  770.  
  771. Description  :    Writes Strings on the screen with Formatting
  772.  
  773. Declerations :    Procedure FormatRight(Strx: Stype; How_Many: Integer; Colour: Byte);
  774.  
  775.  
  776. Parameters   :    Strx          The String to Write
  777.                   How_Many      Distance between Starting cursor position
  778.                                 and return cursor position.
  779.                   Colour        The Colour Attribute of the String (0-255)
  780.  
  781.  
  782. Remarks      :    This will write a String and move the cursor to a
  783.                   position specified by How_Many. If How_Many is a positive
  784.                   value then cursor is offset to the right from the initial
  785.                   position. If How_Many is negative then the cursor is
  786.                   moved to a position directly below the starting point.
  787.  
  788.  
  789.  
  790. {------------------------------------------------------------------------------}
  791. GetColour                                                            FastScr.Asm
  792.  
  793.  
  794. Description  :    Get the attribute of a specified screen position.
  795.  
  796. Declerations :    Function  GetColour(X_Pos,Y_Pos: Byte): Byte;
  797.  
  798.  
  799.  
  800. Parameters   :    X_Pos         Column starting position
  801.                   Y_Pos         Row starting position
  802.  
  803.  
  804. {------------------------------------------------------------------------------}
  805. Getpage                                                              FastScr.Asm
  806.  
  807.  
  808. Description  :    Get the Current Page.
  809.  
  810. Declerations :    Function  Getpage: Integer;
  811.  
  812.  
  813.  
  814. Parameters   :    None
  815.  
  816.  
  817. {------------------------------------------------------------------------------}
  818. GetScan                                                              FastKbd.Asm
  819.  
  820.  
  821. Description  :    Returns The Scan Code of Next Keystroke in Buffer
  822.  
  823. Declerations :    Function Getscan: Byte;
  824.  
  825.  
  826. Parameters   :    None
  827.  
  828. {------------------------------------------------------------------------------}
  829. Getverify                                                            FastFil.Asm
  830.  
  831. Description  :    Returns The Dos Verification Flag for Disk Writing
  832.  
  833. Declerations :    Function GetVerify : Boolean;
  834.  
  835.  
  836.  
  837. Parameters   :    None
  838.  
  839.  
  840. {------------------------------------------------------------------------------}
  841. Getvolume                                                            FastFil.Asm
  842.  
  843. Description  :    Returns The Disks Volume Label
  844.  
  845. Declerations :    Function Getvolume(Disk: Integer; Workarea: Pointer): Stype;
  846.  
  847.  
  848.  
  849. Parameters   :    Disk          Specified Disk Drive Integer e.g.
  850.                                 0   :  Current Drive        1   :  Drive A
  851.                                 2   :  Drive B              3   :  Drive C
  852.  
  853.                   WorkArea      A Pointer Array for Used Internaly in
  854.                                 the function.
  855.  
  856.  
  857. {------------------------------------------------------------------------------}
  858. InsKeyDown                                                           FastKbd.Asm
  859.  
  860.  
  861. Description  :    Report if <Ins> Key is Pressed
  862.  
  863. Declerations :    Function InsKeydown: Boolean;
  864.  
  865.  
  866. Parameters   :    None
  867.  
  868. {------------------------------------------------------------------------------}
  869. InsKeyOn                                                             FastKbd.Asm
  870.  
  871.  
  872. Description  :    Report if <Ins> Key is Currently On
  873.  
  874. Declerations :    Function InsKeyOn: Boolean;
  875.  
  876.  
  877. Parameters   :    None
  878.  
  879. {------------------------------------------------------------------------------}
  880. Intenseoff;                                                          FastScr.Asm
  881.  
  882. Description  :    Set Text Attribute To Intensity Off;
  883.  
  884. Declerations :    Procedure IntenseOff;
  885.  
  886.  
  887.  
  888. Parameters   :    None
  889.  
  890.  
  891. {------------------------------------------------------------------------------}
  892. Intenseon                                                            FastScr.Asm
  893.  
  894.  
  895. Description  :    Set Text Attribute To Intense On;
  896.  
  897. Declerations :    Procedure IntenseOn;
  898.  
  899.  
  900.  
  901. Parameters   :    None
  902.  
  903.  
  904. {------------------------------------------------------------------------------}
  905. KeyPause                                                             FastKbd.Asm
  906.  
  907.  
  908. Description  :    Makes any Key a Push-On and Release-Off Switch
  909.  
  910. Declerations :    Procedure Keypause (Code: Char; Ascii:
  911.                                       Boolean; Wait_A,Wait_B: Byte);
  912.  
  913.  
  914.  
  915. Parameters   :    Code          The Key That is Used in keyPause
  916.                   Ascii         True  = Code is 1 Byte Ascii Code
  917.                                 False = Code is Second Byte Of Extended Code
  918.  
  919.                   Wait_A        Time For Buffer Refresh Signal on Press
  920.                   Wait_B        Time For Buffer Refresh Signal on Release
  921.  
  922. {------------------------------------------------------------------------------}
  923. LastKey                                                              FastKbd.Asm
  924.  
  925.  
  926. Description  :    Return The Last Keyboard Code from the Buffer
  927.  
  928. Declerations :    Function LastKey: Char;
  929.  
  930. Parameters   :    None
  931.  
  932. Notes        :    If Buffer is emty then 255 is Returned of Hex($FF)
  933.                   If an Extended code was used then Chr(0) is returned only.
  934.  
  935. {------------------------------------------------------------------------------}
  936. Leftend                                                              FastStr.Asm
  937.  
  938.  
  939. Description  :    Return the Left end of a string up to a specified
  940.                   character.
  941.  
  942. Declerations :    Function Leftend(Var Strx: Stype; Border: Char): Stype;
  943.  
  944.  
  945. Parameters   :    Strx          The String to be manipulated.
  946.                   Border        The character at which the search stops
  947.  
  948. ErrReturn    :                  0 - Ok
  949.                                 1 - Character not Found
  950.  
  951.  
  952. {------------------------------------------------------------------------------}
  953. LeftShiftDown                                                        FastKbd.Asm
  954.  
  955.  
  956. Description  :    Report if <Left Shift> Key is Pressed
  957.  
  958. Declerations :    Function LeftShiftdown: Boolean;
  959.  
  960.  
  961. Parameters   :    None
  962.  
  963. {------------------------------------------------------------------------------}
  964. Lowercase                                                            FastStr.Asm
  965.  
  966.  
  967. Description  :    Convert a string to Lowercase.
  968.  
  969. Declerations :    Procedure Lowercase(Var Strx: Stype);
  970.  
  971.  
  972. Parameters   :    Strx          The String to be manipulated.
  973.  
  974.  
  975. {------------------------------------------------------------------------------}
  976. Nextkey                                                              FastKbd.Asm
  977.  
  978.  
  979. Description  :    Extracts Next KeyStroke from Buffer
  980.  
  981. Declerations :    Function Nextkey: Char;
  982.  
  983.  
  984. Parameters   :    None
  985.  
  986. ErrReturn    :    0     =       Normal Ascii Return
  987.                   1     =       Extended Code Return
  988.                   2     =       Buffer is Empty
  989.  
  990. Notes        :    The KeyStroke is not removed from the Buffer.
  991.  
  992. {------------------------------------------------------------------------------}
  993. Normal                                                               FastScr.Asm
  994.  
  995.  
  996. Description  :    Set Text Attribute To Normal;
  997.  
  998. Declerations :    Procedure Normal;
  999.  
  1000.  
  1001.  
  1002. Parameters   :    None
  1003.  
  1004.  
  1005. {------------------------------------------------------------------------------}
  1006. NumLockDown                                                          FastKbd.Asm
  1007.  
  1008.  
  1009. Description  :    Report if <Num Lock> Key is Pressed
  1010.  
  1011. Declerations :    Function NumLockdown: Boolean;
  1012.  
  1013.  
  1014. Parameters   :    None
  1015.  
  1016. {------------------------------------------------------------------------------}
  1017. NumLockOn                                                            FastKbd.Asm
  1018.  
  1019.  
  1020. Description  :    Report if <Num Lock> Key is Currently On
  1021.  
  1022. Declerations :    Function NumLockOn: Boolean;
  1023.  
  1024.  
  1025. Parameters   :    None
  1026.  
  1027. {------------------------------------------------------------------------------}
  1028. OpenFile                                                            FastFile.Asm
  1029.  
  1030. Description  :    Opens a File with Specified Access
  1031.  
  1032. Declerations :    Function OpenFile(Name:String; Access:Integer):Integer;
  1033.  
  1034.  
  1035. Parameters   :    Name          The Name of the File to be Created
  1036.                   Access        The Access required for the file
  1037.  
  1038.                                 0 = Read Only
  1039.                                 1 = Write
  1040.                                 2 = Read And Write
  1041.  
  1042. Remarks      :    OpenFile Returns  an Integer Value specifing the following
  1043.                   instances. If Greater or equal to 0 the the integer value
  1044.                   will designate the handle of the Opened file. This is
  1045.                   needed to close the file with CloseFile.
  1046.  
  1047.                              >= 0 : Ok (Returns Handle)
  1048.                                -2 : File Not Found
  1049.                                -4 : Too Many Open Files
  1050.                                -5 : Access Denied
  1051.                               -12 : Invalid Access
  1052.  
  1053.  
  1054. {------------------------------------------------------------------------------}
  1055. Overwrite                                                            FastStr.Asm
  1056.  
  1057.  
  1058. Description  :    Overwrites part of a string with a passed substring.
  1059.  
  1060. Declerations :    Procedure Overwrite (Var Strx: Stype;
  1061.                                        SubStrx: Stype; Position: Integer);
  1062.  
  1063.  
  1064.                   Strx          The String to be manipulated.
  1065.                   SubStrx       The string that replaces Strx
  1066.                   Position      The position at which overwriting begins.
  1067.  
  1068. ErrReturn    :                  0 - Ok
  1069.                                 1 - Error
  1070.  
  1071.  
  1072. {------------------------------------------------------------------------------}
  1073. Padcentre                                                            FastStr.Asm
  1074.  
  1075.  
  1076. Description  :    Pads a string to a specified length at any position
  1077.                   in a character.
  1078.  
  1079. Declerations :    Procedure Padcentre(Var Strx: Stype; Ch: Char; Position,Length: Integer);
  1080.  
  1081.  
  1082. Parameters   :    Strx          The String to be manipulated.
  1083.                   Ch            Character used for padding
  1084.                   Position      The position at whic padding comences
  1085.                   Length        The New length of Strx
  1086.  
  1087. ErrReturn    :                  0 - Ok
  1088.                                 1 - Error
  1089.  
  1090.  
  1091. {------------------------------------------------------------------------------}
  1092. Padends                                                              FastStr.Asm
  1093.  
  1094.  
  1095. Description  :    Extends a string by padding it at both ends.
  1096.  
  1097. Declerations :    Procedure Padends(Var Strx: Stype; Ch: Char; Length: Integer);
  1098.  
  1099.  
  1100. Parameters   :    Strx          The String to be manipulated.
  1101.                   Ch            Character used for padding
  1102.                   Length        The New length of Strx
  1103.  
  1104. ErrReturn    :                  0 - Ok
  1105.                                 1 - Error
  1106.  
  1107.  
  1108. {------------------------------------------------------------------------------}
  1109. Padleft                                                              FastStr.Asm
  1110.  
  1111.  
  1112. Description  :    Pads the begining of a string and extends it a specified
  1113.                   length.
  1114.  
  1115. Declerations :    Procedure Padleft(Var Strx: Stype; Ch: Char; Length: Integer);
  1116.  
  1117.  
  1118. Parameters   :    Strx          The String to be manipulated.
  1119.                   Ch            Character used for padding
  1120.                   Length        New length of Strx
  1121.  
  1122. ErrReturn    :                  0 - Ok
  1123.                                 1 - Error
  1124.  
  1125.  
  1126. {------------------------------------------------------------------------------}
  1127. Padright                                                             FastStr.Asm
  1128.  
  1129.  
  1130. Description  :    Pads the end of a string and extends it a specified
  1131.                   length.
  1132.  
  1133. Declerations :    Procedure Padright(Var Strx: Stype; Ch: Char; Length: Integer);
  1134.  
  1135.  
  1136. Parameters   :    Strx          The String to be manipulated.
  1137.                   Ch            Character used for padding
  1138.                   Length        New length of Strx
  1139.  
  1140. ErrReturn    :                  0 - Ok
  1141.                                 1 - Error
  1142.  
  1143.  
  1144. {------------------------------------------------------------------------------}
  1145. ReadChar                                                             FastKbd.Asm
  1146.  
  1147.  
  1148. Description  :    Returns The Full Ascii Keystroke from the Buffer
  1149.  
  1150. Declerations :    Function Readchar: Char;
  1151.  
  1152. Parameters   :    None
  1153.  
  1154. Notes        :    Full Ascii Keystrokes includes Control Characters
  1155.                   and other special codes.
  1156.                   E.g  <Tab> <BackSpace> <Return> <End>
  1157.  
  1158.  
  1159. {------------------------------------------------------------------------------}
  1160. ReadFile                                                            FastFil.Asm
  1161.  
  1162. Description  :    Reads a File To a Buffer
  1163.  
  1164. Declerations :    Function ReadFile(Handle:Word; Amount:Word; Var Buff):Integer;
  1165.  
  1166.  
  1167. Parameters   :    Handle        Handle Identifier Of The File
  1168.                   Amount        Number Of Bytes To Read
  1169.                                 Record Size <= $7fff Bytes
  1170.                   Buff          Pointer To Address Of Data Buffer
  1171.  
  1172.  
  1173. Remarks      :    ReadFile Returns an Integer Value specifing the number of
  1174.                   bytes actually read into the buffer, or the following
  1175.                   codes if not successfull
  1176.  
  1177.                              >= 0 : Ok (Returns Bytes Read)
  1178.                                -5 : Access Denied
  1179.                                -6 : Invalid Handle
  1180.  
  1181. {------------------------------------------------------------------------------}
  1182. Readsector                                                          FastFil.Asm
  1183.  
  1184. Description  :    Reads 512 bytes of a specified Disk Sector to a Buffer
  1185.  
  1186. Declerations :    Procedure Readsector(Segment,Offset,Drive,Sector,Number: Word);
  1187.  
  1188.  
  1189.  
  1190. Parameters   :    Segment       The Segment of the Array Buffer Object
  1191.                   Offest        The Offset for The Segment
  1192.                   Drive         The Specified Drive  1 = A, 2 = B, 3 = C etc.
  1193.                   Sector        The Logical Sector Number
  1194.                   Number        Number of Sectors to Read
  1195.  
  1196.  
  1197. ErrReturn    :                  0 - Ok
  1198.                                 1 - Invalid Format on Disk
  1199.                                 2 - Write Protection Error
  1200.                                 3 - Sector Number is Invalid
  1201.                                 4 - Hardware Failure
  1202.  
  1203. {------------------------------------------------------------------------------}
  1204. Replace                                                              FastStr.Asm
  1205.  
  1206.  
  1207. Description  :    Deletes a specified number of characters and inserts
  1208.                   new substring.
  1209.  
  1210. Declerations :    Procedure Replace(Var Strx: Stype;
  1211.                                     SubStrx: Stype; position,Chars: Integer);
  1212.  
  1213.  
  1214.  
  1215. Parameters   :    Strx          The String to be manipulated.
  1216.                   SubStrx       The String to be Inserted
  1217.                   Position      The position at which replacement starts
  1218.                   Chars         The number of characters deleted prior
  1219.                                 to insertion.
  1220.  
  1221.  
  1222. ErrReturn    :                  0 - Ok
  1223.                                 1 - Error
  1224.  
  1225. Remarks      :    Same operation as Insert and Delete commands in the
  1226.                   run time library but faster execution.
  1227.  
  1228.  
  1229. {------------------------------------------------------------------------------}
  1230. RestoreScreen                                                        FastGrp.Asm
  1231.  
  1232.  
  1233. Description  :    Restore a previously saved image to the screen.
  1234.  
  1235. Declerations :    Procedure RestoreScreen (Box: Pointer; X_Pos,Y_pos,X_Num,Y_Num:
  1236.                                         Byte);
  1237.  
  1238.  
  1239. Parameters   :    Box           Byte Array Pointer that holds Screen Contents
  1240.                   X_Pos         The Top left Column position
  1241.                   Y_pos         The Top left Row Position
  1242.                   X_Num         The Number of Colums of the Screen
  1243.                   Y_Num         The Number of Rows of the Screen
  1244.  
  1245. {------------------------------------------------------------------------------}
  1246. Reverse;                                                             FastScr.Asm
  1247.  
  1248.  
  1249. Description  :    Set Text Attribute To Reverse;
  1250.  
  1251. Declerations :    Procedure Reverse;
  1252.  
  1253.  
  1254.  
  1255. Parameters   :    None
  1256.  
  1257.  
  1258. {------------------------------------------------------------------------------}
  1259. Rightend                                                             FastStr.Asm
  1260.  
  1261.  
  1262. Description  :    Return the Right end of a string up to a specified
  1263.                   character.
  1264.  
  1265. Declerations :    Function Rightend(Var Strx: Stype; Border: Char): Stype;
  1266.  
  1267.  
  1268. Parameters   :    Strx          The String to be manipulated.
  1269.                   Border        The character at which the search stops
  1270.  
  1271. ErrReturn    :                  0 - Ok
  1272.                                 1 - Character not Found
  1273.  
  1274.  
  1275. {------------------------------------------------------------------------------}
  1276. RightShiftDown                                                       FastKbd.Asm
  1277.  
  1278.  
  1279. Description  :    Report if <Right Shift> Key is Pressed
  1280.  
  1281. Declerations :    Function RightShiftdown: Boolean;
  1282.  
  1283.  
  1284. Parameters   :    None
  1285.  
  1286. {------------------------------------------------------------------------------}
  1287. RotateByteLeft                                                       FastBit.Asm
  1288.  
  1289.  
  1290. Description  :    Rotate the Bits of a Byte Left.
  1291.  
  1292. Declerations :    Function RotateByteLeft (Work_,Bits_ : Byte): Byte;
  1293.  
  1294.  
  1295. Parameters   :    Work_         The Byte that is converted
  1296.                   Bits_         Number of Bits to be Rotated
  1297.  
  1298. {------------------------------------------------------------------------------}
  1299. RotateByteRight                                                      FastBit.Asm
  1300.  
  1301.  
  1302. Description  :    Rotate the Bits of a Byte Right.
  1303.  
  1304. Declerations :    Function RotateByteRight (Work_,Bits_ : Byte): Byte;
  1305.  
  1306.  
  1307. Parameters   :    Work_         The Byte that is converted
  1308.                   Bits_         Number of Bits to be Rotated
  1309.  
  1310.  
  1311. {------------------------------------------------------------------------------}
  1312. RotateWordLeft                                                       FastBit.Asm
  1313.  
  1314.  
  1315. Description  :    Rotate the Bits of a Word Left.
  1316.  
  1317. Declerations :    Function RotateWordLeft (Work_ : Word;
  1318.                                            Bits_ : Byte): Word;
  1319.  
  1320.  
  1321. Parameters   :    Work_         The Word that is converted
  1322.                   Bits_         Number of Bits to be Rotated
  1323.  
  1324. {------------------------------------------------------------------------------}
  1325. RotateWordRight                                                      FastBit.Asm
  1326.  
  1327.  
  1328. Description  :    Rotate the Bits of a Word Right.
  1329.  
  1330. Declerations :    Function RotateWordRight (Work_ : Word;
  1331.                                            Bits_ : Byte): Word;
  1332.  
  1333.  
  1334. Parameters   :    Work_         The Word that is converted
  1335.                   Bits_         Number of Bits to be Rotated
  1336.  
  1337. {------------------------------------------------------------------------------}
  1338. RowColour                                                            FastScr.Asm
  1339.  
  1340.  
  1341. Description  :    Change The Attribute of a Row of Text.
  1342.  
  1343. Declerations :    Procedure Rowcolour(X_Pos,Y_Pos,X_Num,Colour: Byte);
  1344.  
  1345.  
  1346.  
  1347. Parameters   :    X_Pos         Column Position Coordinate
  1348.                   Y_Pos         Row Position Coordinate
  1349.                   X_Num         Number of Rows Wide affecting Attribute
  1350.                   Colour        The Attribute (0-255)
  1351.  
  1352.  
  1353. Remarks      :    The Text inside the area is left un altered.
  1354.  
  1355. {------------------------------------------------------------------------------}
  1356. SaveScreen                                                           FastGrp.Asm
  1357.  
  1358.  
  1359. Description  :    Copy the Contents of a Screen Area into a Byte Array
  1360.                   including Screen Attributes.
  1361.  
  1362. Declerations :    Procedure SaveScreen(Box: Pointer; X_Pos,Y_pos,X_Num,Y_Num: Byte);
  1363.  
  1364.  
  1365. Parameters   :    Box           Byte Array Pointer that holds Screen Contents
  1366.                   X_Pos         The Top left Column position
  1367.                   Y_pos         The Top left Row Position
  1368.                   X_Num         The Number of Colums of the Screen
  1369.                   Y_Num         The Number of Rows of the Screen
  1370.  
  1371. {------------------------------------------------------------------------------}
  1372. ScreenColour                                                         FastScr.Asm
  1373.  
  1374.  
  1375. Description  :    Change The Attribute of a Boxed Area.
  1376.  
  1377. Declerations :    Procedure ScreenColour(X_Pos,Y_Pos,X_Num,Y_Num,Colour: Byte);
  1378.  
  1379.  
  1380.  
  1381. Parameters   :    X_Pos         Column Position Coordinate
  1382.                   Y_Pos         Row Position Coordinate
  1383.                   X_Num         Number of Columns Wide
  1384.                   Y_Num         Number of Rows Deep
  1385.                   Colour        The Attribute (0-255)
  1386.  
  1387.  
  1388. Remarks      :    The Text inside the box is left un altered.
  1389.  
  1390.  
  1391. {------------------------------------------------------------------------------}
  1392. ScreenDown                                                           FastGrp.Asm
  1393.  
  1394.  
  1395. Description  :    Moves an Area of the Screen Down 1 Row
  1396.  
  1397. Declerations :    Procedure ScreenDown (Box: Pointer; Var X_Pos,Y_Pos:
  1398.                                      Byte; X_Num,Y_Num: Byte);
  1399.  
  1400.  
  1401. Parameters   :    Box           Byte Array Pointer that holds Screen Contents
  1402.                   X_Pos         The Top Left Column Position of the Screen
  1403.                   Y_Pos         The Top Left Row Position of the Screen
  1404.                   X_Num         The Number of Colums of the Screen
  1405.                   Y_Num         The Number of Rows of the Screen
  1406.  
  1407. Notes        :    The Screen area is moved down only by Row as the routine
  1408.                   lends itself to scrolling an area of the screen when the
  1409.                   routine is put in a loop.
  1410.                   The Previous screen area can be saved prior to calling
  1411.                   this routine with SaveScreen and so reference is made to the
  1412.                   Box Pointer Variable.
  1413.  
  1414. {------------------------------------------------------------------------------}
  1415. ScreenLeft                                                           FastGrp.Asm
  1416.  
  1417.  
  1418. Description  :    Moves an Area of the Screen Left 2 Columns
  1419.  
  1420. Declerations :    Procedure ScreenLeft (Box: Pointer; Var X_Pos,Y_Pos:
  1421.                                      Byte; X_Num,Y_Num: Byte);
  1422.  
  1423.  
  1424. Parameters   :    Box           Byte Array Pointer that holds Screen Contents
  1425.                   X_Pos         The Top Left Column Position of the Screen
  1426.                   Y_Pos         The Top Left Row Position of the Screen
  1427.                   X_Num         The Number of Colums of the Screen
  1428.                   Y_Num         The Number of Rows of the Screen
  1429.  
  1430. Notes        :    The Screen area is moved Left only by 2 Columns as the
  1431.                   routine lends itself to scrolling an area of the screen
  1432.                   when the  routine is put in a loop.
  1433.                   The Previous screen area can be saved prior to calling
  1434.                   this routine with SaveScreen and so reference is made to the
  1435.                   Box Pointer Variable.
  1436.  
  1437. {------------------------------------------------------------------------------}
  1438. ScreenRight                                                          FastGrp.Asm
  1439.  
  1440.  
  1441. Description  :    Moves an Area of the Screen Right 2 Columns
  1442.  
  1443. Declerations :    Procedure ScreenRight (Box: Pointer; Var X_Pos,Y_Pos:
  1444.                                      Byte; X_Num,Y_Num: Byte);
  1445.  
  1446.  
  1447. Parameters   :    Box           Byte Array Pointer that holds Screen Contents
  1448.                   X_Pos         The Top Left Column Position of the Screen
  1449.                   Y_Pos         The Top Left Row Position of the Screen
  1450.                   X_Num         The Number of Colums of the Screen
  1451.                   Y_Num         The Number of Rows of the Screen
  1452.  
  1453. Notes        :    The Screen area is moved Right only by 2 Columns as the
  1454.                   routine lends itself to scrolling an area of the screen
  1455.                   when the  routine is put in a loop.
  1456.                   The Previous screen area can be saved prior to calling
  1457.                   this routine with SaveScreen and so reference is made to the
  1458.                   Box Pointer Variable.
  1459.  
  1460. {------------------------------------------------------------------------------}
  1461. ScreenUp                                                             FastGrp.Asm
  1462.  
  1463.  
  1464. Description  :    Moves an Area of the Screen Up 1 Row
  1465.  
  1466. Declerations :    Procedure ScreenUp (Box: Pointer; Var X_Pos,Y_Pos:
  1467.                                      Byte; X_Num,Y_Num: Byte);
  1468.  
  1469.  
  1470. Parameters   :    X_Pos         The Top Left Column Position of the Screen
  1471.                   Y_Pos         The Top Left Row Position of the Screen
  1472.                   X_Num         The Number of Colums of the Screen
  1473.                   Y_Num         The Number of Rows of the Screen
  1474.  
  1475. Notes        :    The Screen area is moved Up only by Row as the routine
  1476.                   lends itself to scrolling an area of the screen when the
  1477.                   routine is put in a loop.
  1478.                   The Previous screen area can be saved prior to calling
  1479.                   this routine with SaveScreen and so reference is made to the
  1480.                   Box Pointer Variable.
  1481.  
  1482. {------------------------------------------------------------------------------}
  1483. ScrollLockLockDown                                                   FastKbd.Asm
  1484.  
  1485.  
  1486. Description  :    Report if <Scroll Lock> Key is Pressed
  1487.  
  1488. Declerations :    Function ScrollLockdown: Boolean;
  1489.  
  1490.  
  1491. Parameters   :    None
  1492.  
  1493. {------------------------------------------------------------------------------}
  1494. ScrollLockOn                                                         FastKbd.Asm
  1495.  
  1496.  
  1497. Description  :    Report if <Scroll Lock> Key Currently On
  1498.  
  1499. Declerations :    Function ScrollLockOn: Boolean;
  1500.  
  1501.  
  1502. Parameters   :    None
  1503.  
  1504.  
  1505. {------------------------------------------------------------------------------}
  1506. Scrollx                                                              FastGrp.Asm
  1507.  
  1508.  
  1509. Description  :    Scroll a Defined area of the Screen Left Or right.
  1510.  
  1511.  
  1512. Declerations :    Procedure Scrollx (Where: Char; X_Pos,Y_pos,X_Num,Y_Num,
  1513.                                         X_Pos,Colour: Byte);
  1514.  
  1515.  
  1516. Parameters   :    Where         The Direction Characters E.g.
  1517.                                 'L'   -  Scroll Left
  1518.                                 'R'   -  Scroll Right
  1519.  
  1520.                   X_Pos         The Top left Column position
  1521.                   Y_pos         The Top left Row Position
  1522.                   X_Num         The Number of Colums of the Screen
  1523.                   Y_Num         The Number of Rows of the Screen
  1524.                   X_Pos         The Number of Columns to be shifted
  1525.                   Colour        The Attribute to clear Empty Columns
  1526.  
  1527.  
  1528. {------------------------------------------------------------------------------}
  1529. Scrolly                                                              FastGrp.Asm
  1530.  
  1531.  
  1532. Description  :    Scroll a Defined area of the Screen Up Or Down.
  1533.  
  1534.  
  1535. Declerations :    Procedure Scrolly (Where: Char; X_Pos,Y_pos,X_Num,
  1536.                                         Y_Num,Lines,Colour: Byte);
  1537.  
  1538.  
  1539. Parameters   :    Where         The Direction Characters E.g.
  1540.                                 'U'   -  Scroll Up
  1541.                                 'D'   -  Scroll Down
  1542.  
  1543.                   X_Pos         The Top left Column position
  1544.                   Y_pos         The Top left Row Position
  1545.                   X_Num         The Number of Colums of the Screen
  1546.                   Y_Num         The Number of Rows of the Screen
  1547.                   Lines         the Number of Rows to be Shifted
  1548.                   Colour        The Attribute to clear Empty Columns
  1549.  
  1550.  
  1551. {------------------------------------------------------------------------------}
  1552. Seekstring                                                           FastStr.Asm
  1553.  
  1554.  
  1555. Description  :    Searches for a Substring within a String
  1556.  
  1557. Declerations :    Function Seekstring (Strx,SubStrx: Stype;
  1558.                                        Startpt: Integer):Integer;
  1559.  
  1560.  
  1561. Parameters   :    Strx          The String to be manipulated.
  1562.                   SubStrx       The String that is searched
  1563.                   Startpt       The starting position of the search
  1564.  
  1565. ErrReturn    :                  0 - Ok
  1566.                                 1 - Error
  1567.  
  1568.  
  1569. {------------------------------------------------------------------------------}
  1570. SetCapsLock                                                          FastKbd.Asm
  1571.  
  1572.  
  1573. Description  :    Turn On the <Caps Lock> Key.
  1574.  
  1575. Declerations :    Procedure Setcapslock;
  1576.  
  1577.  
  1578. Parameters   :    None
  1579.  
  1580. {------------------------------------------------------------------------------}
  1581. SetColour                                                            FastScr.Asm
  1582.  
  1583.  
  1584. Description  :    Set the attribute at the specified screen position.
  1585.  
  1586. Declerations :    Procedure SetColour(X_Pos,Y_Pos,Colour: Byte);
  1587.  
  1588.  
  1589.  
  1590. Parameters   :    X_Pos         Column starting position
  1591.                   Y_Pos         Row starting position
  1592.                   Colour        The Colour Attribute (0-255)
  1593.  
  1594.  
  1595. {------------------------------------------------------------------------------}
  1596. SetNumLock                                                           FastKbd.Asm
  1597.  
  1598.  
  1599. Description  :    Turn On the <Num Lock> Key.
  1600.  
  1601. Declerations :    Procedure SetNumlock;
  1602.  
  1603.  
  1604. Parameters   :    None
  1605.  
  1606. {------------------------------------------------------------------------------}
  1607. Setpage                                                              FastScr.Asm
  1608.  
  1609.  
  1610. Description  :    Set the Current Page.
  1611.  
  1612. Declerations :    Procedure Setpage(Pagenumber: Integer);
  1613.  
  1614.  
  1615.  
  1616. Parameters   :    PageNumber    The Page Number
  1617.  
  1618. Remarks      :    The page Number is 0-7 for the VGA and EGA Cards.
  1619.                   A Monochrome Card has only one Page.
  1620.  
  1621. {------------------------------------------------------------------------------}
  1622. SetScrollLock                                                        FastKbd.Asm
  1623.  
  1624.  
  1625. Description  :    Turn On the <Scroll Lock> Key.
  1626.  
  1627. Declerations :    Procedure SetScrollLock;
  1628.  
  1629.  
  1630. Parameters   :    None
  1631.  
  1632. {------------------------------------------------------------------------------}
  1633. Setverify                                                            FastFil.Asm
  1634.  
  1635.  
  1636. Description  :    Change the The Dos Verification Flag for Disk Writing
  1637.  
  1638. Declerations :    Procedure SetVerify (Setting: Boolean);
  1639.  
  1640.  
  1641.  
  1642. Parameters   :    Setting        True for Verification
  1643.                                  False For No Verification
  1644.  
  1645.  
  1646. {------------------------------------------------------------------------------}
  1647. Setvolume                                                            FastFil.Asm
  1648.  
  1649. Description  :    Change the Volume Label of a Disk.
  1650.  
  1651. Declerations :    Procedure Setvolume (Disk: Integer; Newlabel:
  1652.                                        Stype; Workarea: Pointer);
  1653.  
  1654.  
  1655. Parameters   :    Disk          The Specified Drive  1 = A, 2 = B, 3 = C etc.
  1656.                   NewLabel      New Volume Label Name [Max 11 Characters]
  1657.                   WorkArea      A Pointer Array for Used Internaly in
  1658.                                 the function.
  1659.  
  1660.  
  1661. {------------------------------------------------------------------------------}
  1662. StringEnd                                                            FastStr.Asm
  1663.  
  1664.  
  1665. Description  :    Returns a specified number of characters from the end
  1666.                   of a string.
  1667.  
  1668. Declerations :    Function StringEnd(Strx: Stype; Numberchars: Integer): Stype;
  1669.  
  1670.  
  1671. Parameters   :    Strx          The string to be manipulated.
  1672.                   Numberchars   The Number of characters returned
  1673.  
  1674. ErrReturn    :                  0 - Ok
  1675.                                 1 - Strx is NULL
  1676.                                 2 - Other Error
  1677.  
  1678. {------------------------------------------------------------------------------}
  1679. StringOf                                                             FastStr.Asm
  1680.  
  1681.  
  1682. Description  :    Makes a new String made up of repetitions of a
  1683.                   substring.
  1684.  
  1685. Declerations :    Function StringOf(Strx: Stype; Length: Integer): Stype;
  1686.  
  1687.  
  1688. Parameters   :    Strx          The String to be manipulated.
  1689.                   Length        Length of the string returned.
  1690.  
  1691. ErrReturn    :                  0 - Ok
  1692.                                 1 - Error
  1693.  
  1694.  
  1695. {------------------------------------------------------------------------------}
  1696. SwapPage                                                             FastGrp.Asm
  1697.  
  1698.  
  1699. Description  :    Exchage All memory allocated to a page to a byte Array.
  1700.  
  1701. Declerations :    Procedure SwapPage(Box: Pointer; Pagenumber: Byte);
  1702.  
  1703.  
  1704. Parameters   :    Box           Array for Storing the Image
  1705.                   PageNumber    The Page Number
  1706.  
  1707. Notes        :    See GetPage.
  1708.  
  1709. {------------------------------------------------------------------------------}
  1710. Uppercase                                                            FastStr.Asm
  1711.  
  1712.  
  1713. Description  :    Convert a string to Uppercase.
  1714.  
  1715. Declerations :    Procedure Uppercase(Var Strx: Stype);
  1716.  
  1717.  
  1718. Parameters   :    Strx          The String to be manipulated.
  1719.  
  1720.  
  1721.  
  1722. {------------------------------------------------------------------------------}
  1723. Wordcount                                                            FastStr.Asm
  1724.  
  1725.  
  1726. Description  :    Counts the number of words ins a given string.
  1727.  
  1728. Declerations :    Function Wordcount(Strx: Stype): Integer;
  1729.  
  1730.  
  1731. Parameters   :    Strx          The String to be manipulated.
  1732.  
  1733.  
  1734. Remarks      :    A word is considered to be any series of characters
  1735.                   appart from the space character (#32).
  1736.  
  1737.  
  1738. {------------------------------------------------------------------------------}
  1739. Wordtohex                                                            FastBit.Asm
  1740.  
  1741.  
  1742. Description  :    Convert a Word Variable To Hex.
  1743.  
  1744. Declerations :    Function ByteToHex (Work_ : Word) :Stype;
  1745.  
  1746.  
  1747. Parameters   :    Work_         The Word theat is converted
  1748.  
  1749.  
  1750. {------------------------------------------------------------------------------}
  1751. WriteFile                                                           FastFile.Asm
  1752.  
  1753. Description  :    Writes To a File
  1754.  
  1755. Declerations :    Function WriteFile(Handle:Integer;
  1756.                                      Nwrite:Word; Var Buff):Integer;
  1757.  
  1758.  
  1759. Parameters   :    Handle        Handle Identifier Of The File
  1760.                   Nwrite        Number Of Bytes To Write
  1761.                                 Record Size <= $7fff Bytes
  1762.  
  1763.                   Buff          Pointer To Address Of Data Buffer
  1764.  
  1765.  
  1766. Remarks      :    WriteFile Returns an Integer Value specifing the number of
  1767.                   bytes actually written, or the following codes if not
  1768.                   successfull
  1769.  
  1770.                              >= 0 : Ok (Returns Bytes Written)
  1771.                                -5 : Access Denied
  1772.                                -6 : Invalid Handle
  1773.  
  1774.  
  1775. {------------------------------------------------------------------------------}
  1776. Writesector                                                         FastFil.Asm
  1777.  
  1778. Description  :    Reads 512 bytes of a specified Disk Sector to a Buffer
  1779.  
  1780. Declerations :    Procedure Writesector(Segment,Offset,Drive,Sector,Number:
  1781.                                         Word;);
  1782.  
  1783.  
  1784. Parameters   :    Segment       The Segment of the Array Buffer Object
  1785.                   Offest        The Offset for The Segment
  1786.                   Drive         The Specified Drive  1 = A, 2 = B, 3 = C etc.
  1787.                   Sector        The Logical Sector Number
  1788.                   Number        Number of Sectors to Read
  1789.  
  1790.  
  1791. ErrReturn    :                  0 - Ok
  1792.                                 1 - Invalid Format on Disk
  1793.                                 2 - Write Protection Error
  1794.                                 3 - Sector Number is Invalid
  1795.                                 4 - Hardware Failure
  1796.  
  1797.  
  1798.