5 REM LISTING 2:Datalader fuer JOYCE 6 REM Die Zeilen 10-40 sind fuer den JOYCE. Loeschen 100-130. 7 REM 10 REM OPEN "O",1,"ED.COM":DEFINT a-z:READ a$,dummy$ 20 REM WHILE a$<>"*":FOR t=1 TO LEN(a$)/2:b=VAL("&H"+MID$(a$,t*2-1,2)) 30 REM PRINT #1,CHR$(b);:NEXT 40 REM READ a$,dummy$:WEND:CLOSE:END 100 OPENOUT"ed.COM":DEFINT b,t,z:z=140:READ a$,cs 110 WHILE a$<>"*":FOR t=1 TO LEN(a$)/2:b=VAL("&"+MID$(a$,t*2-1,2)) 120 c=c+b*t:PRINT#9,CHR$(b);:NEXT:IF c<>cs THEN PRINT"Datenfehler in Zeile "z 130 c=0:READ a$,cs:z=z+10:WEND:CLOSEOUT:END 140 DATA 318115cd3c143a331521c614cdd913360d3eff323715c3aa0221c5143a3315,40227 150 DATA c3d91321c6143a311547c3d91321c614545d133a33153d4f06003620edb0c9,42716 160 DATA cd19013a3315477efe20c02b05c818f7cdaf01cd3e0178b72a2715280a4f06,40614 170 DATA 0011c614ebedb0eb360d210000222b15cdad08cd91013a3e153cc83c2a3a15,38367 180 DATA 280c3d3d2a2715cdd913223a15c9ed5b2d151918f52a38153a3d153c280e3c,32715 190 DATA c83d3d2a2715cdd913223815c9ed5b2d151918f5cd3e0104c52a2715cdd708,45812 200 DATA fe1a28022304eb489747e16c67ed42222d15c8f519e52a231523b7ed52444d,51914 210 DATA e1ebf13008edb01bed532315c90b09eb09ebd5d9d12a2515cdde13d9da3113,60087 220 DATA ed53231503edb8c93a3515b7c83a32156f2600cd9013cdaa13cd3e0121c614,46834 230 DATA 97b0c8c5e5cdab07e17ecdb71323c110f2c9cd2c012a27157efe1ac8fe0dc8,62008 240 DATA e5cdd708e15d5478b7280a11c614480600e5edb0d1626bcdd7084806002a38,47700 250 DATA 15b7ed523efe323d15380e3effcde413323d1530047d323d152a3a15b7ed52,43139 260 DATA 113e153eff12d83efe12cde413d0eb73c9cd22017efe0d280536202318f6cd,54894 270 DATA 9308c3a2133a3515b7c8cd2902c300022137157e2f77c901aa02c5cd9308cd,50501 280 DATA cd13fe7f3034fe203830218c09e5f53a3515cd0903cdbc03c1703a3715b778,50037 290 DATA f5e5cdab07e1f1cab713e5cd3e01e13a31154f7891d8c847c31702211b0346,47336 300 DATA 23be23280823232310f7c39e137e234e2346c5b73a35152809b7c02f323515,40153 310 DATA c32902b7c897323515c34e0128f0000d081f000d0805000d08f100f9081e00,26906 320 DATA f9081800f908f2ff840901ff8409f3ff8c0906ff8c09f400690af500740af6,56576 330 DATA ff370413ff3704f7ff720404ff7204f800c10a1200c10af900a20a0300a20a,40740 340 DATA faff550afbff5a0a16ffa302e0ffa30211ffdf0a1900970917008f0b1a0079,40853 350 DATA 0b10ff840407ff84047fffbd0408ffbd04020031050e003d050bffb80bfcff,48824 360 DATA b80be1ff260609ffd0050c00a0070d009605cd2201e53a3715b728103a3315,34259 370 DATA 90473d28083e204e77792310fae13a31154f3a3315473a3d15fefe300ab938,44410 380 DATA 073cb82803323d153a3e15fefed0b9d83cb8c8323e15c97efe30d8fe3a3fd0,67720 390 DATA fe41d8fe5b3fd0fe61d8fe7b3fc9cd22012b0578b7c87ecdff03380a2b05c8,56113 400 DATA 7ecdff0330f7c92b05c87ecdff0338f7c93a3115b7c8cd150478b728013c32,50760 410 DATA 3115c9cd3e0148cd2201230478b9d07ecdff03380c230478b9c87ecdff0330,55195 420 DATA f5c9230478b9c87ecdff0338f5c93a3315473a311505b8c8cd480478323115,45007 430 DATA c9cd2201237e2bfe0d2804772318f536203a31154f3a3d15fefe300ab72807,40335 440 DATA b938043d323d153a3e15fefe300ab72807b938043d323e15c38c133a3115b7,39819 450 DATA 2808cd8409cd930818b9cdf707c83a3515cd1203cdae132a2715e5cd5c08cd,52195 460 DATA d70878e1f52b3e01cdb7092a27153a3315cd86052809e5cdd70878e1cdb709,54936 470 DATA 3e49cdb0133a3215b728063d3232151803cd45083e0dcdb7133a33152a2715,30276 480 DATA cd3208f1323115210000222b15cdad08c312093e01cd090a2a2715360d1828,25512 490 DATA 2a27153a3115cd8605e53e01ebcd0d0ae1360de5cd9308cda213e1233a3415,50361 500 DATA 473a3215b8c8cdc413cda6133a3315cd32083a32153c473a3415b8c82a2b15,38337 510 DATA 7cb5c82bcdcd08222b15c9b747280a7efe0dc8fe1ac82310f604c9cda4053a,56186 520 DATA 3715b7c8cd9308c331052a2715cdc1087efe0dcccc05fe1acccc053a3715b7,54518 530 DATA c4cc0506ff7e0423fe2028f978323115c3f9082a2715c9cdf70728212a2715,43360 540 DATA cdcd083a31154fb72805cd8605280fcd0806280acd1906280579323115c93a,33249 550 DATA 3115e6f8c608213315be380197323115c97efe0dc8fe1ac8230cfe2020f30d,53420 560 DATA 2bb7c9237e0cfe2028f9fe0dc8fe1ac9cd4f061b481b6c20a420526f6c6f53,49658 570 DATA 6f667420313938381b6624cdcd13cd7813cda213cd2008c38413cd6813c3f3,57782 580 DATA 13cd4f061b480a0d1b481b6c1b7053756368656e3a1b712024114a14d50e0a,32683 590 DATA cd0500d1131ab7c9cd4f061b480a0d1b481b6c1b7045727365747a656e2064,41386 600 DATA 757263683a1b71202411881418d02a27153a31153ccd8605eb4e231afe1ac8,44911 610 DATA be28031318f641d5e51abe2313200610f8e1d104c9e1d118eacd550628593e,56248 620 DATA ff322f07114b14cda006281e010d00eb2b7eb928030418f823222915222715,29324 630 DATA 7832311597323215c32e09cdf3131b48071b6c537563686265677269666620,43707 640 DATA 6e6963687420676566756e64656e2e2024cdcd13cdaa13c3200897322f07c3,47729 650 DATA 200800cd550628f33efe322f07cd7b06114b14cda006cafa06d5cddc06cd6e,60041 660 DATA 07e1204a3a4b14e5cdb709d13a8914b7283cd5cd0d0ad12189144e230600ed,46294 670 DATA b0182ccd4f061b480a0d1b6c1b702045727365747a656e20284a2f4e29203f,34496 680 DATA 201b7124cd9308cdcd13cdea13fe4ac92a2915c32e093a2f073ccad4063c28,45115 690 DATA 93c93a3c15b7ca6813e521c414545d3a3d153c200521ffff180b3c20052100,33895 700 DATA 001803cdd913eb3a3e153c2005210000180b3c200521ffff1803cdd913c1cd,46711 710 DATA e413da6813eb03cde413da5b13c36813d9ed5b21152a2715b7ed52d9c9d92a,60853 720 DATA 27157ed9fe1ac9cdf707c8cd5c082132157eb7280235c9cd9e08cd7813cdaa,58033 730 DATA 132a29153a3315cd3208c3000247cdff137efe0dc8fe1ac823cdb71310f004,55872 740 DATA c92a2915cdcd08222915c92a2b157cb5c8cdcd08222b15c92a2715cdcd0822,45700 750 DATA 2715c92a2915cdc108222915c92a2b157cb5c87efe1a110000ed532b15c8cd,50013 760 DATA c108222b15b7c92a2715cdc108222715c93a3115673a32156fc39013cd7813,43366 770 DATA 3e49cdb013cd4508cd4f08c03a34153d472a2915c5cdc108c1c810f8222b15,47967 780 DATA c97efe1ac87efe0d2320fa3cc92b2b7efe0d20fa233cc906007efe1ac8fe0d,56605 790 DATA c8230418f53a34153d6f2600cd90133e0acdb713cd6608c37008cd0408c8cd,50890 800 DATA 89083a3415473a32153cb82804323215c9cde4082a2b157efe1ac87cb5c8e5,58183 810 DATA 3a34153d6f2600cd9013e13a3315c33208222915cd7413cd78133a3415473a,37445 820 DATA 33154f1803cdc4137efe1a281379c5cd3208cdc108c110edcdcd08222b1518,49274 830 DATA 080528f821000018f33a3215b7ca690a2a2915474fc5cdc108c1280610f722,46003 840 DATA 2715c9799032321518f52131157eb7c835c92131153a33153dbec834c9cdae,54519 850 DATA 13cda909210000222b15cdad08c312092a27157efe1ac8e5cdd708783ce1f5,60298 860 DATA e5cdd913e52beb2a2315b7ed52e5c1e1d1e5d5edb01bed532315d1c1f12a38,71547 870 DATA 15cdde133813cde4133809d55f1600ed52d11802626b2238152a3a15cdde13,42702 880 DATA d8cde41338074f0600ed421802626b223a15c9ed5b27152a2315b7c8d5ed52,51214 890 DATA 4d44626b095d5403f5cdd913f1ebd5d9d12a2515b7ed52d9da3113ed532315,61674 900 DATA edb8d12a3815cdde133808f5cdd913f12238152a3a15cdde13d8cdd913223a,54239 910 DATA 15c997323115c9cd3e013a33154f78b938f1793d18ed973232152a29152227,38567 920 DATA 15c92a2b157cb5280b2227153a34153d323215c92a291506ff04c5cdc108c1,44988 930 DATA 20f8c5222715f1323215c9cd690ac3550a2a2b157cb520032a2315c32e09cd,40287 940 DATA 9c0a2a2115c32e092a2315cdca0ac32e092a2915cdca0ac32e093a34153ded,41908 950 DATA 5b211547cdde13c8c5cdcd08c110f5c9cd7813cdf3131b6c5e51202d20412c,50054 960 DATA 462c532c442c452c582c522c432c572c5a2c422c4b2c592c4c203a2024cdcd,37025 970 DATA 13cdea13fe203002c640f5cdaa13f1212d0b4623be23284123232310f7c320,44633 980 DATA 080e41ff300746ffca065300550a44ff5a0a45ff690a58ff740a52ffaf0a43,51855 990 DATA ffb80a57ffc10a5affa20a42ff9c0b4bffb30b590085024c0098027eb7e53a,51756 1000 DATA 3515c41203cd2008e1237e23666fe92a2915ed5b2115e5b7ed52e1c8cd9e08,62393 1010 DATA cd5c08c32008cd0408c8cde408cd8908c312092a3815ed5b2115cdde13d8ed,56511 1020 DATA 5b2315cdde13d0ebc3dc062a3a1518e7cd7813cd610c1b6c5e4b202d20442c,41609 1030 DATA 422c4b2c432c562c482c592c522c57203a2000cdcd13cdea13fe203002c640,46187 1040 DATA f5cdaa13f121f10bc31f0b0944ff6c0c42ff2b104bff391043ff081356ff5c,50757 1050 DATA 1248ff411059ff401152ff4a1057ff6f11118c860e003e8acd400c060a1185,38962 1060 DATA 85d53e20cd400c10f91188823e9acd400cd13e20cd400c1189833e8af50cc5,53144 1070 DATA d5260269cd9013d17acdb713c1e1c506117ccdb71310fac17bcdb7137cc9e1,70196 1080 DATA 7e23e5b7c8cdb71318f5cd7c13cd160ccd610c1b5922244c6164656e1b5923,41964 1090 DATA 2453706569636865726e1b5924244e6575206c6164656e1b59252441627370,40646 1100 DATA 6569636865726e1b592624447275636b656e1b592724426c6f636b20647275,42701 1110 DATA 636b656e1b5928245a65696368656e7361747a1b59292454657874206cf373,48582 1120 DATA 6368656e1b592a2452f4636b6b6568721b592b24456e6465000e0c1185853e,37165 1130 DATA 20cd400ccd610c1b592d23fc00cdcd13cdea135ffe0d2839cdb7137bfe5228,56270 1140 DATA 31fe4cca500efe53ca100ffe4eca580efe41ca010ffe44caf30ffe42ca5411,60833 1150 DATA fe5a2818fe54cadd0ffe45ca860dcd9e1318a9cd80132a2915c32e09cd610c,48429 1160 DATA 1b592d23537072616368652028302d37293a2000cdcd13d630fe0830e0c620,48843 1170 DATA 5fcd610c1b32007bcdb71318c6cd7413cd7c13cd7813c30000115c00cd610c,43677 1180 DATA 1b592d232000eb7e23c640cdb7133e3acdb7130608cdc10d3e2ecdb7130603,44173 1190 DATA cdc10dcd610c200800c97e23e67fcdb71310f7c90e10cd0500cd610c1b592d,44820 1200 DATA 232046696c65206e6f7420666f756e642e20080700cdcd131894cd610c1b59,40992 1210 DATA 2d235769726b6c69636820284a2f4e29203f20080700cdcd13cdea13fe4ac8,50482 1220 DATA e118d7e5cd610c0a0d1b592d23b03d0700e1e51139140e0ad5cd0500e1d123,45067 1230 DATA 7eb7c823e5cdd9133600e1222d15ed532f15112d150e98cd0500f6ffc9215c,49552 1240 DATA 00cd170e28bdcd920d2168001169000117003600edb0115c00d50e0fcd0500,33066 1250 DATA fe04d1d2cb0d2a211522381597323c15cdb30e20fbe50e10cd0500e12b7efe,51760 1260 DATA 0d280123360d23361a2223152b223a15cda60ec3f70c2a2115222915210000,26622 1270 DATA 223115c9d5e50e14cd0500e1d1b7280297c9d511800043d92a2515d91afe1a,52046 1280 DATA 2813fe0a2802772313e5d9d1cdde13d9380510e904d1c997d1c9eb21000f7e,60102 1290 DATA 3600ebb7c07e23fe1ac8fe0dc0eb360aebb7c900213f15e5cd170ed1d5cd95,65489 1300 DATA 0dd11806cd920d115c00d5cd940fd1c2f70cd5eb010c0009545d130e1770ed,47119 1310 DATA b0d1d50e16cd0500d1fe0430372a2115d511800043d5cde80ed11213281110,41542 1320 DATA f50e15d1d5e5cd0500e1d1b7201718e10e15d1d5cd0500d1b7200a0e10cd05,47645 1330 DATA 00fe04daf70c0e10cd0500cd610c1b592d2320536368726569626665686c65,43756 1340 DATA 722021200700cdcd13c3f70cd50e0fcd0500d1f5d50e10cd0500d1f13cc8d5,60851 1350 DATA cd610c1b592d23d462657273636872656962656e3f200700cdcd13cdea13fe,55588 1360 DATA 4a2809fe4e280218f0d13cc9cdb713d10e13cd050097c9cdf00d2100002231,45419 1370 DATA 152a2115222315222915361a18172a2115cde80e2805cd171018f63e0dcd17,35958 1380 DATA 103e0acd1710c3f70cfe0df5cd1710f1c03e0a5fc5e50e05cd0500e1c1c93a,58423 1390 DATA 31152a2715c38605cd22102238153eff323c15c3510dcd2210223a1518f021,37531 1400 DATA 3c157e2f77c3510dcd610c1b480d1b6c4461746569206c6164656e2e204e61,40132 1410 DATA 6d653a2000213f15e5cd260ed1ca20080e0fcd0500fe0430342a27153a3115,31441 1420 DATA cd8605e5cddb10cded102808cd0411cd241118f0e50e10113f15cd0500e12b,42526 1430 DATA 223a15e12238153eff323c15c3510d0e10113f15cd0500cd610c1b481b6c44,33200 1440 DATA 61746569206e6963687420766f7268616e64656e2e0700cdcd13c32008e511,46652 1450 DATA 3f150e14cd0500e1b7c83e1a328000c9e5218000454c7efe1a2808fe0a2801,42954 1460 DATA 0c2310f3e197b1c90600545de509eb444d2a2315b7ed42e5c5e1c109eb09eb,65619 1470 DATA ed53231503edb8e1c9118000431afe1ac8fe0a280277231310f3c9ed4b3815,50135 1480 DATA 2a3a15c3e413cd3611d8cdc5122a38152b223a15cda60ec3510dcd3611daf7,52976 1490 DATA 0c23ed420acd0d102b037cb520f63e0dcd0d10c3f70ccd3611d8cd610c1b48,48574 1500 DATA 0d1b6c426c6f636b2073706569636865726e2e204e616d653a2000213f15e5,40116 1510 DATA cd260ed1ca2008cded11d50e16cd0500d1fe04d2f5112a3a15237e361af52a,48135 1520 DATA 3815cdd011f5cde311f120f6f12a3a1523770e10cd0500c32008d5118000d5,47113 1530 DATA cde80ed1122805137ab728f3d1c9d5e50e15cd0500e1d1c9d50e13cd0500d1,58496 1540 DATA c9cd610c1b481b6c4665686c6572206265696d2053636872656962656e2021,42876 1550 DATA 0700cdcd13c32008cd361123ed42e5ed5b25152bebed52c5d1ebc1ed532d15,65044 1560 DATA ed432f15edb0c9223815eb2a2d15ed4b2f15edb01bed533a15c9eb2a2515b7,52883 1570 DATA ed52d8ed5b2315b7ed52c9cd3611d823ed42e5cd4c123875c12a27153a3115,47754 1580 DATA c5cd8605c1200123ed5b3a1513cdde13ed5b38153004cdde13d0cdde133802,51374 1590 DATA ed42e5cd1b12cdc512e1e5cda712e1cd3912cda60ec3510ded5b2f15e519eb,61690 1600 DATA c12a2315b7ed42e5c5e1c109eb09eb03ed532315edb8c9ed5b3a152a2315b7,56893 1610 DATA ed5213e5c12a3815ebedb01bed532315c9cd610c1b48071b6c446965736572,47180 1620 DATA 20426c6f636b20697374207a752067726fba20212000cdcd13c32008cd3611,44017 1630 DATA d823ed42e529cd4c12c138c7cd1b122a27153a3115cd8605200123e5cda712,44748 1640 DATA e1cd3912c3510d31811501aa02c5cd610c1b4807071b6c5370656963686572,41683 1650 DATA 20766f6c6c20212121070700cdcd13c320083a3615b7c03d3236153e701848,36018 1660 DATA 3a36153cc03236153e71183c3e4518383e4818343e3118303e30182c3e6518,26155 1670 DATA 283e6618243e4e18203e59cdb0137dcd9a137cc62018193e0718153e4b180a,32758 1680 DATA 3e4c18063e6c18023e4df53e1bcdb713f1c5d5e55f0e02cd0500e1d1c1c93e,61629 1690 DATA 0acdb7133e0d18ea0e061efdc305000e01c30500856fd024c9e5b7ed52e1c9,62274 1700 DATA e5b7ed42e1c9fe61d8fe7bd0d620c9e17e23e5fe24c8cdb71318f4f5c5d5cd,84104 1710 DATA 0914d1c1f1c93a3c15b7ca6813ed5b3815cdde13da6813ed5b3a1513cdde13,55772 1720 DATA d26813c35b13d5ed5b3815cdde13d1c9d5ed5b3a1518f4c300002a01001157,45190 1730 DATA 0019223a141180000e1acd0500cdf3131b301b32201b33421b625c1b63201b,28992 1740 DATA 651b711b751b771b7924cd3914e300b7215019223315c4b2143e0e3239143e,34686 1750 DATA 3c324a14218215222115222315361ae52b360d210000223115223515223a15,19583 1760 DATA 223c152b2238152100f6222515328814e1c32e09215a2022331521cd144e23,32988 1770 DATA 46235623793cc8e5cd3914d700e118ee0b16010ef4020ef8044ff5024ff904,48302 1780 DATA 0ff6020ffa0406f70206fb0444e104487f0442fc07ff,26280 1790 DATA *,0