diskread.bsq DISKREAD.SHK
des: Read a disk from 6,1 and save into a file.  Similar to C][+ function. For emulators.
req: //e, 5.25" Disk drive
con: BAS, docs (txt)
key: Track Reader, Disk dump

FiLeStArTfIlEsTaRt
ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789()
LDISKREAD.SHK   AAxeAAAAAA(wKIAA6uNAb7AFOQhuAAxeAI3S
GVvTlzW6EYpbAAAAAAAAAAAAAAAAAAAAAAAAAIAAAAAAAAAA7BAAAAAEAAAAAAAA
GVvTlkM2BAAPAMAABAAAA8CAAAw4AQAAAAAAAAAAAAgAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAwAAAAAIAAAAAAAAAAIAAAABAAAAAAAAAAAAgMACAAAAIAA
AAAAKEMAMDAAAAgBTlERPR0SAM1QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAqrHA(uNAEFgCZyo3ML8AgkzGZSKiOZ0skBTmoRDdNVAcgoDGcZiFhAP2T8Rm
0JTFjEDCgATw5hM4OZ0cgYDmEjF6MfCSnIjmoCY3lb04lpzGlAgxGK6A1kxCZorM
EYwgF4YGII4DIMzoshDHIBoyETgktdDmBQN4qApiu9a0RSJ7gd4QpxoG5BN3gV7M
uwqmBBFQMX9ov1aXEIZviAtS0dTQcJU(qI0C)dZHNRe5kcvAPmDi5Q6wjYwghpTm
Ju5GpeVytlTQ5ZqL1M5oP1aadaeGiGPWZo6VRrYMOdmWnKaGQYTQkHb27yNGmo)d
rctG8UzaW7ahtdeeal5UVi4pgb0wWBhGVqWsMJaAspzm9okLIVVvhd(EJvYV1IiC
4g70O)4JOa68OZ9UMgCwigkNQ8wILKFL81INlkuazjPEdiz7CAKjExtiu0yGowts
Z74gprJK7jwPDH6AbT43Gs6SpJYX6TjDoM4YqhXOqeCTPygD4JvPxMoIiYFKC2w4
rgMcPLxiBzwwkSBM66w4SKBft)BIMOGSAAE)zwgsjpg1ZNgvFr(0KlIG0XqDDhD5
clLz(OrUAI93U8SLTAh0R)ALMsOibym0B4C0DpSdcQjr7iqKUC8q366irjsUqGTC
O8G7E5gN6AVSr3OCOgDUN4Ir8zkNb8U6MI0pMT4OPSD2wrKvC6QTxBo7ZVQSmSzo
6s4J4mqKKJHmUTjjqikIFJHGelqSVhfyqPbQ2Gja8z)7UOtiLBmwQFN2qYneKNWA
t2wojWImftizuk2gl8UN2vbFRAgmufTirGLGjCg3SX8IQxHWkX7IOAHOLX8bChwy
DwXlf902qqwcIBUu6DsrNMtem0JMGUdFFwnFYsqVCKq8PkmLCzCD2Cwy84Yl4gJ4
HiS4mYFpS71N7QuaJKKqOwsLdpm07i(vy8KKhQg9oCyyJKMQooJIQcg4CApXKeR6
KIKaugoJQgmQDgCnGx4DlljPirepYCdWoL0oD(ZrIGsBogJJkiu4ia6lomCiJKCI
4aZKtuuOPTfSxU5aTZxqkZ)NnCtVJ)IC(GTp0Owcd6V3giWT7Y6romCCpvM0YZZI
YQgG8gpGJebbIwD0Y)nzBQoBhCqZKjSA8MEeNJGEtmEjzSH0ZUYRjNgmgQ(ihll6
BrZEX2VhZpia9GWjfS1CSDPx57g1MGbNiK23S59iMy8DfMRcgs4X6bcMWXIvojZX
0Vaib1kLtSajFlzkr7)wrKUtMMbFkegf8wYPkRGEXIkfDjlhlUHsl1TwW54UTOiq
HkJhRqePagADQIA0cpAtPNEWg79EtexI93QJHu0QaOOppjT3qejegShCtaL0ZVId
gnEulj5eQczG)dWZYkcOHKjVw0j5yUoQOM5Atah8DGMtJnk5Q6sSCtgv6wXowqIz
VInqvgh(azcKaqkHxYIE64M0CFUdXbZ6crLJAdV4NeZKEaNGASbKY(ECyigAmyKe
1YCngI7H4rDCJSYw(cYjBgMJDP0SwUF9psfC8lY0POMl75ayKNo7jg8cWQSlC6gC
JC2CQQO)myDtBLkDQ0GkDDMq7xaNTMNKAQEChFqsCNmjTIISFCgVBF1yY6iBANRp
sQAUF2MIBAXRmAfEsnogaYTxoCRGYUgTh5rQstXU(NBgJOpgFBFXilf9EojnQQvg
h5grcMNcGCi6FwYlTBxPaKnU546sp0OkTR2nJiQp2ayrXYDa5JIl5OAzT0qv086I
miG2M2B0hwCXYotyDHsNhnQStfjxCh80gCB3RVChh7TSn(g08970)RWwjnEjiD4W
Ynshf3A7pZR(VIKHhXNGjmdVBrRn(MUhGZcVNrttXbbcJQQl0Lq6QooIFCjghxAJ
4lXgZyEi5iZFNRPqVmYdGhR)q0EQRpQSRVxKFACouYmW5DEcmzll(TKYOQOIDDWZ
Kj1V8zKMorybDkKvPN3rOyul5maWwYYCXtRyXReFUM6h3isx4OzJ0xDtIOAGFijL
wCumbJsWSjBy1264rAG6PS)ikAHVh4rmPgCBt9tyZAs6ljEjgCHOxy0Qg689mQKO
joQ)TJmwyhJxrRwDdwMQGIksMkxNxMFtMvRob6pCWFghVVwa6GncBodFIIGSMuuW
HIAcrxv1p3nPyvBrWNBI2QsyDg3ZKjmTV3jm4XWdjlEfjg5(LQiMYO3JKoOiXSIQ
KYEuAlmZQGXf(jClgcl6)xCeACVQhDaIhh5VZykSCAuUe1CZIgnWwnMOATBYpYAY
NMCqDCHcgReGO9gBWzlg6Ei0pZNZCDiTAg4FMUDhuMaKYMMuetDGIz3OQpXDCFQH
A0wtHPO)yaQQMsIkA8BA17ETmhtRAwTsCAQAAAAAvAQAAMOAEAAAAAAAAAAAAIAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMAAAAAAAAAAAAwCAACACAAAAIAA
AAAAEkFAoAAAAAwAPxkQMt0QEF0TAMlLAAAAAAAAAAAAAAAAAAAAAAAAeDAAbDwo
BQweEAkqPc0q5tT3BqFIuaBI3tT3FSKIue0cgBcUJjM5vdzKQIkXBqGuPZFgTqjX
RbKIiVwYXKDGV2JLCdwuwl7WWZC7NjHD61DJqAS5rXDjX1al1YWuQqhW0prGVfuH
vfyE0FcHBqs7OeJuQsTHRO8GOExA51DBtac4OH)AymDnBhMITsaXLqChK)GYuv(Q
0ZNngBE9OffptqDLu5w44fBHylLIu8OCMVfBQFj2BbGpIUtgmJLlNBE0MZxoGVrG
JRaxKywqhFDmRaEoUwr2mluWH)VrL0jno5C11Se4uG2AzZ1qr1wBWtTD3tLH0Eka
MY5YciDxVpB7Ma5cY7mWFDWpNUrifHgFFoo08a0I5Bv6bPwzxkqYt2TntqRs6b9l
ZZmGMNuNeaGGZYWG575ZafjbNSJFGZkt708KJgoZYFkZGsBf8nYntugMpyN6x1xp
rODIgeOMEvyWrHSEQJELwziBWdGwU8QyM2iCEAU0GuxO6EWmZ24WZ8JIhQhEmNxO
AFGmYYachiKbkNbpSFGnrlxxJpMXRkGKYQTjxzdCo4cmBbGxsiMXAcDcyxfXvxyv
BNNV0yrzt8DcOS)nTeCmaYCLxpIUOjphGmJlWT)vJJ3S5ZIUTnpxURg6CqctaaGp
9pRpqQBFzxQrZWkRaIJ3FkzGEY0U1Qxsr2klNVOB9tlUQDVlzxsmJCUqCPdi0udO
VXLM1kJpeaGtYaasNDRp(DVtGHBSdZAG200gkgOXb)jxmmGpbsk0YbdIB(pJ6gtR
lOZTCGWEYYam5BJUNTpElGIWJiHmYeXiJWIe4h5NXk4co(9F5ccCKrdr(izKnoG)
kbMqeyUe1otzbZ5EP0p4irlleXSpVKeWY5dJmVj4LjQqMNdjB04BPmC(ssnE4cnr
g7sUEjTv0wp63x0c6xmXzGL)UiZ9eNbTGNTMv0FZUoJJN64YgkGdGEaQ6B2morhh
8leNBlecmx84bM6NcDTIEAn3nWZBlE2UPL6GtrjZrsVth5uBaFPohBrNGLPdub8Z
e(EbGSYYpKXGVUWk0(4ctFJtHiPAbcccyz1fHmCyJLP3AEQTGVvTSxL2BAAPAIAA
BAAAA8CAAAw4AYAAAAAAAAwAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAwAAAAAJAAAAAAAAAAIAIAAAAAAAAAAAAwjA8IACBAAD9ETPx0SAQUQAAAAAAAA
AAAAAAAAAAAAAAAAAAAAKwEADAwAgAAYpCAAJ0IAI06AqgxAQqiKJ4(AI04AJI6A
NCSqpOwBG0IAwr8APBiGEA5ADMQjI4OYDA5ADkg7Dcg7Dcg7DoCTNCQqMNwAgMgV
A(LAgNABqxk6OAwALwQDIkgCFYwBCMABi(QAa17DphxA)XIMFCQq8Xo)phhi9XII
x(Po(HJ))DMiKfP0g5NEGVvTJBH2BAAPAIAABAAAA8CAAAw4AwPABAAAAAACAAgA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAAAIAAAAAAAAAAIAIAAAAgA
AAAAAMQLDAAAEBAALNVSBVkUAAARAAAAAAAAAAAAAAAAAAAAAAAAAAAAmqDAOtNA
qEwAAgCEEsEoTRSkpgklIQoEgYBiJBKqEcwMvlDHJgszEbw0sRTnYAI2OZw8AEhH
YBCoEDFQEAhNBgrwOQQElZDHwRNQGMaIUIDCIB41Ob44hBxGBpNUlDKwmJwSpjs3
MdKKhJDGEAOxPYSIQhSTRSBmJQaUIwkSFijGENRKNFiEcrNkNZqWhZTHBpMjB2Q6
6I4AsKtCNewQEBBVZ6LOmUUKBGRGwBYROYoUkJTTp6sqIWCKfJyEZBAiKRm8uI9k
ZwgrILu4UtyERjDXfIlgtcggpiRQOZuWPoKmYScQGKQ85cRjEAqZCAAkhAQQAQkE
EvAIEdCkQTviMam(XpK0RSZQOH1gkdDygBgyCAkkCBRdRzkgzVjfg0cmBip3JT(z
6XCkEiwaQoeOCPyAPLFioQQjcgOIgCGFRUQIQjAh9rQoJC)AIglhZQogBBIYyQQq
KAGAAAGaEEJYAAAPg()wHGUwDaO(bYg5ADAcQRAlQAIAwpYEioogBAApMWoiLKAS
QA0HjcYYBAyiSEGAHFM4Yq4gkoogihAnceyyIyCmopoJpkk8AnUu1uyhKIEDqLiK
Q8D7hCotDOzCeCKA46HBHikMzBJqnpTCOFOoAU4JFAAIgCAgeGSFYQZKgCAQiEAQ
BIiUJhiGEaEQAR0FpogBAD1PCAACaKQwJJIIFYA9phml4aYoOLCP0ZOIAsgEAAlk
yBgCIEboc5FZdVoggCVpYAgCHHTuwShMrDoAGNosESBHGaWRwCAFrE4Q2WKHgdGi
VYGIEIUGFQBIQAHtpkgQIICn0p8KdQtcwjORhBxwJEIYgLmEhUwlCwJnUcFAENMI
AZKaYYghBArcUoFgAMAwtaXQGFgRiIkWytDDEMgCwXOk00oyJgsxCxzqHIFaR9sS
wlJACsSsylhmneLMYdAFWqJQiTJidKSiJIKqEgYIzcQouVWxA4WAESHopRfBXkYK
hAgnvFK6HWXzYdVXAAIghksVAAQRbAGUZ5PA222ub4Y3fnr7uvlrBU6tAAAAAAAA
A0Si