Archive : Volumes.bxy
Author  : Mark Percival
Status  : Public Domain

   Volumes is an 8-bit, ProDOS-8, mini-program that lists the online
volumes.  Complete with commented ORCA/M source code.  Released to the
public domain by the author.  Coding feedback requested.

Required: Any ProDOS capable Apple II.  The use of lower case
characters will not display correctly on an Apple ][ plus.

Mark R. Percival - RTC Host - Syndicomm Online Apple II Forum
"Midweek Madness!" Every Wednesday Night : 7:00 PM - 9:00 PM Pacific Time

http://www.syndicomm.com



FiLeStArTfIlEsTaRt
ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789()
KVOLUMES.BXY    AoBAAAAAAA(4OIAgEEKAhyAAMAABAoBAAYwx
MdkCCA(4OIAgEEKAhuQMLADBYBgALAQGM9kVF1UVT5yUAsESAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgWAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgDAAAAAAAAOBAApbU9GWObAMAQAAAACsAM
AQAAxAAAAIwCAAABAAgAAAAAAAAAZgFAAAAAAAAAOBAAYbU98g9SAEAAAAwAAEAA
jDwLAAAAAAABAAAACAAArAAAAIwCAAABLkCAEAgAAAAACsAMAQAAAAAADAAAAAAA
AAAAAcAAgAAAAAAAAAAAAEAAAAAAAAAAAAAyAIAAAAgAAAAAAkAZGUBASBAAkFWZ
l1kLAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAY(AJUy2ebdAXvas
8wtrKLNUHMSh5klqa0KU3Oph0ShDGLvcXMbp20tjaqBUHschrYhKgJLUVLZwvsFa
18xDQTFu0EBqO)eeXvQyuQpDeaNUWvaM0iNroPtRXNahPB67EX)i3sUsxShDC3(d
XNXpXT5EQDKZ3Pbh9OOsPfQkXNqu9GijWD6d3tXudxyLB9GUHtXjWFu7qZLUVQQr
86tbk2uclQgY96hrWXvRHMmpd5maJLGsFtjuCx(L8jOv3shuS3d1c)OdLVY486uD
866dXxhJ70ibojukrMilyS1DoCvRLsmr84hqfrnw5PSwowhzMEcUKZ5IWltkp(zg
lYQh72N7IJui5usS4qF(w4(csLii4GmjXunR(r2g0mJ)eFcY4MZNoeiDL5A6F3Jj
nmHzev5tZaeIBrVaX3bZFPAfOTHneeUqRg(hLPzqnlEQyYkndCDxDYlgJCcZlGH3
i(6KfWyARr(dVzxKvzjRyMpuco(2pyM521xhxnB6eXXIUcQE6YAeyxJSRTOdFCyR
cSMbrLUpGaUbKlG0BtCng2ca7oTzkzSktls7fPBQ(yY6hCvc8eyZQTJh8ANQ1QOb
0RdedMkLwu4YG)cNkeIbZWeCRNzpSJisgXvndmUwpbsc29K7oKmt25csR26qhxMc
9e7qyGk2dDCn8GX27o8c51zLSHlTCp4uDDLvBJ8gT80MHLZFb0RHeKZWpq8e7Kbr
xwAuHAVu1KDDUTf(HhE8nWaIgn2zCvmANXmCNlKctlU2PP2RsmgIkB2eLE6hMwzT
kPcugccShGkZWdNdp1sGSb3pDfiSatwY70yqozcY63bop0mAtTmwK4xaLM30Ertr
h0uGZGUQJ35ZonD2kPbrgeeIxi91Qd1h2m12wXsX7MV7Fc2DCFS73UYDUNMxrQMb
iQAoW2F6n05afyzNncZt7tzg4t76pnzyR3nHkeZi8yScK2Kcx6)LJHQkkeuYBSMc
cNTswKL7cgHRV3wWMsPWOcs5yP)Ot4JInggtReaBQ4xUtOztoPIo1azMy6h09e(J
rMX2IXNNJDR8ujYkC0J0Klc52WdWdcGHyEOE(7pdR3kgSf2Kb7KRL3loI7Sr7EQQ
5vwNc5odPqgi8YDknLXtyZktDdwg(gFdFCy(oasFa11zFVWS7RLUd6FqZauhm0as
NloIj3BS(AsepGcjCG2JZaSmZyVYptpJmlCq8o9va6U5pxpahiKJ7oqiik3L5r5C
8qvd)muhL3taRPDu7Bz5B9cajQhXLW5n5dYIsjHSXpLNdNKkHI3YUbZQpP2G91V7
J702WMsIuhghLtHI4N32RARERMqlHAZxhTuTsX)in7Rb6hUeiQl2j15YaK8IjMwx
HPEqc4WJXm3SDqjtUctuXEBpyysKCVBjGWVn58wJmH0ylkp06NskThe5RZeNc74j
v5kh5gwOhEo6qRNuBxlLm3NEKtx0JZaGbsYiUTy)IjXLkd4xNndq4ILwRjo2Kevf
ssW3tiMBYVM5KMJZEqbV5odl66izjo1IvUB9DFqCY6uUkB3RqYal6YUEirpADzEj
0KHmybo6ImEIbGt0nmLibyLayq4h4NaAp4aMMmufVLT6WNwGSgFLfel0XeKQOWyC
rhEdiXY2X9QUPVqthjkw2RkQdMMG(ZFLFXVo2IrsmjDnBHmOO4Oyncs5xdSEUp4F
h2MGcaUvoXlKqgUw0a3uLljYrNJgoWaWyRkMZkC9mHgz2yn0gDuGMwChweUM5EFy
FHMWLJLdeAKI0rp0jUA6fEuSlO6J5FFpNSi6ScYOPEwyjH9AiOKJCfajwKRcyFJC
in1DDIEOUTnwtyhqkpMyZONCEAFrIPPGou3R8XhgPqYgGmpXSTj75OYEa0xY8s0g
eO2ejrceI1MJAB3xD2QcCpGeXDT5YbVSEmGyV5hB79kcFZD8k1zMNQkGBFl4bzQ8
YMTiFDgs0ZWOCLmjpfVxeIy8nqSU1ALyiU2HEo4pYIi6WJUnORkVzKRQg5Imn8RM
fJdIUpF5m0qkIk)io7eB49QQVIO6Hg7rx01ae8M1gWR1NVkeRIERD0WFI)PA15W7
fv9yAYh(AAwmGVvTCrH2BAAPAMAABAAAA8CAAAw4AALACAAAAAAAAAgACAAAAMwG
4AAAdIwDAAwALEDAEAgAAAAAAAAAAAwAAAAALAAAAAAAAAAIAAAABAAAAAAAAAAA
AgMACAAAAIAAAAAAjwGABCAAAAgDM9kVF1UVT5yUAMkUAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAABqCAXvNAbHgCAyDQJWiIFpyE4BIpBRq4BRAQJwEhISoQNYoQ
QpKHFBU0QNAwhwL5KQm8MZCiYCokNYqElZDH8RIQOZ0cc84y4IYPNXAMLszmgRb3
NZskvtCTpRN2OZ2U5YAQIK6AINlun0hHZh8wMO7IpFDnhRI7BA)EBNQ1JhM4Ebww
sgBDAiMQGNUAckAQM32tJdPqNB4xg6AqNbigqBBHspdawJ8A0dzYhgryMY4UHCDi
WAywlNbWnJ6mBTJQsXx40hJnICo3MYGHMBhGEgfQEohmgUdGM5pcMLWCZaDW(92J
pb6MopTYJIpYze0QMGZGu9ZMmawIgcBHxQCQwr7sdSc4utTGOfaTZzz75cddOZab
hp925RO3uQzY3dscoOIMoZ64SjMZs8GozSL7fWTTNDE4bOwOOwmeQKNO5Y6IqCm3
6wdh(EoAjSF107wQjsCkintQ5w4soyGEL7aouip5I8qOA5K3ww93DvDsvoo4eHzD
9MAITHrG0XYIJpj)iJMMzOgEAYMNa2QgszGmaXNONMGCaOWBTSSiJLFUabzNNMuM
zwWOwUK7NBg8YfzQMqKKQrAgk6YzKqml3RCQ3I)8MSCEI44ohPwKiZdwMNpEEraz
uP0QBArYbUEBMGUBTICP1KbDzwhGVxwOGsKkteyRu3A9u0iBKntrrOMsz9mA6Qw4
DSnbgRzqOyQdMp1NVX84DxgDO5e1(KFrQbAg24bjhJQjYWqTowqOaTUmcQgEizMC
ApTjaNOuTyiNN8zg1B46fGEVFMOp6btMKwYdKiSxdDQuEqAcUMjYDxwouQWFTFkR
GD)k4T2wKJFVuV(MAZeuTHEQotGg5vLjj2JsglTO)cZXkQtOTMtsqDf9PFSjIICJ
qKiKjggwiyCCGfdtEGRDNOES6kdawUfLXbQjMyShb6goQw1oWBiXDT3NFkuiMmeZ
W2YzJLoYQOTj7y6eUOiQKBOezTQxnA0phnbfr9AmAmbONCNCaPPPpllmdevpub8g
jrKRodNj4wUvbyftmbj2yNFNq5KDtl9cjXSCCTAFWOHmQvvDE6OYMAMzbAaIMpAq
c87IBGgAooYJsroACiHraqSiKKGKfIEjTSXvZJiVyoiCnmo04Msfta2Qjjg0ykTx
KIogsAeKqooIBUiNCshBLAkqrGxjbZaP1tV)fCUvvnSD2EDuGUoyZZCRNOJC4FEA
jMr46aQIhDAYhNvQgmDOGIQB(BWl(T3xdmgMhS50yJ1L8gooK8WbCgHT2gcFFLuv
pzH4C81W(Kf6MzfKxuUD4W31rAxVYFIFfxyBgO2AYChPxw37R8BeTUh0HIVCw1gR
QBhQnQgUDqGbgyGIY4DD8qrwSmwjLrRg2OKutI7EJ9hdit0yVSgkExKSMGrWEyDZ
BhuHNcnhRIEEEAMmv6wAbeCeCARQmEoMWdI0XIrm0hPmVyerDtXYTIMkADlqQmce
gYEBy4gAvIICfFrhbk8mgY8DY(xBuxVMbMmUAi03x6MOwTEC7jhI8e0o3YaQJPbj
DJCGNwuJIFgspLEe(gEshpBEAXDCzPSAxkKqrQEwjJvgHqQG10eSCBCgCJAyFjpY
R1s80VKZgYKpkvaCmpCKjTUgCig9gJCh3OYQRUCBDCjiRqYX05LTIbt0x8B17hGv
erQXgkkM4MCBa5I8emkKpeHxB77Jrs9PGGg0k8JQjEjRCHGDApJE(tFBiSgk44NT
)KbTv3v)B12SXXQIgsbKtJBVRnevGZChkM8hZI0RrLYmAgj3BxUJ5kdIMUkJpQoc
CQABkto1AJscMDtBPsXYGhawEI(FEnh)YEhj(7pwAMVGB4gZfBvQAXKDdDuRJjQc
IsR(aUCDkiYONvigSZK6UHtQEQRgKCCEkRS1FQ1sPeo6KNZE6efNg6GqZIMCWg3F
E68sYRJ)U0NLyzQQMlgxTmToeIeWxk0IVQ3NYQUAGGrANKIcIAKqT0BSwFEYkAog
jqAgtVVgXnJfLIRvgeSCvH2yJTASyECvMG5h2qVZV7FW3ZVFatezLNysRptWFOiA
SeVlCKgCpCnqiWaLCNQF0GSAk6gE2pWZIhl1xb)LlD6jyMJrvCZ(sSiBOV(YyuVW
S4oTmMawI0SKJltNgBFEkkKCaB(0cediterUpk8BlfOZ0321nIAwf9CIZVy5hBBG
p8Qv8Dw7QMg2WVBUTC2TAC0m1YGFyfAq9xR1ftx31bv91ePBaalCuWBo0EKQLnRY
MSgpOdPYzDs999WbCyQFlyKtJ(WLwx1yCIICDjHWw3ckKXPgmOf4FU8tIAjzjvC4
A)5FgUnW6H70MP8(HgESx41N8tGfmr8TyvK9AlCfdP0sgKYbtQjAB8zYJoNC22QA
ABUgAjIZilUAijHnQmMhORkJATHCTuA8K6EJSgBgb0ghHEwFYwjFDHGZoO1ihTAS
ZgAIKLnMDkJzZ0o4CDHEDkGya2kgARXOgQkCUqchQ1gByHrUUkMhIyEEBFAYJQQd
EADGSChUZ40hcnGEDmCkZS4BAJ3NhhKyYS4ArJjrSQi3QoEhMWVIZGAGIsCNDG1A
BVAUe5y1wySvyTGTZwgJTDDEznC2b6gYcT3NrUjwP3w5zfnwJ2g7RiEQVOIKSGsF
ApIhulECBUoXa6ggA5mMzlC3kbiIK72NY0BCRmAxKNSwGgNxED8wmHmJZlKrHN3J
r6mNN471k7YWSL2rdUCBTqAZEEUwiCoXmzXPdD2GDkH0OxoYGmXOK22E73jXTyOz
4)7ArMj5AmTDNmuwLRcOQgzAvANYoGcJKKkIowKJJAqQjhgp(6uss8(iaAT)LAjY
QQdMD7ABrMuGIqHGYILbDhAQiBBL7GNigTWyAj6arwqTUQMNKm0Yz5iMJTMDssrK
8e7szws48QowhSLbuujigJhqLFMi4Zg5prrLuDt3ywuur0(szBzy5w7SKNH9A5vi
LAIukSu0uMwECgvvQnChMOMSqIMzF4IEuQwGmniz9oCp4BDEG9UAAxb6mEq08yMH
Dw1JOIYgTS2PGdDUHpOR0IouETLTSqjJPXSDOusSoi9Nv24ojjA3w5p12M8OQ)dE
kv0LzBgSCjxm6kAZzia60MizDXXekTzVXHiA0WyWnAzaCimgcKSiCgEEzUIUlASd
KUKKdugiCSH6ac4OBQYChhjhW5hieBgoayQkTk4FpqFsA9hA7IMgQAU(bpV1DhSx
RhjjTrWp4uiT0xN9CY5C2Udi0QJlNvBd3NCGoWy9Pp3XfzAIWuUD)B4doZxAPII4
Gxkz2lBXKIGGwsbCs06QkDgRdbdwJgMuV6DP962ZcfVBb4WI2ozYV3vemBhJXXXr
ds8aMioSivjBIeSiJoIYIKSgCSQDzMVaePztxOOet3GrQKu(Z2x1cJdZEchrgyqH
Q4WtQAhiW9RLgBoOFvwgdBvWs4eHmbTr)MEOGG2lkWSYCMaS3c0iIkHKiTwhBvIg
jBnkIjJjhVBuK8LKyy6avOi5IROI2EIiIClqx0aoJAN0AdBhO0IwYIF)rBGjMrcy
DHA(VJloPoTvOgkoialgShSCgE0mWwzCzy2mapRqJZXXktv5In7vaG)dsUXeANDr
9FKOyB9sctGXbXbdkNI5JNnbUh0G7AoshjBGr2LI8aWg2MpQPEAhKMay0I6VJLjh
4H2xjX9ktcI(kCm0ItBSKre30oL44cS0QBAeQQO84FjhJFW5f5cWhSFgq2qKg5AS
AKJjXM5p)AlxIM9XggZVB9(gSxQrCD(2DVunQJ8FKi3ZsiAG)SgEtBEUDiqbnM4E
U8ar54AaIFRcQgCjBxzALxjCaKnzpE5MzEClDoTgyAdt4Srlm)zRTg82pAtqOAjC
E8UYHShoBKkE1BFjhlTMYLVb0qPvyAJkRcFjIDoswAWIkpyMj(Q4obJmD2e0bNgX
olWExXbAtdEA8PQgJngNxYgT77dKH6xy(UIIlssuBH(jWhg6QyNID9TQUJMgbIjq
lyarjCbLETfSzcAUDGEmiPFwIRoG4jqSpKQxIYCTHBhzQ1q5LM4fSm6SUSok1YKr
KjCIgqRUcEoAZCJI1xU6VIvwGS3MIIyJMxkw2YAKqEA5Dyp9ABkDI4eBr5WI7EIE
AKaBnz2tAe2Kuel43UoJtMDeDjwVjIYGkbwwH0VrTIQgeeMQm31ZICiDq3RCcfII
mYAOJEqMETK78C6EkqJs6SZyFACqLEZmZMOLNlkCsXkyaFJzJ3YM4pBTmw3z54Aj
PbRzTDOoQCdFK6xQJAV3DQASLNrGCHoWXpxGcMDIDGEKjQG9zIVcTwLkAZCBkSRw
6cgKMQC0gJ9gUJBDhv60LlIdKEUdXoOQRAFwVaVBYpgQQkEYIAORrx13KvNDJIky
ERT8RcxAYKCtHSc2wmGDec1jqx8A(YVXjnk(AmkGWwyAz1QwXlOcmoukkFtQUHnD
Ga8IxuMg88kwCLHJA0wYBEQ)QB02mJOSywJj4qcbCOQoQshzgrsbGgTY5gRTQbcY
HPSKAOYR4QICiKQKYQBJA1SAmNZkQwR40CUYHMYCawIhUBUNxhJvXy5oqjDcGOMD
Gccj4oIUQKRImABwuJwQRIP4qIABEIYWVAE5iABZCq0QFJEgLAsSO1aXEJRozmFL
wBDIEuTE6gJ6sJMbxnBfDioDIrOdTOQcDmJDUZ(cECcRTuFSEfVZXsDOyshpUDOI
mOYm0sMzs8NDHiDf1YsTC2rHCuTFUyABU(VclFDR4oRTY)9LHqQEQIU5GSPZYEbS
tKhC8yDI4zNWyid8De5Zc6INrS3gMhqU8qbknMRwkgJTSsVWBAMbA7ESiEHkoQA4
EQaQlJfaqMJyAiqTAvISBgIPBhokAZfv)CAm4jKJqkowKjmmuE7hNOoaDoENzwgr
tIgWAFdDNMOMzbROgA4bMCnTqGSLIIMMwshAvgYMxSFUAlCC8GOeQ477QQybPAhm
KqLhkogO4jYp)BICykjtVSSSJLJbMe5Jkks0AEwJGVvT8TB2BAAPAIAABAAAA8CA
AAw4AYAAAAAAAAAIAAQAC8gMAMQHyAAAdIwDAAwALEDAEAgAAAAAAAAAAAwAAAAA
HAAAAAAAAAAIAIAAAAAAAAAAAEgbB4GAWBAAVx0TTVUTAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAmACABDCIEANIggMIHBCYqoSIyVkKy9mcqoiKgAAIg0v2g8vOg1vj
8jFIhcEI90TP90TP90TP90TP90TP90TP90TPN0TPMBSP0NXau9EIulGbWBSZ1x2b
zVWbN0DICBSPgoTeyFWTQByajJXZhZXagACbN0DIBBSPpJHczACbgwCMwAjMgAiM
gACIN0DI90TP90TP90TP90TP90TP90TP90TPN0TPvlVDgIXds52bl5WavZHItVHb
gMXZlJXYN0gOgAGAF)LAgFia9CgowDBAAmydNqiCuHRA9GRApABAKpEcNqkS9GBA
pABAC04DHBSE9MVIA0KAjDSEHBS)EBSItCQPgERAt2)4QHhAHByG8ASIs9mVl1Wd
yVEIy9mcKCgPQkGG)wkqHBSIcBSIPAKAA0L6CANEJAaqtDCgIie)gAP0g3vjECNA
FiGYFimBBA6BwbQsAmAC93OI0DNylhJGGUoBpdQpliEAghkBAAgAAAAEAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AcHW


Mark R. Percival - RTC Host - Syndicomm Online Apple II Forum
"Midweek Madness!" Every Wednesday Night : 7:00 PM - 9:00 PM Pacific Time

http://www.syndicomm.com