[Coco] Disk Free Space

[Arthur Flexser]

The free count is not directly stored anywhere on the disk.  You need to
count up how many of the values returned by Robert's program are equal to
$FF.  That's the number of free grans.  Instead of printing each value as
the program presently does, modify it to count the $FFs.

Art

On Wed, Dec 26, 2018 at 11:43 PM phil pt <ptaylor2446 at gmail.com> wrote:

> The program is not find the free disk space tht is available. Do you happen
> to know what track and sector the information is stored on please?
>
> On Wed, Dec 26, 2018 at 10:49 PM Robert Gault <robert.gault at att.net>
> wrote:
>
> > Here is an example.
> > Line 10 gives you enough string space. The first number in line 20 is
> your
> > disk # and inputs track
> > 17 and sector 2 into the 128-byte strings S1$ and S2$. We then convert
> > each byte in each string into
> > a hexidecimal number in lines 40, 80, and 200.
> >
> > 10 CLEAR512
> > 20 DSKI$ 0,17,2,S1$,S2$
> > 30 FOR I=1TO128
> > 40 A$=MID$(S1$,I,1)
> > 50 GOSUB 200
> > 60 NEXT
> > 70 FORI=1TO128
> > 80 A$=MID$(S2$,I,1)
> > 90 GOSUB 200
> > 100 NEXT
> > 110 END
> > 200 PRINT HEX$(ASC(A$));" ";:RETURN
> >
> > Robert
> >
> > phil pt wrote:
> > > Can you please provide me with a example basic code to show me how to
> get
> > > the information?
> > >
> > > On Wednesday, December 26, 2018, Robert Gault <robert.gault at att.net>
> > wrote:
> > >
> > >> Phil,
> > >>
> > >> This is not exactly what you asked, but RGBDOS on emulators and HDBDOS
> > on
> > >> real Coco disks tells you how many grans are free. A Granule is 9
> > sectors.
> > >> If you can't examine your disk using a Basic command, you will need to
> > >> count the number of free grans in the table on Track 17 Sector 2.
> > >>
> > >> With a "nice" DOS on a fresh disk, you would see bytes 0-$43 =$FF and
> > all
> > >> other bytes =$00. Disk Basic probably has all bytes in T17S2=$FF. You
> > only
> > >> care about bytes 0-$43. They bytes that are $FF indicate free grans.
> > >>
> > >> Robert
> > >>
> > >> phil pt wrote:
> > >>
> > >>> mlbasic 2.0 does not support the free command how can I get the free
> > disk
> > >>> space that is available on the floppy disk using dskini?
> > >>>
> > >>> Thanks
> > >>>
> > >>>
> > >> --
> > >> Coco mailing list
> > >> Coco at maltedmedia.com
> > >> https://pairlist5.pair.net/mailman/listinfo/coco
> > >>
> > >
> >
> > --
> > Coco mailing list
> > Coco at maltedmedia.com
> > https://pairlist5.pair.net/mailman/listinfo/coco
> >
>
> --
> Coco mailing list
> Coco at maltedmedia.com
> https://pairlist5.pair.net/mailman/listinfo/coco
>