d:
cd \netmail
EXPORT c:\pcb145\main\caller1 NODELIST
cd \qmodem

:REDO
Qmodem /s=Mail.Scr
if not exist c:\comm\spd002.in   goto Redo

cd \mailscan
MSGSCAN /D=C:\PCB145\PCBOARD.DAT
cd \netmail
IMPORT c:\pcb145\main\caller1
FLAGUSER /D=C:\PCB145\PCBOARD.DAT

:No_Mail
c:
cd \pcb145
BOARD