fgd3@jc3b21.UUCP (Fabbian G. Dufoe) (07/25/89)
I like the Workbench for navigating through my directory structure.
It's easier to recognize a directory name than remember and retype it. But
most of the programs I use don't create icons so I have to use the CLI once
I've found the directory I want. Using the Workbench to find a directory
and having to type the full path name in a CD command isn't much of a
savings, though. I decided I needed a way to open a CLI (actually, a Shell)
window whose current directory was the one I had picked out with the
Workbench. The following little script does just that.
Click once on the NewShell icon. Hold down the shift key and
double-click on a drawer icon. You'll get a new shell window whose current
directory is the drawer you selected. You can create up to five shell
windows with a single operation if you want. Just click on the NewShell
icon, hold down the shift key, click once on each of the first four
drawers then double-click on the last drawer before releasing the shift key.
NewShell will open a shell window for each directory you selected. The
windows will be arranged so you can see the title bar of each window.
Unpack the following shell archive to create NewShell and Icon.uu.
Then uudecode Icon.uu to create NewShell.info. Be sure you have IconX in
your C: directory and you're ready to do.
--Fabbian Dufoe
350 Ling-A-Mor Terrace South
St. Petersburg, Florida 33705
813-823-2350
UUCP: ...uunet!pdn!jc3b21!fgd3
-----------------------------cut here--------------------------
# This is a shell archive. Remove anything before this line,
# then unpack it by saving it in a file and typing "sh file"
# Created Tue Jul 25 12:03:40 1989
#
# This archive contains:
# NewShell
# Icon.uu
echo "Creating NewShell"
cat > NewShell <<"***EOF NewShell***"
.key path1,path2,path3,path4,path5
.def path1 "RAM:"
CD <path1>
NewShell "NEWCON:0/10/550/190/<path1> Shell"
If NOT "<path2>" EQ ""
CD <path2>
NewShell "NEWCON:15/22/550/178/<path2> Shell"
EndIf
If NOT "<path3>" EQ ""
CD <path3>
NewShell "NEWCON:30/34/550/166/<path3> Shell"
EndIf
If NOT "<path4>" EQ ""
CD <path4>
NewShell "NEWCON:45/46/550/154/<path4> Shell"
EndIf
If NOT "<path5>" EQ ""
CD <path5>
NewShell "NEWCON:60/58/550/142/<path5> Shell"
EndIf
***EOF NewShell***
echo "Creating Icon.uu"
cat > Icon.uu <<"***EOF Icon.uu***"
begin 644 NewShell.info
MXQ```0``````(0`R`#4`$@`%``,``0`A.'@`````````````````````````H
M````!"$`(#JH`"!\N`````\````G```````````````````````U`!(``@`"\
M\Q@#`````````````````'_____[[Z``0`````/OH`!_____^^^@`$``````L
M`"``0```````(`!##``````@`$<&`````"``0P,`````(`!#!@`````@`$>,^
M`````"``0```````(`!````````@`$```````"``0``````#X`!```````(@%
M`'_______^````````````#________X`(```````!@`@```````&`"`````\
M```8`(```````!@`@```````&`"````````8`(```````!@`@```````&`"`0
M```````8`(```````!@`@```````&`"````````8`(```````!@`@```````X
M&`"````````8`(```````!@`________^``````(0SI)8V]N6``````(````H
D(U=)3D1/5SU.15=#3TXZ,"\Q,"\Q-3`O,3`O3F5W4VAE;&P`B
``
end
size 441
***EOF Icon.uu***