No subject
Mon Sep 26 12:33:25 CEST 2005
(* --- Toolbox of file system *)
PROCEDURE *List(name: ARRAY OF CHAR; time, date, size: LONGINT; VAR cont:
BOOLEAN);
BEGIN
INC(count);
IF size # MIN(LONGINT) THEN
Texts.WriteDate(W, time, date);Texts.WriteString(W, 9X);
END;
Texts.WriteString(W, name);
IF size # MIN(LONGINT) THEN
Texts.WriteString(W, 9X); Texts.WriteInt(W, size, 5); INC(total, size)
END;
Texts.WriteLn(W)
END List;
Compiler.Compile System.Mod \s~
(reboot)
System.Directory *.Tool\d~
Star mark the frame and do:
Sort.Sort *\r
Which gives you something like this. :-)
71 files use 179KB
16.08.2002 03:46:26 System.Tool 4270
13.08.2002 08:14:17 NetSystem.Tool 2279
13.08.2002 06:09:04 ZipCompile.Tool 558
13.08.2002 06:09:04 Zip.Tool 1896
10.08.2002 06:33:37 Calc.Tool 943
10.08.2002 06:33:35 PictConverters.Tool 584
10.08.2002 06:33:34 Sort.Tool 727
10.08.2002 06:33:34 RX.Tool 2846
>-- Chris Glur.
>
>PS. Charles, your desire to have 'all instruments always visible' like a
>sports aircraft is inappropriate for computing. A 500 page book has
>one pair of opposing pages visible at one time. If your desk project
>has 3 envelopes, 2 books, 5 documents and a map, then you need to
>move them around, from partly coverd to 'focused' as you work.
>That's life. A work in progress is a dynamic entity -- until it hopefully
>disapears on completion.
>
>This ability to rapidly shuffle the documents around is intimately
>related to the n-o interface. You can't do it wearing boxing-gloves.
Code more, philosophize less.
Charles Angelich
The Ghost in the Machine!
DOS and W31 Tech website:
http://www.undercoverdesign.com/dosghost
Stories, poems, music, and photos website:
http://www.undercoverdesign.com/dosghost/faf
More information about the Oberon
mailing list