Search

Files (901)

• CONFIG.PAS in infusrc.zip

  ...rr(cfg.nuvN)); goXY(1,9); multiColor('|08(|15g|08) |07Force NUV on ALL Users |08: |15'+b00lean(cfg.autoAddNuv)); goXY(1,10);multiColor('|08(|1...

• FILESYS2.PAS in infusrc.zip

  ... Two := UpString(UD.Path); Times := 'INFUSION'; If (Match('USERS',UD.FileName)) OR (Match('USERS.',UD.FileName)) OR (Match('...

• GENTYPES.PAS in infusrc.zip

  ...0-525), so always posted by skaboy (Grant Passmore) > have total users = pred(total) > and seek ...

• INFUINIT.PAS in infusrc.zip

  ...ite(f,cfg,sizeOf(cfg)); close(f); skaWrite('|07...'); deleteFile('USERS'); deleteFile('STATUS.DAT'); deleteFile('CALLERS'); deleteFi...

• INFUIRC.PAS in infusrc.zip

  ...ec; uShit : ^userRec; begin new(uShit); assign(uFile,cfg.dataDir+'USERS'); reset(uFile); seek(uFile,1); repeat read(uFile,uShit...

• INFUPACK.PAS in infusrc.zip

  ... If Not PackRec.Forms Then Exit; If Not Exist(Cfg.DataDir + 'USERS.') Then Exit; Assign(UFile,Cfg.DataDir + 'USERS.'); ...

• INIT.PAS in infusrc.zip

  ... If IsOpen(UFile) Then Close(UFile); Assign(UFile, cfg.DataDir + 'USERS'); ResetOrReWrite(UFile, SizeOf(UserRec)); If FileSize(UFil...

• MAINMENU.PAS in infusrc.zip

  ...e ShowCredits; Procedure EditStatus; Procedure BlackList; procedure editusers; procedure summonsysop; Procedure Auto_Message; procedure Logoff; ...

• MENUSYS2.PAS in infusrc.zip

  ... END; 'N' : Begin UpdateNode('Voting on New Users...',''); Check_Is_Okay:=False; If Init_NU...

• MESSSYS0.PAS in infusrc.zip

  ... end; begin seek (ufile,1); for cnt:=1 to numusers do begin nread (ufile,u); a:=getuseraccflag (ns...

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

  ...[0m (New User Voting) Nx, where x can be  'L' : List new users  'N' : Newscan new users  'S' : Newscan new users w...

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

  ...Re-Order boards (New User Voting) Nx, where x can be 'L' : List new users 'N' : Newscan new users 'S' : Newscan new users without arrow bar...

• misc/ART/ONLINE.ANS in infusrc.zip

  ...░u  user editor alt░k  kill users time alt░l  lock modem io  ...

• misc/DOCS/INFUSION.DOX in infusrc.zip

  ...(current node) | System Location ; Location as displayed to users | Registration Code One ; Regcode #1 | Registration Co...

• misc/INFPACK.PAS in infusrc.zip

  ... If Not PackRec.Forms Then Exit; If Not Exist(Cfg.DataDir + 'USERS.') Then Exit; Assign(UFile,Cfg.DataDir + 'USERS.'); ...

• misc/KNOCKED.PAS in infusrc.zip

  ... = array[1..500] of uSmallRec; uInfoRec = record totalUsers : word; currentUser : word; lastUser...

• misc/NEWMAIN.PAS in infusrc.zip

  ... END; 'N' : Begin UpdateNode('Voting on New Users...',''); Check_Is_Okay:=False; If Init_NU...

• misc/SETUP.PAS in infusrc.zip

  ...ed Yes Votes ', ' Required No Votes ', ' Force NUV on ALL Users ', ' Validate Accepted Users ', ' Ban Rejected Users ',...

• misc/USEREDIT.PAS in infusrc.zip

  ...:::::::::::::::::::::::::::::} Type uDataRec = record totalUsers : word; currentUser : word; currentB...

• misc/USERINIT.PAS in infusrc.zip

  ... skawrite('|08■ |07Please verify the creation of a new userbase .. all old users will be|CR'); skawrite('|08■ |07purged ... |CR|CR'); coolwrite('ini...