[comp.binaries.apple2] BASIC.SYSTEM external command: MOVE

reeder@reed.UUCP (Doug Reeder) (09/15/89)

Basic.System external command: MOVE
by Doug Reeder
moves a file to another directory on the same disk without copying blocks
to install, BRUN MOVE.CMD
syntax: MOVE <filename>,<destination directory>
Works on any filetype, including subdirectories
 
for MOVE to work, one of two conditons must be met:
a) <filename> contains the name of the directory the file is in
        e.g.   SUB/JUNK
b) a prefix has been set

example 1) MOVE SUB/JUNK,SPAM
example 2) PREFIX SUB
           MOVE JUNK,SPAM
example 3) MOVE /DISK/STUFF/SUB/JUNK,/DISK

bugs: when installed, CAT will not work without a volume name. This does not
appear to hurt anything, and certainly the directories are not damaged.
Do not move a file to the directory it is in, unless there is a free entry
at least 13 places above where the file is.

This program is replyware; it is free for noncommercial purposes but don't
modify it or remove the credits.  If you use it more than  twice, send me
a message so I know somebody is actually using it. Corporate licence $5.  
Copyright 1989 by Doug Reeder
-------------cut here---------------------------------------
CALL-151
E00:38 A5 FF D0 32 D8 20 8E FD AD 30 BF 8D 6A 0E 20 00 BF C7 6D 0E 0D 80 02
E18:D0 1D 20 00 BF C5 69 0E B0 15 AD 81 02 29 0F AA E8 8E 80 02 A9 2F 8D 81
E30:02 20 00 BF C6 6D 0E A2 08 B0 0E 20 00 BF C3 70 0E B0 06 A2 26 20 53 0E
E48:AA 20 53 0E 4C D0 03 20 ED FD E8 BD 59 0E D0 F7 60 A0 F3 E1 F6 E5 E4 8D
E60:00 C5 F2 F2 EF F2 87 8D 00 02 00 81 02 01 80 02 07 7E 0E E3 06 00 20 00
E78:00 00 05 01 00 00 08 CD CF D6 C5 AE C3 CD C4 00
F00:D8 A0 00 84 FF 88 84 E0 A9 0F 85 E1 20 67 FD A0 00 A2 FF 20 2F 0F E6 E0
F18:D0 02 E6 E1 0A 0A 0A 0A 91 E0 20 2F 0F 11 E0 91 E0 45 FF 85 FF 90 E4 E8
F30:BD 00 02 09 80 C9 A0 F0 F6 49 B0 C9 0A 90 17 69 88 09 20 C9 FA B0 0C 68
F48:68 E0 04 B0 BF 98 91 E0 4C 69 FF 18 29 0F 60
F00G
ADFFBFC904F012A000C8B9F320098020EDFDCCF32090F2186018A9256904C574
9005A90E4C09BEA90420F5BEB0F68DF12038E9228DF220AE07BEAD08BE8E3B22
8D3C22AEF020ADF1208E07BE8D08BEA200A92286508551A000B150F031208EF8
A42FC002D021B15020D5209150C9BFD016B250C920D01088B150D00AA005B150
20D520915088C8C89820E42080C9A90120E420A001B150F00C20D5209150A902
20E42080E9A200A922863C853DA243A925863E853FAEF020ADF12086428543A0
00202CFEA000C8B91321098020EDFDCC132190F260C922900AC925F002B00418
6DF220601865508550A55169008551600000001FD6E5F2F3E9EFEEA0B1AEB4A0
EFE6A0D0F2EFC4CFD3A0F2E5F1F5E9F2E5E48D8BF3F9EEF4E1F8BAA0CDCFD6C5
A0BCE6E9ECE5EEE1EDE5BEACBCEEE5F7A0E4E9F2AEBE8DC3EFF0F9F2E9E7E8F4
A0B1B9B8B9A0E2F9A0C4EFF5E7A0D2E5E5E4E5F28DC6F2E5E5A0E6EFF2A0EEEF
EEADE3EFEDEDE5F2E3E9E1ECA0F0F5F2F0EFF3E5F3AE8DC9EEF3F4E1ECECE5F2
A0E2F9A0D4EFEDA0D7E5E9F3E8E1E1F2A6CDE1F2EBA0D3E9EDEFEEF3E5EE8D00
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
D8AD6CBE8550AD6DBE8551A000C8B150D9FA24D024CCFA2490F3888C52BE9C53
BEA9038D54BEA9008D55BEADE6248D50BEADE7248D51BE1860384C9999AC6CBE
AE6DBE84508651B2508552A8B150C92FF02688D0F7A552A8B15099FF248810F8
A9C72070BEB00EACADBEAEAEBE8C6CBE8E6DBE80164C09BE989250A200C8E8B1
509DFF24C45290F58EFF24AC6CBEAE6DBE8CCCBE8ECDBE9CCEBEA4748CCFBEA9
C82070BEB0CFADD0BE8DDEBEA9CC2070BE90034C09BEAD88C0ADD0BE3A0A0A0A
0A0AAABD01D88DEF24BD10D88DF2248DEA24BD11D88DF3248DEB24AD81C0AD81
C0AC6EBEAE6FBE8CCCBE8ECDBEA9C82070BEB0BFADD0BE8DDEBEA9CC2070BEB0
B2AD88C0ADD0BE3A0A0A0A0A0AAABD01D88DF524BD10D88DF8248DEC24BD11D8
8DF9248DED24AD81C0AD81C0ADEF24CDF524F008202DFFA90B4C09BEA02BA674
9CF0248EF12484508651E8E89CF6248EF724845286532000BF80EE2490034CAB
23B250290FCDFF24D00DA8B150D9FF24D00588D0F6804618A550692785509002
E651C9FFD0DBA002A67484508651B2508DF224E650B2508DF3240DF224F004E6
5080B3202DFFA9064C09BEA000C8B91025098020EDFDCC102590F218602000BF
80F424B03AB252F03918A552692785529002E653C9FFD0EDA002A674E8E88452
8653B2528DF824E652B2528DF9240DF824F004E65280C6202DFFA9114C09BE4C
09BEA650A5512041F92048F9A652A5532041F92048F9A000C8B93A25098020ED
FDCC3A2590F2A026ADED24915288ADEC24915288B15091528810F9A9009250AC
EC24CCF824D008AEED24ECF924F0192000BF81F424B0328CF8248EF9242000BF
80F42490034CAB23A025A674E8E884528653A00118B25269019252B152690091
522000BF81F4249012A000C8B92325098020EDFDCC232590F21860ACEA24AEEB
24CCF224D005ECF324F0192000BF81EE24B0D68CF2248EF3242000BF80EE2490
034CAB23A025A67484508651A00138B250E9019250B150E90091502000BF81EE
24B0A61860003D22000000000000030000000000030000000000044D4F564500
0000000000000000000000000000000012626C6F636B2072656164206572726F
72070D164469736B2077726974652070726F746563746564070D097472616E73
6665720DD3

BSAVE MOVE.CMD,A$1000,L$0544
E00G
-- 
Doug Reeder                         USENET: ...!tektronix!reed!reeder
Institute of Knowledge, Jinx        BITNET: reeder@reed.BITNET
"A blaster can point two ways."  from ARPA: tektronix!reed!reeder@berkeley.EDU
       -Salvor Hardin               Box 722 Reed College,Portland,OR 97202