Search

Files (702)

• MENUSYS2.PAS in infusrc.zip

  {$I DIRECT.INC} unit menuSys2; interface procedure mDoMenuSystem; procedure mChangeMenu(newMenu : string); {:::::::::::::::::::::::::::::::::::...

• MESS0.PAS in infusrc.zip

  {$I DIRECT.INC} Unit Mess0; {/ low level message area routines /} Interface Uses GenTypes; Const FidoSig = '.:. i...

• MESS1.PAS in infusrc.zip

  {$I DIRECT.INC} Unit Mess1; {/ low level message area routines /} Interface Uses GenTypes; procedure delbul (bn:i...

• MESS4.PAS in infusrc.zip

  {$I DIRECT.INC} Unit Mess4; {/ QWK routines .. /} Interface Uses GenTypes; Procedure ProcessRep; Procedure MakeQ...

• MESSSYS0.PAS in infusrc.zip

  {$I DIRECT.INC} Unit MessSys0; {/ message sysop routines /} Interface Uses GenTypes; procedure setnameaccess; pr...

• misc/ART/MENUEDIT.DAT in infusrc.zip

  Infusion Menu Commands - *VERY* similar to iniquity and renegade '^M' - Do Command when User Hits <CR> at prompt '##' - Do Command when user...

• misc/ASYNC.PAS in infusrc.zip

  (* Async support, and yes i know there is crap in here for fossil. *) (* But the fossil support crap hasnt been taken out yet. And the *) (* real ...

• misc/CHECK.PAS in infusrc.zip

  uses configrt,dos,crt; var f : file; begin assign(f,'node1.dat'); reset(f,1); writeln('file size of node1.dat == ',filesize(f)); writeln('size o...

• misc/DOCS/TPANSII.PAS in infusrc.zip

  { TPANSI Ver 2.2 (c) September 1988 by James R. Louvau. } { This code may be freely used and distributed for NON-COMMERCIAL appl...

• misc/INF-CBV.PAS in infusrc.zip

  { infusion bbs callback verifier .. version 1.0a (first release) by skaboy101 made for heurcoloco6 or sokmething } Program Infusion_CBV; ...

• misc/INFPACK.PAS in infusrc.zip

  {$I DIRECT.INC} {$M 30720,0,1024} Program Packer; Uses Dos, Crt, ConfigRt, GenTypes, StatRet, Gensubs, Fi...

• misc/MK2.PAS in infusrc.zip

  Unit MKAvatar; {$I DIRECT.INC} Interface Uses Crt, MKScrn; Procedure Positions(On : Boolean); Procedure SetScreenSize (X, Y : Byte); Funct...

• misc/NEWMAIN.PAS in infusrc.zip

  {$I DIRECT.INC} {:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::} unit newmain; {::::::::::::::::::::::::::::::::::::::...

• misc/SETUP.PAS in infusrc.zip

  program setup; uses crt,dos,gentypes,gensubs,configrt,skashit,control,myio; type ints = array[0..16] of integer; const newyes : string = '|B1|15 y...

• misc/TEXTUNIT.PAS in infusrc.zip

  Unit Textunit; Interface uses dos; {Procedure TextMode;} Procedure WaitRetrace; Procedure Blink(Switch: Boolean); Procedure ClrScr; Procedure...

• misc/TIMESLIC.PAS in infusrc.zip

  {:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::} uses crt,dos; {:::::::::::::::::::::::::::::::::::::::::::::::::::::::::...

• MKAVATAR.PAS in infusrc.zip

  Unit MKAvatar; {$I DIRECT.INC} Interface Uses Crt, MKScrn; Procedure Positions(On : Boolean); Procedure SetScreenSize (X, Y : Byte); Funct...

• MKSCRN.PAS in infusrc.zip

  {$I DIRECT.INC} Unit MKScrn; Interface Type ScrnItemType = Record Ch : Char; Attr : Byte; End; ScreenType = Rec...

• MYCOMMAN.PAS in infusrc.zip

  {$I DIRECT.INC} Unit Mycomman; Interface Uses GenTypes; Procedure TextToFile(Txt,Mail : Sstr; Sector:Longint; Title,SendTo,From:Mstr); Pr...

• MYIO.PAS in infusrc.zip

  {$I DIRECT.INC} Unit Myio; Interface Uses Crt, Dos, Overlay; Const Infield_Seperators : Set of Char = [' ','\','.']; VidSeg : Wor...