Date   : Sat, 25 Sep 2010 17:16:05 +0100
From   : jgh@... (J.G.Harston)
Subject: Copying between file servers

Rick Murray wrote:
> J.G.Harston wrote:
>> http://mdfs.net/temp/Zip.bas
>                           ^^^
> Note for others - it's a text file, not tokenised BASIC.

That's why it's got a ".bas" eztension. See the Wiki.
No extension=Acorn format, ".bbc"=Russell format, ".bas"=text format.

> --8<--------
>    850 DEFPROCFSExam(A%):LOCAL X%,Y%:X%=data%:Y%=X%DIV256
>    860 !X%=0:X%?1=9+LEN
> in$:X%!3=18:X%?7=A%:$(X%+8)=in$:A%=&14:CALL&FFF1:ENDPROC
> --8<--------
> This is to communicate with the FileServer (read file information,

Yes, UnZip has slightly more mature code and uses FNNetFS_Op(...)
from mdfs.net/BLib/NetFS which makes it easier to read.

> My guess is OSWord is throwing the error, which points at the
> possibility of something being wrong on the other computer, not with Zip.

That's why I did a complete unbooted reset to run on the bare metal without
anything loaded. RISC OS 3.11 comes with NetFS 5.78 and Econet 5.62 in ROM.
Mark's not running with something odd in his boot sequence are you? I have
a vague recollection of a virus masquerading as the Econet module. Try doing
Ctrl-Shift-Reset and go straight to f12 without opening a filer window or
booting anything.

JGH