Subj : Re: a huge favor [MPL]
To   : Black Panther
From : fang-castro
Date : Fri Oct 29 2021 01:37 pm

 BP> Var
 BP>   fptr : File
 BP> Begin
 BP>   fAssign(fptr,'welcome.txt)
 BP>   fReWrite(fptr)           //will recreate the file each time it's run
 BP>   WriteLn(fptr,'fang-castro is so lazy')
 BP>   fClose(fptr)
 BP> End

I had to modify above to below for it work... Keeping me on my toes.

Var
  fptr : File
Begin
  fAssign(fptr,'welcome.txt',66)
  fReWrite(fptr)           //will recreate the file each time it's run
  fWriteLn(fptr,'fang-castro is so lazy')
  fClose(fptr)
End

// If you have an existing file you'd like to edit, you could use reset(fptr) 
// which will just open that file. You could also use append(fptr), which would
// append the line to the end of the current file.

|08__ _ _ ____ |02_  _ |10___ _  _ |02____ |08_  _ _    ___
|08| \| | |__\ |02|--| |10 |   \/  |02|--| |08|__| |___  |

--- Mystic BBS v1.12 A46 2020/08/26 (Linux/64)
 * Origin: ._.-. nightvault.fsxnet.nz port 2323 .-._. (21:3/112)

.