Home » Archimedes archive » Archimedes World » AW-1995-01-Disc2.adf » Disk2Jan95 » !AWJan95/Goodies/Event/Docs/Files

!AWJan95/Goodies/Event/Docs/Files

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1995-01-Disc2.adf » Disk2Jan95
Filename: !AWJan95/Goodies/Event/Docs/Files
Read OK:
File size: 04CF bytes
Load address: 0000
Exec address: 0000
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
--------------------------------------------------------

FNshell_FileExists()
Params =>
         str  file name
       <=
         bool TRUE if file exists,
              FALSE otherwise
              
--------------------------------------------------------

FNshell_FileLength()
Params =>
         str file name     

       <=
         int length of the specified file

--------------------------------------------------------

FNshell_FileType()
Params =>
         str file name

       <=
         int file type

Returns the file type of the specified file
on disk. A full path name must be given
(especially under RISC-OS 3.1!)

--------------------------------------------------------

FNshell_Leaf()
Params =>
         str file name     

       <=
         str 'leaf' of filename, i.e the name
             of the actual file, minus the path

--------------------------------------------------------

FNshell_Branch()
Params =>
         str file name     

       <=
         str 'branch' of filename, i.e the path
             of the directory containing the file.
             Note that the returned string does not
             include the final '.' character.

--------------------------------------------------------
00000000  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000030  2d 2d 2d 2d 2d 2d 2d 2d  0a 0a 46 4e 73 68 65 6c  |--------..FNshel|
00000040  6c 5f 46 69 6c 65 45 78  69 73 74 73 28 29 0a 50  |l_FileExists().P|
00000050  61 72 61 6d 73 20 3d 3e  0a 20 20 20 20 20 20 20  |arams =>.       |
00000060  20 20 73 74 72 20 20 66  69 6c 65 20 6e 61 6d 65  |  str  file name|
00000070  0a 20 20 20 20 20 20 20  3c 3d 0a 20 20 20 20 20  |.       <=.     |
00000080  20 20 20 20 62 6f 6f 6c  20 54 52 55 45 20 69 66  |    bool TRUE if|
00000090  20 66 69 6c 65 20 65 78  69 73 74 73 2c 0a 20 20  | file exists,.  |
000000a0  20 20 20 20 20 20 20 20  20 20 20 20 46 41 4c 53  |            FALS|
000000b0  45 20 6f 74 68 65 72 77  69 73 65 0a 20 20 20 20  |E otherwise.    |
000000c0  20 20 20 20 20 20 20 20  20 20 0a 2d 2d 2d 2d 2d  |          .-----|
000000d0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000100  2d 2d 2d 0a 0a 46 4e 73  68 65 6c 6c 5f 46 69 6c  |---..FNshell_Fil|
00000110  65 4c 65 6e 67 74 68 28  29 0a 50 61 72 61 6d 73  |eLength().Params|
00000120  20 3d 3e 0a 20 20 20 20  20 20 20 20 20 73 74 72  | =>.         str|
00000130  20 66 69 6c 65 20 6e 61  6d 65 20 20 20 20 20 0a  | file name     .|
00000140  0a 20 20 20 20 20 20 20  3c 3d 0a 20 20 20 20 20  |.       <=.     |
00000150  20 20 20 20 69 6e 74 20  6c 65 6e 67 74 68 20 6f  |    int length o|
00000160  66 20 74 68 65 20 73 70  65 63 69 66 69 65 64 20  |f the specified |
00000170  66 69 6c 65 0a 0a 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |file..----------|
00000180  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000001a0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 0a 0a  |--------------..|
000001b0  46 4e 73 68 65 6c 6c 5f  46 69 6c 65 54 79 70 65  |FNshell_FileType|
000001c0  28 29 0a 50 61 72 61 6d  73 20 3d 3e 0a 20 20 20  |().Params =>.   |
000001d0  20 20 20 20 20 20 73 74  72 20 66 69 6c 65 20 6e  |      str file n|
000001e0  61 6d 65 0a 0a 20 20 20  20 20 20 20 3c 3d 0a 20  |ame..       <=. |
000001f0  20 20 20 20 20 20 20 20  69 6e 74 20 66 69 6c 65  |        int file|
00000200  20 74 79 70 65 0a 0a 52  65 74 75 72 6e 73 20 74  | type..Returns t|
00000210  68 65 20 66 69 6c 65 20  74 79 70 65 20 6f 66 20  |he file type of |
00000220  74 68 65 20 73 70 65 63  69 66 69 65 64 20 66 69  |the specified fi|
00000230  6c 65 0a 6f 6e 20 64 69  73 6b 2e 20 41 20 66 75  |le.on disk. A fu|
00000240  6c 6c 20 70 61 74 68 20  6e 61 6d 65 20 6d 75 73  |ll path name mus|
00000250  74 20 62 65 20 67 69 76  65 6e 0a 28 65 73 70 65  |t be given.(espe|
00000260  63 69 61 6c 6c 79 20 75  6e 64 65 72 20 52 49 53  |cially under RIS|
00000270  43 2d 4f 53 20 33 2e 31  21 29 0a 0a 2d 2d 2d 2d  |C-OS 3.1!)..----|
00000280  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000002b0  2d 2d 2d 2d 0a 0a 46 4e  73 68 65 6c 6c 5f 4c 65  |----..FNshell_Le|
000002c0  61 66 28 29 0a 50 61 72  61 6d 73 20 3d 3e 0a 20  |af().Params =>. |
000002d0  20 20 20 20 20 20 20 20  73 74 72 20 66 69 6c 65  |        str file|
000002e0  20 6e 61 6d 65 20 20 20  20 20 0a 0a 20 20 20 20  | name     ..    |
000002f0  20 20 20 3c 3d 0a 20 20  20 20 20 20 20 20 20 73  |   <=.         s|
00000300  74 72 20 27 6c 65 61 66  27 20 6f 66 20 66 69 6c  |tr 'leaf' of fil|
00000310  65 6e 61 6d 65 2c 20 69  2e 65 20 74 68 65 20 6e  |ename, i.e the n|
00000320  61 6d 65 0a 20 20 20 20  20 20 20 20 20 20 20 20  |ame.            |
00000330  20 6f 66 20 74 68 65 20  61 63 74 75 61 6c 20 66  | of the actual f|
00000340  69 6c 65 2c 20 6d 69 6e  75 73 20 74 68 65 20 70  |ile, minus the p|
00000350  61 74 68 0a 0a 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |ath..-----------|
00000360  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
00000380  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 0a 0a 46  |-------------..F|
00000390  4e 73 68 65 6c 6c 5f 42  72 61 6e 63 68 28 29 0a  |Nshell_Branch().|
000003a0  50 61 72 61 6d 73 20 3d  3e 0a 20 20 20 20 20 20  |Params =>.      |
000003b0  20 20 20 73 74 72 20 66  69 6c 65 20 6e 61 6d 65  |   str file name|
000003c0  20 20 20 20 20 0a 0a 20  20 20 20 20 20 20 3c 3d  |     ..       <=|
000003d0  0a 20 20 20 20 20 20 20  20 20 73 74 72 20 27 62  |.         str 'b|
000003e0  72 61 6e 63 68 27 20 6f  66 20 66 69 6c 65 6e 61  |ranch' of filena|
000003f0  6d 65 2c 20 69 2e 65 20  74 68 65 20 70 61 74 68  |me, i.e the path|
00000400  0a 20 20 20 20 20 20 20  20 20 20 20 20 20 6f 66  |.             of|
00000410  20 74 68 65 20 64 69 72  65 63 74 6f 72 79 20 63  | the directory c|
00000420  6f 6e 74 61 69 6e 69 6e  67 20 74 68 65 20 66 69  |ontaining the fi|
00000430  6c 65 2e 0a 20 20 20 20  20 20 20 20 20 20 20 20  |le..            |
00000440  20 4e 6f 74 65 20 74 68  61 74 20 74 68 65 20 72  | Note that the r|
00000450  65 74 75 72 6e 65 64 20  73 74 72 69 6e 67 20 64  |eturned string d|
00000460  6f 65 73 20 6e 6f 74 0a  20 20 20 20 20 20 20 20  |oes not.        |
00000470  20 20 20 20 20 69 6e 63  6c 75 64 65 20 74 68 65  |     include the|
00000480  20 66 69 6e 61 6c 20 27  2e 27 20 63 68 61 72 61  | final '.' chara|
00000490  63 74 65 72 2e 0a 0a 2d  2d 2d 2d 2d 2d 2d 2d 2d  |cter...---------|
000004a0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000004c0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d     |---------------|
000004cf