[Coco] File size from Disk Basic

[Bob Devries]

Wow, Bob, my name up in lights!! Just what I always dreamed of! hehehe.

Seriously though, I have never seen your Color FOG programme. Is it 
available somewhere?

--
Regards, Bob Devries, Dalby, Queensland, Australia

Isaiah 50:4 The sovereign Lord has given me
the capacity to be his spokesman,
so that I know how to help the weary.

website: http://www.home.gil.com.au/~bdevasl
my blog: http://bdevries.invigorated.org/

----- Original Message ----- 
From: "theother_bob" <theother_bob at yahoo.com>
To: "CoCoList for Color Computer Enthusiasts" <coco at maltedmedia.com>
Sent: Friday, June 29, 2007 9:26 AM
Subject: Re: [Coco] File size from Disk Basic


> Cool... well *IF* I do another update to Color FOG I plan to incorporate 
> it and your name will appear in the "liner notes". I have been gathering 
> little routines like this and the one on OS-9 disk types for potential use 
> in a future release. Anything to add a little functionality and/or ease of 
> use. Any future version will require *major* rework of my code though. I 
> have to break it into smaller modules as I have already exceeded memory 
> limits to allow full functionality... try making a floppy with 60+ files 
> on it and then select 20 of those files to copy to another disk. Just be 
> careful which disks you try that with. ;-) Actually not much danger of a 
> corrupted disk, but still, be careful.
>
> Cheers,
> Bob
>
> ----- Original Message ----
> From: Bob Devries <devries.bob at gmail.com>
> To: CoCoList for Color Computer Enthusiasts <coco at maltedmedia.com>
> Sent: Thursday, June 28, 2007 5:43:20 PM
> Subject: Re: [Coco] File size from Disk Basic
>
>
> Hi, Bob.
>
> The programme snippet I typed will use no extra memory at all. It will use
> the existing File Control Block memory which has already been allocated by
> Disk Basic.
>
> The revised programme lines are:
>
> 10 OPEN"D",#1,"FILENAME.BIN",1
> 20 SIZE=LOF(1)
> 30 PRINT"FILE SIZE=";SIZE
> 40 CLOSE #1
>
> You can of course modify that to give you the size in HEX if that is more
> useful.
>
> BTW, the utility "Disk Util 2" by Jeff Francis (sp) also gives this
> information as well as a list of the granules used.
>
> Hope it helps.
> --
> Regards, Bob Devries, Dalby, Queensland, Australia
>
> Isaiah 50:4 The sovereign Lord has given me
> the capacity to be his spokesman,
> so that I know how to help the weary.
>
> website: http://www.home.gil.com.au/~bdevasl
> my blog: http://bdevries.invigorated.org/
>
> ----- Original Message ----- 
> From: "theother_bob" <theother_bob at yahoo.com>
> To: "CoCoList for Color Computer Enthusiasts" <coco at maltedmedia.com>
> Sent: Thursday, June 28, 2007 11:06 PM
> Subject: Re: [Coco] File size from Disk Basic
>
>
>> That's cool, but if used as part of a large basic program, would it cause
>> an OM error?
>> I'll have to play with it later, thanks Bob
>>
>> Bob
>>
>> ----- Original Message ----
>> From: Bob Devries <devries.bob at gmail.com>
>> To: CoCoList for Color Computer Enthusiasts <coco at maltedmedia.com>
>> Sent: Wednesday, June 27, 2007 5:55:20 PM
>> Subject: Re: [Coco] File size from Disk Basic
>>
>>
>> There is a much easier way to find file size.
>>
>> Use the LOF function!
>>
>> Opne the file like this:
>>
>> OPEN"D",#1,"FILENAME.BIN",1
>> FIELD #1, 1 AS A$
>> SIZE=LOF(1)
>> PRINT"FILE SIZE=";SIZE
>> CLOSE #1
>>
>>
>>
>> ____________________________________________________________________________________
>> Boardwalk for $500? In 2007? Ha! Play Monopoly Here and Now (it's updated
>> for today's economy) at Yahoo! Games.
>> http://get.games.yahoo.com/proddesc?gamekey=monopolyherenow
>>
>> --
>> Coco mailing list
>> Coco at maltedmedia.com
>> http://five.pairlist.net/mailman/listinfo/coco
>
>
> --
> Coco mailing list
> Coco at maltedmedia.com
> http://five.pairlist.net/mailman/listinfo/coco
>
>
>
> ____________________________________________________________________________________
> Take the Internet to Go: Yahoo!Go puts the Internet in your pocket: mail, 
> news, photos & more.
> http://mobile.yahoo.com/go?refer=1GNXIC
>
> --
> Coco mailing list
> Coco at maltedmedia.com
> http://five.pairlist.net/mailman/listinfo/coco