Search

Categories (1)

Files (809)

  • CONTROL.PAS in infusrc.zip

    unit control; INTERFACE uses crt,dos; const m_symbols : string[31]='~^"!?@#$%&()[]<>| _-+=*/\.:,;'+#96+#123+#125; m_upCase : string[26]=...

  • DATAPROC.PAS in infusrc.zip

    ...1998 by skaboy101 } {$I DIRECT.INC} unit dataproc; interface uses dos,gentypes,subs1,subs2,gensubs,configrt,modem,fileLock, ...

  • DOSMEM.PAS in infusrc.zip

    {$A+,B-,D-,E-,F+,G+,I-,L-,N-,O+,P-,Q-,R-,S-,T-,V-,X+,Y-} Unit DosMem; {::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::}...

  • EMAIL0.PAS in infusrc.zip

    ... m:mailrec; incoming,outgoing:^catalogrec; Implementation uses dosmem, gensubs, subs1, FileLock; procedure addcatalog (var c:catalogr...

  • EXTENSE.PAS in infusrc.zip

    ...Char) : Boolean; Function Get_Prg_Dir : string; Implementation Uses Dos,Crt,Strings; Var Kb : Byte Absolute $0040:$0017; FUNCTION HexWo...

  • FILE0.PAS in infusrc.zip

    ...; Index : UDIndexRec; Area : AreaREC; Implementation Uses Dos, Crt, ConfigRT, GenSubs, StatRet, Windows, Subs1, Subs2, FileLock, Mode...

  • FILE3.PAS in infusrc.zip

    ... CheckId : Boolean); Implementation Uses Crt,DOS, Gensubs, Windows, ConfigRt, StatRET, UserRET, Subs1, SubsOvr, Su...

  • FILE4.PAS in infusrc.zip

    ...rocedure Download(Num : Integer; Pdm : Boolean); Implementation Uses Dos, Configrt, Statret,Gensubs, FIleLock, SubsOvr, Subs1, Subs2, Myco...

  • FILELOCK.PAS in infusrc.zip

    ...:::::::::::::::::::::::::::::::::::::::::::::::::::} implementation Uses DosMem, Crt, Dos; const maxtimeout = 500; var mode:byte; function lget...

  • FILESORT.PAS in infusrc.zip

    ...terface Uses GenTypes; Procedure SortArea; Implementation Uses Dos, Crt, GenSubs, Windows, Subs1, Subs2, File0, File1, FileLock; Proc...

  • FILESYS0.PAS in infusrc.zip

    ...ock : AskType); { Ask to Remove User Credit } Implementation Uses Dos, GenSubs, ConfigRT, Subs1, Subs2, UserRet, File0, File1, FileLock...

  • FILESYS1.PAS in infusrc.zip

    ...e KillArea(Which:Byte); Procedure ReorderAreas; Implementation Uses Dos, ConfigRT, GenSubs, Windows, Subs1, Subs2, Flags, Init, UserRet, ...

  • FILESYS2.PAS in infusrc.zip

    ...cedure SysopADD; Procedure Directory(dir:lstr); Implementation Uses Dos, ConfigRT, GenSubs, Windows, StatRet, Subs1, Subs2, File0, Init, ...

  • FILEXFER.PAS in infusrc.zip

    ...:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::} Uses Dos, Crt, Configrt, Modem, Statret, Gensubs, FIleLock, SubsOvr, Subs1...

  • FLAGS.PAS in infusrc.zip

    ...gs:Mstr):Boolean; Procedure WriteFlags(F:Mstr); implementation uses Dos,configrt,gensubs,subs1,subsovr,subs2, FileLock; Procedure GetScanRec...

  • GENSUBS.PAS in infusrc.zip

    {$I DIRECT.INC} unit gensubs; interface uses dos,gentypes,configrt,crt,skashit,filelock; Function Yesno(unlit,lit : Byte) : Boolean; Procedur...

  • GENTYPES.PAS in infusrc.zip

    ...:::::::::::::::::::::::::::::::::::::::::::::::::::::} interface uses dos; {::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::...

  • GETLOGIN.PAS in infusrc.zip

    ...:::::::::::::::::::::::::::::::::::::::::::::::::} implementation uses Dos,Crt,DosMem,MkAvatar,configrt,modem, userret,statret,gensubs,subs1...

  • GROUP.PAS in infusrc.zip

    ...roupnum:integer; function init_email : boolean; implementation uses dos, configrt, gensubs, subs1, userret, flags, MainR2, email0, subs2,...

  • GROUP1.PAS in infusrc.zip

    ...s; procedure setcreator; procedure addbylevel; implementation uses dos, configrt, gensubs, subs1, userret, subs2, group, FileLock; proc...