Tajemnice ATARI

JetCopy

    JetCopy służy do kopiowania plików dyskowych. Programów tego typu jest wprawdzie całe mnóstwo lecz wymienię tu kilka zalet wyróżniających go spośród innych. Pierwszą z nich jest możliwość kopiowania dowolnej długości plików (długie programy są dzielone na części), czego nie oferuje większość znanych, mi programów. Przydatna jest również możliwość odczytania nazwy pliku z dowolnego miejsca ekranu - po wczytaniu JetCopy ukazuje podłużne okienko, przez które widać zawartość ekranu. Okienko można przesuwać za pomocą klawiszy kursora (z CONTROL, co umożliwia wybór pliku z wyświetlonego wcześniej na ekranie katalogu dysku. Nazwę pliku można również podać w standardowy sposób, wpisując ją bezpośrednio z klawiatury. Po odczytaniu pliku źródłowego JetCopy przystąpi do zapisu i o ile kopiowany plik zmieścił się w całości, będzie zapisywał kolejne kopie aż do momentu naciśnięcia klawisza ESC. Ten sam klawisz naciśnięty podczas wprowadzania nazwy pliku źródłowego (SOURCE) powoduje opuszczenie programu i powrót do DOS-u. ESC podczas wprowadzania nazwy pliku docelowego (TARGET) przerywa tę operację i pozwala na zmianę nazwy pliku źródłowego. Przed przystąpieniem do odczytu lub zapisu program czeka na naciśnięcie dowolnego klawisza za wyjątkiem ESC.
1000 REM *--------------------------*
1002 REM : JetCopy                  :
1004 REM :  autor: Dariusz Zolna    :
1006 REM : (c) 1992 Tajemnice ATARI :
1008 REM *--------------------------*
1010 DATA ffff00804c85a655e88e2485a5
1020 DATA 5438e9051002a9008d25852056
1030 DATA 84ad2485186901ae2585e820e8
1040 DATA 84a00bb9878591b08810f8a9ff
1050 DATA 8dfc02a614acfc02c8d01ba414
1060 DATA c414f0fca514290fd00ba00bb1
1070 DATA b0498091b08810f7e414d0dfa9
1080 DATA ff8dfc02200a84a20520b983a9
1090 DATA 008d2785ad188518690285b6ad
1100 DATA 1985690085b720bc8090034c04
1110 DATA 8420de84a00bb1b0994d858810
1120 DATA f8a20b20b98320de84a5b085b6
1130 DATA a5b185b720e381a9008d2785ad
1140 DATA 1a8518690285b6ad1b85690085
1150 DATA b720bc8090034c54804cef8120
1160 DATA de84a00bb1b0297fcc2785d002
1170 DATA 098091b08810f020cb83ad2785
1180 DATA f014ad2685c97ed00dce278520
1190 DATA de84ac2785a98091b0ad2685c9
1200 DATA 1cd00ead2585f00920a884ce25
1210 DATA 85205684ad2685c91dd010ad25
1220 DATA 85c915b00920a884ee25852056
1230 DATA 84ad2685c91ed019ad2785f006
1240 DATA ce27854c3981ad2485f00920a8
1250 DATA 84ce2485205684ad2685c91fd0
1260 DATA 1dad2785c90bb006ee27854c5d
1270 DATA 81ad2485c91ab00920a884ee24
1280 DATA 85205684ad2785c90bb016ad26
1290 DATA 85c920900fc960b00bac278520
1300 DATA 438491b0ee2785ad2685c91bd0
1310 DATA 023860c99bf0034cbc8020de84
1320 DATA a00bb1b0297f91b08810f7a0ff
1330 DATA c8c008b005b1b0f0f788a2ffe8
1340 DATA c8b1b0202a84c920f00cc92ef0
1350 DATA 089d4d85e00890ea88a92e9d4d
1360 DATA 85e8c8b1b0f0fb98a000200385
1370 DATA a000b1b0202a849d4d85e8c8c0
1380 DATA 0390f2a99b9d4d85a00bb94d85
1390 DATA 91b68810f81860a005a9d2997d
1400 DATA 858810fa20a88420568420de84
1410 DATA a9008d28858d2985a9ff8d2c85
1420 DATA a00bb99f8591b08810f820cb83
1430 DATA c91bd0034c5480a00fb92d8599
1440 DATA 4d858810f7a210209383a210a9
1450 DATA 04207c831003202783a00bb99f
1460 DATA 8591b08810f8ad2885f01420cb
1470 DATA 83c91bd00da210209383a22020
1480 DATA 93834c5480a9008d2a85ade602
1490 DATA 38ed2185a8888c2b85a210a907
1500 DATA 209b83100cc088f003202783a9
1510 DATA 018d2985ee2c85a210bd48038d
1520 DATA 2a85bd49038d2b85ad2985f003
1530 DATA 209383a00bb9ab8591b08810f8
1540 DATA 20cb83c91bd00da210209383a2
1550 DATA 202093834c5480ad2885d026a0
1560 DATA 0fb93c85994d858810f7a220a9
1570 DATA 08207c83100d202783ad2685c9
1580 DATA 1bd0bf4c5480a9018d2885a220
1590 DATA a90b209b83100a202783ad2685
1600 DATA c91bd0edad2985d0034c3f82ad
1610 DATA 2c85d010a220209383a9008d28
1620 DATA 85200a844ca182a210209383a2
1630 DATA 202093834c54808a4898482093
1640 DATA 836885d4a90085d520aad920e6
1650 DATA d8a200ad8005c930d001e8a000
1660 DATA bd800508204384098099bf85e8
1670 DATA c82810efa00bb9b78591b08810
1680 DATA f8a00a9848200a8468a88810f6
1690 DATA 20cb8368c910f0016068684c54
1700 DATA 809d4a03a9039d4203ad1c859d
1710 DATA 4403ad1d859d45034c56e4a90c
1720 DATA 9d42034c56e49d4203ad20859d
1730 DATA 4403ad21859d4503ad2a859d48
1740 DATA 03ad2b859d49034c56e4a005bd
1750 DATA 9385997d85ca8810f620a8844c
1760 DATA 5684a230a9039d4203ad1e859d
1770 DATA 4403ad1f859d4503a9049d4a03
1780 DATA 2056e4a9059d4203a9009d4803
1790 DATA 9d49032056e448a90c9d420320
1800 DATA 56e4688d26856020a8846c0a00
1810 DATA a046a9088d1fd0a2058d0ad4ca
1820 DATA 10faa9008d1fd0a2058d0ad4ca
1830 DATA 10fa8810e36008297fc940b00c
1840 DATA 69204c3d84c960b00338e94028
1850 DATA 100209806008297fc960b006e9
1860 DATA 1fb0026960281002098060ad24
1870 DATA 85ae258520e884ad148585b2ad
1880 DATA 158585b3ad168585b4ad178585
1890 DATA b5a20ba034b1b09d6c8588ca10
1900 DATA f7a202a00db1b091b4b1b291b0
1910 DATA 8810f5a928a000200385a90ea0
1920 DATA 02200385a90ea004200385ca10
1930 DATA db60a514c514f0fcad2485ae25
1940 DATA 8520e884ad168585b2ad178585
1950 DATA b3a202a00db1b291b08810f9a9
1960 DATA 28a000200385a90ea002200385
1970 DATA ca10e660ad2485186901ae2585
1980 DATA e848a55885b0a55985b168a000
1990 DATA 200385ca100160a9282003854c
2000 DATA f7841879b00099b000a90079b1
2010 DATA 0099b10060005d85c3852d853c
2020 DATA 854d854b85ed85000000000000
2030 DATA 0000000000443a202020202020
2040 DATA 2020202020209b443a20202020
2050 DATA 20202020202020209b4b3a5d85
2060 DATA c285d1d280aae5f480a3afb0b9
2070 DATA 80d2c5fc000000000000000000
2080 DATA 000000fcdad2d2d28080808080
2090 DATA 80d2d2d2c322791a0000240e3a
2100 DATA 6f6c6e61b3afb5b2a3a5b4a1b2
2110 DATA a7a5b4b2e5e1e480f3eff5f2e3
2120 DATA e580b7f2e9f4e580f4e1f2e7e5
2130 DATA f480a5b2b2afb2809a80909080
2140 DATA ed85a586a90085cfa90085d2a9
2150 DATA 8085d3ade70285d48de002ade8
2160 DATA 0285d58de10238a5d2e5d485d0
2170 DATA a5d3e5d585d1a000f0033866cf
2180 DATA a5d2c9eda5d3e98590036ce702
2190 DATA 24cf70613025b1d291d4209986
2200 DATA aaf0e0c920f017c940f0dbc960
2210 DATA f0d7290dc908f0d190418a291f
2220 DATA c909f03ab1d2c8c900b1d288e9
2230 DATA 809012b1d2c8c9eeb1d288e985
2240 DATA b006a5d0a6d1900724cf30a3a9
2250 DATA 00aa85d686d738b1d2e5d691d4
2260 DATA 209986b1d2e5d74c9186b1d291
2270 DATA d42099864c1d86e6d2d002e6d3
2280 DATA e6d4d002e6d560e002e102ed85

Dariusz Żołna



Powrót na start | Powrót do spisu treści | Powrót na stronę główną

Pixel 2001