home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / bix / common.dec < prev    next >
Encoding:
Text File  |  1994-04-11  |  1.3 KB  |  22 lines
  1. { ***** From COMMON.DEC ***** }
  2. Procedure SwitchVar(var Arg1,Arg2; Size:Integer);forward;
  3. Function  Intpower(number,exponent:Integer):integer;forward;
  4. Procedure Wait;forward;
  5. Function  KeyWait:Byte;forward;
  6. Procedure Set_Cursor(c:byte);forward;
  7. Procedure WhereScr(var x,y:Byte);forward;
  8. Procedure Flush_keyboard;forward;
  9. Function  SaveKbd:Byte;forward;
  10. Procedure SetKbd(Status:Byte);forward;
  11. Procedure Lock_Detect;forward;
  12. Function  Stringof(ascii,len:Byte):AnyStr;forward;
  13. Procedure Whichline(LineType:Byte;
  14.           var hl,vl,tl,tr,bl,br,lj,rj,tj,bj,isect:Byte);forward;
  15. Procedure VLine(col,row,ascii,limit:Byte);forward;
  16. Procedure Highlight(s:AnyStr);forward;
  17. Procedure Dim(s:AnyStr);forward;
  18. Procedure WriteAt(col,row:Integer;Attrib:DspAtt;s:AnyStr);forward;
  19. Function  FKeyResp(Lowlmt,Uplmt:Byte):Byte;forward;
  20. Procedure NumInput(col,row,len:Byte;HiLo:DspAtt;var ReturnStr:AnyStr);forward;
  21. Procedure AlphaInput(col,row,len:Byte;HiLo:DspAtt;var ReturnStr:AnyStr);forward;
  22.