diff --git a/.gitignore b/.gitignore index 321a235..2a2cb66 100644 --- a/.gitignore +++ b/.gitignore @@ -3,6 +3,7 @@ .gradle /Releases /.nb-gradle/ +*.bin *.dmp *.elf *.lss @@ -26,14 +27,15 @@ *.pof *.qdf *.srf -software/MZB/* -software/tmp/* +Manuals/ software/asm/CPM22-BIOS.asm software/asm/MZ80AFI.asm.bak software/asm/cpm22.mzf software/asm/dz80.ini +software/asm/old/ software/howto software/roms/MZ80AFI.BIN software/roms/MZ80AFI.rom software/roms/bios.rom software/roms/cpm22.rom +software/tmp/ diff --git a/software/CPM/1M44/DSK/CPM11_MAC80.DSK b/software/CPM/1M44/DSK/CPM00_1M44_MZ800.DSK similarity index 92% rename from software/CPM/1M44/DSK/CPM11_MAC80.DSK rename to software/CPM/1M44/DSK/CPM00_1M44_MZ800.DSK index 1352808..34cfef5 100644 Binary files a/software/CPM/1M44/DSK/CPM11_MAC80.DSK and b/software/CPM/1M44/DSK/CPM00_1M44_MZ800.DSK differ diff --git a/software/CPM/1M44/DSK/CPM00_1M44_SYSTEM.DSK b/software/CPM/1M44/DSK/CPM00_1M44_SYSTEM.DSK index 5ef66a6..188cab7 100644 Binary files a/software/CPM/1M44/DSK/CPM00_1M44_SYSTEM.DSK and b/software/CPM/1M44/DSK/CPM00_1M44_SYSTEM.DSK differ diff --git a/software/CPM/1M44/DSK/CPM00_SYSTEM.DSK b/software/CPM/1M44/DSK/CPM00_SYSTEM.DSK deleted file mode 100644 index 188cab7..0000000 Binary files a/software/CPM/1M44/DSK/CPM00_SYSTEM.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM01_1M44_TURBOP.DSK b/software/CPM/1M44/DSK/CPM01_1M44_TURBOP.DSK index bfa9e0b..78a4ecb 100644 Binary files a/software/CPM/1M44/DSK/CPM01_1M44_TURBOP.DSK and b/software/CPM/1M44/DSK/CPM01_1M44_TURBOP.DSK differ diff --git a/software/CPM/1M44/DSK/CPM01_TURBOP.DSK b/software/CPM/1M44/DSK/CPM01_TURBOP.DSK deleted file mode 100644 index 78a4ecb..0000000 Binary files a/software/CPM/1M44/DSK/CPM01_TURBOP.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM02_1M44_HI_C.DSK b/software/CPM/1M44/DSK/CPM02_1M44_HI_C.DSK index 7e2e41c..b9e05ab 100644 Binary files a/software/CPM/1M44/DSK/CPM02_1M44_HI_C.DSK and b/software/CPM/1M44/DSK/CPM02_1M44_HI_C.DSK differ diff --git a/software/CPM/1M44/DSK/CPM02_HI_C.DSK b/software/CPM/1M44/DSK/CPM02_HI_C.DSK deleted file mode 100644 index b9e05ab..0000000 Binary files a/software/CPM/1M44/DSK/CPM02_HI_C.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM03_FORTRAN80.DSK b/software/CPM/1M44/DSK/CPM03_FORTRAN80.DSK deleted file mode 100644 index dbc904c..0000000 Binary files a/software/CPM/1M44/DSK/CPM03_FORTRAN80.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM04_1M44_MBASIC.DSK b/software/CPM/1M44/DSK/CPM04_1M44_MBASIC.DSK index 2c4447b..a1b29c1 100644 Binary files a/software/CPM/1M44/DSK/CPM04_1M44_MBASIC.DSK and b/software/CPM/1M44/DSK/CPM04_1M44_MBASIC.DSK differ diff --git a/software/CPM/1M44/DSK/CPM04_MBASIC.DSK b/software/CPM/1M44/DSK/CPM04_MBASIC.DSK deleted file mode 100644 index a1b29c1..0000000 Binary files a/software/CPM/1M44/DSK/CPM04_MBASIC.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM05_COBOL80_v13.DSK b/software/CPM/1M44/DSK/CPM05_COBOL80_v13.DSK deleted file mode 100644 index 08f4cb7..0000000 Binary files a/software/CPM/1M44/DSK/CPM05_COBOL80_v13.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM06_COBOL80_v20.DSK b/software/CPM/1M44/DSK/CPM06_COBOL80_v20.DSK deleted file mode 100644 index 7ebde47..0000000 Binary files a/software/CPM/1M44/DSK/CPM06_COBOL80_v20.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM07_1M44_COBOL80.DSK b/software/CPM/1M44/DSK/CPM07_1M44_COBOL80.DSK index af4f4f5..eca8ae4 100644 Binary files a/software/CPM/1M44/DSK/CPM07_1M44_COBOL80.DSK and b/software/CPM/1M44/DSK/CPM07_1M44_COBOL80.DSK differ diff --git a/software/CPM/1M44/DSK/CPM07_COBOL80.DSK b/software/CPM/1M44/DSK/CPM07_COBOL80.DSK deleted file mode 100644 index eca8ae4..0000000 Binary files a/software/CPM/1M44/DSK/CPM07_COBOL80.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM08_1M44_Z80FORTH.DSK b/software/CPM/1M44/DSK/CPM08_1M44_Z80FORTH.DSK index 4097246..1df8a5d 100644 Binary files a/software/CPM/1M44/DSK/CPM08_1M44_Z80FORTH.DSK and b/software/CPM/1M44/DSK/CPM08_1M44_Z80FORTH.DSK differ diff --git a/software/CPM/1M44/DSK/CPM08_Z80FORTH.DSK b/software/CPM/1M44/DSK/CPM08_Z80FORTH.DSK deleted file mode 100644 index 1df8a5d..0000000 Binary files a/software/CPM/1M44/DSK/CPM08_Z80FORTH.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM09_1M44_CPMTEX.DSK b/software/CPM/1M44/DSK/CPM09_1M44_CPMTEX.DSK index 3c2434b..6460adf 100644 Binary files a/software/CPM/1M44/DSK/CPM09_1M44_CPMTEX.DSK and b/software/CPM/1M44/DSK/CPM09_1M44_CPMTEX.DSK differ diff --git a/software/CPM/1M44/DSK/CPM09_CPMTEX.DSK b/software/CPM/1M44/DSK/CPM09_CPMTEX.DSK deleted file mode 100644 index 6460adf..0000000 Binary files a/software/CPM/1M44/DSK/CPM09_CPMTEX.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM10_DISKUTILFUNC5.DSK b/software/CPM/1M44/DSK/CPM10_DISKUTILFUNC5.DSK deleted file mode 100644 index ca18e4a..0000000 Binary files a/software/CPM/1M44/DSK/CPM10_DISKUTILFUNC5.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM12_PASCALMTP_v561.DSK b/software/CPM/1M44/DSK/CPM12_PASCALMTP_v561.DSK deleted file mode 100644 index 5b57103..0000000 Binary files a/software/CPM/1M44/DSK/CPM12_PASCALMTP_v561.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM13_1M44_MTPUG_01.DSK b/software/CPM/1M44/DSK/CPM13_1M44_MTPUG_01.DSK index f80c407..88aa79d 100644 Binary files a/software/CPM/1M44/DSK/CPM13_1M44_MTPUG_01.DSK and b/software/CPM/1M44/DSK/CPM13_1M44_MTPUG_01.DSK differ diff --git a/software/CPM/1M44/DSK/CPM13_MTPUG_01.DSK b/software/CPM/1M44/DSK/CPM13_MTPUG_01.DSK deleted file mode 100644 index 88aa79d..0000000 Binary files a/software/CPM/1M44/DSK/CPM13_MTPUG_01.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM14_MTPUG_02.DSK b/software/CPM/1M44/DSK/CPM14_MTPUG_02.DSK deleted file mode 100644 index 0014235..0000000 Binary files a/software/CPM/1M44/DSK/CPM14_MTPUG_02.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM15_1M44_MTPUG_03.DSK b/software/CPM/1M44/DSK/CPM15_1M44_MTPUG_03.DSK index 24de109..0e74ae0 100644 Binary files a/software/CPM/1M44/DSK/CPM15_1M44_MTPUG_03.DSK and b/software/CPM/1M44/DSK/CPM15_1M44_MTPUG_03.DSK differ diff --git a/software/CPM/1M44/DSK/CPM15_MTPUG_03.DSK b/software/CPM/1M44/DSK/CPM15_MTPUG_03.DSK deleted file mode 100644 index 0e74ae0..0000000 Binary files a/software/CPM/1M44/DSK/CPM15_MTPUG_03.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM16_1M44_MTPUG_04.DSK b/software/CPM/1M44/DSK/CPM16_1M44_MTPUG_04.DSK index ce70902..faaa830 100644 Binary files a/software/CPM/1M44/DSK/CPM16_1M44_MTPUG_04.DSK and b/software/CPM/1M44/DSK/CPM16_1M44_MTPUG_04.DSK differ diff --git a/software/CPM/1M44/DSK/CPM16_MTPUG_04.DSK b/software/CPM/1M44/DSK/CPM16_MTPUG_04.DSK deleted file mode 100644 index faaa830..0000000 Binary files a/software/CPM/1M44/DSK/CPM16_MTPUG_04.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM17_MTPUG_05.DSK b/software/CPM/1M44/DSK/CPM17_MTPUG_05.DSK deleted file mode 100644 index 27f0adc..0000000 Binary files a/software/CPM/1M44/DSK/CPM17_MTPUG_05.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM18_1M44_MTPUG_06.DSK b/software/CPM/1M44/DSK/CPM18_1M44_MTPUG_06.DSK index 5f56062..add8b2c 100644 Binary files a/software/CPM/1M44/DSK/CPM18_1M44_MTPUG_06.DSK and b/software/CPM/1M44/DSK/CPM18_1M44_MTPUG_06.DSK differ diff --git a/software/CPM/1M44/DSK/CPM18_MTPUG_06.DSK b/software/CPM/1M44/DSK/CPM18_MTPUG_06.DSK deleted file mode 100644 index add8b2c..0000000 Binary files a/software/CPM/1M44/DSK/CPM18_MTPUG_06.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM19_1M44_MTPUG_07.DSK b/software/CPM/1M44/DSK/CPM19_1M44_MTPUG_07.DSK index 1710e98..5d8dc5e 100644 Binary files a/software/CPM/1M44/DSK/CPM19_1M44_MTPUG_07.DSK and b/software/CPM/1M44/DSK/CPM19_1M44_MTPUG_07.DSK differ diff --git a/software/CPM/1M44/DSK/CPM19_MTPUG_07.DSK b/software/CPM/1M44/DSK/CPM19_MTPUG_07.DSK deleted file mode 100644 index 5d8dc5e..0000000 Binary files a/software/CPM/1M44/DSK/CPM19_MTPUG_07.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM20_1M44_MTPUG_08.DSK b/software/CPM/1M44/DSK/CPM20_1M44_MTPUG_08.DSK index d85dd1d..13e3bba 100644 Binary files a/software/CPM/1M44/DSK/CPM20_1M44_MTPUG_08.DSK and b/software/CPM/1M44/DSK/CPM20_1M44_MTPUG_08.DSK differ diff --git a/software/CPM/1M44/DSK/CPM20_MTPUG_08.DSK b/software/CPM/1M44/DSK/CPM20_MTPUG_08.DSK deleted file mode 100644 index 13e3bba..0000000 Binary files a/software/CPM/1M44/DSK/CPM20_MTPUG_08.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM21_1M44_MTPUG_09.DSK b/software/CPM/1M44/DSK/CPM21_1M44_MTPUG_09.DSK index fbc704f..bef9dc7 100644 Binary files a/software/CPM/1M44/DSK/CPM21_1M44_MTPUG_09.DSK and b/software/CPM/1M44/DSK/CPM21_1M44_MTPUG_09.DSK differ diff --git a/software/CPM/1M44/DSK/CPM21_MTPUG_09.DSK b/software/CPM/1M44/DSK/CPM21_MTPUG_09.DSK deleted file mode 100644 index bef9dc7..0000000 Binary files a/software/CPM/1M44/DSK/CPM21_MTPUG_09.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM22_MTPUG_10.DSK b/software/CPM/1M44/DSK/CPM22_MTPUG_10.DSK deleted file mode 100644 index 4121f21..0000000 Binary files a/software/CPM/1M44/DSK/CPM22_MTPUG_10.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM23_1M44_PLI.DSK b/software/CPM/1M44/DSK/CPM23_1M44_PLI.DSK index ebe735a..5ce4b3b 100644 Binary files a/software/CPM/1M44/DSK/CPM23_1M44_PLI.DSK and b/software/CPM/1M44/DSK/CPM23_1M44_PLI.DSK differ diff --git a/software/CPM/1M44/DSK/CPM23_PLI.DSK b/software/CPM/1M44/DSK/CPM23_PLI.DSK deleted file mode 100644 index 5ce4b3b..0000000 Binary files a/software/CPM/1M44/DSK/CPM23_PLI.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM24_1M44_PLI80_v13.DSK b/software/CPM/1M44/DSK/CPM24_1M44_PLI80_v13.DSK index bcd7ef1..bcc48be 100644 Binary files a/software/CPM/1M44/DSK/CPM24_1M44_PLI80_v13.DSK and b/software/CPM/1M44/DSK/CPM24_1M44_PLI80_v13.DSK differ diff --git a/software/CPM/1M44/DSK/CPM24_PLI80_v13.DSK b/software/CPM/1M44/DSK/CPM24_PLI80_v13.DSK deleted file mode 100644 index bcc48be..0000000 Binary files a/software/CPM/1M44/DSK/CPM24_PLI80_v13.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM25_1M44_PLI80_v14.DSK b/software/CPM/1M44/DSK/CPM25_1M44_PLI80_v14.DSK index f507335..1052bb2 100644 Binary files a/software/CPM/1M44/DSK/CPM25_1M44_PLI80_v14.DSK and b/software/CPM/1M44/DSK/CPM25_1M44_PLI80_v14.DSK differ diff --git a/software/CPM/1M44/DSK/CPM25_PLI80_v14.DSK b/software/CPM/1M44/DSK/CPM25_PLI80_v14.DSK deleted file mode 100644 index 1052bb2..0000000 Binary files a/software/CPM/1M44/DSK/CPM25_PLI80_v14.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM26_1M44_TPASCAL_v300a.DSK b/software/CPM/1M44/DSK/CPM26_1M44_TPASCAL_v300a.DSK index 3c6fc2c..3e382c9 100644 Binary files a/software/CPM/1M44/DSK/CPM26_1M44_TPASCAL_v300a.DSK and b/software/CPM/1M44/DSK/CPM26_1M44_TPASCAL_v300a.DSK differ diff --git a/software/CPM/1M44/DSK/CPM26_TPASCAL_v300a.DSK b/software/CPM/1M44/DSK/CPM26_TPASCAL_v300a.DSK deleted file mode 100644 index 3e382c9..0000000 Binary files a/software/CPM/1M44/DSK/CPM26_TPASCAL_v300a.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM27_1M44_WORDSTAR_v30.DSK b/software/CPM/1M44/DSK/CPM27_1M44_WORDSTAR_v30.DSK index 3b24e86..9373aa4 100644 Binary files a/software/CPM/1M44/DSK/CPM27_1M44_WORDSTAR_v30.DSK and b/software/CPM/1M44/DSK/CPM27_1M44_WORDSTAR_v30.DSK differ diff --git a/software/CPM/1M44/DSK/CPM27_WORDSTAR_v30.DSK b/software/CPM/1M44/DSK/CPM27_WORDSTAR_v30.DSK deleted file mode 100644 index 9373aa4..0000000 Binary files a/software/CPM/1M44/DSK/CPM27_WORDSTAR_v30.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM28_PLM80.DSK b/software/CPM/1M44/DSK/CPM28_PLM80.DSK deleted file mode 100644 index a64d0c4..0000000 Binary files a/software/CPM/1M44/DSK/CPM28_PLM80.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM29_1M44_ZSID_v14.DSK b/software/CPM/1M44/DSK/CPM29_1M44_ZSID_v14.DSK index a547ee6..c632d36 100644 Binary files a/software/CPM/1M44/DSK/CPM29_1M44_ZSID_v14.DSK and b/software/CPM/1M44/DSK/CPM29_1M44_ZSID_v14.DSK differ diff --git a/software/CPM/1M44/DSK/CPM29_ZSID_v14.DSK b/software/CPM/1M44/DSK/CPM29_ZSID_v14.DSK deleted file mode 100644 index c632d36..0000000 Binary files a/software/CPM/1M44/DSK/CPM29_ZSID_v14.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM30_1M44_WORDSTAR_v400.DSK b/software/CPM/1M44/DSK/CPM30_1M44_WORDSTAR_v400.DSK index 6bac80d..a6cb79b 100644 Binary files a/software/CPM/1M44/DSK/CPM30_1M44_WORDSTAR_v400.DSK and b/software/CPM/1M44/DSK/CPM30_1M44_WORDSTAR_v400.DSK differ diff --git a/software/CPM/1M44/DSK/CPM30_WORDSTAR_v400.DSK b/software/CPM/1M44/DSK/CPM30_WORDSTAR_v400.DSK deleted file mode 100644 index a6cb79b..0000000 Binary files a/software/CPM/1M44/DSK/CPM30_WORDSTAR_v400.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM31_1M44_WORDSTAR_v330.DSK b/software/CPM/1M44/DSK/CPM31_1M44_WORDSTAR_v330.DSK index 5ecf206..d302b85 100644 Binary files a/software/CPM/1M44/DSK/CPM31_1M44_WORDSTAR_v330.DSK and b/software/CPM/1M44/DSK/CPM31_1M44_WORDSTAR_v330.DSK differ diff --git a/software/CPM/1M44/DSK/CPM31_WORDSTAR_v330.DSK b/software/CPM/1M44/DSK/CPM31_WORDSTAR_v330.DSK deleted file mode 100644 index d302b85..0000000 Binary files a/software/CPM/1M44/DSK/CPM31_WORDSTAR_v330.DSK and /dev/null differ diff --git a/software/CPM/1M44/DSK/CPM_MC_5.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_5.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_5.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_5.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C0.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C0.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C0.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C0.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C1.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C1.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C1.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C1.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C2.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C2.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C2.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C2.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C3.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C3.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C3.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C3.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C4.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C4.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C4.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C4.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C5.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C5.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C5.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C5.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C6.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C6.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C6.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C6.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C7.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C7.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C7.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C7.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C8.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C8.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C8.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C8.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_C9.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_C9.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_C9.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_C9.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D0.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D0.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D0.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D0.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D1.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D1.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D1.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D1.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D2.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D2.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D2.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D2.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D3.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D3.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D3.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D3.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D4.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D4.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D4.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D4.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D5.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D5.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D5.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D5.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D6.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D6.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D6.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D6.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D7.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D7.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D7.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D7.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D8.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D8.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D8.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D8.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_D9.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_D9.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_D9.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_D9.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E0.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E0.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E0.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E0.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E1.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E1.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E1.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E1.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E2.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E2.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E2.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E2.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E3.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E3.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E3.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E3.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E4.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E4.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E4.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E4.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E5.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E5.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E5.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E5.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E6.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E6.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E6.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E6.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E7.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E7.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E7.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E7.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E8.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E8.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E8.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E8.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_E9.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_E9.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_E9.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_E9.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F0.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F0.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F0.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F0.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F1.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F1.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F1.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F1.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F2.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F2.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F2.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F2.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F3.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F3.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F3.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F3.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F4.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F4.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F4.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F4.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F5.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F5.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F5.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F5.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F6.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F6.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F6.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F6.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F7.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F7.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F7.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F7.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F8.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F8.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F8.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F8.DSK diff --git a/software/CPM/1M44/DSK/CPM_MC_F9.DSK b/software/CPM/1M44/DSK/CPM_1M44_MC_F9.DSK similarity index 100% rename from software/CPM/1M44/DSK/CPM_MC_F9.DSK rename to software/CPM/1M44/DSK/CPM_1M44_MC_F9.DSK diff --git a/software/CPM/1M44/RAW/CPM11_MAC80.RAW b/software/CPM/1M44/RAW/CPM00_1M44_MZ800.RAW similarity index 92% rename from software/CPM/1M44/RAW/CPM11_MAC80.RAW rename to software/CPM/1M44/RAW/CPM00_1M44_MZ800.RAW index f71dcf7..d027984 100644 Binary files a/software/CPM/1M44/RAW/CPM11_MAC80.RAW and b/software/CPM/1M44/RAW/CPM00_1M44_MZ800.RAW differ diff --git a/software/CPM/1M44/RAW/CPM00_1M44_SYSTEM.RAW b/software/CPM/1M44/RAW/CPM00_1M44_SYSTEM.RAW index b19faa6..351a801 100644 Binary files a/software/CPM/1M44/RAW/CPM00_1M44_SYSTEM.RAW and b/software/CPM/1M44/RAW/CPM00_1M44_SYSTEM.RAW differ diff --git a/software/CPM/1M44/RAW/CPM00_SYSTEM.RAW b/software/CPM/1M44/RAW/CPM00_SYSTEM.RAW deleted file mode 100644 index 351a801..0000000 Binary files a/software/CPM/1M44/RAW/CPM00_SYSTEM.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM01_1M44_TURBOP.RAW b/software/CPM/1M44/RAW/CPM01_1M44_TURBOP.RAW index 2ff7443..64a05ba 100644 Binary files a/software/CPM/1M44/RAW/CPM01_1M44_TURBOP.RAW and b/software/CPM/1M44/RAW/CPM01_1M44_TURBOP.RAW differ diff --git a/software/CPM/1M44/RAW/CPM01_TURBOP.RAW b/software/CPM/1M44/RAW/CPM01_TURBOP.RAW deleted file mode 100644 index 64a05ba..0000000 Binary files a/software/CPM/1M44/RAW/CPM01_TURBOP.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM02_1M44_HI_C.RAW b/software/CPM/1M44/RAW/CPM02_1M44_HI_C.RAW index aec0e5d..fb3690b 100644 Binary files a/software/CPM/1M44/RAW/CPM02_1M44_HI_C.RAW and b/software/CPM/1M44/RAW/CPM02_1M44_HI_C.RAW differ diff --git a/software/CPM/1M44/RAW/CPM02_HI_C.RAW b/software/CPM/1M44/RAW/CPM02_HI_C.RAW deleted file mode 100644 index fb3690b..0000000 Binary files a/software/CPM/1M44/RAW/CPM02_HI_C.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM03_FORTRAN80.RAW b/software/CPM/1M44/RAW/CPM03_FORTRAN80.RAW deleted file mode 100644 index b08d2d7..0000000 Binary files a/software/CPM/1M44/RAW/CPM03_FORTRAN80.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM04_1M44_MBASIC.RAW b/software/CPM/1M44/RAW/CPM04_1M44_MBASIC.RAW index 84c45c0..a455c80 100644 Binary files a/software/CPM/1M44/RAW/CPM04_1M44_MBASIC.RAW and b/software/CPM/1M44/RAW/CPM04_1M44_MBASIC.RAW differ diff --git a/software/CPM/1M44/RAW/CPM04_MBASIC.RAW b/software/CPM/1M44/RAW/CPM04_MBASIC.RAW deleted file mode 100644 index a455c80..0000000 Binary files a/software/CPM/1M44/RAW/CPM04_MBASIC.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM05_COBOL80_v13.RAW b/software/CPM/1M44/RAW/CPM05_COBOL80_v13.RAW deleted file mode 100644 index cdc6486..0000000 Binary files a/software/CPM/1M44/RAW/CPM05_COBOL80_v13.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM06_COBOL80_v20.RAW b/software/CPM/1M44/RAW/CPM06_COBOL80_v20.RAW deleted file mode 100644 index 0895231..0000000 Binary files a/software/CPM/1M44/RAW/CPM06_COBOL80_v20.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM07_1M44_COBOL80.RAW b/software/CPM/1M44/RAW/CPM07_1M44_COBOL80.RAW index 0c282ef..c1849ac 100644 Binary files a/software/CPM/1M44/RAW/CPM07_1M44_COBOL80.RAW and b/software/CPM/1M44/RAW/CPM07_1M44_COBOL80.RAW differ diff --git a/software/CPM/1M44/RAW/CPM07_COBOL80.RAW b/software/CPM/1M44/RAW/CPM07_COBOL80.RAW deleted file mode 100644 index c1849ac..0000000 Binary files a/software/CPM/1M44/RAW/CPM07_COBOL80.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM08_1M44_Z80FORTH.RAW b/software/CPM/1M44/RAW/CPM08_1M44_Z80FORTH.RAW index d6e8268..3f9c5b2 100644 Binary files a/software/CPM/1M44/RAW/CPM08_1M44_Z80FORTH.RAW and b/software/CPM/1M44/RAW/CPM08_1M44_Z80FORTH.RAW differ diff --git a/software/CPM/1M44/RAW/CPM08_Z80FORTH.RAW b/software/CPM/1M44/RAW/CPM08_Z80FORTH.RAW deleted file mode 100644 index 3f9c5b2..0000000 Binary files a/software/CPM/1M44/RAW/CPM08_Z80FORTH.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM09_1M44_CPMTEX.RAW b/software/CPM/1M44/RAW/CPM09_1M44_CPMTEX.RAW index 43f059a..7fd3428 100644 Binary files a/software/CPM/1M44/RAW/CPM09_1M44_CPMTEX.RAW and b/software/CPM/1M44/RAW/CPM09_1M44_CPMTEX.RAW differ diff --git a/software/CPM/1M44/RAW/CPM09_CPMTEX.RAW b/software/CPM/1M44/RAW/CPM09_CPMTEX.RAW deleted file mode 100644 index 7fd3428..0000000 Binary files a/software/CPM/1M44/RAW/CPM09_CPMTEX.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM10_DISKUTILFUNC5.RAW b/software/CPM/1M44/RAW/CPM10_DISKUTILFUNC5.RAW deleted file mode 100644 index 79a2859..0000000 Binary files a/software/CPM/1M44/RAW/CPM10_DISKUTILFUNC5.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM12_PASCALMTP_v561.RAW b/software/CPM/1M44/RAW/CPM12_PASCALMTP_v561.RAW deleted file mode 100644 index feed287..0000000 Binary files a/software/CPM/1M44/RAW/CPM12_PASCALMTP_v561.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM13_1M44_MTPUG_01.RAW b/software/CPM/1M44/RAW/CPM13_1M44_MTPUG_01.RAW index 8560016..c890df2 100644 Binary files a/software/CPM/1M44/RAW/CPM13_1M44_MTPUG_01.RAW and b/software/CPM/1M44/RAW/CPM13_1M44_MTPUG_01.RAW differ diff --git a/software/CPM/1M44/RAW/CPM13_MTPUG_01.RAW b/software/CPM/1M44/RAW/CPM13_MTPUG_01.RAW deleted file mode 100644 index c890df2..0000000 Binary files a/software/CPM/1M44/RAW/CPM13_MTPUG_01.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM14_MTPUG_02.RAW b/software/CPM/1M44/RAW/CPM14_MTPUG_02.RAW deleted file mode 100644 index f9b5f51..0000000 Binary files a/software/CPM/1M44/RAW/CPM14_MTPUG_02.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM15_1M44_MTPUG_03.RAW b/software/CPM/1M44/RAW/CPM15_1M44_MTPUG_03.RAW index 9a2fab1..5611626 100644 Binary files a/software/CPM/1M44/RAW/CPM15_1M44_MTPUG_03.RAW and b/software/CPM/1M44/RAW/CPM15_1M44_MTPUG_03.RAW differ diff --git a/software/CPM/1M44/RAW/CPM15_MTPUG_03.RAW b/software/CPM/1M44/RAW/CPM15_MTPUG_03.RAW deleted file mode 100644 index 5611626..0000000 Binary files a/software/CPM/1M44/RAW/CPM15_MTPUG_03.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM16_1M44_MTPUG_04.RAW b/software/CPM/1M44/RAW/CPM16_1M44_MTPUG_04.RAW index 9ce4a90..973f0f5 100644 Binary files a/software/CPM/1M44/RAW/CPM16_1M44_MTPUG_04.RAW and b/software/CPM/1M44/RAW/CPM16_1M44_MTPUG_04.RAW differ diff --git a/software/CPM/1M44/RAW/CPM16_MTPUG_04.RAW b/software/CPM/1M44/RAW/CPM16_MTPUG_04.RAW deleted file mode 100644 index 973f0f5..0000000 Binary files a/software/CPM/1M44/RAW/CPM16_MTPUG_04.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM17_MTPUG_05.RAW b/software/CPM/1M44/RAW/CPM17_MTPUG_05.RAW deleted file mode 100644 index 41a32fa..0000000 Binary files a/software/CPM/1M44/RAW/CPM17_MTPUG_05.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM18_1M44_MTPUG_06.RAW b/software/CPM/1M44/RAW/CPM18_1M44_MTPUG_06.RAW index 2fc6766..acab7bb 100644 Binary files a/software/CPM/1M44/RAW/CPM18_1M44_MTPUG_06.RAW and b/software/CPM/1M44/RAW/CPM18_1M44_MTPUG_06.RAW differ diff --git a/software/CPM/1M44/RAW/CPM18_MTPUG_06.RAW b/software/CPM/1M44/RAW/CPM18_MTPUG_06.RAW deleted file mode 100644 index acab7bb..0000000 Binary files a/software/CPM/1M44/RAW/CPM18_MTPUG_06.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM19_1M44_MTPUG_07.RAW b/software/CPM/1M44/RAW/CPM19_1M44_MTPUG_07.RAW index 9729aab..07190c5 100644 Binary files a/software/CPM/1M44/RAW/CPM19_1M44_MTPUG_07.RAW and b/software/CPM/1M44/RAW/CPM19_1M44_MTPUG_07.RAW differ diff --git a/software/CPM/1M44/RAW/CPM19_MTPUG_07.RAW b/software/CPM/1M44/RAW/CPM19_MTPUG_07.RAW deleted file mode 100644 index 07190c5..0000000 Binary files a/software/CPM/1M44/RAW/CPM19_MTPUG_07.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM20_1M44_MTPUG_08.RAW b/software/CPM/1M44/RAW/CPM20_1M44_MTPUG_08.RAW index 8af938d..9aeba7a 100644 Binary files a/software/CPM/1M44/RAW/CPM20_1M44_MTPUG_08.RAW and b/software/CPM/1M44/RAW/CPM20_1M44_MTPUG_08.RAW differ diff --git a/software/CPM/1M44/RAW/CPM20_MTPUG_08.RAW b/software/CPM/1M44/RAW/CPM20_MTPUG_08.RAW deleted file mode 100644 index 9aeba7a..0000000 Binary files a/software/CPM/1M44/RAW/CPM20_MTPUG_08.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM21_1M44_MTPUG_09.RAW b/software/CPM/1M44/RAW/CPM21_1M44_MTPUG_09.RAW index b4640dd..6800c9d 100644 Binary files a/software/CPM/1M44/RAW/CPM21_1M44_MTPUG_09.RAW and b/software/CPM/1M44/RAW/CPM21_1M44_MTPUG_09.RAW differ diff --git a/software/CPM/1M44/RAW/CPM21_MTPUG_09.RAW b/software/CPM/1M44/RAW/CPM21_MTPUG_09.RAW deleted file mode 100644 index 6800c9d..0000000 Binary files a/software/CPM/1M44/RAW/CPM21_MTPUG_09.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM22_MTPUG_10.RAW b/software/CPM/1M44/RAW/CPM22_MTPUG_10.RAW deleted file mode 100644 index 3bb4654..0000000 Binary files a/software/CPM/1M44/RAW/CPM22_MTPUG_10.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM23_1M44_PLI.RAW b/software/CPM/1M44/RAW/CPM23_1M44_PLI.RAW index b6f6088..774cd0f 100644 Binary files a/software/CPM/1M44/RAW/CPM23_1M44_PLI.RAW and b/software/CPM/1M44/RAW/CPM23_1M44_PLI.RAW differ diff --git a/software/CPM/1M44/RAW/CPM23_PLI.RAW b/software/CPM/1M44/RAW/CPM23_PLI.RAW deleted file mode 100644 index 774cd0f..0000000 Binary files a/software/CPM/1M44/RAW/CPM23_PLI.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM24_1M44_PLI80_v13.RAW b/software/CPM/1M44/RAW/CPM24_1M44_PLI80_v13.RAW index 0be5c41..0f21b2a 100644 Binary files a/software/CPM/1M44/RAW/CPM24_1M44_PLI80_v13.RAW and b/software/CPM/1M44/RAW/CPM24_1M44_PLI80_v13.RAW differ diff --git a/software/CPM/1M44/RAW/CPM24_PLI80_v13.RAW b/software/CPM/1M44/RAW/CPM24_PLI80_v13.RAW deleted file mode 100644 index 0f21b2a..0000000 Binary files a/software/CPM/1M44/RAW/CPM24_PLI80_v13.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM25_1M44_PLI80_v14.RAW b/software/CPM/1M44/RAW/CPM25_1M44_PLI80_v14.RAW index 5954229..92ddf31 100644 Binary files a/software/CPM/1M44/RAW/CPM25_1M44_PLI80_v14.RAW and b/software/CPM/1M44/RAW/CPM25_1M44_PLI80_v14.RAW differ diff --git a/software/CPM/1M44/RAW/CPM25_PLI80_v14.RAW b/software/CPM/1M44/RAW/CPM25_PLI80_v14.RAW deleted file mode 100644 index 92ddf31..0000000 Binary files a/software/CPM/1M44/RAW/CPM25_PLI80_v14.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM26_1M44_TPASCAL_v300a.RAW b/software/CPM/1M44/RAW/CPM26_1M44_TPASCAL_v300a.RAW index e8ab96a..8547a77 100644 Binary files a/software/CPM/1M44/RAW/CPM26_1M44_TPASCAL_v300a.RAW and b/software/CPM/1M44/RAW/CPM26_1M44_TPASCAL_v300a.RAW differ diff --git a/software/CPM/1M44/RAW/CPM26_TPASCAL_v300a.RAW b/software/CPM/1M44/RAW/CPM26_TPASCAL_v300a.RAW deleted file mode 100644 index 8547a77..0000000 Binary files a/software/CPM/1M44/RAW/CPM26_TPASCAL_v300a.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM27_1M44_WORDSTAR_v30.RAW b/software/CPM/1M44/RAW/CPM27_1M44_WORDSTAR_v30.RAW index c079b07..30358b4 100644 Binary files a/software/CPM/1M44/RAW/CPM27_1M44_WORDSTAR_v30.RAW and b/software/CPM/1M44/RAW/CPM27_1M44_WORDSTAR_v30.RAW differ diff --git a/software/CPM/1M44/RAW/CPM27_WORDSTAR_v30.RAW b/software/CPM/1M44/RAW/CPM27_WORDSTAR_v30.RAW deleted file mode 100644 index 30358b4..0000000 Binary files a/software/CPM/1M44/RAW/CPM27_WORDSTAR_v30.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM28_PLM80.RAW b/software/CPM/1M44/RAW/CPM28_PLM80.RAW deleted file mode 100644 index b8e9d93..0000000 Binary files a/software/CPM/1M44/RAW/CPM28_PLM80.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM29_1M44_ZSID_v14.RAW b/software/CPM/1M44/RAW/CPM29_1M44_ZSID_v14.RAW index 4314e2d..149d90e 100644 Binary files a/software/CPM/1M44/RAW/CPM29_1M44_ZSID_v14.RAW and b/software/CPM/1M44/RAW/CPM29_1M44_ZSID_v14.RAW differ diff --git a/software/CPM/1M44/RAW/CPM29_ZSID_v14.RAW b/software/CPM/1M44/RAW/CPM29_ZSID_v14.RAW deleted file mode 100644 index 149d90e..0000000 Binary files a/software/CPM/1M44/RAW/CPM29_ZSID_v14.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM30_1M44_WORDSTAR_v400.RAW b/software/CPM/1M44/RAW/CPM30_1M44_WORDSTAR_v400.RAW index 1235616..615d1be 100644 Binary files a/software/CPM/1M44/RAW/CPM30_1M44_WORDSTAR_v400.RAW and b/software/CPM/1M44/RAW/CPM30_1M44_WORDSTAR_v400.RAW differ diff --git a/software/CPM/1M44/RAW/CPM30_WORDSTAR_v400.RAW b/software/CPM/1M44/RAW/CPM30_WORDSTAR_v400.RAW deleted file mode 100644 index 615d1be..0000000 Binary files a/software/CPM/1M44/RAW/CPM30_WORDSTAR_v400.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM31_1M44_WORDSTAR_v330.RAW b/software/CPM/1M44/RAW/CPM31_1M44_WORDSTAR_v330.RAW index 1516744..182604f 100644 Binary files a/software/CPM/1M44/RAW/CPM31_1M44_WORDSTAR_v330.RAW and b/software/CPM/1M44/RAW/CPM31_1M44_WORDSTAR_v330.RAW differ diff --git a/software/CPM/1M44/RAW/CPM31_WORDSTAR_v330.RAW b/software/CPM/1M44/RAW/CPM31_WORDSTAR_v330.RAW deleted file mode 100644 index 182604f..0000000 Binary files a/software/CPM/1M44/RAW/CPM31_WORDSTAR_v330.RAW and /dev/null differ diff --git a/software/CPM/1M44/RAW/CPM_MC_5.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_5.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_5.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_5.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C0.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C0.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C0.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C0.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C1.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C1.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C1.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C1.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C2.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C2.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C2.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C2.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C3.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C3.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C3.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C3.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C4.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C4.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C4.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C4.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C5.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C5.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C5.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C5.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C6.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C6.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C6.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C6.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C7.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C7.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C7.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C7.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C8.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C8.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C8.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C8.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_C9.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_C9.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_C9.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_C9.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D0.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D0.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D0.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D0.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D1.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D1.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D1.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D1.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D2.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D2.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D2.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D2.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D3.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D3.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D3.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D3.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D4.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D4.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D4.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D4.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D5.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D5.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D5.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D5.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D6.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D6.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D6.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D6.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D7.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D7.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D7.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D7.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D8.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D8.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D8.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D8.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_D9.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_D9.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_D9.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_D9.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E0.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E0.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E0.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E0.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E1.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E1.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E1.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E1.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E2.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E2.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E2.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E2.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E3.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E3.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E3.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E3.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E4.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E4.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E4.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E4.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E5.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E5.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E5.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E5.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E6.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E6.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E6.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E6.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E7.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E7.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E7.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E7.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E8.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E8.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E8.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E8.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_E9.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_E9.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_E9.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_E9.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F0.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F0.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F0.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F0.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F1.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F1.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F1.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F1.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F2.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F2.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F2.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F2.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F3.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F3.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F3.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F3.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F4.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F4.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F4.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F4.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F5.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F5.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F5.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F5.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F6.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F6.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F6.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F6.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F7.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F7.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F7.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F7.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F8.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F8.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F8.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F8.RAW diff --git a/software/CPM/1M44/RAW/CPM_MC_F9.RAW b/software/CPM/1M44/RAW/CPM_1M44_MC_F9.RAW similarity index 100% rename from software/CPM/1M44/RAW/CPM_MC_F9.RAW rename to software/CPM/1M44/RAW/CPM_1M44_MC_F9.RAW diff --git a/software/CPM/CPM/DISK_720K_0.DSK b/software/CPM/CPM/DISK_720K_0.DSK deleted file mode 100644 index 8d32d99..0000000 Binary files a/software/CPM/CPM/DISK_720K_0.DSK and /dev/null differ diff --git a/software/CPM/CPM/DISK_720K_0.RAW b/software/CPM/CPM/DISK_720K_0.RAW deleted file mode 100644 index 4609521..0000000 --- a/software/CPM/CPM/DISK_720K_0.RAW +++ /dev/null @@ -1,3207 +0,0 @@ -ееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееееASCIART BASASM COM@AUTOEXECSUBAUTOEXECTXTLD COM DDT COM& - DUMP COM ED COM4 GENHEX COMGPELED BASGPIO BAS -HELLO ASMG HELLO COMLOAD COMMAC COMЂMBASIC COMЂ !"#$%&'MBASIC COM@()*+MBASIC85COMЂ,-./0123MBASIC85COM>4567PEG COM989:;PIP COM<<=>?RTC BASq@STARTREKBASЂABCDEFGHSTARTREKBAS8"IJKSTAT COM*LMNSUBMIT COM -OTREKINSTBAS67PQRSUSERLED BAS TXMODEM CFGw4 THEN GOTO 200 -120 NEXT I -130 PRINT " "; -140 GOTO 210 -200 IF I>9 THEN I=I+7 -205 PRINT CHR$(48+I); -210 NEXT X -220 PRINT -230 NEXT Y -1*"НГ COPYRIGHT(C) 1978, DIGITAL RESEARCH р р Га ГЎ ГК Г4ГЄГЮГј ГГ/ГLГ9ASMPRNHEX!4ѕИw_НЙ#~ю Кё ЮAЙ:4Й~НЮ~#ю Вј > -НЮЙ\ ю?К» w#ВТ Й! Нј Г? НюяА!№Нј ГНюяА!)Нј ГГНюяА!РНј Г:5НЎ Й:6юИюЙ:6НЎ Й:7НЎ Й:\ю К» Н24!dН® 25Н® 27Н® 26!8НН Н( Кѓ !YееНН Н1 СН СН :7юКћ !zееНН Н8 СН СН Г!"›Ї2D2X2#Н! 8Нй Й!гНј ГzјА{ЅЙЕХе*›НД ВН! !"›!ќЕе8НбБ·ЂВ ЂЂw# Вю Вз ГюТ+6# Вќ*›е#"›б~бСБЙ!ъНј ГЕG:6юКQюxВJНЮГQХеНSбСБЙ*ќл!џwл#"ќл!НД АН1 !"ќ!џY~юИЕХЂЂ~# В…СХеНбСБ·ВЎИГz!Нј ГwЕХеНґбСБЙ*џ л!Ў wл#"џ л!НД АН8 !"џ !Ў zГzЕХе_НбСБЙOН4: ю И:6юИyНЮЙ:„! ·КG~Нл#x=Г2„> Нл> -Нл! >x6 #=В'ЙG! ~ю АpЙН( КO*ќ}ґКO>Н4Г?:7юКw:#·Дё*Р"!Нё*џ }ґКw>НЄГgН( К†Н1 YНъ :7юК—Н8 zНъ !<Нј ГCP/M ASSEMBLER - VER 2.0 NO SOURCE FILE PRESENT NO DIRECTORY SPACE SOURCE FILE NAME ERROR SOURCE FILE READ ERROR OUTPUT FILE WRITE ERROR CANNOT CLOSE FILES END OF ASSEMBLY ЕG:7юxКХх!#~·К„юЪlНёГ„*Рл*!O {ЅВЃzјКЉНё*Р"!!#^4!$сwСБЙхжНЇсхжНЇс‚WЙЖђ'О@'ГЄ>:НЄ!#^ЇWw*!{Нљ|Нљ}НљЇНљ{·Ки!$~#НљВЯЇ’Нљ> НЄ> -НЄЙГ@Г2ГАНхю К0ю -К0:„юxТ0_<2„! сwЙсЙНI2 -2„> -2 Н>2„ЙЇ2€2 Й!€~ю@Ъ_6Н^4#: -wЙ~ю$АЇwЙ: -Ц0ю -жЙНqА: -ЦAюжЙ: -ЦAюжЙН‹АНqЙ: -юaШю{Рж_2 -ЙН 2 -Г-Йю ИюИю!ЙЇ2…НI: -ю Кфю;Кбю*Вн: ю -ВнН­Н·КъГбц ю ВъН­ГЗН‹К>Г9НqК>Г9: -ю'В!Ї2 ->Г9ю -В7:П·Д! 6 >2„>2…: -2 ·ДQН­:…юИюДћ! -:…юВlНjК<Н–ИГ<юВНjК<Н|В<: -юOКЉюQВЏ>Г–юHВ >2 Ї2 -Г»: юBВ­>ГґюD> -Вё!€52 !"†!€N#~#юAТТЦ0ГФЦ7еЕO! ѕФ~*†л!·КчТсл)лГи "†Бб ВЖЙ: -ю Кю'В<Н­ю'АГ<х>VГ$х>OГ$ЕеНбБсЙх:…юДћсЙГ Г\ГћГГлГ`ГrГЌГ–![ЂЇw#w#Вb!"ЦЙ!€FЇ#†Вvж2[ЙG*Ц##~жр°wЙ*Ц##~ж<Й*Ц}ґЙНq!€~юЪ¬6![^![^#fk"ЦНИНЋ!€ѕВбG#л*Ц###ѕВб#ВХЙ*Ц^#VлГ»!€^*Л"Цл*Н{•zњлТA"Л*Цл![N![ N#Fr+sлq#p€юЪ/>G=#w#wВ3Ї#w#wЙ!JНГSYMBOL TABLE OVERFLOW жрG*Ц##~ж°wЙ*Ц##~жЙНЋ*Ц_###ЙеНСs#rЙН^#VлЙГ`ГѓГДФж‚®Ѕ 4 ЅЭпWm ()*+,-/ABCDEHLMDBDIDSDWEIIFINORSPACIADCADDADIANAANDANICMACMCCMPCPIDAADADDCRDCXENDEQUHLTINRINXJMPLDALXIMODMOVMVINOPNOTORAORGORIOUTPOPPSWRALRARRETRLCRRCRSTSBBSBISETSHLSHRSTASTCSUBSUIXORXRAXRICALLENDMLDAXLHLDPCHLPUSHSHLDSPHLSTAXXCHGXTHLENDIFMACROTITLE -  PF -FPуы!Ы -(О€ЂЖ  2ж/?ёю'  vГ:P@<° -ц!УБЙ ЗЮ PP27ђЦ (ЁоН -*йЕ"щлг  NZZ NCC POPEP M яЇxЃ»КД_еХЕеBH!ВњС‰ѕ#В¶ В¦БСб{ЙБСбЪАKГ€CГ€Ї<Й:‰ВюJИДюCИАюRЙ:€юТ юКтюВ !‹6 s!ЉѕВ#ѕИ Вш ЙЇ<Й:€O=_ХюТZ!µF!©V#fjQНѓВEС!є^#Vo&)~#FЙСНЗАЕНЫxБА·°GyїЙСЇ<ЙГ ГГnГ8л!’~юЪўН…6~44O!Ѓ s#rЙх!‘~ю -Ъї6Н…^4с!mw!wpЙ!’~·ВЮН…!Й55N!Ѓ N#fiЙНПлНПЙo&)^#fkй‰’™џ«їЖРЩамш…Нмz·В'{юШН…>ЙЇ•o>њgЙНмл"k!m6ЕЇ{_zW5бИ>О)D…*k•OxњGЕТd г!m?ГFDM!ЇxGyOЪ‚°ИГѓл)лГsНмНnГН5лГН5ГН·К)=ГўН·КхЇ|g}oс=Г®НмГНмлН-ГВНПН-ГНП#ГУНмz¤g{ҐoГНмzґg{µoГНмz¬g{­oГ“:…юА:‰ю Ию;Ию,Ию!ЙЇ2‘2’=2l!"ЙНВ]!‘~·КH5_!m~НфГ0:’юД…: ю А*Ѓ"ЙЙ: ю В:…юВ‰:€·М…юФ…!‰^#=К…VлГqюВ”*†ГqН¦В1юТ&ю O:lВµ·М…>я2lyГ·ВЕ:‘·КЮ_!w~ёЪЮ!‘s!m~НфБГ№Бyю В!‘~·Кь=w_!m~ю КяН…ЇГН°>я2lГyюКюВPННLГnНRж>UМНX:l·М…Ї2lН“НГ*е>EНбЙЇ2ПНCНН!"л "Р"Т"н Н:…юКјюВЭ:‰ю*В1Н В|ГRюВ|Н¦К0НFНIВюНL:П·ДЧ Г НRюВ Нг ГR*л }ґДЭ *Ц"л Н:…юВї:‰ю:ВїГјюВЧX!C^#fkй[©АЮ@‡Ќ§ОН - Н:…юВЊ:€=КЊG!‰К†ЕF#еНH бБГvНГ›Нc*Й|·ДС EНH НщНєю,К^Г1Н - Н¦ НСл*Т"Т"РГ1Н - НСеEНH бDНH НщНєю,КГГ1Н - Н¦ : ю В1НС: ю Въ"н > 2 Н:…юВ|:‰ю -В|Г‹ГСНг ГСН К|*ТеНС"ТН - Н© !6=б"ТГ1Н - НС: ю В1}Ъ1Н:…юВn:‰ю>BМК‹ГSюВSН¦ВSюВSxюВSГСНг Г1НС: ю В1"Т"РН - Н¦ Г1Н К|НRюДЭ >НOНСеН бНU!"л Г1Нг НГ1Цю!Т|_!л^#fkй $8AP`ixЃ€ЏћҐНH НГ±НьННГ±НьГ±Нтю8К1жДЅ yж0°Г®НH НГ±Нт°GННз°Г®Нт°НG НН Г±НH Н Г±Нтж(ДЅ yж°Г®НH НГ±Нз°Г®Нт°Г®НтжДЅ yж0°Г®Нт°Г®НH Н Г±НG Н - НщГ1:…юДС :‰ю,Ию;Ию ДС ЙЕННc*ЙБЙНС|·ДЗ }ЙНЭюФЗ жЙНзж8OЙНтжДЅ yж0°ГG НЭГG НСГt хЕ:…юВ):‰ю,К.>CНБсЙН - :…юВ|:‰ю ВJНГјю;ВrН - Н:…юВR:‰ю -КјюК‹ю!КјГRю!КјюК‹>SНГR{•ozњgЙ!П~4·К§НН¦ !6 ! Н*Лл*ФН„е*Нл*ФН„\бНiлН© !Ц·Кдw#ГЛH USE FACTOR !Н*н "РГzјА{ЅЙ*Р"ТЙ*л "ЦНIЙН И!"л :П·В1 НRхжДЭ сцНO*ТНUЙНRжМЧ НXл*ТНуДЧ ЙG:П·xКl ЕН: ю *ТМ© :п юБТl xН– *Р#"РЙеEНH бDГH Ж0ю:ШЖЙН~ !п ^4! wЙхжН† сжГ† *Тл!п е6zХН– С{Н– б4ЙхЕ>RНБсЙхе>VНбсЙх>DГж х>PГж х>LГж х>NНсЙtype autoexec.txt -mbasic userled -************************************************************************ - -This is an example to show how the Autoexec feature works. -When you activate it from the "boot mode or system parameters" IOS menu -all the CP/M commands inside the file A:AUTOEXEC.SUB will be executed -when (after) there is a CP/M cold boot. -The A:AUTOEXEC.SUB commands file is not executed after a CP/M warm -boot (Ctrl+C). -To change the commands executed after a CP/M cold boot edit the file -A:AUTOEXEC.SUB using the ED editor. - -************************************************************************!9""1":m2$—2%2Щ Н"(}·Кaя Н2%:)·Кa/ Н:%ю -ЪO>1Нь:%Ц -Ж0НьC Н>2Щ!\~·ВrН<2\Ж@2ї!]~ю В‰ 6?#В‚>?2h:\=_Н—2\:(·КИН##~2П#~2Р##^#Vл"Сл#^#Vл"УГз*.;^Х#~2П#~2Р#^л"Сб"У#)+"Ъ"Ьл*{•zњТ«\Н<ВS:)·В«НЄNO FILE$File not found.$Directory for user $: -$\Н<Кї=懇‡‡‡!Ѓ…Ж o:$юSКp~жЂВG}Ц -o:%ѕВG#л*Ь жw#В‚w#"Ьл*Ю#"Ю! л*{•zњЪGНЄOut of memory. -$*Ю}ґК -е*Ъл!+ s#r#л лг+}ґгВТб*Ю"а+}ґКZ*а·|g}oґКZ}цo"Н#"Зл*Н{•ozњg"Йл*Н"Л> НЋтE*Йл*ЛНy*Йл*Н{•ozњgъEµКEГ*ал*З#{•zњт*НГс!+"Ь!"Х"Ч*Ю+}ґКќЕ Н·КЃГВ*Ь> НbБВќ##"Ь*Ю+"ЮГkй*Ь^#V#"ЬлН > НьН ^#~л))))л!Р†жo&:Рж/Ґoл*Х"Х*Ч#"ЧлН ->kНь*Ю+}ґКP"Ю хДтсМГk—2*ьН&њяН&цяН&>0…Гь0еТ2сГ(бxю0ВJ:*·>0Вь:г·ИГъ2*ГьЇ2гНї Н*ХН -М Н*ЧН -Т ННл*С#ХЪ‘W+}ґКўzВЊСГ€i`:ПЦК±)=В¬Н -Я НГВ : Total of $k in $ files with $k space remaining.$Нъ>:Нь> ЕХе_НбСБЙ~Нь#В Й*. НњжЙ:Щ<юЪ3C НН—2Щ> Нь> -НьЙ -(Strike any key to continue)$е^#V#N#Fл_ -ѕ#ВwВlбЙ)) л) Nлq#NлqЙ)) л) лN#Fл^#Vл_ -ѕ#АВ ЙС ННї НЇ2гГ{*"щЙяЂјГ=COPYRIGHT (C) 1980, DIGITAL RESEARCH DDT VERS 2.2$1ЕЕ0 НБ!~=ђWХ!x±Кe ~#ГXСБеbx±К‡ {жВzг~#гo}oТѓ„ГiС.йН2_Й!fp+q*eлН2_ЙН2_Й!hp+q*gлНЙ!jp+q*iлНЙ!lp+q*kлНЙ!np+q*mлН2_Й!pp+q*oлГѓГOГ$*sлНхyНЏсЙю Ию Ию,Ию ИюК$Й Н -НЙНЊю КНК9!z6 # ВL!zwНЊНКj# КГX:zю ЙЦ0ю -ШЖщюШГН=ВлN#FyЙН}ВЙж8Йж0Йл*zл{ѕВЇ#zѕИ+++ ВҐ ЙХzѕВК#ВЅСЙ#ВКшяС В· ЙЕН9К!`Н В yБЙЕН9К!rН·В yБЙНсюКЙНсюКюА=Й!z{w# В%ю Вw!PН В yН“ЙНхН}сцАЙ*w#"ЙНЊю К@ю.К@Н<К!¦EН·В~ГP -!ОН·В’НPНЊГQ!жН·ВЄНPН}НQxГQ!кН·ВЖНЫН“G@НЫ±°ГQ! -Н·ВЬ yН“GЂГѕ!Н·Вф НЫН“±ГQ!Н·ВНЫН“цНQНЊГQ!.Н·В6yюЪ#ЖGНН™°НQжПюАГ !2Н·ВQНЊюТН“цЗГQ!>Н·Вq ВeБГgЕНН™±ГQ:zюJВЃНEцГ‹юCВ–НEцНQyНQxГQюRВНцАГQ*Хл* {•zњТ·*щЙС~#" Й<жюЪИЖюЪПЖЖAOГGжрЖђ'О@'OНxжЖђ'О@'OГNН#Вх Гzж8ЙН‡O!B NН#NН НГНжюВѕSНPГН.* |НХ}НХ ННЙ!9":·Кq!яя"<Вq<2* Г—НћВ@!~·Кѓ5К@* НЎН. ННН;НЈW!EѕКэ# ВЎ -ѕКй# В¬ѕКО# В·жАю@КґюЂКҐzжЗЦК–=Кђ=К|zжАКJzжК?ЦК4ЦК)ЦКzжВ zжO=!9 НуНюВџ!6НуГq!2НуННХГqCНН -ГЩJНН -ГЩRНН -Гq!zжК zж=КnюЪaЦ‡‡O НуН$ГqНуН$,НГЩ!НуННѕ,НГф!Г™!НуННѕГqzж8O!о НуГЕ!кНуННѕ,НzжНѕГqy‡‡O!О НуНЈхНЈWс_Н•Гqy‡‡O!¦ НуНЈН’Гqy‡‡O!b НуГq!vНуzН’ГqН.?Н*щ!9"Н8"Н‰НZ*" Г+*щЙ'/7?vЙгйлущыЖОУЦЫЮжоцю"*2:ГНEI SPHLDI XCHGPCHLXTHLRET HLT CMC STC CMA DAA RAR RAL RRC RLC NOP CPI ORI XRI ANI SBI IN SUI OUT ACI ADI CALLJMP LDA STA LHLDSHLDMOV ADD ADC SUB SBB ANA XRA ORA CMP INR DCR MVI LXI STAXINX DAD LDAXDCX RST PSW POP PUSHNZZ NCC POPEP M B C D E H L M A B D H SP PSW ??= M!EГўГЄГП Г¶ ГЭ ГЗ Г Г- Гђ Гf Г Йг"JгГ*"Ё!ў"!"Ї2O!" "]"‡"№!1·е!е++"·ее"M>Г28!†"9:]ю Кю!еГ­ 1ЇН“ Ъ !Ђ"Н >-НЗ Н¶ НЭ ю КюЦAЪ« юТ« _!7^#Vлй~« « Ж« \pЪ « « —Z « « « « њ z -Г -ї -« « з -« « еХЕЇ2[\НўБСбЙН“ Т« Нђ =В« Нf " Н ГюН“ Т« Нђ К»Нf " =К»Нf "=В« ЇГЅ> 2НГюНђ КеНf ЪХ"]ж=КеНf =В« Гр*]}жрoї"_Н Н Вю*]"aН. НЕ ~Н #НE Ъ}жВ"]*aлНЕ Н6 *]}“В#|’В#*]НE ЪюГуНђ юВ« Нf еНf еНf СБЙ{‘zЙНA|·В« НWЪю}ГdН Нђ Нf еНf еНf DMСбуКЎЪЏ"№ж=КЎНІ=КЎYPНІ1ЇСБсбщ*№е*·ыЙхЕ!O~4·КН#~#F#»ВНxєВН~#s#r#w>яБсЙНђ юВ« Нf еНf СеН Н. НЕ бЇ•o>њgН. ГюЇ2|2\НЭ  !]w# К« НЭ ю.К& ю В К0 6 #Г& ю.ВK !eНЭ ю КK w# К« Г: КU 6 #ГK 6ГюНAНWЪю -w#Г] !e~жюHА#~жюEА#~жюXЙл*‡}“|љлЙНЃ Р"‡Йе!НЃ бЙНђ !К¬ =В« Нf еНkюяК« Нj Кб бе\Нўб·ВF -ЂЂw# ВУ Н‹ ГА Нt юК« Ю:Вб WбеН& -_Н& -хН& -БO {·В -`i"№ГF -Н& -Н& -w#В -Н& -хН‹ сВ« Гб ЕеХНt НY жрхНt НY Б°GС‚WxбБЙ Нў!o -~·КZ -НЗ #ГN -Н *‡Н. НЕ *№Н. Гю -NEXT PCНђ =В« Нf Н еН. НЕ б~еН НЕ Н¶ НЭ бю К» -ю.КюеН“ =В« Нf |·В« }бw#Г„ -ЇГЕ ->я2LНђ !КЮ -=В« Нf }ґК« +"MНD Г…НЭ ю Вх -НD Гю !і ѕК # Вы -Г« НЭ ю В« ЕН Н НЕ Н¶ Нђ ·Кю=В« Нf БxюТY |·В« }юТ« Нг gA>юНS ¤Ag}НS ґГюИГS Вi |·В« }!ґwГюеН Сs#rГюеХЕ:[жК” _!Ђ~юК¦ ![4·Г§ \Нў·В¦ 2[Г 7БСбЙН >?НЗ Гю -eНў!g"cЙ> еХЕ_НўБСбЙюИюaШж_Йе!f~·> Кф 5*c~#"cНФ бЙю -Т Ж0ГЗ Ж7ГЗ хжНц сжГц > НЗ > -ГЗ ЕХе НўжбСБЙл|Н }Г юТ@ ю ТЗ >.ГЗ л*_}“o|љлЙю Ию,Ию ЙЦ0ю -ШЖщюШГ« л^#V#лЙл!НY ))))µoНЭ НP Вq лЙs#r#е!V4бЙНЭ !V6#ю КХ ю,В® >Ђ2VГ± Нm Н… ю КХ НЭ Нm Н… ю КХ НЭ Нm Н… ю В« VюЃК« ·Йе!Г XN!і~лбЙНг Кю Гц жЙЦ!ѕ _^я!»ЙН ^#VлЙ~НЗ xюТ+ Ну Нц Йх>=НЗ сВ= !ґ~Н ЙН Н. Й!і Н ЕеН бБ#xю Тf юЪL НЕ ГL НЕ Н…хХЕН“ Т† *№" !6яНГЇ +"_*№~Н #НE ЪЇ хНЕ сіК« ^#VлН. ГЇ ~Н БСсЙCZMEIABDHSPцфьъю!"MЙу"·б+"№х!9с1·ехЕХ*№~юяхе!O~6·К=G#^#V#~xГу бсК(#"№л!ЁN#FНWЪ(НИ *Jл>‚·7Г…ы*M|µКN+"MН ВN:L·ВHН…Г…НD Г…НИ >*НЗ *№Н“ Тb" Н. *·"]Гю !/~ #ѕ#КЃВtZЙ*№F#еНn!Is!њ^#Vлйёаёаѕт&&##&НОВ)НЩГ):Ё»А:©єЙБб^#V#еЕГД*µ^#VЙНОКнБЕ>Г+СХГ)xюяВьЇГ-ж8_Г)*·лНДВ)ГѕГ)СХГ)НЩБЕ>Г+СХСХ><7бЙяГЗВяНЗДяЙЗЗяйЗЗЖПз"ЗАчУН9Н.НюВYЙГЫЙЏНЇ Й* MН^ћбНэ2¶бЕUН -:бж2б:вж2вўНкШНіШНг:_юяВіҐНЇ !ш6! ђ@!’!BH @@A‚BH B! "€BHI$$’BI$BI „$„’ ’HI ‚D$ђђ„‘Hђђ„„D$$ H „ B’!$D$€"$’B$ђ’DA!ABђ’I$„ђ’H B$ђ’I $’H’I$‘ЃH$‰! $’I $’I$„$Ѓ’’A !AЄЄЄЄЄЄ @’$’I$‰"!$’H$I$’I ’"! $ђ‘A$€Ђ’ ђ H„Hђђ„AA"I @BB‘ „$ђ„’A"$ђ$$I$’’$H!!! ‰’BH" !I B  ђ€€$$ђЃђ!BD!Ђ $!ђ’BI D@‰"Ђ!$ђI$$H‰Ѓ"!Ѓ€‚I‰$I$„’I$Ѓ€UUU$’ђ$A$ђђ !9"1WНБюяВуНњГQ>Ђ2!еНўбЪQG}жВDНrНYЪQ|НЏ}НЏ#> НexНЏГ#Нr*щЙеХЕ НБСбЙеХЕ_НБСбЙ> Нe> -НeЙжю -Т‰Ж0Г‹Ж7НeЙхН}сН}Й НЙ:юЂВіНО·Кі7Й_<2!Ђ~·ЙЇ2|\НЙеХЕ\НБСбЙFILE DUMP VERSION 1.4$ -NO INPUT FILE PRESENT ON DISK$к!хЕХеYНбСБсЙю Ию Ию,Ию ИюК<Й Н -НЙН ю К*Н$КA!‹6 # ВT!‹wН Н$Кr# К*Г`:‹ю ЙЦ0ю -ШЖщюШГ*НAК*!‹ ~ю К°Нxkb))))_лyюВ‘BK{ЙН…В*Й!6Г6Г!"Йж8Йж0Йл*‹л{ѕВз#zѕИ+++ ВЭ ЙХ‹ѕВ#ВхГА COPYRIGHT (C) 1979, DIGITAL RESEARCH DISK OR DIRECTORY FULL$FILE EXISTS, ERASE IT$NEW FILE$** FILE IS READ/ONLY **$"SYSTEM" FILE NOT ACCESSIBLE$BAK$$$BAK$$$-(Y/N)?$NO MEMORY$BREAK "$" AT $1mMНт"m -НЧ+л!8s~1m!f6ІН - *MНЛ єНъ *!MНЛ Нп 1m! 6!6! 6НЖ: 2EНХТbНЅ!e:dѕК\:жрх:eжБH±2Н Го -HНХТ†НЅ:e2!:d2e:!2dГ»Го -:!юIВ¬!Љ: –Цџх:ЦЦџБHЎ2 Т®НX:h2iНТђ:!юКЌ:!ЦЦџх:!ЦЦџБH±х:!ЦЦџБH±Т,!"! 6#~юВНп НFГ)Н·НX:!юВНп НXГ):i!hѕТ)Н9 ГГe:!юВК:h2jO>№ТF НL>!"Нџх:i!j–џБHЎТј*"+M ~ю -КјНІ!f6!h6!"! 6НF!f6:h2k!iѕТ :i2k:j2h:k!hѕТ¶Н9 Г¦:h2j!!6:j2hГe:!юВ ->"НъµВбГхНІ*"M ~2!OНЛ :!ю -В*+"!!6Гe*!MН› /Т$^НL:!Ж@OНL:!ю В2Н‘Гe:юВb:!ю ЪL:h<2hГb:!ю Вb:hжO>‘!h†wНЩ:!ю -ВpНX:!ю В…!!6 - -НLГЉ!!6ûô:!юК›Н‘:! ¦Т©Нп Го -OНьТёГ»:!юRВ†!”6НGНТб>!”ѕТЫГЧНГИ!!6 :”ЦЦџ2Т.t– --Вэ•Н? Г>!”ѕЪНГ!6!“6sН, !”6Ђ:xюяВB!6OГхНU2!юКSНЩГB!G6:Тѓ!6:GѕТѓ*G&¶ ~2!:G<2GНЩГ_Го -QНьТ›=Нe Н Го -Нb:!ю-В®НЖ! 6:!ю#ВїН‡НЖГьН;ТЬНJ:!ю:ВЩ!!6LНvГь:!ю:ВьНЖНJНv: юВь*#"НЋТ! 6:!юBВ)! >–w!"&*o"(НRГо -:!юCВ:НeНRГо -:!юDВKНeНXГо -:!юKВ\Н·НXГо -:!юLВjН^Го -:!юPВљНЋТ‡! 6НЪНFГ—НўТ—НпН:Г‡Го -:!юTВЁНFГо -:!юUВѕ: ЦЦџ2Го -:!юVВьНЋТо"$НнDMН©/НЛ *oDMН©Нп Гщ: ЦЦџ2Го -:!ю В(:ЦЦџх:ЦЦџБHЎТ%Н^НbНFГо -: ЦЦџхНЋБH±Тл -:!юAВy! 6*""&*o"(НRНЋТaНnНўТnНДГa! 6НRГи -:!юFВ”НьНўТ‘Н Г„Ги -:!юJВ НьН$:2Н$НўТ Н :=2:<2!ѕТЭ*&џ ~2!НЩГј*""I*M*лНo/ТцГЧ!:–"Нъ"&! 6НR*I""Г«Ги -:!ЦMЦџх:ЦЦџБHЎТ| ! 6я>НъµВF Н›Нeх: <2 O! БHqyю Кd ГF : 2! 6е*лб#s#rГи -:!юNВЭ НьНўТЪ *лНo/ТЧ НД Т¦ ГхНбН¶Нn! 6!"&НRНи! 6o$НнЪФ ГЧГЋ Г‡ Ги -:!юSВ0 -НьН$НўТ- -Н :2"Нъл+s#r!:ѕТ* -*&џ ~2!:<2НЩГ -Гл Ги -:!юWВ> -НvГи -:!юXВі -НZНЋТ\ -НE•Нe Г° -:7/Тѓ -НE!76•Нe •Н• :xюяВѓ -Н- Н·*&"K(KНнЪ° -*KM NН”*K"KТЊ -Ги -:!юZВЭ -НЋТН -Ну -юВН -ГхНўТЪ -Н:ГН -Ги -:!юКи -ГвГо -ГвГ'ыvНЙ!gq:fТ Й*g&лНЙ!lq:lю Ъ$ !h4:lю -В1 !h6*lMНь -Й:hюВB ЙН  Н Н !h55Й!mq:mЦ Цџх:hжO>‘БHЎ2nyТ} !m6 !o6:n!oѕЪљ *mMН !o4В‚ Й!pq:pю ЪЄ >Й:pЦ Цџх:pЦ -ЦџБH±х:pЦ ЦџБH±Й!qq*qMН› Ъз ^НW :qЖ@2q*qMНW Й НЛ  -НЛ Й!sp+q*rл НЙ!up+qНп *tDMНъ Й!wp+q*vл -НЙ!zp+q*yлН2xЙ!|p+q*{лН2xЙ!~p+q*}лН2xЙ!Ђp+q*лНЙ!‚p+q*ЃлНЙ!„p+q*ѓлНЙ!†p+q*…лН2xЙ!€p+q*‡лНЙ!‰6Ђ‰Н Й НТЫ Н>Й>ЙНЙ! q* &лНЙ!p+q*лНЙ:7Т •Нe НЙ!p+q*DMН - Нп Н Й=Н? )Н Й!p+q.е*DMFб --ВL Й*9"`!"b!h6!j6!|6.!=\ --Вx !e:dѕКҐ *eMНз \НR :xюяКҐ @Н *dMНз \Н, :xюяВЧ \Н• :xюяВЛ Н- VН - Нп Гщ :eТл _Н - Нп Гщ :fТщ wН ”Н: =Нe !e:dѕК*eMНз =Нe —Н: =Нe =Н• !]6:xюяВ>Н- !"Й!76!Ў6!µ6!66Й*dMНз ¶Нч ЙНУ*dMНз !6:8!ѕЪП*`л*;DMНч \Нu 2xюК»>!xѕТЁН- *`л*;6:82ГЕЂ*`"`:<2ВwНУЙ!"`Й9`НнЪйНh*`л*;~2юК*`#"`:Й*eMНз !bНУ+л!s{юяВ!ЙНf!6:!ѕЪb*bл*^DMНч =Н… юКNН- Ђ*b"b:<2В)НfЙ!"bЙ!q9bНнЪЂН*bл*^:w*b#"bЙ!q:6юЂЪ¶НZ•Н… юК±Н- !66*6&¶ :w:6<26Й!J6*b}жюКк:J<2JНmГРН=Н? :xюяВюН- љН: Н;*dMНз .=\ --В=НЁ Н;ќН: *eMНз =НЁ Й.M= --ВCЙ!q:юКYЙ*MНЛ Й!q:Цaџ/х>z!–џ/БHЎЙ!q*MНaТЋ:ж_Й:Й!q:ТҐ*MНyЙ:Й!p+q!'"!6>НъµК*л*НЄ{2*л*НЄ"*л! -НЄл":ЦЖяџ!¶Т!6:Ж0OНЛ Г НЛ ГєЙ!p+q:/Т(Й*DMН©:НЛ  НЛ : ТI НЛ ГN*НЛ Й*DMНЙ:юКaЙНOЙ>!ѕТєНД ТxГЧ!: ѕЪ¦> -НъµКЎ* -+" ->НгµВЎГЧ! 6: <2 =O! NН’Й: ТЙНу -OН’Й: Т! 6:hЦЦџ!¦Тo$НнЪъНГэНOГ*НЛ Нё ! 6 -НЛ !h6!Љ: –Цџ2 Т3* &‹ 6 : <2 =O!‹ NН’Й*dMНз ЂНч Й:”юЂЪsНGsНu юКn>Й!”6:”<2”=O!Ђ NН’Й!яя"Й>НъµЦџЙ!"ЙНЋ/Тґ*+">Й>Й!": юВЯ*#"*""*!".+",Гс*$"**o".!",!36:3Т{.*НнµЖяџ22*,л**"0M х~Ц -ЖяџБHЎТ3*0"*Гэ*+"*+">НгµЖяџ23:2/Тk!36,*Ннл+s#rГx:3Тx*0"*Гц: юВ“**"&*"+"(ГЎ*$#"&**#"(Й*"#""Й*$#"$Й*"+""Й*$+"$Й*#"Й!4qM*"е*$е: юВ*(yЪс"$ббЙDMбС}‘|ТC#~ю -В е*#"бГц*&DMбСy“xљТCю -В1е*+"бх:4Т?сw+ГсГХів"$б""ЙЙНКЙНКЙН·НRЙ: юВ—*$"("НнТ€!"&Г”"Нн"&ГГ*""&$mНнНэЪё*o"(ГГ*л*$"(Й$"НнЪУГнНЪOН26юВжН›Й*"M :6wНў:6ю -ВНВЙГДЙ!7q:Т*7MН’Й:7Йo$НнЪ+Н›ЙНЄ*$M ~28OНm:8ю -ВIНВЙГЙН‡НўТu$oНнqНэЪoН›ГrНГPЙ! 6!"&*$"(НRНЋТ”НMНўТЎНГ”($НнТµ! 6НRЙН‡НvЙН¶НЪ2!юКХ*!MНmГАНЛЙ$"НнµВйГн*"M :!wНў:!ю -ВНВЙНe2!ЦЦџх:!Ц Цџх: /БHЎБH±/ЙНТQ:!ю В@!!6 НR!!6 -:!юВKГвНRГ$Й*&џ :!w:<2юdЪnГнЙ!:s+q*$";!>6:>/;oхНнџБHЎТз*;#"(";:92=*=&џ е*(M С–Цџ!:х:=–Цџ2>/БHЎТд:=<2=*(#"(æÀ:>Тш*(+"(НR:>Й!6Н$:2Й*лНo/ТГЧЙ*!MНyх:”<2”=O!s БHqЙ*л*DMНЙН·! 6: юВe!"*""?Гk*&"?*?+M ~2AЦ -Цџх:hЦЖяџБHЎТЏНп *&"?(?НнЪЩ:Aю -ВЅН8*#"НД ТЅГЧ*?M ~2AOНЛ *?"?Т•Й!"Й*"Й*"ЙНбНЪН^: 2B! 6НЪНF:B2 o(НнµЦџх>&НъµЦџБH±Т6Н›Г9НиЙ!C6>!CѕЪaНД ТRГх>ъН:C<2CВ?Й! 6!"ЙН‡НўТђq"НнЪЉН›ГЌНДГqЙ!!6 НЩ!!6 -НЩЙ!6*!MНa2D*!MН’2!:D/!¶+wЙ!6Нe2!НўЙ!Eq!E:!–Цџх:ЉЦЦџБHЎх:ЦЦџБHЎЙ!Fq*FMНХТ8Нп *FMНь -  ННу -OНy2FНп :FюYК5Г>Й>Й:!Ц02HO> ‘џ/Й!"Н;Тu*)))е*)Б е*H&Б "НЖГPЙНнТ! 6Ннл+s#rГ©! 6Нн"ЙDM!>х)л—)лЌ‘o|gТГ с=В±Й^#Vл) ВНЙ^#Vл|·g}o ВЧЙ_{•ozњgЙi`N#F‘ogЙo&•oњgЙ_{–_z#ћWлЙ H В=ВЙ LIBX$$$$$$$LIB1fГ! COPYRIGHT (C) DIGITAL RESEARCH ССs#r*g2^#Vл#лr+s*a2^#Vле*g2^#VлСНWт› !i272>Ђ!Нc!щ2Н·Н~*к!m~ю КЏЦ0ю -Ъ‚ЖщюТ”л))))…oл#Вnл"лЙќНµГ -BAD HEX DIGIT IN BASE$ НЙеХ!ке^!Ђwб4~юЂЪб6Е\Н·ВдБСбЙ\НхНµГ -DISK IS FULL$> Н»> -Н»Йжю -ТЖ0ГЖ7Н»ЙНfНUХН\НС·ВE!ЂлГ*=КRШНµГХНЊС!}ЖO|ОG{‘OzЪp>ГsyЖ·КИХ_Н>:Н»{НіеХл!ьл*лС|Ні}НібЇНі~#НіВЎЇ’НіСГ[хжНсхжНс‚WЙН>:Н»ЇНіВТН:к·Км>Н»ГЭ\НюяКНµГ -HEX FILE WRITTEN$НµГ -CANNOT CLOSE FILE, CHECK WRITE PROTECT$!ew#ВLЙ‰НG\НюяВУqНµГ -NO INPUT FILE PRESENT$COMЇ2кЂНРНр\ХНСНюяВУ»НµГ -NO DIRECTORY SPACE$HEXЇ2|Й -DISK READ ERROR$Э\НG>2hЙ01 REM ************************************************ -02 REM -03 REM Z80-MBC2 GPE led blink demo: -04 REM -05 REM Blink a led attached to PIN 8 (GPA5) of the GPIO -06 REM connector (J7) until USER key is pressed -07 REM (see A040618 schematic). -08 REM The GPE option must be installed. -09 REM -10 REM ************************************************ -11 REM -12 REM Demo HW wiring (see A040618 schematic): -13 REM -14 REM GPIO -15 REM (J7) -16 REM +-----+ -17 REM | 1 2 | -18 REM | 3 4 | LED RESISTOR -19 REM | 5 6 | 680 -20 REM | 7 8-+--->|-----------/\/\/--+ -21 REM | 9 10| | -22 REM |11 12| | -23 REM |13 14| | -24 REM |15 16| | -25 REM |17 18| | -26 REM |19 20+-----------------------+ GND -27 REM +-----+ -28 REM -29 REM ************************************************ -30 REM -31 PRINT "Press USER key to exit" -32 REM -33 REM * * * * SET USED OPCODES FOR I/O -34 REM -35 KEYUSER = 128 : REM USER KEY read Opcode (0x80) -36 IODIRA = 5 : REM IODIRA write Opcode (0x05) -37 GPIOA = 3 : REM GPIOA write Opcode (0x03) -38 REM -50 OUT 1,IODIRA : OUT 0,0 : REM Set all GPAx as output (IODIRA=0x00) -60 PRINT "Now blinking GPA5 (GPIO port pin 8)..." -64 REM -65 REM * * * * * BLINK LOOP -66 REM -70 OUT 1,GPIOA : OUT 0,32 : REM Set GPA5=1, GPAx=0 (GPIOA=B00100000=32) -80 GOSUB 505 : REM Delay sub -90 OUT 1,GPIOA : OUT 0,0 : REM Clear all pins GPAx (MCP23017) -100 GOSUB 505 : REM Delay sub -130 GOTO 70 -490 REM -500 REM * * * * * DELAY SUB -501 REM -505 FOR J=0 TO 150 -506 OUT 1,KEYUSER : REM Write the USER KEY read Opcode -507 IF INP(0)=1 THEN GOTO 700 : REM Exit if USER key is pressed -510 NEXT J -520 RETURN -690 REM -691 REM * * * * * PROGRAM END -692 REM -700 OUT 1,GPIOA : OUT 0,0 : REM Clear all pins GPAx (MCP23017) -720 PRINT "Terminated by USER Key" -1 REM * * * GPIO EXPANSION MODULE (A080117) DEMO * * * -2 REM -3 REM (USER Key -> slow led, GPIO-A(9) Key -> fast led) -4 REM -------------------------------------------------- -5 REM Demo HW wiring (see A080117 schematic): -6 REM -7 REM GPIO-B -8 REM (J3) -9 REM +----+ LED -10 REM | 2 |--->|---+ -11 REM | 3 |--->|---+ RESISTOR -12 REM | 4 |--->|---+ 680 -13 REM | 5 |--->|---+-------/\/\/-----o GND -14 REM | 6 |--->|---+ -15 REM | 7 |--->|---+ -16 REM | 8 |--->|---+ -17 REM | 9 |--->|---+ -18 REM +----+ | -19 REM | -20 REM | -21 REM GPIO-A | -22 REM (J4) | -23 REM +----+ LED | -24 REM | 2 |--->|---+ -25 REM | 3 |--->|---+ -26 REM | 4 |x -27 REM | 5 |x -28 REM | 6 |x -29 REM | 7 |x PUSH BUTTON RESISTOR -30 REM | 8 |x --- 1K -31 REM | 9 |---------o o------------------/\/\/-----o GND -32 REM +----+ -33 REM -34 REM -35 REM -36 REM -------------------------------------------------- -37 REM -38 REM Set MCP23017 GPIOB all pins as output (IODIRB=0x00) -39 OUT 6, 0 -40 REM Set MCP23017 GPIOA 0-1 as output, others as input (IODIRA=0xFC) -41 OUT 5, 252 -42 REM Set MCP23017 GPIOA 2-7 pull-up resistor on (GPPUA=0xFC) -43 OUT 7, 252 -45 REM Left Shift user funcion definition -50 DEF FNLSH(X)=((X*2) AND 255) -55 REM Init GPIO output ports -60 OUT 3, 0 : REM Clear MCP23017 GPIOA port -62 OUT 4, 0 : REM Clear MCP23017 GPIOB port -64 GOSUB 700 : REM Set slow shift -68 REM Main -70 A=1 -80 FOR I=0 TO 7 -90 OUT 4, A : REM Write to MCP23017 GPIOB port -100 GOSUB 500 -110 A=FNLSH(A) -120 NEXT I -130 OUT 4, 0 : REM Clear MCP23017 GPIOB port -135 A=1 -140 FOR I=0 TO 1 -150 OUT 3, A : REM Write to MCP23017 GPIOA port -160 GOSUB 500 -170 A=FNLSH(A) -190 NEXT I -200 OUT 3, 0 : REM Clear MCP23017 GPIOA port -210 GOTO 70 : REM Play it again, Sam... -220 REM -500 REM * * * * * DELAY SUB -505 FOR J=0 TO K -507 IF INP(0)=1 THEN GOSUB 700 : REM Read USER key -508 IF (INP(3) AND 128)=0 THEN GOSUB 600 : REM Read MCP23017 GPIOA 7 key -510 NEXT J -520 RETURN -530 REM -600 REM * * * * * SET FAST SHIFT SUB -610 K=1 -620 OUT 0, 1 : REM USER led ON -630 RETURN -640 REM -700 REM * * * * * SET SLOW SHIFT SUB -710 K=30 -720 OUT 0, 0 : REM USER led OFF -730 RETURN -;This is a example of the Hello World program. -;Uses 8080 assembler mnemonics. - ORG 100h ;cpm programs start address. - JMP START ;go to program start. -;Variable storage space -MsgStr: DB 13,10,'Hello world.',13,10,0 -Stack1: DW 0 ;place to save old stack. -SBOT: DS 32 ;temp stack for us to use. -;Constants -STOP: EQU $-1 ;top of our stack. -BDOS: EQU 5 ;address of BDOS entry. -;Start of code segment -START: LXI H, 0 ;HL = 0. - DAD SP ;HL = SP. - SHLD Stack1 ;save original stack. - LXI H, STOP ;HL = address of new stack top.? - SPHL ;stack pointer = our stack. - LXI H, MsgStr ;HL = address of staring. - LOOP1: MOV A, M ;read string char. - ORA A ;set cpu flags. - JZ EXIT ;if char = 0 done. - MOV E, A ;E = char to send. - MVI C, 2 ;we want BDOS func 2. - PUSH H ;save HL register. - CALL BDOS ;call BDOS function. - POP H ;restore HL register - INX H ;point to next char. - JMP LOOP1 ;do next char. -;Exit and return code -EXIT: LHLD Stack1 ;read our original stack address. - SPHL ;register SP = value on entry. - RET ;return control back to CPM. - ENDГ6 -Hello world. -!9"!5щ!~·КU_еНб#ГD*щЙГ@ COPYRIGHT (C) 1978, DIGITAL RESEARCH ERROR: $, LOAD ADDRESS $DISK READ$INVERTED LOAD ADDRESS$DISK WRITE$LOAD ADDRESS $ERROR ADDRESS $BYTES READ:$INVALID HEX DIGIT$CHECK SUM ERROR $FIRST ADDRESS $LAST ADDRESS $BYTES READ $RECORDS WRITTEN $HEXCANNOT OPEN SOURCE$COMNO MORE DIRECTORY SPACE$CANNOT CLOSE FILE$*зщЙ!9"з!e щ!" !" \Е!йН"чЕтН"йНЉ: юяВѓыНdЕeН"\НП\Ня\НЉ: юяВІНdГЙНд\Нќ: юяВЙ)НdНаН;Й! q* &лНfЙ НР -НРЙ! q> ! ѕТ: ЖAЦ -OНРГ: Ж0OНРЙ! q: жшOНл: жOНлЙ! p+q* |OН* }OНЙ! p+q* л НfЙ! p+qНа* DMНBЙ! p+q)НR* DMНB1НB* DMН+Н;Й! p+q* лНi2 Й! p+q* лНi2 Й! p+q* лНi2 ЙНi2 Й!" p+q*! лНfЙ!$ p+q*# лНiЙ!& p+q*% лНiЙ!( p+q*' лНi2 Й!* p+q*) лНfЙ!/ s+p+q+СБp+qХ:/ =2/ юяКX*+ е*- Б -w*+ #"+ *- #"- Г1Й* #" яН–Ъr*  - ~Й!" я! НёЪЪГ—Ђ* " ТxГЪйНЯ20 юВєЂЕ*  - DMЂН"ГЧ:0 юКИAНd*  - 6!я" Г‡!" : -Й!"6 "8 ": }2< !"4 "= ! -6НYю:К Г!2 6Н=21 юВ ГЎ:1 : Нrл+s#rН=хН=_БHНL"4 " >6 НЄµВS* "6 Н=23 :1 =21 юяКvН=OНэ* #" ГY8  НќТ‰* +"8 Н.!2 †юКћЁНRНЂГ* "4 4 = НќТВНэ* #" Г§№НR*6 DMН+ИНR*8 DMН+ЧНR*: DMН+жНR*< MННаЙ!? q=  НќТKНdя*= л! НёТp!@ 6>!@ ѕЪX*= }O!< е*@ &Ђ Сw*= #"= !@ 4В)!< 4\НпюКmaНdГ* }O!< :? wЙlНR*4 DMН+{НR* DMН+ЉНRНж 4 НќТЯ*4 }жюВїНж= 4 Нќ< NН*4 #"4  НРГҐНаН;ЙНа*4 DMН+:НР НРЙНY2A Ц0O> №Ъ:A Ц0Й:A ЦAO>№Т&–НRНЂ:A ЦAЖ -ЙНь‡‡‡‡хНьБH±ЙН.2B !2 †w:B Й!D s+q*C &НЌ:D НЙГГГНЙЙЙл_л…oЊgЙ_{µozґgЙ^#Vл) ВЌЙ_{•ozњgЙi`N#F‘ogЙo&•oњgЙ_{–_z#ћWлЙГ( COPYRIGHT (C) 1977 DIGITAL RESEARCH 11Ї2O02Z0НЂ%Н!"ЦНKЇ2Ј.>2¤.*M0"$/ННѓ%!"Г"Ю:g0·Кi!"P0"R0"ЗЇ2НН:0юКvюВЛ: 0ю$ВХ НкВ :[0ю-К¬ю+К¬ю*В ЕНБ:[0!_0юMКД!f0юPВ pНГ юВ Н!К НН ВмН :O0·ДњГйНюВй!"а:O0·КНл*V0}“|љЪ<НrН НЄВБ*Г|µДґ:O0·В_Н‘НHН *V0"ГГ™*V0"аНEН КVНюВ»ГН НЄВ»*ал*ШНЭВ»"ГГ™*K0е"X0!0NA#~ЕеН'бБ В~бp"K0Й*K0N"X0!0q#ЕеН*бБw ВњЙ:0юАН!АюАxю ЙНњГХ *V0еНф*R0:_0·МЌб"V0Н2В*M0е·КrГю;Ию Ию -ИюИю!Й:В·КrН :0юВF: 0НзКeю%В;Нm "Ь>я2Ы:0юВb: 0хЇ20Н НЫсГWю,ВFНЧГцНЫН:0юВb: 0НзКeю,КцНґ:В·КrНЧГe*X0#е![0~НнК‡НГwЇw2/Н¬:Н2T/Н-б"ф.б"$/Ї2/>2¤.Гv:Ј.·Кё!‘/6+Н•%>20Й:Ј.·К®:¤.юРюИН0ГБЇ20Н9Н$Н<!В5Й*Г}ґДў*V0"ГН:0юВy: 0ю:ВyГvюВ! X! ^#fkйX¤»Щ _~™ 0^ўД Й Z -щ -ь -я -  2 5 8 Ё «  НфН:0юВ‰:0=К‰G! 0КѓЕF#еН2бБГsНГ–Н*I0Н| EН2НгНV ю,К[ГХ НфНЉНm л*R0"R0"P0ГХ НфНm еEН2бDН2НгНV ю,КѕГХ НфНЉ:Њ/ю ВХ Нm :Њ/ю Вх"З> 2Њ/:Н·Д®Н:0юВ : 0ю -В Г-НфНІ Г ЕНфНБ!‘/6+:¤.юТ;БН?Г*$/е*ґ."$/Н?б"$/сюВ:¤.юВl*ґ.^#V{ІКr+sГ5*ґ.^#Vю К·К“:¤.юВ r+s!06#wГљ> Ї20Н9Г!e/~х6![0~х6л"ф.Н :0юВР: 0ю,ВР!06Н9ГаН9*ф.~·Ва6 Гч*ф.еН: 0ю,Дґб"ф.Ї2f/л*ґ.s#rс2[0с2e/*ґ.#"X0Н$Н<Г5Н¬*$/"M0Н0:T/2Н:/2[0·Д Гv>20*Ф."ф.Ї2[0Гvх*R0еНm "R0НЌб"R0с!’/wЙНкК >=НG*R0е*I0"R0Нфб"R0ГХ НфНm :Њ/ю ВБ}>ТБНћ ГХ НкВҐНўГХ :O0·КИ*V0л*ШНЭКїНњГНН"ШГН>НЇ2Ъ:O0·МН:0юВ:O0·М!!Ъ4Н:0юВ: 0ю,КШ>Н"К4:O0·:ЪМГ ю ИюИюИюЙ2\0:0юВ=: 0ю КFю!КFюИНґНГ%*X0"`0>2Z0Н*X0"аН:0юВk: 0юИюВTН!ВTх:\0юВ¦:O0·В¦:0=К¦ К¦Е*а"X0Н !Н':[0·Д'БсюВTxНВ»!Z04ИГTюВT!Z05ВT:\0юВц!"Г:]0·Ке!НГс*ЦН*V0"Ц:O0·А*X0~ю Дґ*X06 ЇН'Ї<ЙНm :Њ/ю ВХ :g0·К!"R0"P0НфНЉГХ НкК Н·КBюДў>Н>#НGНк*I0Н!"ГГХ НфН:0юВ :Z0·В !0Nл*K0:O0·Вџ"b0+"X0y·К› ХЕН'БСГ‰ЇН'Г НфНІ ю>КБН®Г ю ИюИюИюЙ2КЇ2Л2М:0юВс: 0ю ВбНГчю!КчюВсН®Г-НГЛН:0юМ:0юВЛН!К4 Н:0юВ& : 0ю:ВЛН:0юВЛН!ВЛюВЛxюВI !Л4МЁГЛю Вe :Л·ВЛ:КюМ®>Нћ Г юВ} !Л~5·ВЛ:М·Д®Г НµВЌ !М4МЁГЛюВЛ!М~5·ВЛГ G!Н~юТЁ4_!ОpЙ!Н~·К®5^!О~Й>ГЛ >2\0НфН:0юВN -*K0"Е+"X0:0юЪр >ЖН'ЇН'Н!Н:0юВN -: 0ю,ВN -Н :0·В -НГ> -Н К> -!0N#~ЕеН'бБ В) -> Н'НЇН'*K0"V0:\0Гx -Нґ:\0Н"Г Нm е}*K0"Е+"X0Н'сН'*K0"V0>Н"К4Н¬Н:Н2T/:[0ю -В“ -Ї2/Н-*M0"$/*X0л!Е{–#zћлЪї -~+"X0*M0+"M0wГџ -#"K0*M0"ґ.е:\0юКЭ -N]T лs#r+е*V0л*Е{•_zњWб"Ф.:\02¤.ГRГ Г Г Г НфНН К% Н*I0:Њ/ю ВХ НЄ%ГХ Н¬:O0·Д­%ГХ Г Г :Ј.·Кў Н:0юВў *K0е+"X0Н!Ї2Ы<20*Ю#"Ю"ЬН : -0ю0ДЁ!??" 0Н9б"K0+"X0Н$Н<НН КХ :0юВў : 0ю,К? НґГХ Г Нф*Ц}ґВъ :]0·Въ Н:O0·В :0юВъ Н¤%:e0·Д­%Н:0юВЩ : 0ю Кс юВЩ Н¬Н§%ГvНґГХ Г Г НєНГХ :0юА: 0ю Ию!Ию;ЙЦю*Т _!5 ^#fkйS \ h n ‚ ‹ љ Є і В Л Т Щ и п Н2НГы Н  Н» Нµ Гы Н  Гы Н– ю8К{ жД‚yж0°Гш Н2Нµ Гы Н– °GН» Н‹ °Гш Н– °Н1Н» НЇ Гы Н2НЇ Гы Н– ж(Д‚yж°Гш Н2Нµ Гы Н‹ °Гш Н– °Гш Н– жД‚yж0°Гш Н– °Гш Н2НЇ Гы Н1НфНгГХ 'иd -! ^#V#е*Ь0}“o|љgЪ* Г "Ь:Ы·КD x=КD yю0КP Ї2Ы!0^4! 0qбВ Й:0юД–: 0ю,Ию;Ию Д–ЙЕНН*I0БЙНm |·}И$В† ·шНЊoЙНy юФЊжЙН‹ ж8OЙН– жД‚yж0°Г1Нy Г1Нm ГXхЕ:0юВН : 0ю,КТ >CН%БсЙНф:0юВ : 0ю Во НГvю;ВНфН:0юВц : 0ю -КvюК-ю!КvГц ю!КvюК-НґГц {•ozњgЙ:Ј.·К7Н®Ї2Z0!O0~4·Вl!яя"Ш*Ц|µК>"V0еНге*ШНб"Шб"ЦГJННЉ!‘/6 !Ќ/Н’%:^0·КЏ>2¤.НЎ%Н±*K0л*T0Н&е*M0л*T0Н&\бН лНЌ!‘/А·КОw#ГµH USE FACTOR !Ћ/Н’%*З"P0Гћ%zјА{ЅЙ*P0"R0Й*Г"V0Н ЙНкИ!"Г:O0·ВНхжДўсцН*R0НЙНжМњНл*R0НЭДњЙGЕ:O0·xД›%:Ќ/ю *R0МЌ:ЙюБxЬz*P0#"P0ЙеEН2бDГ2Ж0ю:ШЖЙНb!Й^4!Њ/wЙхжНjсжГj*R0л!Йе6zХНzС{Нzб4ЙЦAю_ШЖAю?ИЙЇ2Ґ.2Й*T0"V0!¬.8Їw# ВД*V0л*K0{•zњТ¤*b0НЭ+"X0КэНюВ Н·Кэ=хН$сГрН*·Вэ*X0#Гћ!¤.ѕВђ*V0"Є.#"X0Н$:d0·В<:0юЪ<! 0~ю?В<#ѕКђ: 0НЎ!¬."Ё.^#Vл"V0}ґК{##~ж2§.*Ё.^#V#"Ё.л"V0*V0}ґКd##~ж<2¦.G*V0##"X0:Ґ.·Къ> Нu!Ґ.~жшЖwжКъ>†w> Нu:Ґ.ЂЖюPЪ'!Й5^!Њ/~ю К!Й~620Н•%Ї2Ґ.Не|Нzб}Нz> Нu!Ґ.~Жw:¦.·КW=хН*Нu!Ґ.4сГC*V0^#Vл"V0ГЅ!§.5ВЇ:Й20Н•%Й!Й^4!Њ/wЙхЕ>RН%БсЙхе>VН%бсЙх>DГЅх>PГЅх>LГЅх>OГЅх>BГЅх>SГЅх>NН%сЙ9ГГ-ГГил!2~юЪBНд6~44O!! s#rЙх!1~ю -Ъ_6Нд^4с! w!pЙ!2~·В~Нд!Й55N!! N#fiЙНoлНoЙo&)Ў^#fkй9BIO[ovЂЏ›Ёґ»ВЪбнщ дНЊz·ВЧ{юШНд>ЙЇ•o>њgЙНЊл"!6ЕЇ{_zW5бИ>О)D…*•OxњGЕТ г!?ГцDM!ЇxGyOЪ2°ИГ3л)лГ#НЊНГНелГНеГНЛ·К)=ГRНЛ·КхЇ|g}oс=Г^НЊГНЊлНЭГrНoНЭГzјА{ЅЙНЊН‰ВФГОНЊ}“|љЪОГФНЊН‰КОГћНЊлГћНЊлГ«НЊН‰ВОГФ!яяГ!ГНo#ГѓНЊz¤g{ҐoГНЊzґg{µoГНЊz¬g{­oГНolГНo&Г3:0юА: 0ю Ию;Ию!ЙНИю,ЙЇ2122=2 !"I0Н&Вq!1~·К\5_! ~Н”ГD:2юДд:Њ/ю А*!"I0Й:Њ/ю ВР:0юВќ:0·МдюФд! 0^#=К™VлГНюВЁ*0ГНН!ВЌюТ‚юВсН НКи:0юВЩ:0·ВЩНН&КиН НВЩ!Гл!яяНЦГ>юO: В·Мд>я2 yГU·В`Е:1·К0_!~ёЪ0!1s! ~Н”БГ БyюВU!1~·КN=w_! ~юКQНдЇГZНP>я2 ГРyюКРюВpPН%Н ГКНж>UМ%ННЦНГ>: ·МдЇ2 Г3е>EН%бЙГГсГіГfГь:Ј.·КO*ф.~·ВH:¤.юК=!4>АНзН•%Н0:/·АГ#"ф.ГRН†%2G:0юxИюaШю{Рж_Йхю К‡ю -К‡:0юxТ‡_<20!Њ/сwЙсЙ:e/НSА:e/Н9ЙЇ2f/2d/Н2e/:0юИ:e/юЂЪЖН !2f/g/~#В»ГеНSИН‰Кр!f/~юТо4!g/_:e/wН2e/ГКЇЙЇ<Й*V0"Н3Н6А*"V0ЙЇ2!4ВНЫ!f/6"ф.!f/~·К55!d/^4!g/~Гf:Ј.·:e/ВJG·ВwНГf·Кю^ВlН—^В{:e/ю&В{!f/4#wГwю&КћGюК±Ї2e/xГfН—К :e/ю&К•:0юК НуК ГЅН—&К{Ну&К{ГЅН—К НуК !e/~ю&ВИ>62/Н-!¤.6*M0"$/НB"ф.Ї2f/*"V0Н—Г Н2f/2e/2[020> -2Н•%>20ЙЇ202Й!0~ю@Ъ$6НЫ^4#:[0wЙ~ю$АЇwЙ:[0Ц0ю -жЙН6А:[0ЦAюжЙ:[0ю?Кeю@КeЦAюжЙ·ЙНPАН6Йю Рю Ию Ию -ИюИГбННo2[0:Z0·К¦:\0юВ :O0·В¦:[0Н':[0Йю ИюИю!ЙНЇ20:[0ю КRю;В/>20:Z0·К?:\0юВв:O0·В?НЃю;ВB*`0л*X0++{ЅВэzјК~ю -В++Гю!Т+Гу"X0:Z0хЇ2Z0НЃНЄВН'с2Z0ГX:[0ю*ВK:ю -ВKНЃНЄКXГ?ц ю ВXНЃГ¶Ї20НPКg>ГЈН6Кr>ГЈ:[0ю'ВѓЇ2[0>ГЈю -ВЎ:Ј.·К”>+2‘/Н•%!Њ/6 >20>20:[02·ДНЃ:0юВ:Z0·А: 0ю=ВО!EQГщю<Вд!LT:[0ю=Вщ!LEГхю>А!GT:[0ю=Вщ!GEЇ2[0" 0!04>20Й![0:0юВН/К¦НgВ¦ЙюВґН/К¦НAВ¦:[0юOК<юQВA>ГHюHВR>2Ї2[0Гm:юBВ_>ГfюD> -Вj!052!"0!0N#~#юAТ„Ц0Г†Ц7еЕO!ѕФХ~*0л!·К©ТЈл)лГљ "0Бб ВxЙ:[0ю КЫю'В¦НЃю'АГ¦:[0·Ию Ию Й:[0ю,Ию;Ию%И:[0ю ИюИю!Й:[0ю;Ию Ию Ию,ЙНЇ202НКВНЃГНХВ/>20ГЙ:[02НЃ:0юИНбВG:0юМХ:·ДХГП:0юВl:[0ю'ВЙННЃ:[0ю'К Ї20Г/:[0ю'В|>20ГЙю^В—НЃ:[0ю КЙю ТЙНбГПю<ВЁ!~4·К ГЙю>Вј!~·КЙ5К ГЙ:·ВЙНнКПНГ >20Йх>VГнх>OГнх>IГнх>BГнЕеН%бБсЙсЙГ!ГQéÉГГ Г$ Г? ГH ГY Г` Гe Г’ Гј ГІ Г~ГЕГЏГGÇåûГрГшГГfD?І<=З=Ў:e>?; ><>‰; и;ъ<·=R>Ь>е>F>Ь;њ>G=“=Ж<=®=‘>ѕ=s;Ґ=P=*>=$?P:-?]>*<<Ѓ=Љ=е<я;њ=Ѓ>‰>y> - ;и: =“;ы>?о>P?Є<щ=?І>ј>п=Ы<С<i;m=>c=е=Ё>o>v<Ы=ј<Ё;8?N!NЂЇw#w#ВW!"V0Й!ѓ.Їw#w#ВlЙНж2NЙ!Ј.~юТ4^!¤.~w!Ф.Нј!ґ.Нј!ф.Нј!/~w!$/Нј!D/~w!T/~wЙN#Fp+qЙ!Ј.~·Ке^!¤.Н!Ф.Н -!ґ.Н -!ф.Н -!/Н!$/Н -!D/Н!T/Нб5Йе~бwЙеN#Fбq#pЙ>BГ%!0"Ц *Ц FЇ#†В%ж2NЙG*V0##~жр°wЙ*V0##~ж<ЙН‰Ил:¤.юКt!Ј.N!¤. y·Кq~юКt +Гa<лЙ!$/ {–z#ћЪ‰!"V0ЇЙ*V0}ґЙ!f/"Ц Н :Nж2N!ѓ."OГёН!N"O!0"Ц *Ц ~юЪГ6!N^*O^#fk"V0Н‰ИН=*Ц ѕВшG#л*V0###ѕВш#ВмЙ*V0^#VлГТ!0^*K0"V0л*M0{•zњлТу"K0!N"OН1Ї#w#wЙ*V0л!NN*O N#Fr+sлq#p0юЪU>G=#w#wВYЙ*M0л!0n& {•ozњg"V0л!K0{–#zћЪул"M0ЙНb*M0л!0N#y·Кў ~Г•ЇЙНb!ѓ."OН1:NН Й*M0л!$/{–#zћРл"V0Н$ _!ѓ.л*V0~#~Н1 ~·#Вд"M0Г»Г1 !ьН’%Гћ%SYMBOL TABLE OVERFLOW жрG*V0##~ж°wЙ*V0##~жЙН=*V0_###ЙеН1 Сs#rЙН1 ^#VлЙН1 ##"X0ЙхНP сwЙНP ~ЙН懇‡‡O!0~юЪz 6~=±Нј !0N#~ЕеНј бБ В„ ЙНІ Oж2Nyж -НЙ*Й\ ю?К=)ю$К=)w#ВЋ&Й!\60ю Ъ±&>GO#w Ві&>ђO # КК&6 ГА&6L#6I#6B#Їw2|Нr&\Гu'>я2]0!Ђ"Р%![0~2П%ЇwЙНG&!У,Нx&>82і%Ї2ґ%!"b0*"M0!1"ц%"&"@&#"K0"T0Гк'ю ИЕе_НбБЙ#~Н6' ВD'Йел:Й%ЖAН6'>:Н6'НD'>.Н6'НD'>-Н6'бГx&ХНюяСА!и,НN'ГХНюяСА!k-Нx&ГГХНюяСА!я,НN'Г:Л%юИюИюЙю ВТ'> НТ':Т%жВД'Йх_Нс!Т%ю -Ве'6Йю Ш4ЙЇ2Т%2]02e02d02g02µ%:\ю К=)Н!Й%w#w#w#w#w#w#>2^02_0:mю$ВИ(!Ѓ~#ю$В,(~·КИ(#ю К3(К%юAК©(юPК©(юSК©(юHК©(юLК©(ю*Кt(ю+Кt(ю-В¶(^0~юSКЈ(юMКЈ(e0юLКЈ(d0юQКЈ(g0юRКЈ(µ%ю1В¶(x#Г3(~ЦAюТ¶(#Г3(#6 !)-Нx&!ЃНx&Г!У%Н‰&!ш%еН‰&бНі'Кй(ееН`&СН›'СН ':Н%юК)!&ееН‰&Нl&СН›'СН 'Й!°%60#60#60#>я2f0!"&:O0·Дщ*!"ф%Ї2Я%2у%2ё%НZ&У%Нu'Й!-Нx&ГzјА{ЅЙЕХе:]0·Кў)*Р%ЂНF)Вw)!"Р%Нr&\Н·В‰)*Р%#"Р%+Ђ~юВя):Ј.·2]0Кў)Нr&\!~-НN'Г*ф%НF)Вр)НZ&!"ф%*ц%ЕелНB&У%НбЂБ·ВЫ)Вј)Гн)юТ*Кн)Ђ6# Вж)НG&*ц%л*ф%е#"ф%б~бСБжЙ!<-Нx&ГЕG:Л%юК7*юВ$*xНЙ*Г7*ХеюxВ2*Нї'Г5*Н9*бСБЙ*&л*&wл#"&л!НF)АН`&!"&*&ш%~юК…*ЕХелНB&бЂСХеНбСБ·ВЊ*В`*НG&ЙГ`*!S-Нx&Г¶,ЕХеНџ*бСБЙ*>&л*@&wл#">&л!НF)АНl&!">&*@&&Г`*ЕХе_НбСБЙ!І%~ Н*Ї2ґ%*b0}ґИ!У,~ю К+Н*#Г+> Н*>#Н*НЦ*> Н**b0~·К>+Н*#Г2+> Н*> -Н*> -Г*}2і%!ґ%–РГщ*OН*:Њ/ю И:O0юИ:Л%юИyНЙ*Й:µ%!O0¶В•+:e0!]0¦Вг+~·К,:Њ/ю К,!Њ/~ю Вг+:f0·К,:‘/ю+Вг+:_0·К,юКг+:’/ю#К,:Ќ/ю К,:_0=Кг+!Њ/~ю КУ+!0s!ґ%е~!і%–Фщ*б4:0!Њ/·К,G~НY+#x=Гч+> НY+> -НY+Ї20!Њ/>x6 #=В,ЙG!Њ/~ю АpЙНі'И*&}ґК?,>Н*Г/,Н`&ш%Н€'Й:^0юКщ*Н+,!&6S#6Y#6M#Їw!&w:М%2Л%!"&Ні'Кщ*Ї2і%Н`&ш%ХН›'СН 'ЙН+,:Н%юК¶,:ё%·Д.*P0"¶%Н.*>&}ґК¶,>Н•*Г¦,Н+,:Н%юКК,Нl&&Н€'!“-Нx&ГCP/M MACRO ASSEM 2.0 NO SOURCE FILE PRESENT NO DIRECTORY SPACE SOURCE FILE NAME ERROR INVALID PARAMETER: SOURCE FILE READ ERROR OUTPUT FILE WRITE ERROR CANNOT CLOSE FILES UNBALANCED MACRO LIB END OF ASSEMBLY ЕG:Н%юxКп-Хх!ё%~·КЫ-юЪГ-Н.ГЫ-*P0л*¶%O {ЅВШ-zјКб-Н.*P0"¶%!ё%^4!№%сwСБЙхжН.схжН.с‚WЙЖђ'О@'Г•*>:Н•*!ё%^ЇWw*¶%{Нс-|Нс-}Нс-ЇНс-{·К?.!№%~#Нс-В6.Ї’Нс-> Н•*> -Н•*ЙНћ*> -Нћ*ЙчяяяяяяпяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяwчяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяsчяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяяН% ГQ9ННxНxГQ9НќНp* -;е*;лбs#r*;n&";НyГQ9НЕГQ9НpНќ*;##е* -;Бq#p*;^#Vл";!;4ГQ9* -;N#F `i";Нx:;юВ‚/GRН Г†/!;5ГQ9Н¦ГQ9НuГQ9НE*Ъџ/НV*Нв+ГQ9Ны Нs!НxГQ9Н;!Нs!:B ЪБ/НxНxГQ9Н'Н'Нщ&ГQ9Н'Нщ&ГQ9НE*Тй/НќНV*ГQ9* -;е* ;^бNНџНxНxГQ9!7<6Нв+ГQ9!7<6Н©+ГQ9Н_(ГQ9Н_(ГQ9Н1&ГQ9НќНp*;N#F* -;лНyНpГQ9*;+";ГQ9* -;>Ђ®wГQ9НE*Ъe0НV*Н©+ГQ9ГQ9ГQ9НиГQ9:B ЪЙ0!$=6я:$=<2$=O!н л1<Н@:Тџ0Гѓ0*$=&н) 3<НB:Тё0НиГЙ0*$=&н) ^#Vл"1<ГQ9Н ГQ9Н?ТЯ0Н Гз0*;##";НxГQ9Н ГQ9НрГQ9* -;DMН&Н“ е* -;Бq#pГQ9!7<6*;"5<Н"*ГQ9!7<6Н©+ГQ9!7<6Нв+ГQ9Н>#ТH1Н7(ю -КH1Г=1Н@"ГQ9Н‚)Н>#Тp1*—<++™<НP:Тp1 НK#ГZ1 НK# -НK#Н@"ГQ9Нќ#O!<< ^#Vл"8<>Н,:µВЎ1UCН НV)* -;N!<< >w#6* -;N!f< w#6НxГQ9* -;>¦wГQ9* -;DMНh ГQ9НЄНќ*ДDMНцеН@* -;DMН>ГQ9Нm/2%=Н?/OН% :%=Т2* -;>¦wГQ9* -;DMНЂГQ9* -;DMНрГQ9* -;DMНГQ9НќН* ;DMНр* -;DMНЂНX9ГQ9* -;DMНО ГQ9Н¤* -;*<еНB:џСх>НM:µЦџБH±ТЊ2LTН * -;N#F е!Ђ лб+s#r!1<Н[:ТЄ2Н* -;^#Vл"1<НxГQ9* -;DMНPГQ9НќНв"&=яНє9DMНц*&=|Тл2еНЊ* -;DMН>ГQ9*;"ДГQ9Н?хНmБH±Т3NLН>Г3* -;DMНЯГQ9Нќ>1<НM:DMНц* -;DMН>ГQ9* -;DMН&Н“ MНOНц* -;DMН>ГQ9* -;^#Vл"(=DMН‰юВv3CAН *(=#~2*=Нx**=MНц* -;DMН>ГQ9* -;DMН&Нk"+=*+=6Н“ }*+=#w* -;е*+=лбs#rНyГQ9Н“ГQ9* -;N#FН‰OНцНx* -;DMН>ГQ9Н“ГQ9Н“ГQ9:B 2-=!B 6Ны :%;ю В&4%;Е -=`iwO&;Нl!$;5:$;ГQ9 Нk"8<".= *.="•<Ні$*8<"8<Ні$Нд*8<лН -юяК№4RFН *.=лН -OНцНќ* -;DMН>*.=DMНГQ9!1=6!њ<6ЌНk"8< "•<Ні$Нд!2=6 *8< 6?Н‘920=юяК_5:0=懇‡‡‡Ж23=Ж24=:3=<23=O*8< ~ЦЖяџх:4=!3=–џ/БHЎТW5!1=4Г+5!2=6Г 5Нќ*1=MНц* -;DMН>*8ГQ9НOНцНxНxНx* -;DMН>ГQ9Н¤ГQ9* ;~=w* -;х~=БH№Та5IOН Нx* -;~‡†Н,:µВЭ6UDН Нs)* -;N!<< >w#6* -;N!f< w#6НxГQ9Н*,<"*<Нg!!0<6ГQ9Н*"*<Нg!!0<6ГQ9НC ГQ9* -;N#FН§НxГQ9!ќ<6Н1&!ќ<6ГQ9!ћ<6Н1&!ћ<6ГQ9Н¤НН¤* -;^#Vл"8=* ;е*8=Б -wНxНxГQ9!$;6!";=Н7(2:=ю -КФ7*;=#";=л!Н/:Тѕ7*;=$; ::=wГС7;=НE:µВС7LFН>Г”7>я!;=НX:Тз7!$;6яГп7*;=л!$;s*$;&$; ~ю В8!$;5НC Н@"ГQ9:0<2==!0<6Нs!Ни* -;>НX:µВ-8?НKНx НK:==20<ГQ9* -;^#Vл",<>…Н,:џ* -;х>НX:µЦџБH±Тh8WLН Нg!НxГQ91-R-s-”-љ-ь- ..).9.I.Y.a.i.q.w.….†.Њ.•.›.©.ё.З.Ц.ж.ц.//8/>/b/‰/Џ/•/Ґ/±/З/У/Ь/м/0 00 0(0.0G0Q0[0k0n0q0w0М0Т0н0у0щ01 1+161N1Ђ1К1Ф1Я1ю12)242?2[2f2є2Е2ц2я2!3<3\3•3И3Р3н3х3э3X4|4Ю4ѓ5Ґ5В5И5о5ц56s6‰6ґ6ј677.747C7S7c7‰7 8>8НpГм,ЙН?Тr9ZDН>* ;лЭНyГЉ9* ;DMН&* -;DMН@* ;DMН>НxН‡Й*2=M*8<лН -Йi`N#FЃo€gЙл_л…oЊgЙ_{Ґoz¤gЙi`N#FЎo gЙл_лҐo¤gЙ^#Vл)е))Б ЙDM!>)л)лТх9 =Вн9Йi`л/o/gЙi`N#F±o°gЙ^#Vл) В:Й^#Vл|·g}o В :Й_{•ozњgЙO{‘ozgЙi`N#F‘ogЙo&•oњgЙ_{–_z#ћWлЙi`N#F©oЁgЙB00A92EB82EC72ED62EE62EF62E062F142FB7 -:1038AB00382F3E2F622F892F8F2F95ЂA52FB12FBA -:1038BB00C72FD32FDC2FEC2F02300D3018302030D8 -:1038CB0028302E30яя05B306B306E307130D:103яDB007730CC30D230ED30F330F9300F3120313E -:1038EB002B3136314E318031CA31D431DF31FE319B -:1038FB001E32293234323F325B326632BA32C53233 -:10390B00F632FF3221333C335C339533C833D0333B -:10391B00ED33F533FD3358347C34DE348335A53544 -:10392B00C235C835EE35F635193673368936B436AP„PЂB00BC3606371A372E3734374337533763378E -:0D394B0089370B383E38CD701AC3EC2CC9FB -:10395800CD3F1B1FD27239015AD3E1A2A0C3B67 -:10396800EB01DD17CD7901C38A392A0C3B444DCDD3 -:1039780026032A0A3B444DCD40052A0C3B444DCD35 -:103988003E03CD781ACD871BC92A323D4D2A383CD3 -:10399800NO INTERMEDIATE LANGUAGE FILE $CRUN VER 1.02$$$$$$$$$$$$$$$NM $1@НV]=Н*?НC?!6@" -@!6 -@Н@:";Ні?2@ю*Кс=! @6Ні?х: @<2 @O!@ БHqyю$КТ=Гґ=* @л@Н+* -@DMН>* -@" -@Г¤=НЧ?е* -@Б "@;@Н@:"ы:; -@Н@:"щ:НЧ?е*ы:Б "э:*@э:НB:Ъ6>y=Н*?Н НЧ?))))е*э:Б "я:Ні?юК%?: @ю3Вo>Ні?*@wюКl>*@#"@ГV>Г"?: @юЂЪѓ>НЎ?Н|?НЎ?Г"?: @юВ±>НЎ?* -@".@*0@6НЎ?Ні?юК®>НЎ?*.@4Гњ>Г"?НЎ?: @Ц6Цџх: @Ц7ЦџБH±х: @Ц`ЦџБH±х: @ЦЦџБH±Тэ>Нѕ?* -@щ:еНџ9+лбs#rНО?Г"?: @ю.В"?Нѕ?* -@^#Vл)))Хе*Б л+s#rНО?бГF>Гыv!5@p+q*4@DMНо НK -НKЙ *2@ 6I*2@ 6N*2@ 6T*2@лН -юяВq?>=Н*?Н Й*2@лН -Й*0@#"0@л!Н/:Ъ ?!Ђ"0@Нr?юК ?*0@6Й*0@е* -@Б -w* -@#" -@ЙН|?*0@~2 @ЙНі?* -@#wНі?* -@wЙ* -@##" -@ЙНі?O`iН:еНі?_бЙ3C2A00500084005000FTEST INT€INT HEXB\r|Џ‘’ARCTAN INTќDEMO BAS4іµЗЙНеи3AE33A3C32E33AAB -:1015BA004FCDCC151FD2C6153AE33AC9C3A4153E7E -:0215CA0000C956 -:1015CC0021ED3A7121EF3A36002B36013AE83A21F7 -:10ГЛ]­)*RDХаE~№9L1®Ђj2D–кMDµQEА lCћЅD: Xы"©DЙ Й 4 ­» [ ЖDЗDМD -E$=)м·"4,#веилёLЫLPMИPУMp$є$юYY_TB[A[!TиR©SHZ«XZГTВTгSZ©IЪIдIЇ(і*љ(у68І8р&^7¬8O9d9WK) ю7IПFJCISIс"ЊIГFЙFш­)'*S* *ЗQКQНQЩU‹VЈV®Q±QґQ;LM‡°Хлэ$Xq„љ®Їн"9BLdhiUTП«NДчBУTОSГLOSЕГONФљLEAТ’INФSNЗDBМVЙ+VУ,VД-OУ HR¤ALМ¶OMMOОёHAIО№ELETЕЄATБ„IН†EFSTТ­EFINФ®EFSNЗЇEFDBМ°EЖLSЕўNДЃRASЕ¦DIФ§RROТЁRМЦRТЧXР OЖ/QЦъOТ‚IELДАILEУЖОУRЕIШOTП‰O TП‰OSUВЌEФБEX¤NPUФ…Ж‹NSTТЪNФNРMРыNKEY¤ЭILМИPRINФћLISФџPOУEФ€INЕ±OAДДSEФЙISФ“OЗ -OГ0EОEFT¤OЖ1ERGЕЕOДьKI¤2KS¤3KD¤4ID¤EXФѓULМ–AMЕЗEЧ”OФХPEОїUФќО•ТшCT¤PTIOОєRINФ‘UФВOKЕ™OУEEЛETURОЋEAД‡UОЉESTORЕЊEНЏESUMЕ©SEФКIGHT¤NДENUН¬ESEФМANDOMIZЕ»TOРђWAРҐAVЕЛPCЁФTEРСGОQТIО TR¤TRING¤ШPACE¤YSTEНЅHEОПROОЈROFЖ¤ABЁРПОAО SINЗЩSТТAМARPTТЬIDTИЎAIФ—HILЕґENДµRITЕ·OТщ«т­уЄфЇхЮцЬэ§ЫѕпЅрјсyy||PF<2(z{S*­)n*'*Y,R,—-w.¦)»%ё%6'њ'9)d+X+„+”f)NEXT without FORSyntax errorRETURN without GOSUBOut of DATAIllegal function callOverflowOut of memoryUndefined line numberSubscript out of rangeDuplicate DefinitionDivision by zeroIllegal directType mismatchOut of string spaceString too longString formula too complexCan't continueUndefined user functionNo RESUMERESUME without errorUnprintable errorMissing operandLine buffer overflow??FOR Without NEXT??WHILE without WENDWEND without WHILEFIELD overflowInternal errorBad file numberFile not foundBad file modeFile already open?Disk I/O errorFile already exists??Disk fullInput past endBad record numberBad file name?Direct statement in fileToo many files1111111111p„P8Uaюят` :,д - in Ok -Break!9~#юґВb  ГT ю‚АN#F#еi`zілКv лНDбИ ГT † Гь *|Ґ<К— :» -·Вг ГeD=96543>7@?2C:Гг *Ј -"  - *"і -Ї2н 2у |Ґ<Кщ "µ - *± -ГоCБ{K2Љ*Ї -"· -л*і -|Ґ<К "ѕ -л"А -*№ -|µл!» -К4 ¦В4 5лГФЇwY2“Н\B!і{юDТP ю2ТR юЪU >(Ц_Н#ВU е*і -г~ю?Вo б!іГP Н\GбюяНDМiBКZ|Ґ<ДE1>БН†AЇ2“НљSН\B!E Н:ЉЦМ=!яя":Є -·Кщ *« -еНM1СХНш>*ЪВ > НAН€KСТЪ Ї2Є -Г‡ Ї2Є -Гп *­ -ЪУ ХщяНDСТУ "« -:b ·Кў Г#?Н€KЪў Н<=Кў хНAНВ~ю Мс(ХНСс"Ї -ТУSХЕНў]Н·хл"µ -лНшЪ;схКе·ЕхеНh$бсБЕЬЭ"СсХК‡С:у ·В\*v -"› -*В -гБе еНCб"В -лtБСе##s#r## w# y°В}СНЇ!Ђ6"¤*”"ј -НѓC*ў"¤*ј -"”Гў *љлbk~#¶И###~·КРю Т·ю Ъ·ННГ№#лs#rГЇХКлСН6ХКфНDуъяД6ВЙ лСге*љDM~#¶+И##~#foНD`i~#fo?И?РГыЇ2i -2h -;#~ю"КQю К'·КZ:h -·~В'ю?>‘ХЕК jНjНJEЪgе—ЕюGА#НjюOА#Нjю А#Нj#ю КhюSКѓюTАНjюO>‰Г‘НjюUА#НjюB>ЌАББГ бНjе!ЦA‡O ^#Vб#еНjOжКz#№Вэ·т¬yю(КвюУКвюТКвНjю.КЭН">Тzс·ъБСцЂх>яНoЇ2i -сНoГ%б·тюГ«+х;ЕюЊИю«Ию¬ИюЄИю§Ию©ИюЦИюўИюЉИю“ИюџИю‰ИюПИюЌИсЇВ>2i -сБСюўхМmсюґВTНo>тюЫВхНm>ЏНoсхГS~ю.Кwю:Ттю0Ът:i -·~БСъ'КЈю.К'>НoХНAНВгл}Нo|бНoГ%ХЕ~Н/НВБСе:g -юВП* |·>ВП}e.ю -Т—ЖГњхЖНo! Н’Ъв! сх~Нoс#=ВгбГ%iжК¤ѕВхГ¶ю&В'еНбНkюH> В> НoХЕНyБГ•#хНoсЦ:К9юJВ?>2h -2i -ЦUВ%х~·г|бКZѕК'х~#НoГE!@}‘O|G!"ЇЙ>: y°АГг б+=2i -БСНjНo#НjНJEТ…ю:ТЎю0Т…ю.К…Г%~ю Т¶ю К¶ю -К¶> х:i -<Кї=Г=+~ю КВю КВю -КВ#Й>d2Ґ -Нѕ9НDрХл"§ -л:g -хНсеНШ!А Ну(бСБеН"Ў -!9НT СВ& Х+V+^##е*Ў -НDбВСщ"± -лНCе*Ў -ге*гНDОН’Кб Тб хНсетbН­)г~юСМЉ ХелНЕ(Г…Н'*Нз(бЕХЃQZ~юС>В†НеН'*Нз(Нx(бЕХOН’GЕ+НВЙ Н%Нее*Д "*§ -г‚Е3ххГвE‚Е3еНб·ДЁB"Ї -л!9"± -л~ю:Кщ·ВЙ #~#¶К… #^#Vл":ю ·КшХ>[НAНM1>]НAСлНґХИЦЃЪ1юLТ Oл! N#FЕл#~ю:Рю КТ—·Ию Ъ’юВ7:l -·ЙюВB*j -Гх#2l -ЦТwЦхТXююВl~#"j -&o"n ->2m -!ќс·Й~##"j -+fГ]<2m -ХЕn -лGН)лБС"j -с!ќ·Йю Тю0?<=Й:l -юТїю Ъї*n -В№###^#VлН6,Г<:m -2g -юКЩ*n -" *p -" Г<!n -Н!)Г<НIEЙ ЕШЦAOGНюуВННIEШЦAGНx‘Ш<г!К - s#=Вб~ю,АНГнННЌ рГг ~ю.л*µ -лК+НюКLю л*n -лКЇ2l -+НРех!НDЪ}bk))сЦ0_лбГ\сбЙКѓCюКЌю ВзRН‡CґГ­НCНAБее*г>Ќх3ЕГ±ЕНA:l -ю лИюВЙ ле*j -гН#е*НDбЬыФшТе > 2© -бН_$`iЙГг АяНP щ"± -юЌВг б"!ґг>б:yHG+Н·ИёИ#ю"К <КЦЊВёЉWГсЖГFНѕ9НDрл"§ -лХ:g -хНсгG:g -ёxКVНШ:g - юЪa еюВ* е#^#V*љНDТЊ*Ж -НDСТ”! -НDТ”>СН'IлНЬFН'IгНь(СбЙюЁВОННD‰НAzіК»НцPYбТел"№ -лШ:» -·{И:Љ_Гщ Н¬ ~GюЌКЭНD‰+K xКНBю,АГЮ» -·КШ <2Љ~юѓК НAАzіВ±<ГНА*· -л*і -"лА~·В%#####ГН¬ А·К1Гг  -ХКVН6лгКWлНD,л*­ -лКVНAВЙ л|µК1"­ -2Є -б"« -БГў Н~ю,Мю‰К}НDП+еН№(бК—НИюК®ю В*n -ЙН·ИНюўВ™В™Г…>2ЌГєНZQ+НМiBКюЩК8?юРКюФКею,К@ю;КэБНеН’КхН\1НG6 * 4*”|µВ9* :Ќ·К :ЏG<К9:Њ·К9†?Т6=ёГ6:ђG<К9:e -·К9†?Т6=ёФiBН_GбГє*”|µ( ~Вv:Ќ·Кc:ЋG<:ЊКvёГp:‘G:e -юяКvёФiBТэЦТv/ГтхННЌ схюФКЋz·т–е*”|µВ·:Ќ·:ЏВ¬:ђo<К·&Н@,лбНD)+сЦФеКб*”|µ( ~Вб:Ќ·КЮ:ЊГб:e -/ѓЪт<КэНiB{=ъэ НAВцбНГБЇ2Ќеgo"”бЙНD…ю#КфQНЁLНЉНѕ9Нn*ХеНђKСБЪbDЕХНGб>ГF?Redo from start -#~·КЙ ю"ВOГрббГi:¦ -·ВГ Б!<Н\G*Ї -ЙНXQе!a ГGю#КtНЁLґЕю">2“>я2з АНG~ю,ВЄЇ2з НГ®НD;еН_GбЙе:з ·КЖ>?НA> НAНђKБЪbDЕЇ2¦ -6,лбеХХ+>Ђ2Ґ -ННѕ9~+ю(В #НКЙ ю"КOю(Кпю)ВрВрНКю,ВЙ г~ю,В]>2 - Нp: - =В]еН’М Iб+Нг~ю,КЪб+Н·бВi6,ГQе*И -цЇ2¦ -гГ]НD,Нѕ9гХ~ю,Кo:¦ -·ВгцЇ2ј л*”|µлВдQН’хВІНWGю"Књ:¦ -·WК™:,+НGсЖO:ј ·Иyл!БгХГGНсхџЕЪ/Гэ.+НКНю,Вbг+НВYС:¦ -·лВHDХбГН·Вь#~#¶Кг #^#Vл"Ј -лНю„ВгГoНDрГНD(+ХНCНЈЇ2 "ј -*ј -Б~"ќ -юпШютЪџЦт_ВD:g -ю{КјHю Р!xVєРЕ%ЕzюКЅюQЪЛжююzКЛ! :g -ЦКб ·N#FЕъђ#N#FЕвђ#! N#F#ЕN#FЕЖKGЕфЕ*ќ -ГЦпЪЧюТЧюЄєWЪЙ "ќ -НГЎН'*НМ(я6ГХН­)СеЈГxюdРЕХd!pеН’Вh* е–FГБy2h -:g -ёВ юК)юКwТ<WxюК9zюК`xюКtzюКб Т!© N#FС* ЕЙНS*Н')б" б" БСНЬ(НS*!•:h -…oЊ•g~#foйЕН')с2g -юКGб" ГLН'*БС!џГRбНМ(НG*Нз(б" б" ГyелНG*бНМ(НG*Гљ'НКЮ Ъ/НJEТZю Ъџ<Кг=ютКЈюуКLю"КGюХК}ю&КyюЧВжН:ЉеНбЙюЦВчНе*і -Н6,бЙюЬВ&ННD(ю#ВН© еНќQбГНѕ9НD)ел|µК1Н*бЙюТКюЪК,JюЭК»BюШКaIю…КrUюУКЃННD)Й}Н*ј -еНћ(бЙНѕ9ел" Н’Д!)бЙ~юaШю{Рж_Йю&ВAННkюOКЅюHВј#~НkНJEлТ§ю:ТЮЦ0ЪЮГ®юGТЮЦ7))))µoКЫ лГЋ+НлТЮю8ТЙ Ы Е)Ш)Ш)ШБЦ0O лГЅН*лЙ#~ЦЃюВшеНю(бВя7>юOЪЦOл‡O N#FЕx±КЙ лГOЕНyюТ=ННD,Нn*л* гелН¬ лгГWНDг}ю ЪNюеЬ'*бXХ>2 џ N#fiйюуИю-Ию+ИютИ+Й<ЏБ ЖяџНІ(ГЏZНН­)}/o|/g" БГ%:g -юТџЦ·7ЙЦ·ЙЕН­)сСюzК@,ю{КЫ+ЕюFВВ{µo|ІЙюPВН{Ґo|ўЙю<ВШ{­o|ЄЙю2Ве{­/o|Є/Й}/Ј/o|/ў/Й}“o|љgГ6,:ЊГ:e -Ђ2Ґ -Нѕ9лг:g -хХН"ј -б"ќ -сНШНC!шя9щН*):g -х*ј -~ю)КчНD,е*ќ -НD,Г­с2N с·К;2g -!9Н!)!9щС.,·ъ:g -…G:N OЂюdТ1х}!P OНмуЕЕГS*ј -Не*ќ -НD)>Х"ќ -:ж -ЖхOНCсO/Ђ2Ґ -¶OГГ9ю~ВЙ #~юѓВ #ГБJЦРЪЙ  ГНЇ 20 ЫГН™ УЙН™ х+НКN НD,Н¬ сWЫ«ўКP ЙГЙ юћВq НН¬ 2Џ_Н 2ЋЙН¬ 2ђ_Н 2‘ЙЦТ Ж/<ѓЙННеН­)лбz·ЙН¬ 2Q 28 НD,Г¬ НННђ В1+Н{Й>2ЌБНШЕНў]!яя"бСN#F#x±К‡ е*”|µбМќBЕN#F#ЕглНDБЪ† геЕл"µ -НM1б~ю К!> НAН!!!b Н!НiBГИ ~·ИНсB#Г!b яЇ2ж Нў]Г4!#И~·Ию ЪC!ю _ЪW!·ъ|!_ю.КW!Н"ТW!ЇГj!:ж ·Кh!<Вh!> И>2ж {ю Ъx!ю Ъ("Г0!<~В…!#~ж#юЫВ“! юўМћ*юґВ§!~#ют>ґК§!+еЕХ!:G@ #T]~·К°!#тґ!~ёВ±!люТКК!юУyСБ_ВЭ!:ж ·>2ж Гт!ю[Вй!Ї2ж Г":ж ·>я2ж Кэ!> К‘G{Г"~#_жК‘Gіт"юЁВ"Ї2ж бГ4!НJEРю0Шю:?Й+НХЕхНџсG"Ею Кў6ю КҐ6*n -Г\1БС:l -Oю КZ"ю HВe">&И{И:m -юЪv"!Кv"#~ю Мс(~#·КЁ"И:m -юЪ|" -В™"ю.КЈ"юDКЈ"юEВ|"Г|"{·К±"И*j -Г4!НШЕНh$БСЕЕНшТП"T]геНDТ1!E Н\GБ!‡гл*В -НDВб"`i"В -ЙН#Н™]~ГНеН#гН™]НD,Н¬ СЙ­)ЕН’ш: юђА: ·шЂ‘Г»% -ЕPXКb#ю,КD#ХН6BKСКb#НD,Н6Кb#сНD,ХНAВЙ zіК1лглЕНшСХЕНш`iСНDлЪ1СБсеХГЋ# Ъ1ле!щяНDбЪ1Х^{#VІлСКЎ#~#¶+лВ~#ЕНД#БСбХ^{#VІКї#лгл#s#rл лбГЁ#† ЕюцЇ2© -*љ+#~#¶И#^#VН·КН#O:© -·yКE$юЁВ$Ню‰ВЩ#НюВЩ#ХНLzіВ$Г0$юВЦ#ХНLеНш > ЪX$Н\B!5$ХН\GбНM1БбеЕНE1бС+ГЦ#Undefined line ю В2$ХНLел###N#F>!/$е*j -е+p+q+wбЙ:© -·ИГЕ#НDBНDAНDSНDE:З ·ВТ е*Д -л*Ж -НDВТ б~Ц0ЪЙ юТЙ 2Ж <2З НЙ~·ИН¶$#Г¬$хГћAКЗ$НеН­)Гг$е!л$Н\GНmKСЪbDХ#~Н/~·ВИ$Н­)"ќ8Н8бЙRandom number seed (-32768 to 32767)Г%л*"Д л+НК3%юўКH%юПВ#%·ВH%#~#¶YКг #^#Vл"Д лНyю~Кa%юґК!%юµВ"%В"%Йю‚К!%юѓВ"%ИНК3%л*е*Д "лЕНѕ9Б+Н3%К–%НD,+k%г"бХЙх: 2 - схЇ2 сЙ!@6Нк(Г»%Нк(Н§(x·И: ·КЬ(ђТХ%/<лНМ(лНЬ(БСюРхН )gсН•&|·! ть%Нu&ТVК»0.Нј&ГV&ЇђG~›_#~љW#~™OЬЃ&hcЇGy·ВA&JTeoxЦюаВ&Ї2 Й|µІВ9&yТ.&OГD&)zWyЏOт'&x\E·КV&! †wТ"&К"&x! ·ьh&F#~жЂ©OГЬ(АА АЂ4АГє0~ѓ_#~ЉW#~‰OЙ! ~/wЇoђG}›_}љW}™OЙЦЪ¤&CZQГ—&Ж ozі°Вё&y-ИOТ®&Гѕ&Ї-ИyOzW{_xGГё&Ѓљчѓ$cCѓuНЌ„©ѓ‚Ѓв°Mѓ -rѓф5Нx(·к1Н'1ЂrГ6'Нз(>Ђ2 ЁхНМ(!О&НЪ7БбНМ(лНЬ(!Я&НЪ7БСНњ'сНМ(Н‡(БСГ»%Нx(И.Н6(y2o'л"j'PX! &е!X'ее! ~#·КЊ'елWyТp'ХСОO|g}oxGжК„'xц GzВb'лбЙCZQOЙНМ(!б-НЩ(БСНx(КГ0.яН6(4Кљ04Кљ0+~2У'+~2П'+~2Л'AлЇOW_2Ц'еЕ}Цo|ЮgxЮG>Ю?Тд'2Ц'сс7ТБбy<=т(:Ц'жАхxґµКэ'> бґГW&{_zWyO)xG:Ц'2Ц'yІіВЗ'е! 5бВЗ'Г"&>я.Ї! N#®G.x·КZ(}! ®ЂGЁxтY(ЖЂwКЉ'Н )w+ЙНx(/б·бт"&Гљ0Нз(x·ИЖЪі0GН»%! 4АГі0: ·И: ю/џА<Й€! Op#6ЂГ -&Н№(рН’ъ+,Кб ! ~оЂwЙН№(oџgГ*Н’Кб тx(* |µИ|Г‚(л* ге* гелЙНк(л" `i" лЙ! ^#V#N#F#Й Г)л:g -Gw#В)Й! ~7w?##wy7O®Й! ы(Г-)! ь(Х Н’Ш Йx·Кx(!Ѓ(еНx(yИ! ®yшНS)©Й#xѕА+yѕА+zѕА+{–АббЙz¬|ъ‚(єВs)}“ИГѓ(! Нь( ·Кx(!Ѓ(еНx(OИ! ®yш#–ВP)+В™)БЙН|)ВЃ(ЙН’* шКб вМ)Н')!<6Н!)НY,Н1*ГП)Н¬%: ·хж2 : юђТЫ Нu*: ·Вр)слГх)слты)|/g}/oГ*!Ы е: юђТ*Нu*лС" >2g -ЙЂђН9)АajГ*Н’аъD*Кб Нз(Нi*x·ИН )! FГV&* Нi*|UђГЊ(Н’РКб ьD*!" " >>Г*Н’ИГб GOW_·ИеНз(Н )®gь™*>ђН•&|Ьh&ЬЃ&бЙzЈ<А ЙН’шНx(ті*Н§(Ні*Гћ(Н’шТЩ*Кб Н*! ~ю: Р~Нu*6{хyН -&сЙ! ~юђВэ*O+~оЂ+¶Вй*·!ЂВь*Н*ГS*y·ИюёРхНз(Н )®+6ёх+qь-+: O! >ёђНX-сь-Ї2я сРГД,! ~5·#К0+Йе!x±КU+>)Ъ<л)лТQ+ Ъ<=ВC+лбЙ|џGН!,yГg+|џGеzџ€¬т*ЕлНG*сбНМ(лН;,ГЃ0|µК*еХН,ЕDM!>)Ъј+л)лТ¤+ Ъј+=В–+БС|·ъґ+СxГ,оЂµКН+лБбНG*бНМ(НG*БСГ6'x·Бъ*ХНG*СГ§(|µКМ Н,ЕлН!,DM!>х·Гю+хе Тэ+с7>б{_zW}o|gс=Вф+лБХГЄ+|ЄGН,л|·т*ЇO•oyњgГ** Н!,|оЂµАлНi*ЇГЊ(ХНЫ+Ї‚g{oН*сГ,! ~оЂw! ~·ИG+N ·К)ђТ…,/<х#еFwx+ Вu,бF+Nсю9РхН )! G>w2я с! НX-x·т№,: 2я Н--Тю,л4К»0Н„-Гю,>ћН/-! ЬE-ЇG: ·Вн,!я Vwz# ВТ,xЦюАВЕ,Г"&!я НЊ-·те,x·Кю,! †wТ"&И:я ·ь-! ~жЂ++®wЙ! 4А#В-4К»0+6ЂЙ0 ! Г5->Ћ!  2<-ЇЋ# В;-Й~/w!я ЇOyћw#ВO-ЙqеЦЪo-беNsY+Вd-ГZ-Ж WЇбИе~w+Вy-Гr-! Гv-~w# ВЋ-ЙНx(И: ·К"&Н,(НР.q·ХКМ-ЕGЬ--Н„-xБ Вµ-СВ¬-ГД,! Н`-ГД-НМММММL} „: юAТщ-Х-! Нь(Г—-: ·т .ж2 !§(еНA. ! Нь(НA.НY, ! Нь(>хНI.НU.НY,! Нf.с=В&.НA.НA.! 5АГ"&! >5И=ВN.ЙС>! N#F#Е=В[.ХЙС>! Бp+q+=Вl.ХЙ: ·КЗ0: ·К"&Н)(44К»0НР.!7 qA>ћН$-™?Ъ§.>ЋН$-ЇЪ: <=ъ-! НЋ-!0 НЊ-x·В•.! 5В•.Г"&y2 +6 ~q+ВЫ.ЙН')л+~·ИЖЪ»0wеНY,б4АГ»0Н"&Нf*цЇќ%Ех>2 сля`hМ*л~ю&Кyю-хК,/ю+К,/+НЪ0ю.К№/юeК>/юEВh/еНюlКV/юLКV/юqКV/юQбКg/:g -юКЃ/>ГЃ/~ю%КЖ/ю#КЧ/ю!КШ/юdКЃ/юDВ/·Нб/НН`НЪ†0В/Ї“_е{ђ_фр/ь0Вњ/бсеМћ(бН’ие!Љ'еН*ЙН’ В/Ьб/Г,/Нсе!Љ'е!­)ехГ/·Нб/НГ/еХЕхМ'*сДS*БСбЙИхН’хдa(сме.с=ЙХехН’хд‘'сме-сбС<ЙХx‰GЕе~Ц0хН’тL0* Н НDТH0T])))сO |·ъF0" бБСГ,/yхНD*7Тh0t”$Н9)тe0Нa(сН{0Г@0Н]*Не.Н')сН‡(Н]*НY,Г@0НМ(Н‡(БСГ»%{ю -Т•0ѓ†Ц0_ъГ‹/е! Н’вЄ0: Г«0y®бГС0сс: ГС0с: /ГС0yГК0: !b"њеЕХхх*№ -|µВю0! ~·Кл0=Вю04*њН¬$2e -> Н¶$> -Н¶$с! =1Т 1A1Нц(Н’Ъ1! A1Нц(*№ -|µ*њ л"њК81НDКЫ ГМ сСБбЙяяяяяяяе!@ Н\Gб[GЕН*ЇНе1¶Гy1ЇНе1жКg16+лН№(лтy16-ЕеНћ(бБґ#60:ќ -W:g -Ъ -3К3юТо1Нн5! F :ќ -_ж КІ1x№*ВІ1{жВІ1AqНКТ1юEКТ1юDКТ1ю0КІ1ю,КІ1ю.ВХ1+60{жКЮ1+6${жА+pЙ2ќ -! 6 ЙНМ(л* е* елхЇ2 схН™2Eе~ёК:2ю:Т2ю0Ъ2 #~·В 2>DёGбВ 2сБСл" `i" лБСЙЕ#~ю+КЃ2ю-КX2Ц0Ox‡‡Ђ‡ЃGюТЃ2#~·В?2`БxюEВv2y„ю бТ*2>Ђ2 Г†2|ЃюбТ*2Гn2БбГ*2сБСл" `i" лБСНЬ(#юеЮWНЏ4х: ·тґ2с‚Гѕ2с‚ъВ2єТВ2ЦбхН.560Мс(НU5+~ю0КС2ю.Дс(сК3хН’>"Џw#с6+тф26-/</Ц -Тц2Ж:#p#w#6л! Й#ЕюzТ„3Ъ!4Н&5СzЦф5Нн5{·МR(=ф5еН•1бК93p#6! #:ј -•’И~ю К>3ю*К>3+ехR3ЕНю-Ию+Ию$ИБю0В|3#НТ|3++wсКr3БГ?3сК|3б6%ЙеЪ(4К 3D6Нv)ъ®3бБН\1+6%Й¶КН9)т—3Нx(ДЏ4бБъУ3Е_x’“ф5Н5НU5іД5іДA5СГ&3_y·Дю/ѓъЮ3ЇЕхь0ъа3Б{ђБ_‚xъь3’“ф5ЕН5Г 4Н5yНE5OЇ’“Н5ЕGOНU5Б±В4*ј -ѓ=ф5PГ/3еХНD*СЇК.4Нx(7ДЏ4бБхy·хДю/ЂOzжюџWЃO“хЕь0ъN4БсЕхъ\4Ї/<Ђ<‚GНU5сф 5НA5БсВ4НR(~ю.Дс("ј -сЪ†4ѓђ’ЕНб2лСГ/3ХЇхН’ві4: ю‘Ті4$6! Нь(Н—-сЦ -хГ4Не4Н’кИ4C‘щOН9)ГО4,6Нv)тб4сНс/хГ¶4сН0хНе4с·СЙН’кч4t”ш#Н9)Гэ446Нv)бтЩ4й·И=60#Г5В5ИНA560#=Г5{‚ -НA5ЕхеХ/бе>ћН2-Т~5б>ЋН2-лбp#сБ=Вu5Ее! НЩ(Г±5ЕеН¬%>Нu*НЬ(бБЇ’6?НA5ЕхеХНз(б/{–_#zћW#yћO++ТЕ5Нu&#НЬ(лбp#сБЪ·5>Гу5Х6>НA5ЕхелN#FЕ#гл* /}“o|љgТ6" Сбp#сБ=Ву5НA5wСЙщўбяџ1©_cІюяїЙ¶ЂїЙ¶ЂЖ¤~Ќ@zуZ rN ҐФииvHд TКљ;бхЂ–@B †''иd -ЇGВЕН#Б ХЇКБ6)Џ)Џ)Џ)Џ·ВТ6y=КТ6·КЮ6ЇЖ0ю:ЪЫ6ЖЇ Кл6КЅ6Г»6бЙ!§(гйНМ(!@6НЩ(Г7Н'*БС!Ґ%е>2 Нx(xК^7т7·КК0·К#&ХЕyцНз(тF7х: ю™Ъ77сГF7сХЕНА*БСхН9)б|б" б" Ьо6М§(ХЕНр&БСН6'8Ѓ;ЄН6': ю€Т“7юhЪҐ7НМ(НА*ЖЃБСК–7хНё%!®7НЪ7БJГ6'НМ(: ·тў7ссГ"&Г±0ЃГЬ(|€Ytа—&wДz^Pc|юu~r1ЂЃНМ(И+ХеНз(Н6'бНМ(~#НЩ(сБС=ИХЕхеН6'бНк(еН»%бГг7RЗOЂНе!К&НЩ(Н8бГi*Нx(!{8ъq8!њ8НЩ(!{8И†жw#‡‡O Нк(Н6':z8<жю€2z8!њ8‡‡O НЇ%Нз({YоOO6Ђ+F6Ђ!y84~Ц«Вh8w Н &!њ8Гу(w+w+wГL85JК™9v"•і -ЭGSС™™ -џeјНЦw>RЗOЂh±Fh™й’iСuh!29НЇ%: юwШ: ·тИ8ж2 §(Х"~ѓщН6'НМ(НА*БСНё%Н9)ъ 9ЂН»%ЂЂН»%Нx(ф§(Н»%Н§(: ·хт9оЂ2 !:9НЛ7ср: оЂ2 Йѓщ"~ЫIЃыЧ†e&™‡X4#‡б]Ґ†ЫIѓНМ(НІ8БбНМ(лНЬ(Н¬8Гљ'Нx(ьо6ь§(: юЃЪЃ9ЃQYНњ'!µ%е!‹9НЛ7!29Й JЧ;xn„{юБ/|t1љ}„=Z}И‘~д»L~lЄЄЃ+НИНD,°9ЕцЇ2f -NНIEЪЙ ЇG2Е#~ю.Ъ:Ки9ю:Тв9ю0Ти9НJEЪ:GЕяЕцЂ#~ю:Т:ю0Тп9НJEТп9ю.Кп9xю'ТЙ Б2Е~ю&Т2:@:Хю%Ию$Ию!Ию#Исyж_е!‰ -Vб+z2g -Н:Ґ -=КУ;т\:~Ц(КW;Ц3КW;Ї2Ґ -е:· ·2ґ К°:*ж -и -"µ лГ–:o№ВЋ::g -ЅВЋ:ёК&;&…л*Ж -лНDК1<^#~#№Вщ;:g -»Вщ;~ёК<#^^#V#ВЩ;:f -·ВТ сDMКЉ'–Кћ< Гг #:ЕѕВъ;#·Кя;+Нщ<Гя;:g -w#_сКЧ!МAДM1> НA!b ея ~#·ВX=бGН=B·Кc=НkЦ0Ъ‚=ю -Т‚=_z‚ѓWГc=е!a=гВЌ=юШКы>юOК -?юЭК?юрКй=ю1ЪЁ=Ц ю!К-?юК#>ю#Кь=юК>юК->юКJ>юК?ю(Кz>юКц=юКw>ю>ВAБСНiBГ)=~·ИНсB#Вй=Йе!D>г7хН=B_схЬD>~·К!>НсBсхЬВ>Ъ>#~»В>В>сЙН!НiBБГ@=~·И>\НсB~·КD>НсBНВ>В5>>\НAЙ~·ИН=Bю Тl>ю -Кl>юКl>ю Кl>>НAГM>wНсB#ВJ>Й6HяНй=Н=BюКІ>юКґ>ю К?юИюКґ>ю -КТ>юКТ>ю КТ>ю Ъ>ю_ВТ>>_КЪ>НсB+>Хе ~·7КЉ'#~+w#ГД>хyюяЪв>с>НAГ>ђ Елo&DM#НCБсwНсB#ГЯ>x·И+>НсBВ -?Йx·И+~НсBВ -?ЙН!НiBБСzЈ\Н AНAЇ_WН AW~#ю!КП@ю#Кв?ю&КК@КЁ@ю+>К‰?+~#ю.К@ю_Кѕ@ю\Кg?ѕВЂ?ю$КЫ?ю*ВЂ?x#юЪУ?~ю$> ВЯ?юЇЖ#‚WК7@~#ю.К @ю#Кв?ю,В@zц@WГв?~ю#>.ВЂ?# К7@~#ю#К @Х5@ХT]ю^АѕА#ѕА#ѕА#xЦШССG#КлСz+жВW@x·КW@~Ц-КR@ююВW@>Ж‚WбсКі@ЕХНСБЕеCxЃюТ1zцЂН]1Н\Gб+Н7КЏ@2¦ -ю;КЊ@ю,ВЙ НБлбехХ~ђ#N#fi_x·В†?Г®@Н AНAбсВI?ЬiBгН IбГН A~#НAГ @ГУ@>сН AбсКі@ЕННn*БЕе* AЕx·Д°IН_G* с·Кv@–G> Кv@НAГAхz·>+ДAсЙхе*”|µВ±Vб:Ќ·КћAсхюВ>A:ЊЦЪ:A2ЊсГyAю ВRA> НA:ЊжВCAсЙсхЦ КuAЪxA:Џ<:ЊКoAе!ЏѕбМЏAюяКxA<2ЊсхЕХеOНбСБсЙЇ2Ќ:Њ·И> НyA> -НyAЇ2ЊЙ:“·В‘GсЕхюВЅA:e -·КПA=2e ->ГуAю ВТA> НA:e -жВВAсБЙю ЪуA:ђG:e -КкAёМiBКуAюяКуA<2e -сБхсхЕХеOНбСБсЙе*”|µК НA> -НAе*”|µбКBЇЙ:Ќ·К‹BЇ2ЊЙЇ2e -:€=ИхЇНAсГ’BЕХеНбСБ·ИН=BюМ=B2‰юМЏDГMDНеНеBВПBН·КШBН=BхНрFс_НYI!D " >2g -бЙ:‰·ИхЇ2‰сЙНAю -А> НAНsB> -ЙН7CЕгБНD~И +ГCе*v - >Ж•o>яњЪ)Cg9бШ*–++"± -Гг НKCРЕХеНЗGбСБНKCРГ1CХл*› -НDлСЙ:ДG!¤Ї^#V#В_CНUTЇА*љНЗD2м 2Є -2© -w#w#"В -*љ+"§ -:н ·В¤CЇ2З 2Ж !К -6#ВќCы7!њ8Нц(!y8Їw#w#wЇ2» -og"№ -"А -*v -:у ·ВПC"› -ЇН2D*В -"Д -"Ж -:н ·МUTБ*–++"± -##щ!z -"x -НҐ%Н†AНЇgo"ж -2· "N "є "д -2Ґ -еЕ*§ -Й|’А}“Й~гѕВ/D#г#~ю:РГГЙ л*љКGDлНAеНш`iСТе+"И -лЙА<ГXDАхМUTс"Ї -!z -"x -!цяБ*ех}¤<КyD"ѕ -*Ї -"А -Ї2“Н†AН\Bс!J Вb Г† >хЦВ›D2Ќ2“>^НAсЖ@НAГiB*А -|µКг л*ѕ -"лЙН¬ А<2€Й>Ї2ю ЙНѕ9Хе!ц Нь(*Д -гН’хНD,Нѕ9БН’ёВб гле*Д -НDВ1СбгХНь(бц Нь(бЙ>2Ґ -Нѕ9В1е2Ґ -`i - ·ъE л*Ж -НDВ+E `i"Ж -б~ю,АНГ -EсбЙ~юAШю[?ЙК‡Cю,КcEН-+НК‡CНD,К‡Cл*–лю,К‚EНеН#|µК1лб+НХКЗEНD,КЗEН-+НВЙ ге!NНDТ)CбНЩEЪ)Cе*В - НDТ)Cл"v -б"–бГ‡Cе*–л*v -{•_zњWбГ›E}“_|љWЙхцЇ2ї с"Ѕ Дѕ9"§ -НP ВП щХ^#V#е*Ѕ НDВП бСХ~х#Х~#·ъ;FНЩ(ге:ї ·В)F!А НЩ(ЇДЇ%бНу(бНк(еН9)ГqF####N#F#г^#Vеi`:ї ·ВWF*А ГbFНd+:g -юКЫ лбr+sбХ^#V#гНf)бБђНк(КѓFл"i`Г°щ"± -*§ -~ю,ВґННкEНI~#N#FСЕхН IС^#N#Fб{ІИzЦШЇ»<Р -ѕ#К«F?Гѓ(Нў6ГТFНҐ6ГТFН\1НGН I]IЕ~#еНuGбN#FНхFеoНьHСЙ>НuG! -еw#s#rбЙ+"Pея#~ ·КGєКGёВGю"Меxю,В.G К.G+~ю К#Gбг#лyНхF ->Х*x -" >2g -Нь(› -НD"x -б~АГг #НGН IНм(И -НAю МsBГfG·сх*Ж -л*› -/Oя #НDЪ“G"› -#лсЙеЕу! ~!2ґGжЯУт~юКіGюГА##~ю Р>яУтБбысКг їхwGЕ*v -"› -!е*Ж -е!z -л*x -лНDШGВsH!L "ё *Д -"µ *В -л*µ лНDКH~###хНЫ<сюВHНtHЇ_ГхG*ё ~#foґл*Д -К х{НтFGсК]I*™ -w#В IГ]IН"JЇгO>ее~ёЪ№IxЕНuGБбе#F#fh DMНхFoНьHСН IГ6GН"JСХђГ­Iл~Н'JК1ЕНDKсг±IЕ=ѕРO~‘»GШCЙН;IК_#~#foеFrгЕ+ННэ.БбpЙлНD)БСЕCЙННН’>хКNJсНЇ ·К1хНD,ННn*НD,е* гННD)еНIлБбсЕЉ'ЕЕхХН IСсG=Oѕ>Р·xИ~#F#fh ‘GЕХгN#^#VбеХЕѕВ¶J К­J#ВJССБСЇЙбССБx”Ѓ<ЙБСб#В•JГЄJНD(Нѕ9Нn*еХл#^#V*Ж -НDЪоJ*љНDТоJбеНЬFбеНь(бгНD,Н¬ ·К1х~НDKХНеНIлбБсGге!Љ'гy·И~ђЪ1<№Ъ!KyH Х#^#fk GСлN#~#foлy·Иw# ИВ9KЙяю)КRKНD,Н¬ НD)ЙН’ВcKН IНЗG*Ж -л*› -Гп>?НA> НAГ€KНBюВЪK6ГKpЇ2‰Ї2ж НBюВПKНiB!яяГA=:’·>\2’ВµKК‡KНA+КЙK~НAГzK+НAВzKНAНiB!b хЇ2’сOюКЎK:’·КрK>\НAЇ2’yюКZLюМЏD7Ию К›Lю КZLю -ВLК€KГZLюМЏDК€KюВ2LКђKНA> НA>ГВKюВ#ГЙKюВULЕХе6НiB!b Н!бСБГzKю ЪzKx·ВxLе*”|µб>К|L!b НAл"Гuyq#НAЦ -ВzK2e -> НAНB·КЊLю КzKГЪK:ж ·КdBЇw!a Йх>2ж сю;А2ж Г"Ў -Н%НлНM33ВПL щ"± -*е*Ў -еХГяLВЙ лНMВJMщ"± -л*"Д л##^#V#~#fo"лНеН№(бКMґAЕ3Гґ*Д "бссГґ!9~#‚№В3M Г#Mґ№АеN#F`iНDбИ Г#MГг >Ђ2Ґ -Нѕ9елН’Н!)Н­)"ж  НCС!Ая9щл +Н"§ -КѕMНD(ЕХНѕ9гs#r#гСБ~ю,ВњM НГ‚MНD)"§ ->!‘б=КѕMС=КѕMБ=КѕMЕе!9DMбе!ЙMге*ж гЙ*± -щ*§ -ГґЇ2н 2о ~Е»ВжM2н #+ННбRе!"ф б+НКfNНD,ю,КNНеН#"ф б+НКfNНD,Є»К:NНDAНDLНDLКЈOНD,»ВЙ ·х2о ННШЕНh$БСЕ`i"с НшТ_NT]"п бНDТ1сВЈO*е*љ+#~#¶К&O#^#Vл"лН·КnNю:К~Nё»К›NНН+Г~NНКЃNе>2Ґ -Нѕ9КщNxцЂGЇНУ;>2Ґ -ВЗN~ю(ВНNсГO~ю(К1бНѕ9zіВжNxцЂG:g -WН\:zіК1еBK!Oе - ·ъоN -цЂЙ2Ґ -~ю(ВНNг НнNб+НКЃNю(ВOННD)КЃNНD,ГЎNб"*Д -л*В -НDКyOеN##~·хжw#НЫ< сБъ1OЕН]O*Д -"Д -лбГ1Oл*Ж -НDВaOy•_xњW `i"Ж -Й*Ж -лНDКЈOе##~·хжw#НЫ2у :н ·ВєS:Д2џГSЇ2у 2н *В -DM*ё "Д -*› -#л*и "› -НDВњP `i"Ж -*ф |µл*љ+КґНшТе `iГґГНZQ+НК'QНеН’КQН\1НG* #^#Vю ВчPr+s+5Н_Gб+НК'Qю;К QНD,+Н>,НAГФP>"НAН_G>"НAГъPе*”|µКQQ~юВQQНя\}“o|љgюяТQQ> НA+|µВFQбНiBГю#АЕНwQС»КkQюВ  НD,л`i"”лЙ+Ню#МННЇ _:Д»Ъ¦ е!¤N#F -·бЙН‡Q!)юВ«Q!І лЙ>>>хНШсНтF*™ -Н*)Г]I>>>хНIсѕТ1<#N#fi2g -Г!)Н’џ ,ВRZГRНXQНѕ9Нn*ЕХ+ЇW_хЕеН XЪ¬ ю ВRВ Rю"В0RG{ю,xВ0RPXН XЪ~R!b яOzю"yКiRю еКћRбю -ВiRO{ю,yДЧRН XЪ~Rю ВiR{ю КxRю,> КxR·КxRєК~R»К~RНЧRН XТ5Rею"К‰Rю В±RН XЪ±Rю К‰Rю,К±Rю В©RН XЪ±Rю -К±R*”( 4б6!a {Ц КЕRBНGбЙН’хНсхЬ/сФэ.бЙ·Иw#АБГІRЇГDYцЇхНбR:Д2џ+НК SНD,НDRВЙ сЇ2Дцс2ћ!Ђ6"¤НmC:џ2Д*ў"¤"”*#|Ґ<В6S"Н XЪў ююВGS2м ГKS<ВИS*љл*› -Єя НDлЪЈSН“Ww#ТNS"В -:м ·Д_]Н«##"В -!Д~2џ6НѓC:џ2Д:у ·В~P:ћ·К‡ ГґННQVГDНmCГ)CБНбR+НКєSНљSГЙ Ї2ћН XЪў <К  *”( 4Гў е*”|µBВг бГщНгR+НКяSНD,юPК]НDAГА НЕ#Нў]>яНіV*В -л*љНDКљS~#ХНіVСГTQV:ДВDTеЕх3TХЕЙсБ=т+TбЙБб~ю,АНЕ~ю#МН¬ ге;TХйХЕЇН!TБСЇЙНwQК¦ ЦВ  л!© ~#fo"ж !"¬]|лІл Gл~ю,АХЕН© хНDAНDSНѕ9Нn*сБгOХе*¬] "¬]л*ж НDЪё бСлq#s#rбГЃTц7хНѕ9Нn*ХНБгеЕНIFг~OЕех#^#V·КFU*љНDТU*В -НDЪUY*Ж -л*› -НDЪZUсyНuGбБгХЕНIБСгЕе#s#rхсб#^#VБбХ#^#VлСyёТ4UGђOсФPUКKU~#Г;UБББББЬPUбЙ> ИГSUсбБглВkUЕxНтFН6GБгЕехГUННD$НD(Н¬ Х~ю,В–UННwQюК  НoQЇхНD)сгх}·К1еНтFлБсхКРUНеBВ·UН=BюКЙUw# В©UсНГ6G*± -щГeDН XЪ¬ ГјUНѓQК¦ юК  !' ~·КV -юКV#~·ВVЕ`iНИWБГдU>Ђ–O #~ЦЦџГІ(PY!' ЕЇwНьW:!НвZюяК» =Кќ =В@VСЇНГљ <К» Б!% ^#Vr+sЙН†QКЃVЕ -PYХюВwV!nVее`i>ГДV!' ~·ДVСНьWНБ)ЇВ„VЙНѓQК¦ ю!&ВњV!® ~+nГНѓQК¦ ! ~Гбсех*”~юКFEюКҐ\сХЕDMх'~юЂеМVб4N#схVю pКиVЖаz€w сБСwбЙ+s#r#6Ђ#6ЂбгDMе:·КW!" s#r#6ГXW! {zVєКPWХхеЕЂНСХНСбсwХХНС<ВNWН<К» БС!! {жwб: ·ВeWНИWбЙ!! ~юхЂ!) ХеМ†WНVСбсМ†WбГЕЂ~#В‰WБЙЕе*”~юКУ\( ~·КіW+~#5–O ~·бБЙ+~·КїWНЕWВ•W7бБ>Й*”ХT]% N#F+q#p##еЂ#6 ВЭWНьW: НвZ·>ВхW>Ђбw+w·СЙЕХе!(лНбСБЙН“WШю7?АЕе*”' 6#67бБЙНеНI~·КІ х#^#fk_юЪKXN#~ю:КOX++@КІ yЦ@ЪІ юТІ ю #ъ›X~ю.ВyXН‡Xс7хГeX#ВfXЇ2 -сбЙzю КІ юЪІ И> Г‡XКЂX> В XГЂXН(XеЂНюН<КЈ !ою w#ВЛXбНDAНDSН(Xе:ю!оѕВ1юН<Вѕ оНбЙЕНеНI~·К  #N#F -жЯюOК,YюIК,YюRВ  бНD,Хю#МН¬ НD,{·К¦ С_ХН†QВЇ СЕХН(XСБЕхzН[с"§ -ЪwY{·ВwY!~ю ВwY6B#6A#6Sбzх"”е#ю w# В„Y66СХНьWбсхеюВ¶YХНСН<К» ГМYН<ВМYСсхХюВЈ ГЄYСсХ!%Їw#w#w#wб~юКпYюВDНЕW*§ -Й) Ђp# ВхYГDАНUTГАеНUTНх Нс_НбЙН(XеЂНюХН<СХхДсСКЈ НбЙВXZе!ю6# НЪZбД(XЇ2 -е!яНЦZ!НЦZЂНюНюяКЈ 懇‡‡‡O!Ѓ  ~#НAyюВ«Z~ю КЁZ>.НA В•Z:e -Ж W:ђєЪДZ> НAНAЬiBюНюяВ…ZбЙ~ю*А6?# ВЪZЙХOЕНБСх!!4ВъZ#4ВъZ#4yю"В[с·ИюК» ю>И<ЙсЙюА+НХЂК$[ЕН*Бе*к НDЪ1!© s#rЇ#wВ8[бСЙцЇ2І]НwQюВ  Ее!­ ^#Vг~ю,М*+НВЙ г{ІКµ +s#rбБеЕ!° Їw#w!© ~#foлХе!ЂНDбВ[ГЦ[BK>л!е)гТ«[)#Г¬[)гл)лТє[ гТ№[#г=ВЎ[}ж_Б}la)Ъ1ТС[#x·В1"¬]бБе!І "®]!) "°]бе!Ђ}“o|љgСХНDЪ\bk:І]·КD\ЂНDТ\еНa\бЕDM*°]л*®]Н\"®]PYБН`\б}“o|љgµе*¬]#"¬]Вг[ббЙеНa\бЕDM*®]л*°]Н\л"®]PYБГ+\цЇ2 ЕХе*¬]л!« е~#foНDбs#rВ‡\: ·К”\!”\еЕе!& ГпVбСБЙЕ~# x±В™\БЙсХЕхDMН]Кё Нц\!± сwх!( V6ю КО\ЖаzОwсБСбЙХНя\Кё Нц\!± ~·СбБЙ!©Гс\!° ^#VЙ!° s#rЙDMНо\ХНи\лСНDЙН"§ -НЕ#Н%]>юНTН_]ГD *љл*В -НDИ!‹9}Ѓo|Оgђ®х!:9}Ђo|Оgс®Ѓ ВV] В,] Г,] *љл*В -НDИ!:9}Ђo|Оg‘®х!‹9}Ѓo|Оgс®Ђ Вђ] Вf] Гf]е*|Ґб<Ах:м ·В1сЙНVC*љ+6*_~·ВзRГ‡ “`!с`щЇ2м "–"± -* ^#Vл"ЖB"ЎB"¶л##^#Vл"ABл##^#Vл"эAл##^#Vл"A Н2·!К^!!"" !юя"Ї2“2d -2у 2н 2Љ!"Њ!Ђ"к !z -"x -!д -"L *"v ->2Д!_"_:_·В_<2_!Ђ~·"_К_F#~+w##Вw^+6"_!Н·К_ю/К«^+6""_#ю/К«^Н·Вњ^Г_6НюSКт^юMхКА^юFВЙ ННD:НtсКЯ^z·В1{юТ12ДГд^л"v -л+НК_НD/Г°^ННD:Нtл"к лГд^“`·К5_:К]G:Й]O*.ѕВ+_# В_Г5_ В+_ИГ_еЕу! ~!2V_жЯУт~юКU_юГА##~ю >яУтБбы+*v -еб+"v -+е:Д!З]"ў¤2Д<©лs#r#л е*к І DMб=В{_#"љ"± -С{•ozњgЪ)C·|g}oВ¤_|юЪё_!{•ozњgЪ)C"v -л"–"› -щ"± -*љлН7C}“o|љg++е!%`Н\GбНM1!`Н\G!\G" НiB! "Гі] - -Owned by Microsoft - Bytes freeBASIC-80 Rev. 5.21 -[CP/M Version] -Copyright 1977, 78, 79, 80 (C) by Microsoft -Created: 15-Dec-80 -Basic-800ГЊ]z)Ь)DїћEмc†9@•gQжC}СоDњE‰ C…sD +А"]DЙ Й э”„ $ о|D}D‚DДDг<У|"щ"ЙМПТхXL{LсL{PмtM=$‡$·YєXTюZэZЩS›R\SZeXЧY{TzTљSѕYHIyIѓI|(Ђ*g(А6Э78Ѕ&+7y8919цJтСЦH–F¤IвHтH¶"+IЉFђFЛz)ф) *m*zQ}QЂQЋU@VXVaQdQgQ;LM‡°Хлэ$Xq„љ®Їн"9BLdhiUTП«NДчBУTОSГLOSЕГONФљLEAТ’INФSNЗDBМVЙ+VУ,VД-OУ HR¤ALМ¶OMMOОёHAIО№ELETЕЄATБ„IН†EFSTТ­EFINФ®EFSNЗЇEFDBМ°EЖLSЕўNДЃRASЕ¦DIФ§RROТЁRМЦRТЧXР OЖ/QЦъOТ‚IELДАILEУЖОУRЕIШOTП‰O TП‰OSUВЌEФБEX¤NPUФ…Ж‹NSTТЪNФNРMРыNKEY¤ЭILМИPRINФћLISФџPOУEФ€INЕ±OAДДSEФЙISФ“OЗ -OГ0EОEFT¤OЖ1ERGЕЕOДьKI¤2KS¤3KD¤4ID¤EXФѓULМ–AMЕЗEЧ”OФХPEОїUФќО•ТшCT¤PTIOОєRINФ‘UФВOKЕ™OУEEЛETURОЋEAД‡UОЉESTORЕЊEНЏESUMЕ©SEФКIGHT¤NДENUН¬ESEФМANDOMIZЕ»TOРђWAРҐAVЕЛPCЁФTEРСGОQТIО TR¤TRING¤ШPACE¤YSTEНЅHEОПROОЈROFЖ¤ABЁРПОAО SINЗЩSТТAМARPTТЬIDTИЎAIФ—HILЕґENДµRITЕ·OТщ«т­уЄфЇхЮцЬэ§ЫѕпЅрјсyy||PF<2(z{ *z);*ф)&,,d-D.s)€%…%'i')1+%+Q+„3)NEXT without FORSyntax errorRETURN without GOSUBOut of DATAIllegal function callOverflowOut of memoryUndefined line numberSubscript out of rangeDuplicate DefinitionDivision by zeroIllegal directType mismatchOut of string spaceString too longString formula too complexCan't continueUndefined user functionNo RESUMERESUME without errorUnprintable errorMissing operandLine buffer overflow??FOR Without NEXT??WHILE without WENDWEND without WHILEFIELD overflowInternal errorBad file numberFile not foundBad file modeFile already open?Disk I/O errorFile already exists??Disk fullInput past endBad record numberBad file name?Direct statement in fileToo many filesp„P8Ј`юя@` :, in Ok -Break!9~#юґВb  ГT ю‚АN#F#е`izілКv лННCбИ ГT † Гь *|Ґ<К— :» -·Вг ГD=96543>7@?2C:Гг *Ј -"  - *"і -Ї2н 2у |Ґ<Кщ "µ - *± -ГўCБ{K2Љ*Ї -"· -л*і -|Ґ<К "ѕ -л"А -*№ -|µл!» -К4 ¦В4 5лГАЇwY2“НB!і{юDТP ю2ТR юЪU >(Ц_Но#ВU е*і -г~ю?Вo б!іГP Н#GбюяННCМ!BК»Y|Ґ<Д1>БНDAЇ2“НMSНB!E Н:ЉЦМХ*ЪВ > НЦ@Н(KСТЪ Ї2Є -Г‡ Ї2Є -Гп *­ -ЪУ ХщяННCСТУ "« -:b ·Кў Гв>Н(KЪў Н<=Кў хН(Н¬~ю Мѕ(ХНСс"Ї -ТЉSХЕНe]Н·хл"µ -лНшЪ;схКМ·ЕхеН5$бсБЕЬў"СсХК‡С:у ·В\*v -"› -*В -гБе еН¶Bб"В -лtБСе##s#r## w# y°В}СНЇ!Ђ6"¤*”"ј -Н7C*ў"¤*ј -"”Гў *љлbk~#¶И###~·КРю Т·ю Ъ·ННГ№#лs#rГЇХКлСНХКфНУCуъяДВЙ лСге*љDM~#¶+И##~#foННC`i~#fo?И?РГыЇ2i -2h -;#~·В=!@}‘O|G!"ЇЙю"Кyю КO:h -·~К‚#хНYсЦ:КaюJВg>2h -2i -ЦUВ%х~·г|бК*ѕКOх~#НYГmю?>‘ХЕКHjНZНEЪ—еМНѕВЦНРНѕ>‰КёУНѕВЦ>ЌБГH·ИOНZ№А#ГѕGO TOUBбНZе!ЦA‡O ^#Vб#еНZOжКd#№В<·тлyю(К!юУК!юТК!НZю.КНв!>Тdс·ъGБСцЂх>яНYЇ2i -сНYГ%б·т=Гк+хZO·Кi№ВMГkЊ«¬Є§©ЦўЉ“џ‰ПЌЇВ>2i -сБСюўхМWсюґВ„НY>тюЫВ5хНW>ЏНYсхГ{~ю.К§ю:Т"ю0Ъ":i -·~БСъOКУю.КO>НYХН(Н¬гл}НY|бНYГ%ХЕ~НС.Н¬БСе:g -юВя* |·>Вя}e.ю -ТЗЖГМхЖНY! НdЪ! сх~НYс#=ВбГ%iжКЋѕВ%Г ю&ВOеНбН[юH> ВK> НYХЕНiБГЕ>: y°АГг б+=2i -БСНZНY#НZНEТoю:Т‹ю0Тoю.КoГ%~ю Т ю К ю -К > х:i -<К©=Гm+~ю К¬ю К¬ю -К¬#Й>d2Ґ -Н‹9НУCрХл"§ -л:g -хНсеН¬!А НА(бСБеНм"Ў -!9НT В Х+V+^##е*Ў -ННCбСВсСщ"± -СлНЗBе*Ў -ге*гНУCОНdКб Тб хНсетNНz)г~юСМS ХелН’(ГqНф)Нґ(бЕХЃQZ~юС>ВrНеНф)Нґ(НE(бЕХOНdGЕ+НВЙ Нв$Нее*Д "*§ -г‚Е3ххГ E‚Е3еНб·Д\B"Ї -л!9"± -л~ю:Ке·ВЙ #~#¶К… #^#Vл":ю ·КдХ>[НЦ@Н1>]НЦ@СлН ХИЦЃЪюLТвOл! N#FЕл#~ю:Рю КТ†·Ию ЪЃюВ#:l -·ЙюК`х#2l -ЦТfЦхТ>ююВR~#"j -&o"n ->2m -!Њс·Й~##"j -+fГCНЋ*j -Г<2m -ХЕn -лGНН(лБС"j -с!Њ·Йю Тю0?<=Й:l -юТ«ю Ъ«*n -ВЁ###^#VлГ,:m -2g -юКГ*n -" *p -" Й!n -Го(НEЙ ЕШЦAOGНюуВхННEШЦAGНx‘Ш<г!К - s#=Вб~ю,АНГФННV рГг ~ю.л*µ -лК+НюК3ю л*n -лКЇ2l -+НРех!ННCЪdbk))сЦ0_лбГCсбЙК7CюКtю ВљRН;C Г”НЗBН(Бее*г>Ќх3ЕГЕН(:l -ю лИюВЙ ле*j -гНо#е*ННCбЬыФшТМ > 2© -бН,$`iЙГг АяНP щ"± -юЌВг б"! г>б:yHG+Н·ИёИ#ю"Кт<КцЦЊВхёЉWГхсЖГ-Н‹9НУCрл"§ -лХ:g -хНсгG:g -ёxК=Н¬:g - юЪH еюВ* е#^#V*љННCТs*Ж -ННCСТ{! -ННCТ{>СНЖHлНЈFНЖHгНЙ(СбЙюЁВµННУC‰Н(zіКўНцPYбТМл"№ -лШ:» -·{И:Љ_Гщ Нu ~GюЌКДНУC‰+K xКнН)ю,АГЕ» -·КШ <2Љ~юѓКуН(АzіВ<ГчНА*· -л*і -"лА~·В #####ГмНu А·КГг  -ХК=НлгК>лНУC,л*­ -лК=Н(ВЙ л|µК"­ -2Є -б"« -БГў Н~ю,Мю‰КdНУCП+еН†(бК~НИюК•ю Вн*n -ЙНм·ИНюўВЂВЂГl>2ЌГЎН Q+НМ!BКйюЩКч>юРКeюФКeею,К%ю;КвБНеНdКЬН)1НЗF6 * 4НTFВ* :Ќ·К:ЏG<К:Њ·К†?Т=ёГ:ђG<К:e -·К†?Т=ёФ!BН&GбГЎ(*” НTF~В\:Ќ·КI:ЋG<:ЊК\ёГV:‘G:e -юяК\ёФ!BТвЦТ\/ГЧхННV схюФКtz·т|еНTFВ›:Ќ·:ЏВђ:ђo<К›&Н ,лбНУC)+сЦФеКЖ(*” НTF~ВЖ:Ќ·КГ:ЊГЖ:e -/ѓЪЧ<КвН!B{=ъв НЦ@ВЫбНГЁЇ2Ќеgo"”бЙНУC…ю#К§QНHLНoН‹9Н;*ХеН0KСБЪDЕХНКFб>Г-?Redo from start -#~·КЙ ю"В4ГЪббГN:¦ -·ВГ Б!!Н#G*Ї -ЙН Qе!a Г;ю#КYНHL™Ею">2“>я2з АНИF~ю,ВЏЇ2з НГ“НУC;еН&GбЙе:з ·К«>?НЦ@> НЦ@Н0KБЪDЕЇ2¦ -6,лбеХХ+>Ђ2Ґ -НН‰:~+ю[КЦю(Вэ#НКЙ ю"К4ю(КЩю[КЪю]Кщю)ВЪВЪНКю,ВЙ г~ю,ВB>2 - Нd: - =ВBеНdМЁHб+Нг~ю,Кїб+Н·бВN6,ГEе*И -цЇ2¦ -гГQНУC,Н‹9гХ~ю,Кc:¦ -·ВУцЇ2ј НTFВ—QНdхВўНWGю"КЊ:¦ -·WК‰:,+НЛFсЖO:ј ·Иyл!±гХГ.НсхЏЕЪС.ГК.+НКЅю,ВGг+НВMС:¦ -·лВьCХбГйНм·Вм#~#¶Кг #^#Vл"Ј -лНю„ВУГcНУCрГНУC(+ХНЗBН“Ї2 "ј -*ј -Б~"ќ -юпШютЪЋЦт_В4:g -ю{К[Hю Р!xVєРЕЕzюК¬юQЪєжююzКє! :g -ЦКб ·N#FЕъ#N#FЕв! N#F#ЕN#FЕЖKGЕгЕ*ќ -ГЦпЪЖюТЖюЄєWЪЙ "ќ -НГђНф)Н™(М6Г‡ХНz)СеuГ‡xюdРЕХd!BеНdВX* е\FГ‡Бy2h -:g -ёВьюКюКgТ+WxюК(zюКOxюКdzюКб Тo!© N#FС* ЕЙН *Нф(б" б" БСН©(Н *!•:h -…oЊ•g~#foйxхНф(с2g -юК6б" Г;Нф)БС!џГAбН™(Н*Нґ(б" б" ГiелН*бН™(Н*Гg'НКЮ ЪС.НEТJю Ъ]<КУ=ютК“юуК<ю"КИFюХКOю&КiюЧВЦН:ЉеНХбЙюЦВзНе*і -Н,бЙюЬВННУC(ю#ВНr еНPQбГН‰:НУC)ел|µКНЬ)бЙюТКЫюЪКЛIюЭКoBюШКIю…К'UюУКTНюНУC)Й}Н*ј -еНk(бЙН‹9ел" НdДо(бЙ~юaШю{Рж_Йю&В(НН[юOК­юHВ¬#~Н[НEлТ—ю:ТОЦ0ЪОГћюGТОЦ7))))µoлВ~ГЫ +НлТОю8ТЙ Ы Е)Ш)Ш)ШБЦ0O лГ­НЬ)лЙ#~ЦЃюВиеНю(бВМ7>OЕНyюТНюНУC,Н;*л* гелНu лгГ)Н4г}ю Ъ юеЬф)бHХ>2 џ N#fiйюуИю-Ию+ИютИ+Й<ЏБ ЖяџН(ГaZННz)}/o|/g" БГ:g -юТqЦ·7ЙЦ·ЙxхНz)сСюzК ,ю{КЁ+ЧЕюFВ•{µo|ІЙюPВ {Ґo|ўЙю<В«{­o|ЄЙю2Вё{­/o|Є/Й}/Ј/o|/ў/Й}“o|љgГ,:ЊГФ:e -Ђ2Ґ -Н‹9лг:g -хХН"ј -б"ќ -сН¬НЗB!шя9щНч(:g -х*ј -~ю)КЛНУC,е*ќ -НУC,ГЃс2N с·К2g -!9Но(!9щС.,·ъв:g -…G:N OЂюdТх}!P OНАЗЕЕГ:*ј -Не*ќ -НУC)>Х"ќ -:ж -ЖхOНЗBсO/Ђ2Ґ -¶OГђ9ю~ВЙ #~#юѓК`JГЙ Нx 2щЫГХНb УЙНb х+НК НУC,Нu сWЫ«ўК ЙГЙ юћВ: ННu 2Џ_НH 2ЋЙНu 2ђ_НH 2‘ЙЦТH Ж/<ѓЙННеНz)лбz·ЙНu 2 2 НУC,Гu НННY В+Н{Й>2ЌБНШЕНe]!яя"бСN#F#x±К‡ НTFМQBЕN#F#ЕглННCБЪ† геЕл"µ -Н1б~ю КН > НЦ@Нж !b НЬ Н!BГ‘ ~·ИНҐB#ГЬ b яЇ2ж Нe]Гщ #И~·Ию Ъ!ю _Ъ!·ъA!_ю.К!Нв!Т!ЇГ/!:ж ·К-!<В-!> И>2ж {ю Ъ=!ю Ън!Гх <~ВJ!#~ж#юЫВX! юўМk*юґВl!~#ют>ґКl!+еЕХ!:G@ #T]~·Кu!#тy!~ёВv!люТКЏ!юУyСБ_Вў!:ж ·>2ж Г·!ю[В®!Ї2ж ГЖ!:ж ·>я2ж КВ!> КXG{ГЙ!~#_жКXGітЖ!юЁВЮ!Ї2ж бГщ НEРю0Шю:?Й+НХЕхНЋс "Ею Кo6ю Кr6*n -Г)1БС:l -Oю К"ю HВ*">&И{И:m -юЪ;"!К;"#~ю Мѕ(~#·Кm"И:m -юЪA" -В^"ю.Кh"юDКh"юEВA"ГA"{·Кv"И*j -Гщ НШЕН5$БСЕЕНшТ”"T]геННCТ!E Н#GБ!‡гл*В -ННCВ¦"`i"В -ЙНЫ"Н\]~ГХНС"ХН\]НУC,Нu СЙНеНЫ"лбЙz)ЕНdш: юђАНE(шНф)Ђ‘Г€% -ЕPXК/#ю,К#ХНBKСК/#НУC,НК/#сНУC,ХН(ВЙ zіКлглЕНшСХЕНш`iСННCлЪСБсеХГ[# Ъле!щяННCбЪХ^#VzілСКn#~#¶+лВK#ЕН‘#БСбХ^#VzіКЊ#лгл#s#rл лбГu#† ЕюцЇ2© -*љ+#~#¶И#^#VН·Кљ#O:© -·yК$юЁВФ#Ню‰В¦#НюВ¦#ХН3zіВЭ#Гэ#юВЈ#ХН3еНш > Ъ%$НB!$ХН#GбН1БбеЕН1бС+ГЈ#Undefined line ю Вя#ХН3ел###N#F>!ь#е*j -е+p+q+wбЙ:© -·ИГ’#НУCBНУCAНУCSНУCE:З ·ВТ е*Д -л*Ж -ННCВТ б~Ц0ЪЙ юТЙ 2Ж <2З НЙ~·ИНѓ$#Гy$хГ\AК”$НеНz)Г°$е!ё$Н#GН KСЪDХ#~НС.~·В•$Нz)"j8НП7бЙRandom number seed (-32768 to 32767)Гд$л*"Д л+НК%юўК%юПВр$·В%#~#¶YКг #^#Vл"Д лНyю~К.%юґКо$юµВп$Вп$Йю‚Ко$юѓВп$ИНК%л*е*Д "лЕН‹9Б+Н%Кc%НУC,+8%г"бХЙх: 2 - схЇ2 сЙ! 6Н·(Г€%Н·(Нt(x·И: ·К©(ђТў%/<лН™(лН©(БСюРхНЦ(gсНb&|·! тЙ%НB&Т#К€0.Н‰&Г#&ЇђG~›_#~љW#~™OЬN&hcЇGy·В&JTeoxЦюаВЭ%Ї2 Й|µІВ&yТы%OГ&)zWyЏOтф%x\E·К#&! †wТп%Кп%x! ·ь5&F#~жЂ©OГ©(АА АЂ4АГ‡0~ѓ_#~ЉW#~‰OЙ! ~/wЇoђG}›_}љW}™OЙЦЪq&CZQГd&Ж ozі°В…&y-ИOТ{&Г‹&Ї-ИyOzW{_xGГ…&Ѓљчѓ$cCѓuНЌ„©ѓ‚Ѓв°Mѓ -rѓф5НE(·кНР&1ЂrГ'Нґ(>Ђ2 ЁхН™(!›&Н§7БбН™(лН©(!¬&Н§7БСНi'сН™(НT(БСГ€%НE(И.Н(y2<'л"7'PX!Ъ%е!%'ее! ~#·КY'елWyТ='ХСОO|g}oxGжКQ'xц GzВ/'лбЙCZQOЙН™(!®-Н¦(БСНE(Кђ0.яН(4Кg04Кg0+~2 '+~2њ'+~2'AлЇOW_2Ј'еЕ}Цo|ЮgxЮG>Ю?Т±'2Ј'сс7ТБбy<=тП':Ј'жАхxґµКК'> бґГ$&{_zWyO)xG:Ј'2Ј'yІіВ”'е! 5бВ”'Гп%>я.Ї! N#®G.x·К'(}! ®ЂGЁxт&(ЖЂwКW'НЦ(w+ЙНE(/б·бтп%Гg0Нґ(x·ИЖЪЂ0GН€%! 4АГЂ0: ·И: ю/џА<Й€! Op#6ЂГЧ%Н†(рНdъш+Кб ! ~оЂwЙН†(oџgГЬ)НdКб тE(* |µИ|ГO(л* ге* гелЙН·(л" `i" лЙ! ^#V#N#F#Й ГН(л:g -Gw#ВН(Й! ~7w?##wy7O®Й! И(Гъ(! Й(Х НdШ Йx·КE(!N(еНE(yИ! ®yшН )©Й#xѕА+yѕА+zѕА+{–АббЙz¬|ъO(єВ@)}“ИГP(! НЙ( ·КE(!N(еНE(OИ! ®yш#–В)+Вf)БЙНI)ВN(ЙНd* шКб в™)Нф(! 6Но(Н&,Ню)Гњ)Нy%: ·хж2 : юђТЫ НB*: ·ВЅ)слГВ)слтИ)|/g}/oГЬ)!Ы е: юђТе)НB*лС" >2g -ЙЂђН)АajГЫ)Нdаъ*Кб Нґ(Н6*x·ИНЦ(! FГ#&* Н6*|UђГY(НdРКб ь*!" " >>Гб)НdИГб GOW_·ИеНґ(НЦ(®gьf*>ђНb&|Ь5&ЬN&бЙzЈ<А ЙНdшНE(тЂ*Нt(НЂ*Гk(НdшТ¦*Кб НП)! ~ю: Р~НB*6{хyНЧ%сЙ! ~юђВК*O+~оЂ+¶В¶*·!ЂВЙ*НЬ)Г *y·ИюёРхНґ(НЦ(®+6ёх+qьъ*: O! >ёђН%-сьЭ,Ї2я сРГ‘,! ~5·#Кэ*Йе!x±К"+>)ЪЦ;л)лТ+ ЪЦ;=В+лбЙ|џGНо+yГ4+|џGеzџ€¬тЫ)ЕлН*сбН™(лН,ГN0|µКЬ)еХНв+ЕDM!>)Ъ‰+л)лТq+ Ъ‰+=Вc+БС|·ъЃ+СxГк+оЂµКљ+лБбН*бН™(Н*БСГ'x·БъЬ)ХН*СГt(|µКМ Нв+ЕлНо+DM!>х·ГЛ+хе ТК+с7>б{_zW}o|gс=ВБ+лБХГw+|ЄGНй+л|·тЬ)ЇO•oyњgГЬ)* Но+|оЂµАлН6*ЇГY(ХНЁ+Ї‚g{oНЯ)сГк+! ~оЂw! ~·ИG+N ·Кл(ђТR,/<х#еFwx+ ВB,бF+Nсю9РхНЦ(! G>w2я с! Н%-x·т†,: 2я Нъ,ТЛ,л4К€0НQ-ГЛ,>ћНь,! Ь-ЇG: ·Вє,!я Vwz# Вџ,xЦюАВ’,Гп%!я НY-·тІ,x·КЛ,! †wТп%И:я ·ьЭ,! ~жЂ++®wЙ! 4А#Вв,4К€0+6ЂЙ0 ! Г->Ћ!  2 -ЇЋ# В-Й~/w!я ЇOyћw#В-ЙqеЦЪ<-беNsY+В1-Г'-Ж WЇбИе~w+ВF-Г?-! ГC-~w# В[-ЙНE(И: ·Кп%Нщ'Нќ.q·ХК™-ЕGЬъ,НQ-xБ В‚-СВy-Г‘,! Н--Г‘-НМММММL} „: юAТЖ-ў-! НЙ(Гd-: ·тЦ-ж2 !t(еН. ! НЙ(Н.Н&, ! НЙ(>хН.Н".Н&,! Н3.с=Ву-Н.Н.! 5АГп%! >5И=В.ЙС>! N#F#Е=В(.ХЙС>! Бp+q+=В9.ХЙ: ·К”0: ·Кп%Нц'44К€0Нќ.!7 qA>ћНс,™?Ъt.>ЋНс,ЇЪ: <=ъО,! Н[-!0 НY-x·Вb.! 5Вb.Гп%y2 +6 ~q+ВЁ.ЙНф(л+~·ИЖЪ€0wеН&,б4АГ€0Нп%Н3*цЇj%Ех>2 сля`hМЬ)л~ю&Кiю-хКщ.ю+Кщ.+НЪа/ю.К†/юeК /юEВ5/еНюlК#/юLК#/юqК#/юQбК4/:g -юКN/>ГN/~ю%К“/ю#К¤/ю!КҐ/юdКN/юDВe/·Н®/НН2НЪS0Вe/Ї“_е{ђ_фЅ/ьН/Вi/бсеМk(бНdие!W'еНе)ЙНd Вe/Ь®/Гщ.Нсе!W'е!z)ехГe/·Н®/НГe/еХЕхМф)сД *БСбЙИхНdхд.(смІ.с=ЙХехНdхд^'смІ-сбС<ЙХx‰GЕе~Ц0хНdт0* Н ННCТ0T])))сO |·ъ0" бБСГщ.yхН*7Т50t”$Н)т20Н.(сНH0Г 0Н**НІ.Нф(сНT(Н**Н&,Г 0Н™(НT(БСГ€%{ю -Тb0ѓ†Ц0_ъГX/е! Нdвw0: Гx0y®бГћ0сс: Гћ0с: /Гћ0yГ—0: !b"њеЕХхх*№ -|µВЛ0! ~·Кё0=ВЛ04*њНy$2e -> Нѓ$> -Нѓ$с!  -1ТШ01НГ(НdЪк0! 1НГ(*№ -|µ*њ л"њК1ННCКЫ ГМ сСБбЙяяяяяяяе!@ Н#Gб"GЕНЬ)ЇНІ1¶ГF1ЇНІ1жК416+лН†(лтF16-ЕеНk(бБґ#60:ќ -W:g -ЪЧ2КП2юТ»1Нє5! F :ќ -_ж К1x№*В1{жВ1AqНКџ1юEКџ1юDКџ1ю0К1ю,К1ю.Вў1+60{жК«1+6${жА+pЙ2ќ -! 6 ЙН™(л* е* елхЇ2 схНf2Eе~ёК2ю:Тз1ю0Ъз1 #~·ВШ1>DёGбВЦ1сБСл" `i" лБСЙЕ#~ю+КN2ю-К%2Ц0Ox‡‡Ђ‡ЃGюТN2#~·В 2`БxюEВC2y„ю бТч1>Ђ2 ГS2|ЃюбТч1Г;2БбГч1сБСл" `i" лБСН©(#юеЮWН\4х: ·тЃ2с‚Г‹2с‚ъЏ2єТЏ2ЦбхНы460Мѕ(Н"5+~ю0Кћ2ю.Дѕ(сКР2хНd>"Џw#с6+тБ26-/</Ц -ТГ2Ж:#p#w#6л! Й#ЕюzТQ3Ъо3Ну4СzЦфП4Нє5{·М(=фП4еНb1бК3p#6! #:ј -•’И~ю К 3ю*К 3+ех3ЕНю-Ию+Ию$ИБю0ВI3#НТI3++wсК?3БГ 3сКI3б6%ЙеЪх3Кm36НC)ъ{3бБН)1+6%Й¶КН)тd3НE(Д\4бБъ 3Е_x’“фП4Нж4Н"5іДЯ4іД5СГу2_y·ДЛ/ѓъ«3ЇЕхьН/ъ­3Б{ђБ_‚xъЙ3’“фП4ЕНж4ГЪ3НП4yН5OЇ’“НП4ЕGOН"5Б±Ве3*ј -ѓ=фП4PГь2еХН*СЇКы3НE(7Д\4бБхy·хДЛ/ЂOzжюџWЃO“хЕьН/ъ4БсЕхъ)4Ї/<Ђ<‚GН"5сфШ4Н5БсВL4Н(~ю.Дѕ("ј -сЪS4ѓђ’ЕН®2лСГь2ХЇхНdвЂ4: ю‘ТЂ4с5! НЙ(Нd-сЦ -хГe4НІ4Нdк•4C‘щOН)Г›4щ5НC)т®4сНѕ/хГѓ4сНН/хНІ4с·СЙНdкД4t”ш#Н)ГК46НC)бт¦4й·И=60#ГР4ВЯ4ИН560#=ГЫ4{‚ -Н5ЕхеХ/бе>ћНя,ТK5б>ЋНя,лбp#сБ=ВB5Ее! Н¦(Г~5ЕеНy%>НB*Н©(бБЇ_6?Н5ЕхеХНґ(б/{–_#zћW#yћO++Т’5НB&#Н©(лбp#сБЪ„5>ГА5Хe6>Н5ЕхелN#FЕ#гл* /}“o|љgТУ5" Сбp#сБ=ВА5Н5wСЙщўбяџ1©_cІюяїЙ¶ЂїЙ¶ЂЖ¤~Ќ@zуZ rN ҐФииvHд TКљ;бхЂ–@B †''иd -ЇGВЕНЫ"Б ХЇКЋ6)Џ)Џ)Џ)Џ·Вџ6y=Кџ6·К«6ЇЖ0ю:ЪЁ6ЖЇ Кё6КЉ6Г€6бЙ!t(гйН™(! 6Н¦(ГП6Нф)БС!r%е>2 НE(xК+7ти6·К—0·Кр%ХЕyцНґ(т7х: ю™Ъ7сГ7сХЕНЌ*БСхН)б|б" б" Ь»6Мt(ХЕНЅ&БСН'8Ѓ;ЄН': ю€Т`7юhЪr7Н™(НЌ*ЖЃБСКc7хН…%!{7Н§7БJГ'Н™(: ·тo7ссГп%Г~0ЃГ©(|€Ytа—&wДz^Pc|юu~r1ЂЃН™(•+ХеНґ(Н'бН™(~#Н¦(сБС=ИХЕхеН'бН·(еН€%бГ°7RЗOЂНе!—&Н¦(НЭ7бГ6*НE(!H8ъ>8!i8Н¦(!H8И†жw#‡‡O Н·(Н':G8<жю€2G8!i8‡‡O Н|%Нґ({YоOO6Ђ+F6Ђ!F84~Ц«В58w НЪ%!i8ГА(w+w+wГ85JК™9v"•і -ЭGSС™™ -џeјНЦw>RЗOЂh±Fh™й’iСuh!я8Н|%: юwШ: ·т•8ж2 t(Х"~ѓщН'Н™(НЌ*БСН…%Н)ъЩ8ЂН€%ЂЂН€%НE(фt(Н€%Нt(: ·хтж8оЂ2 !9Н7ср: оЂ2 Йѓщ"~ЫIЃыЧ†e&™‡X4#‡б]Ґ†ЫIѓН™(Н8БбН™(лН©(Нy8Гg'НE(ь»6ьt(: юЃЪN9ЃQYНi'!‚%е!X9Н7!я8Й JЧ;xn„{юБ/|t1љ}„=Z}И‘~д»L~lЄЄЃ+НИНУC,}9ЕцЇ2f -NНEЪЙ ЇG2Е#~ю.Ъг9Кµ9ю:ТЇ9ю0Тµ9НEЪг9GЕяЕцЂ#~ю:ТН9ю0Тј9НEТј9ю.Кј9xю'ТЙ Б2Е~ю&Тя9 :Хю%Ию$Ию!Ию#Исyж_е!‰ -Vб+z2g -Н:Ґ -=К’;т):~Ц(К;Ц3К;Ї2Ґ -е:· ·2ґ К}:*ж -и -"µ лГc:o№В[::g -ЅВ[:ёКе:&…л*Ж -лННCКр;^#~#№Вё;:g -»Вё;~ёКЬ;#^^#V#В;:f -·ВТ сDMКW'–К]< Гг #:ЕѕВ№;#·Кѕ;+Нё<Гѕ;:g -w#_сК–!МЦ@Д1> НЦ@!b ея ~#·В=бGНхA·К"=Н[Ц0ЪA=ю -ТA=_z‚ѓWГ"=е! =гВL=юШКє>юOКЙ>юЭКЧ>юрКЁ=ю1Ъg=Ц ю!Км>юКв=ю#К»=юК>>юКм=юК >юКЪ>ю(К9>юКµ=юК6>ю>ВЦ@БСН!BГи<~·ИНҐB#ВЁ=Йе!>г7хНхA_схЬ>~·Ка=НҐBсхЬЃ>ЪЧ=#~»ВЕ=ВЕ=сЙНЬ Н!BБГя<~·И>\НҐB~·К>НҐBНЃ>Вф=>\НЦ@Й~·ИНхAю Т+>ю -К+>юК+>ю К+>>НЦ@Г >wНҐB#В >Й6HяНЁ=НхAюКq>юКs>ю КЧ>юИюКs>ю -К‘>юК‘>ю К‘>ю Ъ>>ю_В‘>>_К™>НҐB+>>Хе ~·7КW'#~+w#Гѓ>хyюяЪЎ>с>НЦ@Г>>ђ Елo&DM#Н№BБсwНҐB#Гћ>x·И+>НҐBВЙ>Йx·И+~НҐBВЙ>ЙНЬ Н!BБСzЈ\НМ@НЦ@Ї_WНМ@W~#ю!КЋ@ю#КЎ?ю&К‰@Кg@ю+>КH?+~#ю.КА?ю_К}@ю\К&?ѕВ??ю$Кљ?ю*В??x#юЪ’?~ю$> Вћ?юЇЖ#‚WКц?~#ю.КЛ?ю#КЎ?ю,ВЧ?zц@WГЎ?~ю#>.В??# Кц?~#ю#КЛ?Хф?ХT]ю^АѕА#ѕА#ѕА#xЦШССG#КлСz+жВ@x·К@~Ц-К@ююВ@>Ж‚WбсКr@ЕХНСБЕеCxЃюТzцЂН*1Н#Gб+Н7КN@2¦ -ю;КK@ю,ВЙ НБлбехХ~ђ#_~#fox·ВE?Гm@НМ@НЦ@бсВ?Ь!BгН«HбГйНМ@~#НЦ@Г_@Г’@>сНМ@бсКr@ЕНН;*БЕе* Axхx·ДOIН&G* с·К5@–G> К5@НЦ@ГВ@хz·>+ДЦ@сЙхеНTFВfVб:Ќ·К\AсхюВь@:ЊЦЪш@2ЊсГ7Aю ВA> НЦ@:ЊжВAсЙсхЦ К3AЪ6A:Џ<:ЊК-Aе!ЏѕбМMAюяК6A<2ЊсхЕХеOНбСБсЙЇ2Ќ:Њ·И> Н7A> -Н7AЇ2ЊЙ:“·ВXGсЕхюВ{A:e -·КЌA=2e ->Г®Aю ВђA> НЦ@:e -жВЂAсБЙю Ъ®A:ђG:e -КҐAёМ!BюяК®A<2e -сБхсхЕХеOНбСБсЙНTFКхAНВWРЕХеНMSбСБ:у ·В0P:ћ·КзA! еГ7CеЕХ!E Н#GСБЇбЙЕХеНбСБжюА:“·МAD/2“·КADЇЙ:e -·ИГ!B6!a > НЦ@> -НЦ@НTFК3BЇЙ:Ќ·К?BЇ2ЊЙЇ2e -:€=ИхЇНЦ@сГFBЕХеНбСБ·ИНхAюМхA2‰юМCDГDНеН™BВѓBН·КЊBНхAхН·Fс_НшH!D " >2g -бЙ:‰·ИхЇ2‰сЙНЦ@ю -А> НЦ@Н+B> -ЙНлBЕгБННC~И +ГјBе*v - >Ж•o>яњgЪЭB9бШ*–++"± -Гг НяBРЕХеНgGбСБНяBРГеBХл*› -ННCлСЙ:ДG!¤Ї^#V#ВCН TЇА*љН}D2м 2Є -2© -w#w#"В -*љ+"§ -:н ·ВXCЇ2З 2Ж !К -6#ВQCИ7!i8НГ(!F8Їw#w#wЇ2» -og"№ -"А -*v -:у ·ВѓC"› -ЇНжC*В -"Д -"Ж -:н ·М TБ*–++"± -##щ!z -"x -Нr%НDAНйЇgo"ж -2· "N "є "д -2Ґ -еЕ*§ -Й|’А}“Й~гѕВгC#г#~ю:РГ -ГЙ л*љКыCлН(еНш`iСТМ+"И -лЙА<Г DАхМ Tс"Ї -!z -"x -!цяБ*ех}¤<К-D"ѕ -*Ї -"А -Ї2“НDAНBс!J Вb Г† >хЦВOD2Ќ2“>^НЦ@сЖ@НЦ@Г!B*А -|µКг л*ѕ -лл"лЙНu А<2€Й>Ї2ю ЙН‹9Хе!ц НЙ(*Д -гНdхНУC,Н‹9сGНdёВб гле*Д -ННCВБDСбгХНЙ(бц НЙ(бЙГ>2Ґ -Н‹9ВБDе2Ґ -`i - ·ъШD л*Ж -ННCВеD `i"Ж -б~ю,АНГДDсбЙ~юAШю[?ЙГ;CК Eю,К EН+НК EНУC,К Eл*–лю,К4EНyE+НХК…EНУC,К…EНyE+НВЙ ге!NННCТ‚EбН—EЪ‚Eе*В - ННCТ‚Eл"v -б"–бГ EНС"zіКЙГЭBе*–л*v -{•_zњWбГME}“_|љWЙхцЇ2ї с"Ѕ Д‹9"§ -НP ВП щХ^#V#е*Ѕ ННCВП бСХ~х#Х~#·ъщEН¦(ге:ї ·ВзE!А Н¦(ЇД|%бНА(бН·(еН)Г/F####N#F#г^#Vеi`:ї ·ВF*А Г FН1+:g -юКЫ лбr+sбХ^#V#гН3)бБђН·(КAFл"i`Гњщ"± -*§ -~ю,В ННЁEе*”|µбЙНҐH~#N#FСЕхН¬HсW^#N#Fб{ІИzЦШЇ»<Р -ѕ#КrF?ГP(Нo6Г™FНr6Г™FН)1НЗFНЁHьHЕ~#еННХ*x -" >2g -НЙ(› -ННC"x -б~АГг #НЗFНЁHН№(И -НЦ@ю М+BГ-G·сх*Ж -л*› -/Oя #ННCЪZG"› -#лсЙсКг їх>GЕ*v -"› -!е*Ж -е!z -л*x -лННCxGВH!L "ё *Д -"µ *В -л*µ лННCК№G~###хНљ<сюВІGНHЇ_Г•G*ё ^#Vzі*Д -КЫGл"ё ##^#V#л"µ лГ•GБл*Ж -лННCК7H~#х##Нљ х{Н№FGсКьH*™ -w#В?IГьHНБIЇгO>ее~ёЪXIxЕНхКнIсНx ·КхНУC,НН;*НУC,е* гННУC)еНҐHлБбсЕW'ЕХЕхХН«HСсG=Oѕ>Р·xИ~#F#fh ‘GЕХгN#^#VбеХЕѕВUJ КLJ#В7JССБСЇЙбССБx”Ѓ<ЙБСб#В4JГIJНУC(Н‹9Н;*еХл#^#V*Ж -ННCЪЌJ*љННCТЌJбеНЈFбеНЙ(бгНУC,Нu ·Кх~НгJХНчеНҐHлбБсGге!W'гy·И~ђЪ<№ЪАJyH Х#^#fk GСлN#~#foлy·Иw# ИВШJЙяю)КсJНУC,Нu НУC)ЙНdВKНЁHНgGл*Ж -л*› -ГВ>?НЦ@> НЦ@Г(KНїAюВzK6Г8KpЇ2‰Ї2ж НїAюВoKН!B!яяГ=:’·>\2’ВUKК'KНЦ@+КiK~НЦ@ГK+НЦ@ВKНЦ@Н!B!b хЇ2’сOюКAK:’·КђK>\НЦ@Ї2’yюКъKюМCD7Ию К;Lю КъKю -ВґKК(KГъKюМCDК(KюВТKК0KНЦ@> НЦ@>ГbKюВЬK>#ГiKюВхKЕХе6Н!B!b НЬ бСБГKю ЪKx·ВLе*”|µб>КL!b Н(л"Г_yq#НЦ@Ц -ВK2e -> НЦ@НїA·К,Lю КKГzK:ж ·КBЇw!a Йх>2ж сю;А2ж Г"Ў -НЭ$НлНБL33ВoL щ"± -*е*Ў -еХГЎLВЙ лНБLВлLщ"± -л*лл"Д л##^#V#~#fo"лНеН†(бКµLґAЕ3Г *Д "бББГ !9~#‚№ВХL ГЕLґ№Ае~#foННCбИ ГЕLГг >Ђ2Ґ -Н‹9елНdНо(НЫ""ж  НЗBС!Ая9щл +Н"§ -К_MНУC(ЕХН‹9гs#r#гСБ~ю,В=M НГ#MНУC)"§ ->!‘б=К_MС=К_MБ=К_MЕе!9DMбе!jMге*ж гЙ*± -щ*§ -Г Ї2н 2о ~Е»В‡M2н #+НН”Rе!"ф б+НКNНУC,ю,КёMНеНЫ""ф б+НКNНУC,Є»КЫMНУCAНУCLНУCLКNOНУC,»ВЙ ·х2о ННШЕН5$БСЕ`i"с НшТNT]"п бННCТсВNO*е*љ+#~#¶КПN#^#Vл"лН·КNю:КNё»К2Ґ -Н‰:КўNxцЂGЇН’;>2Ґ -ВhN~ю(ВnNсГѕN~ю(КбН‰:zіВЏNxцЂGЉNХЊ:Х:g -WГ):zіКеBK!±Nе - ·ъ—N -цЂЙ2Ґ -~ю(ВnNг Н–Nб+НК"Nю(ВИNННУC)К"NНУC,ГBNб"л*Д -л*В -ННCК#OеN##~·хжw#Нљ< сБъЫNЕНO*Д -"Д -лбГЫNл*Ж -ННCВ Oy•_xњW `i"Ж -Йл*Ж -лННCКNOе##~·хжw#Нљ2у :н ·ВmS:Д2џГ№RЇ2у 2н *В -DM*ё "Д -*› -#л*и "› -ННCВNP `i"Ж -л*ф л*љ+zіК НшТМ `iГ ГмН Q+НКЪPНеНdККPН)1НЗF* #^#Vю ВЄPr+s+5Н&Gб+НКЪPю;КїPНУC,+Н>,НЦ@Г‡P>"НЦ@Н&G>"НЦ@Г­Pе*”|µКQ~юВQНВ\}“o|љgюяТQ> НЦ@+|µВщPбН!BГйю#АЕН*QС»КQюВ  НУC,PYл"”лЙ+Ню#МННx _:Д»Ъ¦ е!¤N#F -·бЙН:Q!)юВ^Q!І лЙ>>>хН¬сН№F*™ -Нч(ГьH>>>хНҐHсѕТ<2g -#~#foГо(НdЏ ,В»QZГ»QН QН‹9Н;*йЕХЇW_хЕеНВWЪ¬ ю ВОQВѕQю"ВгQG{ю,xВгQPXНВWЪ1R!b яOzю"yКRю еКQRбю -ВRO{ю,yДЉRНВWЪ1Rю ВR{ю К+Rю,> К+R·К+RєК1R»К1RНЉRНВWТиQею"КяНhVл*В -л*љННCКMS~#ХНhVСГЙSV:ДВьSеЕхлSХЕЙсБ=тгSбЙБб~ю,АНЕ~ю#МНu геуSХйХЕЇНЩSБСЇЙН*QК¦ ЦВ  л!© ~#fo"ж !"o]|лІл Gл~ю,АХЕНr хНУCAНУCSН‹9Н;*сБгOХе*o] "o]л*ж ННCЪё бСлq#s#rбГ9Tц7хН‹9Н;*ХНчБгеЕНҐHFг~OЕех#^#V·КьT*љННCТЧT*В -ННCЪЧTY*Ж -л*› -ННCЪUсyН ИГ UсбБглВ!UЕxН№FНэFБгЕеГБTННУC$НУC(Нu Х~ю,ВKUНН*QюК  Н"QЇхНУC)сгх}·КеН№FлБсхК…UН™BВlUНхAюК~Uw# В^UсНйГэF*± -щГDНВWЪ¬ ГqUН6QК¦ юК  !' ~·КГU -юКГU#~·ВёUЕ`iН}WБГ™U>Ђ–O #~ЦЦџГ(PY!' ЕЇwН±W:!НћZюяК» =Кќ =ВхUСЇНГљ <К» Б!% ^#Vr+sЙН9QК6VЕ -PYХюВ,V!#Vее`i>ГyV!' ~·ДМUСН±WНБ)ЇВ9VЙН6QК¦ ю!&ВQV!® ~+nГЧН6QК¦ ! ~ГХбсех*”~юКEюКe\сХЕDMх'~юЂеМЙUб4N#схVю pКќVЖаz€w сБСwбЙ+s#r#6Ђ#6ЂбгDMе:·КИV!" s#r#6Г W! {zVєКWХхеЕЂНСХНСбсwХХНС<ВWН<К» БС!! {жwб: ·ВWН}WбЙ!! ~юхЂ!) ХеМ;WНЙUСбсМ;WбГйЕЂ~#В>WБЙЕе*”~юК–\( ~·КhW+~#5–O ~·бБЙ+~·КtWНzWВJW7бБ>Й*”ХT]% N#F+q#p##еЂ#6 В’WН±W: НћZ·>ВЄW>Ђбw+w·СЙЕХе!(лНбСБЙНHWШю7?АЕе*”' 6#67бБЙНеНҐH~·КІ х#^#fk_юЪXN#~ю:КX++@КbXyжЯЦ@ЪbXюТbXю #ъRX~ю.В0XН>Xс7хГX#ВXЇ2 -сбЙzю КbXюЪbXИ> Г>XК7X> ВWXГ7XГІ НЭWеЂНюН<КЈ !ою w#В…XбНУCAНУCSНЭWе:ю!оѕВюН<Вѕ оНбЙйЕНеНҐH~·К  #N#F -жЯюOКжXюIКжXюRВ  бНУC,Хю#МНu НУC,{·К¦ С_ХН9QВЇ СЕХНЭWСБЕхzННZс"§ -Ъ1Y{·В1Y!~ю В1Y6B#6A#6Sбzх"”е#ю w# В>YЇwwСХН±WбсхеюВoYХНСН<К» Г…YН<В…YСсхХюВЈ ГcYСсХ!%Їw#w#w#wб~юКЁYюВЙCНzW*§ -Й) Ђp# В®YГЙCАН TГАеН TНх Нс_НбЙНЭWеЂНюХН<СХхКшYНсСКЈ НбЙВZе!ю6# Н–ZбДЭWЇ2 -е!яН’Z!Н’ZЂНюНюяКЈ 懇‡‡‡O!Ѓ  ~#НЦ@yюВgZ~ю КdZ>.НЦ@ ВQZ:e -Ж W:ђєЪЂZ> НЦ@НЦ@Ь!BюНюяВAZбЙ~ю*А6?# В–ZЙХOЕНБСх!!4В¶Z#4В¶Z#4yю"ВЛZс·ИюК» ю>И<ЙсЙюА+НХЂКаZЕНБе*к ННCЪ!© s#rЇ#wВфZбСЙцЇ2u]Н*QюВ  Ее!­ ^#Vг~ю,М+НВЙ гzіКµ +s#rбБеЕ!° Їw#w!© ~#foлХе!ЂННCбВT[Г’[BK>л!е)гТg[)#Гh[)гл)лТv[ гТu[#г=В][}ж_Б}la)ЪТЌ[#x·В"o]бБе!І "q]!) "s]бе!Ђ}“o|љgСХННCЪј[bk:u]·К\ЂННCТС[еН \бЕDMл*s]л*q]НX\"q]PYБН\*o]#"o]б}“o|љg|µеВџ[ббЙеН \бЕDMл*q]л*s]НX\л"q]PYБГи[цЇ2 ЕХел*o]л!« е~#foННCбs#rВG\: ·КT\!T\еЕе!& Г¤VбСБЙЕ~# x±ВY\БЙсХЕхDMНД\К“\Н№\!± сwх!( V6ю КЋ\ЖаzОwсБСбЙГё ХНВ\К“\Н№\!± ~·СбБЙ!©Гґ\!° ^#VЙ!° s#rЙDMН±\ХН«\лСННCЙН"§ -Н’#Ни\>юНѕSН"]ГЙC *љл*В -ННCИ!X9}Ѓo|Оgђ®х!9}Ђo|Оgс®Ѓ В] Вп\ Гп\ *љл*В -ННCИ!9}Ђo|Оg‘®х!X9}Ѓo|Оgс®Ђ ВS] В)] Г)]е*|Ґб<Ах:м ·ВсЙН -C*љ+6*џ -~·ВљRГ‡ !?`щЇ2м "–щ!"6:Н—C2e -"± -* ^#Vл"zB"UB"ўл##^#Vл"щAл##^#Vл"ёAл##^#Vл"=A Н2·!Кк]!!"" !юя"Ї2“2d -2у 2н 2Љ!"Њ!Ђ"к !z -"x -!д -"L *"v ->2Д!Ф^"џ -:Х^·ВЦ^<2Х^!Ђ~·"џ -КЦ^F#~+w##ВD^+6"џ -!Н·КЦ^ю/Кx^+6""џ -#ю/Кx^Н·Вi^ГЦ^6ННZюSКВ^юMхКђ^юFВЙ ННУC:НdсКЇ^z·В{юТ2ДГґ^л"v -л+НКЦ^НУC/Г}^ННУC:Нdл"к лГґ^+*v -+"v -+е:Д!Љ]"ў¤2Д<©лs#r#л е*к І DMб=Ву^#"љ"± -С{•ozњgЪЭB·|g}oВ_|юЪ0_!{•ozњgЪЭB"v -л"–"› -щ"± -*љлНлB}“o|љg++е!љ_Н#GбН1!Ћ_Н#G!#G" Н!B! Гv] - -Owned by Microsoft - Bytes freeBASIC-85 Rev. 5.29 -[CP/M Version] -Copyright 1985-1986 ¤ by Microsoft -Created: 28-Jul-85 -1¦Ї2‡2”2U2ћ2Ў2ш2S2њ22ѓ2T>2–2•НРPeg Hex Translator, V1.0 -НННfК+НFНРUsage - - A> peg infile.typ outfile.typ /io - - where infile and outfile are of the form: - du:filename.typ, d = optional disk name - u = optional user number - - /io specifies the input and output file formats. - These formats are described by the letters : - - A)scii ( ^Z terminated ) J) Intel hex records ( 16 bit ) - B)HLF format M)otorola S records ( 8 bit ) - C)om file P) BPNF format - H)ex / Space format S)plit file - I)ntel hex records ( 8 bit ) X) Exormax S records ( 16 bit ) - - For example, to convert PROG.HEX to PROG.COM use: - - A> peg prog.hex prog.com /ic - -Гyю> ВT:Zю/>ВT:[2…:\2†:†юI( юJ(юX(юM wНРAddress of first output record ( for 100h ) ? >!|НђНZ·(+Нв~·('НРInvalid hex character : Н№НZђнSЉН нCzНVТАНвТАНњТАН(ТА:…!щF#ѕ( ###ш>НFГЄ#^#VнSНТЄ(nН(=ю 92TНРConversion aborted, output file not complete. -ГЄ:ѓ· :†!F#ѕ( ###ш>НF1#^#VнS‚Н0$Љ:†!7F#ѕ( ###ш>НF #^#VнSЁННzНAДF:†юS НШДFНЯ:S·ВW:T·ВНРConversion complete, No errors. -Г -AѓBЎCЮHрI5JСMѕ P; -Sx -Xќ - -A« Be C« H№ I J„ M P“ SФ Xь -AЏB‰CЏH”IљJѕMвPSЏX ®!8НЁКFx=юю :{2®2Тyю? :z2УНn:…юS !·6L#6O#6 ®Н#ВF7Й:…юS =Ф!8НЁКFx=юю :{2Ф2шyю? :z2щ!Э6H#6I#6 НnФНєВF7Йъ!IНЁКFx=юю :{2ъ2yю? :z2:†юS !6L#6O#6 НzъН)ВF7Й:†юS = !IНЁКFx=юю :{2 2Dyю? :z2E!)6H#6I#6 Нz НАВF7Й:ТG:УOНъЙ:G:тНnН/(ю(ГFю Ї7Й2R>·7ЙНnН/(ю(ГFю Ї7ЙжюB зЇхН/ВҐ юH( юL>ВҐ с±еГ™НnН/(ю(¬ГFГ™НnЇ2ђ!ЋН/( жю(ЏГFю(€ю (кю,(жю (вю -(Юw#Н)ВF7Й:†юS => ГFНn:ћ· G!ў"—Н/ВFю: цН5 ВF2ћ2њOЖG!ћН5 ВF#wЃOфН5 ВFGy/<ё> ВF:ЎюК–:њ·(*н[џcj:U·( н[™zј ({Ѕ $:њ_"™Ї2њ/2U:ћ=2ћ*—~#"—Г™>янS™Г™Нn:ћ· L!ў"—Н/ВFю: цН5 ВF2ћ2њOЖG!ћН5 ВF#wЃOфН5 ВFGy/<ё> ВF:ЎюК–юК– :њ·(Bн[џcjн[’:‘ОO:U·КV н[љzј 4{Ѕ 0:™№ *:њ_yО"љ2™Ї2њ/2U:ћ=2ћ*—~#"—Г™bk"љ:™О2™>яГ™н[ўcjНҐНҐНҐНҐ{Л?Л?Л?Л?2‘"’Ї2ћГСНn:ћ· O!Ў"—Н/ВFюS цН/ВFю9К–ю0(зН5 ВFOЦ2ћ2њЖG!ћН5 ВF#wЃOфН5 ВFGy/ё> ВF:њ·Кµн[џcj:U·КЈн[™zјВЗ{ЅВЗГЈНnН/(ю(ГFю Ї7ЙжюB зЇхН/ВҐ юP( юN>ВҐ с±еГ™Нn:•· >2•Н/К™юК–ГFЇ2•НЖмНn:ћ· a!Ў"—Н/ВFюS цН/ВFю9К–ю8К–ю7К–ю0(ЭЦ12ќGН5 ВFOЦђ2ћ2њЖЂG!ћН5 ВF#wЃOфН5 ВFGy/ё> ВF:њ·Кµ!џ:ќ_V#^bk:U·КЈн[™zјВЗ{ЅВЗГЈЕХеН/ "ж2b Н/ ж2c !b Нв~·> В_ Ї{бСБЙ·щНz>BН5ВF:RхЛ>L(>HН5ВҐ сн>FН5ВF:‡<ю(T2‡> Н5ВF7ЙGсxГFНz:RН5ВF7ЙНz:RшНБ:шН5ВF:щН5ВF:‡<ю( 2‡> Н5ВF> Н5ВF> -Н5ВFЇ2‡7ЙНz:ш· 2ы*Љ\UнSщ!ь"€*€:Rw#"€:ш<2шю(7Йе!ш~ЖGЇ†#ь/<бw*Љ"Љ>:Н5ВF:шЖG!ш~#ЊНБ:ЊН5ВF:ЌН5ВFдЇ2шГм Нz:ш· 2ы*Љ\UнSщ!ь"€*€:Rw#"€:ш<2шю(7Йе!ш~ЖGЇ†#ь/<бw*Љ"Љ>:Н5ВF:шЖG!ш~#ЊНБ:ЊН5ВF:ЌН5ВFдЇ2шГм Нz:ш· >12”*Љ\UнSщ!ы"€*€:Rw#"€:ш<2шю(7Йе!ш~ЖG#†#ь/бw*Љ"Љ>SН5ВF:”Н5ВF!ш~ЖwG~#ЊНБ:ЊН5ВF:ЌН5ВFдЇ2шГм Нz>BН5ВF:RхЛ>N(>PН5ВҐ сн>FН5ВF:‡<юКм 2‡> Н5ВF7ЙНz:–· >2–:RН5ВF7ЙЇ2–:RНМВF7ЙНz:ш· >12”*Љ\UнSщ!ы"€*€:Rw#"€:ш<2шю(7Йе!ш~ЖG#†#ь/бw*Љ"Љ>SН5ВF:”Н5ВF!ш~ЖwG~#ЊНБ:ЊН5ВF:ЌН5ВF:ЌН5ВFдЇ2шz7ЙНzГм Нz:ш·(*€Н5 Р!"щ>2ы!ьН5 Р7ЙНz:ш·(*€Н· Р!"щ>2ы!ьН· Р7ЙНz:ш·(*€Н; Р!"щ>92”!ыН; Р7ЙНzГм Нz:ш·(*€Н1Р!"щ>92”!ыН1Р7Й8IZ!0:Ђ·ИеG!Ѓг^#Vzі(-#г~#ъћю (ц ·(Ї~#ъћю (ЩмЇб!0·Й> лх> -сfilenametypеfilenametypfilenametypfilenametypю0!Є_Л^#Vbk6НРUnknown error code: Н9НР Called from : беН.НРError - НЦНZ>2S7?ЙМЯ'AQh–¦ЖЫп!1RInvalid file name.Get or put attempted on unopened file.Disk full.Input file not found.Attempt to read past EOF.Directory Full.Error in closing file.Attempt to open a file which is already open.Unused error 8.Invalid hex data in input file.Too many parameters.Parameter too long.Too few parameters.Checksum error in input file.Invalid option.Invalid character in input file.High byte input file ended prematurely.Х>я2љ2›$ХЇВµСе~#ю:КСю,К,ю!Ъ,ГЅб~Н,юAЪкЦAюЪеЇСЙ<2љ#~ю:К-ю?В2›#~ю:К-ГвЇG~#ю:К Ц0Ъвю -ТвOx‡‡Ђ‡ЃGГxю Тв2›Г-б~ю:В4#~ю,К?ю!ТW >?ВD:љG:›OС>я·ЙНq~ю.Вk#НqГJН‘ГJНњК‘ю*Вѓ>?Г…#ВqНњИ#Г‰> В‘Й9Н~Н,·Ию!Ъїю=Ию_Ию.Ию:Ию;Ию,Ию<Ию>ЙѕЙлххН7НСсНСслЙжю -ЪЭЖ7ГЯЖ0w#ЙЕ~Н,Ц0Ъю -ЪыЦюТхе!ВT]бсѓ_zО#Гж{БЙН”жюИНЁЙНGГ±НGГНGГOНGГ§НGГуНGГеХЕх¦НQсБСбЙбБЙb -!<;яя›LhYе‚: end begin ;A more than ample stack space outine ,0 1,er12,er13 -- 44Ї  BEGIN .;0FAA4 'Hex file Editor, V1.0VWX|   ў¤ҐНЮГ±НЮГНЮГOНЮГ§НЮГуНЮГеХЕх=НQсБСбЙЂвLя7О  'HexЗKCLэMG<РNАNјKЗKТKЭKиKЋMNуK-LюK L‹LwO LвO8LLXN+R,Q—LХN@ЛячЗ[6@Л?Л=Л=ЛhYоЊЋЌAОAЛQAQBQCQDQEQHQLQMbSPcPSWQIQR bBCbDEbHLbAFjIXDjIYdrNZqZrNCноп7·79;<!ыГcХ^#VbkСЙ$w#ВcЙбСБ·ЙНЙНЙНЙ*ялНwх*ЂЂНcс·Й*л!ЂЂНc*лН}·И>ЙЕХеХЂНС*ы~·КЛ>Гl*яеНaСНIН^·Кв>ГlНѓКн>Гl*л*s#r* 6Ђ*ы6ябСБЇЙЕХеХЂНС*э~·К >Гl*еНaСНIНvК6>Гl*л* s#r* 6Ђ*э6ябСБЇЙЕХе*ы~·В_>Гl*НY|µКў~2#л*s#r* 5Вљ*л*s#r* 6ЂНѓКљ*6#6бСБЇ:Й>ГlЕХе2*э~·В»с>Гl* НY:w#л* s#r* 5Вл*л* s#r* 6ЂН™>ВlбСБЇ:Йе*ы6бЙ‘Њ СU#Ѓ™А‘AURЕХе2>Н§* ~юЂК+ЇН§Г*э6*лНqюяВA>ГlбСБЇ:ЙЕХехлЇw Н<сбСБЙЕХеН$юяВq>я·ГrЇбСБЙЕХеН$юяВqН$юяВqГkГ–ХЕ2•"“л -Н*“#~#е…o|Оg6б:•·ККе~·КЙН,w#ГјбБС+~#ЙгНЦгЙХЕх~#·К*ю К Нgю Кю -КюКюК -ГЫГЫ ГЫy·КЫ ГЫyжG>ђGЃO> Н№В ГЫсБСЙх|Н9}Н9сЙххН7НGсНGсЙжю -ЪTЖ7Н№ЙЖ0Н№Йх> Н№> -Н№сЙю Т№юК№юК№юК№ю -К№ю К№хх>^Н№сЖ@Н№сЙЕХе*.ЎХй/жбСБЙЕХе*. µХйбСБЙхЕХеO*. ИХйбСБсЙЕхН x2Эy2ЮсБЙеХЕх:Э_Н$:Ю_ Н$сБСбЙеХЕхY Н$XН$ГхеХхН$хя Н$OсGсСбЙЕХНСБЙжюaШю{Рж_ЙЙЕHНEБЙехЕХWНfСБсбЙЕHН[БЙхЕХWНfСБсЙr# x±ВfЙх{…ozЊgТ|с7Йс·Йх}“o|љgТ|Гyх§}o|g}ОoсЙх}|g}oсЙх§}o|gТ|ГyхГ§х§|g}oТ|Гyх}Јo|ўgсЙх}іo|ІgсЙх}«o|ЄgсЙНе#Йх}/o|/gсЙхЕХЇ25е!"3бН·Те*3}ѓo|Љg"3Т>я25блНҐлВяСБ*3:5·К|ГyхЕе!"3б|єЪxВM}»ЪxНҐе*3Ні"3}“o|љgЪp"3б}цoГqбВOБсЙ!ГuНГОЙЙ(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE)(INP:/OUT:SPACE) COPYRIGHT (C) 1979, DIGITAL RESEARCH, PIP VERS 1.5$$$ SUB =.:,<> _[]INPIRDPTRUR1UR2RDROUTLPTUL1PRNLSTPTPUP1UP2PUNTTYCRTUC1CONNULEOFDISK READ ERROR$DISK WRITE ERROR$VERIFY ERROR$NOT A CHARACTER SINK$READER STOPPING -$NOT A CHARACTER SOURCE$ABORTED$BAD PARAMETER$INVALID USER NUMBER$RECORD TOO LONG$INVALID DIGIT$END OF FILE, CTL-Z?$CHECKSUM ERROR$CORRECT ERROR, TYPE RETURN OR CTL-Z$INVALID FORMAT$HEX$$$$NO DIRECTORY SPACE$NO FILE$COM$START NOT FOUND$QUIT NOT FOUND$CANNOT CLOSE DESTINATION FILE$DESTINATION IS R/O, DELETE (Y/N)?$**NOT DELETED**$$$$$$$NOT FOUND$COPYING -$REQUIRES CP/M 2.0 OR NEWER FOR OPERATION.$UNRECOGNIZED DESTINATION$CANNOT WRITE$INVALID PIP FORMAT$CANNOT READ$INVALID SEPARATOR$1тЂЕЂМН -:МЦЦџ2ҐНLл> Н„ТэMН9НН 2АН2ь1тН@:А2Б!o6+6+6!¦6#6!у6#6ю:ҐТG*ННo Н.!N6я:МюВ^*ьMН^Н!K6!6!¤6+6'Н :©юВЃГ$:©юВГ:”=2KН Н :©юК¤Н\:хТ·\НоНxГА'НоНІГЫ:©ЦЖяџ!х¶ТЦН\НўН Н :©юВН€НЖ'Е!Н -НЯНІГЫ:©юВ$Н:Ёю КГ$Н€НІГЫ!N6я'Н :©Цџ!х¶ТCwНЇ !6:©юВ^НўНc!Ё6яГ{:ЁЦџ/х>!Ё–џ/БH±Т{ђНЇ :Ё<2ЈюВЉНПН :©ЦЖяџх:ЁЦ=ЖяџБH±Т®ќНЇ !§6:§Тѕ:А2БН !6:©ЦЦџх:х/БHЎТнН€Нѕ!Ё6яГ:©ЦЖяџх> -!Ё–џ/х>–џБHЎБH±Т°НЇ :^!¶w:Ё<2¤:ЁюВ0НПГ}:ЁюВ@НEГ}:ЁЦџ!¦ТS!W6:Јю -Вz!]6:cюВm!c6:_юВz!_6НlНН :©ЦЖяџх:ЁЦ,Жяџх:ЁЦ ЖяџБHЎБH±Т°јНЇ :ЁЦ Жяџ2§Гі:ЈюВОНEНП:ЈюВЫН1:Ґ2МГыv!тq!те*8йЙ!ые*6й: Й>ъН¦>ъН¦ЙНЙНЙ!«q:«ж_НЙ Н -НЙ!­p+qН.*¬л НЙ НЙ НЙ!Їq*Ї&лНЙ!±p+q*°лН2®Й!іp+q*ІлН2®Й!µp+q*ґлН2®ЙН2®Й!·p+q*¶лНЙ!№p+q*ёлНЙ!»p+q*єлНЙ!Ѕp+q*јлН2®Й!їp+q*ѕлНЙ!Гp+q*ВлНЙя НЙ!Дq*Д&л НЙ*АMН Й*БMН Й!Жp+q*Ел!НЙ!Иp+q*Зл"НЙ!Кp+q*Йл$НЙ!Л6ЂЛ -НЙ НЙ!kp+q*jлНЙ> У>УЫЪЄ Гћ ЫжЙ!qp+qН/ *pDMН9:Н Н:M2r:N!rѕЪш !М:rѕТс *r&Н NН!r4ВР !М6:Н”:®юяК -:НіН.ГЙ!ws+p+q+СБp+qХ:w=2wюяКN -*sе*uБ -w*s#"s*u#"uГ' -Й!"ќ*MН^Н7 !x6:ы!xѕЪѕ -*ќл*DMН† НГ2yюК­ -:yюК— -”НЇ *ќ"џл*6:ы2xГ· -Ђ*ќ"ќ!x4Вd -!"ќН/ Й!ЎНj}=2|юяВЫ -Й!"Ў*KMН^'Н_ !z6:|!zѕЪ1 *ЎК "}*}DMН† 'НУюК ¤НЇ Ђ*Ў"Ў!z4Ву -:eТЙ !"ЎЂН† !z6:|!zѕЪА 'Н? ЦЦџ2*H#"H!{6:{ЦЂџ!¦Тў *{&Ђ :{ЎеН4К Б -–Цџ2!{4Гm Ђ*Ў"Ў:Ъ№ µНЇ !z4ВI 'НУ2!"ЎЙ!Ђq:Ђю Ъф !у4>!SѕТф :S!уѕТф Й:2Ѓ*ЈM!Э ^#VлйяЎНЋЪ НИ -*ЎК :Ђw*Ў#"ЎГ Г= Г= Г= Г= Г= ВНЇ Г *ЂMНжГ !6ЂГq Г !6АГq Г !6ЂГq Г *Ђ&лНГ !6Г  Г !6 Г  Г !60Г  Г *Ђ&лНГ !6ГП Г !6ГП Г !6ГП Г *Ђ&лНГ - . 1 4 7 : = F P [ f q  Љ •   ® № Д П :Ѓ2Й!‚q:‚ю К" *‚MНР Гn :cюВ4 *‚MНР Гn :у2ѓ!c:ѓѕЪQ !c:ѓ–2ѓГ: !ѓ:c–w>!ѓѕТn !ѓ5 НР ГY :‚ю В{ !у6Й!„q:„ЦЦџ!l¦wТ™  Н Гў :„Ж0OН Й!…q:…жшOН| :…жOН| Й!†6:]ЦЦџ2l:o†'2o:nО'2n:mО'2m*mMНЈ *nMНЈ *oMНЈ :]юВ:Н  Н Г Н Й*Ў}ж2‰ЂяНD"‡НИ -*‡К е*‰лН -*‰&"ЎЙ!Љq:UТY:Љю ВYЙ:¦Т©:Љю К©:_2‹юК:‹юВЂ!‹6<:ф<2ф!‹ѕЪ!ф6 Н >!]ѕТ¤Нѕ !¦6:QТМ:ЉЦЦџх:ЈЦЦџБHЎТМНЙ:Љю ВЩ!ф6*ЉMН :Љю -Вн!¦6Й!Њq:ЊЦaџ/х>z!Њ–џ/БHЎТ:Њж_2Њ:ЊЙ!Ќq:ЌЦAџ/х>Z!Ќ–џ/БHЎТ8:Ќц 2Ќ:ЌЙ:¤=O>№Ъm:W!Q¶хН} БHЎТmНюВd>ЙЧН9>Й!ђ6:2Ћ*¤M!E ^#VлйэќНЋЪ—НO -*ќл*~2Џ*ќ#"ќГmНу2ЏГmН– 2ЏГm!6ГаГm!6ГаГm!6 ГаГmНж2ЏГmГГГГГГГГйНЇ Гm!6Г2Гm!6Г2Гm!6Г2Гm!ђ6Н2ЏГm€­¶їКХаруцщья'2:Ћ2:TТ’:Ј2Ћ!Ј6*ЏMНE:Ћ2Ј:ђТЬ:ТІ:§<2§ЦЦџ2ђГЅ:ЏЦ -Цџ2ђ:ђТЬН} ТЬНюВЦ>ЙНЇ :iТл:Џж2Џ:dТъ*ЏMНоЙ:[Т *ЏMНЙ:ЏЙ>!ъѕТ(:ъ=2ъюВ%> -Й>Й>!шѕТF!ш5+N!Н ~2‘!ч4ЙН<2‘юВT>Й>!bѕТ}*bMН­Тz:b2ч!b6:щ<2шГ©>!`ѕТҐ*`MН­Тћ!`6!ъ6> Й:‘ЙГ©:‘ЙГ(Й!’q:щ!’†wO!Н ~2“юВЩ*’&Н :‘w>Й!‘:“ѕВк!щ4Гп!щ6>Й:N<2N!МѕЪ> Й*N&Н NНоЙНт2Ёю ВГЙ!–p+q!х6!©6+6 !Є6:Єю ТS:Єю ВM!Ё6НgГ8Н:N2M*ЁMН8ТpНБ!©6Й!”6!—6>!—ѕЪ•*—&P 6!—4Вz!ц6!ш6#6#6!Є6*ЁMН8ЪЪ:ЄюЪѕЙ:Ёю*ВОН‡ГСНgНт2ЁГЄ:Ёю:Вї:”юКлЙ:ЄюВ,НЎЦA<2”O>№ТЙН*ЁMН8Т):Ёю[ВН±!N5!©6ЙГ±:ЄюК5Й!Ў6я#6>!ўѕЪ°! 6: <2 O>‘џ/х: !Ў†O!T е* MНЎб–ЦџБHЎТ~ГK: юВЎ!©6Нтю[В–Н±!N5:ў2ЁЙ:ЎЖ2Ў!ў4В=Й:Ёю[ВјН±Г4:ЄюВИЙ!Є6:Ёю.ВНт2ЁOН8Ъ:Єю ЪмЙ:Ёю*Вь Н‡ГяНgГХ:Ёю[В Н±!N5!©6:”юВ%:ь<2”*•6 *• 6ЙГҐЙ!љq!›6> -!›ѕЪd*›&I :љѕВ]>Й!›4ВA>Й:Є<2ЄO*• :Ёw:Ёю?В†!х6Й!њq!Ё6?!њ:ЄѕТ НgГђЙ!ќq*ќ&л*•~Й!ц6:А2БНт2Ё:ЁЦ Цџх:ЁЦ]ЦџБH±Ъє:ЁЦA2ћO>№Т:Ёю ВъНт2ЁГНЇ Г·:ЁЦSЦџх:ЁЦQЦџБH±ТI:N<2џНт2ЁЦЦџх:ЁЦ ЦџБH±Ъ@Г"Нт2ЁГЌНт2ЁЦ02џO> №Тc!џ6ГЌНт2ЁЦ02™O> №ЪЌ*џ&НOе*™&Б л!џsГc*ћ&P :џw:ћюВ·>!џѕТ±НЇ :џ2БГВНт2ЁЙ:Ёю_ВО!Ё6=Й!Ј6>'!ЈѕЪйНE!Ј4ВФЙ!©p+q*Ёе0Н -Й!­r+s+p+q*¬~ю$К7*¬>¦*Єх>¦БH№К&>Й*Є#"Є*¬#"¬Г>ЙН 2Ё:ТRќџНЋџЙ:ЁЦЦџЙ!Ї6!њ6Н=2µю:К™!њ6:µюВ“HН9НюВЋ>Й!њ6Н-Гe!µ6Н»2ґюВЗН=2ґюКєН-Г©:ЇТД>Й>ЙНД"·Н»2¶:ґЦЖяџ!Ї¦Тр!ґ5Н»2іГУН¬!µ†юК\НН-:ЇТ>Й>Й!±p+q:ЇТ,!Ї6*°DMН9Й:®Т<!®6НЙ:ЇТzН 2ІюВW!®6ГD*њ&L :Іw:њ<2њюOЪv*Н:ІЙ>ЙН=2№Ц0O> №Ъ’:№Ц0Й:№ЦAO>№Т¤:Н:№ЦAЖ -ЙН}‡‡‡‡хН}БH±ЙН¬!µ†wЙН»O`iНdеН»бНVЙН[2єO>№Ъ2:єЦЦџ!X¦Ъ!»6:њ!»ѕЪ:»=O!L NНE!»4Вь НE -НE:єюВ/ЙГЪН.*њ&L 6$LН9kН9Н.НюВXЙГЪЙЏНЇ Й*KMН^ћ0Нэ20Е¤Н -:0ж20:1ж21ўНк'Ні'Нг:®юяВІҐНЇ !G6!"ЎЙ!яя"џН7 *MН^НnН/ :a/х:БHЎТм!®6я:®юяВъёНЇ !&6АНэ2*э"ќЙ>!bѕТ!ДНЇ >!`ѕТ0ФНЇ Й!јq:јТE:24ГJ!46*Ў}жюКa!44НEГJННИ -*KMН^'НЃ:®юяВ‚гНЇ ¤Нк!36'Нn:®юяКй:0Тг:fЪХН9НOНоюYКТ#Н9Н.3Нк'НіЙН.:0ж20'Н 'Ні'Е7Н -6Нк'НцЙ!яНj>яНA+л!ыsЙ!К"@яН“Ъ1!Ђ"яГ<*эл*я"яНЙКН“еНnК "ябНDНn"э"яНЙ:¤ЦЖяџ!Q¦2ЅТ‚Н:X!W¶Т“НЪГ¤Н:Ъ¤*ЁMНEГ“:ЅТ±НН@ЙН@:O2MНcНѕ!ѕ6#6>!їѕЪ)*ї&P ~юК":їЦЦџх:їЦЦџБH±х:їЦЦџБH±х:їЦЦџБH±х:їЦЦџБH±Ъ"!ѕ6!ї4ВЙ:ѕТ_ННjЪYНO -НjТM*џ"ЎГS*я"ЎНИ -Г3Н@ГbНl*ѕMН1ЙяяџН“µЖяџЙ!"А"ДН7 *MН^ЂН† \Н”!"В:®ЦяЖяџАВхНЋџБHЎТД*В#"ВН§ГќН/ :®юяВе>ДН›µВб9НЇ Н.Й*В#"А:®ж‡‡‡‡‡_!Ђе'Н -!'6!36'ЕН -:1/!a¶ТE*Д#"Д>НzµВ?CН9НIНІГЃЙН.!Ж6> !ЖѕЪ‡*Ж&' ~2Зю КЂ:Жю Вy.Н*ЗMН!Ж4ВQЙ>!”ѕТ›:”=2ГЎ:ь2Й:цТ¬Н\>!”ѕТї:”=2KГЕ:ь2KЙ!А:БѕКСЙ!:KѕВЮН\ЙН:Ёю КнН\Й!Йp+qН€НЯЕ*ИDM!Н -НЖЙН :©ЦЦџх:ЁЦ=ЦџБHЎЪ-Н\:N2OЙл_л…oЊgЙ_{Ґoz¤gЙ^#Vл)е))Б Й_{µozґgЙ^#Vл) ВdЙ^#Vл|·g}o ВnЙ_{•ozњgЙO{‘ozgЙi`N#F‘ogЙo&•oњgЙ H В©=ВЁЙfи…STAT COMЂ**STAT $$$* STAT COM**я  *Џя'':'''' 'Ђяtat.com=a:stat.com[G0]gЙo&•oњgЙ H В©=ВЁЙ15 OUT 1,132 : REM Write the DATETIME read Opcode -20 SEC = INP(0) : REM Read a RTC parameter -30 MINUTES = INP(0) : REM Read a RTC parameter -40 HOURS = INP(0) : REM Read a RTC parameter -50 DAY = INP(0) : REM Read a RTC parameter -60 MNTH = INP(0) : REM Read a RTC parameter -70 YEAR = INP(0) : REM Read a RTC parameter -80 TEMP = INP(0) : REM Read a RTC parameter -83 IF TEMP < 128 THEN 90 : REM Two complement correction -85 TEMP = TEMP - 256 -90 PRINT -100 PRINT "THE TIME IS: "; -110 PRINT HOURS; : PRINT ":"; : PRINT MINUTES; : PRINT ":"; : PRINT SEC -120 PRINT "THE DATE IS: "; -125 YEAR= YEAR+ 2000 -130 PRINT DAY; : PRINT "/"; : PRINT MNTH; : PRINT "/"; : PRINT YEAR -135 PRINT "THE TEMPERATURE IS: "; -140 PRINT TEMP; : PRINT "C" -145 PRINT -10 REM SUPER STARTREK - MAY 16,1978 - REQUIRES 24K MEMORY (AT LEAST) -30 REM -40 REM **** **** STAR TREK **** **** -50 REM **** SIMULATION OF A MISSION OF THE STARSHIP ENTERPRISE, -60 REM **** AS SEEN ON THE STAR TREK TV SHOW. -70 REM **** ORIGINAL PROGRAM BY MIKE MAYFIELD, MODIFIED VERSION -80 REM **** PUBLISHED IN DEC'S "101 BASIC GAMES", BY DAVE AHL. -90 REM **** MODIFICATIONS TO THE LATTER (PLUS DEBUGGING) BY BOB -100 REM *** LEEDOM - APRIL & DECEMBER 1974, -110 REM *** WITH A LITTLE HELP FROM HIS FRIENDS . . . -120 REM *** COMMENTS, EPHITETS, AND SUGGESTIONS SOLICITED -- -130 REM *** SEND TO: R.C. LEEDOM -140 REM *** WESTINGHOSE DEFENSE & ELECTRONICS SYSTEMS CNIR -150 REM *** BOX 746, M.S. 338 -160 REM *** BALTIMORE, MD 21203 -170 REM *** -180 REM *** CONVERTED TO MICROSOFT 8 K BASIC 3/16/78 BY JOHN BORDERS -190 REM *** LINE NUMBERS FROM VERSION TREK7 OF 1/12/75 PRESERVED AS -200 REM *** MUCH AS POSSIBLE WHILE USING MULTIPLE STATEMENTS PER LINE -201 REM *** - MODIFIED TO RUN ON GRANT SEARLE'S 9-CHIP Z80 COMPUTER -202 REM *** AND DERIVATIVES 04-AUG-2018 BY N.KENDRICK -203 REM *** (LINKER3000-AT-GMAIL.COM) -205 WIDTH 80 -209 REM NK: POSITIONING USING ANSI ESCAPE SEQUENCES... -210 PRINT CHR$(27);"[2J";:PRINT CHR$(27);"[3;1H"; -211 PRINT "THE USS ENTERPRISE --- NCC-1701" -212 PRINT CHR$(27);"[4;1H";:PRINT -222 FOR YY=1 TO 40 STEP 2:FOR XX=1 TO 200 : NEXT XX -223 PRINT TAB(YY);" ,------*------," -224 PRINT TAB(YY);" ,------------- '--- ------'" -225 PRINT TAB(YY);" '-------- --' / /" -226 PRINT TAB(YY);" ,---' '-------/ /--," -227 PRINT TAB(YY);" '----------------'" -228 PRINT CHR$(27);"[4;1H";:PRINT:NEXT YY -229 PRINT CHR$(27);"[11;1H"; -260 CLEAR 600 -270 Z$=" " -330 DIM G(8,8),C(9,2),K(3,3),N(3),Z(8,8),D(8) -370 T=INT(RND(1)*20+20)*100:T0=T:T9=25+INT(RND(1)*10):D0=0:E=3000:E0=E -440 P=10:P0=P:S9=200:S=0:B9=0:K9=0:X$="":X0$=" IS " -470 DEF FND(D)=SQR((K(I,1)-S1)^2+(K(I,2)-S2)^2) -475 DEF FNR(R)=INT(RND(R)*7.98+1.01) -490 Q1=FNR(1):Q2=FNR(1):S1=FNR(1):S2=FNR(1) -530 FOR I=1 TO 9:C(I,1)=0:C(I,2)=0:NEXT I -540 C(3,1)=-1:C(2,1)=-1:C(4,1)=-1:C(4,2)=-1:C(5,2)=-1:C(6,2)=-1 -600 C(1,2)=1:C(2,2)=1:C(6,1)=1:C(7,1)=1:C(8,1)=1:C(8,2)=1:C(9,2)=1 -670 FOR I=1 TO 8:D(I)=0:NEXT I -710 A1$="NAVSRSLRSPHATORSHEDAMCOMXXX" -820 FOR I=1 TO 8:FOR J=1 TO 8:K3=0:Z(I,J)=0:R1=RND(1) -850 IF R1>.98 THEN K3=3:K9=K9+3:GOTO 980 -860 IF R1>.95 THEN K3=2:K9=K9+2:GOTO 980 -870 IF R1>.8 THEN K3=1:K9=K9+1 -980 B3=0:IF RND(1)>.96 THEN B3=1:B9=B9+1 -1040 G(I,J)=K3*100+B3*10+FNR(1):NEXT J:NEXT I:IF K9>T9 THEN T9=K9+1 -1100 IF B9<>0 THEN 1200 -1150 IF G(Q1,Q2)<200 THEN G(Q1,Q2)=G(Q1,Q2)+100:K9=K9+1 -1160 B9=1:G(Q1,Q2)=G(Q1,Q2)+10:Q1=FNR(1):Q2=FNR(1) -1200 K7=K9:IF B9<>1 THEN X$="S":X0$=" ARE " -1230 PRINT"YOUR ORDERS ARE AS FOLLOWS:" -1235 PRINT "--------------------------" -1240 PRINT" DESTROY THE";K9;"KLINGON WARSHIPS WHICH HAVE INVADED" -1250 PRINT" THE GALAXY BEFORE THEY CAN ATTACK FEDERATION HEADQUARTERS" -1260 PRINT" ON STARDATE";T0+T9;CHR$(8);". THIS GIVES YOU";T9; -1261 PRINT"DAYS. THERE";X0$ -1270 PRINT" ";B9; -1271 PRINT"STARBASE";X$;" IN THE GALAXY FOR RESUPPLYING YOUR SHIP." -1280 PRINT: PRINT "PRESS Y TO ACCEPT COMMAND"; -1300 INPUT I5$: -1302 IF LEFT$(I5$,1)="Y" OR LEFT$(I5$,1)="y" THEN 1310 -1303 GOTO 1280 -1310 PRINT CHR$(26) -1320 Z4=Q1:Z5=Q2:K3=0:B3=0:S3=0:G5=0:D4=.5*RND(1):Z(Q1,Q2)=G(Q1,Q2) -1390 IF Q1<1 OR Q1>8 OR Q2<1 OR Q2>8 THEN 1600 -1430 GOSUB 9030:PRINT:IF T0<>T THEN 1490 -1460 PRINT"YOUR MISSION BEGINS WITH YOUR STARSHIP LOCATED" -1470 PRINT"IN THE GALACTIC QUADRANT, '";G2$;"'.":GOTO 1500 -1490 PRINT"NOW ENTERING ";G2$;" QUADRANT . . ." -1500 PRINT:K3=INT(G(Q1,Q2)*.01):B3=INT(G(Q1,Q2)*.1)-10*K3 -1540 S3=G(Q1,Q2)-100*K3-10*B3:IF K3=0 THEN 1590 -1560 PRINT TAB(3);CHR$(22);" COMBAT AREA CONDITION RED ";CHR$(22) -1561 IF S>200 THEN PRINT:GOTO 1590 -1580 PRINT TAB(3);CHR$(22);" SHIELDS DANGEROUSLY LOW ";CHR$(22) -1581 PRINT -1590 FOR I=1 TO 3:K(I,1)=0:K(I,2)=0:NEXT I -1600 FOR I=1 TO 3:K(I,3)=0:NEXT I:Q$=Z$+Z$+Z$+Z$+Z$+Z$+Z$+LEFT$(Z$,17) -1680 A$="":Z1=S1:Z2=S2:GOSUB 8670:IF K3<1 THEN 1820 -1720 FOR I=1 TO K3:GOSUB 8590:A$="+K+":Z1=R1:Z2=R2 -1780 GOSUB 8670:K(I,1)=R1:K(I,2)=R2:K(I,3)=S9*(.5+RND(1)):NEXT I -1820 IF B3<1 THEN 1910 -1880 GOSUB 8590:A$=">B<":Z1=R1:B4=R1:Z2=R2:B5=R2:GOSUB 8670 -1910 FOR I=1 TO S3:GOSUB 8590:A$=" * ":Z1=R1:Z2=R2:GOSUB 8670:NEXT I -1980 GOSUB 6430 -1990 IF S+E>10 THEN IF E>10 OR D(7)=0 THEN 2060 -2020 PRINT:PRINT TAB(10);CHR$(22);"** FATAL ERROR **";CHR$(22) -2021 PRINT"YOU'VE JUST STRANDED YOUR SHIP IN SPACE." -2030 PRINT"YOU HAVE INSUFFICIENT MANEUVERING ENERGY," -2040 PRINT"AND SHIELD CONTROL IS PRESENTLY INCAPABLE OF" -2050 PRINT"CROSS-CIRCUITING TO ENGINE ROOM!!":PRINT:GOTO 6220 -2060 PRINT:INPUT"COMMAND";A$:PRINT -2080 FOR I=1 TO 9:IF LEFT$(A$,3)<>MID$(A1$,3*I-2,3)THEN 2160 -2140 ON I GOTO 2300,1980,4000,4260,4700,5530,5690,7290,6270 -2160 NEXT I:PRINT"ENTER ONE OF THE FOLLOWING:" -2170 PRINT "--------------------------" -2180 PRINT" NAV (TO SET COURSE)" -2190 PRINT" SRS (FOR SHORT RANGE SENSOR SCAN)" -2200 PRINT" LRS (FOR LONG RANGE SENSOR SCAN)" -2210 PRINT" PHA (TO FIRE PHASERS)" -2220 PRINT" TOR (TO FIRE PHOTON TORPEDOES)" -2230 PRINT" SHE (TO RAISE OR LOWER SHIELDS)" -2240 PRINT" DAM (FOR DAMAGE CONTROL REPORTS)" -2250 PRINT" COM (TO CALL ON LIBRARY-COMPUTER)" -2260 PRINT" XXX (TO RESIGN YOUR COMMAND)":PRINT:GOTO 1990 -2300 INPUT"COURSE (0-9)";C1:IF C1=9 THEN C1=1 -2310 IF C1>=1 AND C1<9 THEN 2350 -2330 PRINT" LT. SULU: 'INCORRECT COURSE DATA, SIR!'":GOTO 1990 -2350 X$="8":IF D(1)<0 THEN X$="0.2" -2360 PRINT"WARP FACTOR (0-";X$;")";:INPUT W1:PRINT -2361 IF D(1)<0 AND W1>.2 THEN 2470 -2380 IF W1>0 AND W1<=8 THEN 2490 -2390 IF W1=0 THEN 1990 -2420 PRINT" CHIEF ENGINEER SCOTT: 'THE ENGINES WON'T TAKE"; -2430 PRINT" WARP";W1;CHR$(8);"!'":GOTO 1990 -2470 PRINT"WARP ENGINES ARE DAMAGED. MAXIUM SPEED = WARP 0.2":GOTO 1990 -2490 N=INT(W1*8+.5):IF E-N>=0 THEN 2590 -2500 PRINT"ENGINEERING: 'INSUFFICIENT ENERGY AVAILABLE" -2510 PRINT" FOR MANEUVERING AT WARP";W1;CHR$(8);"!'" -2530 IF S=1 THEN D6=1 -2770 FOR I=1 TO 8:IF D(I)>=0 THEN 2880 -2790 D(I)=D(I)+D6:IF D(I)>-.1 AND D(I)<0 THEN D(I)=-.1:GOTO 2880 -2800 IF D(I)<0 THEN 2880 -2810 IF D1<>1 THEN D1=1:PRINT"DAMAGE CONTROL REPORT: "; -2840 PRINT TAB(8);:R1=I:GOSUB 8790:PRINT G2$;" REPAIR COMPLETED." -2880 NEXT I:IF RND(1)>.2 THEN 3070 -2910 R1=FNR(1):IF RND(1)>=.6 THEN 3000 -2930 D(R1)=D(R1)-(RND(1)*5+1):PRINT"DAMAGE CONTROL REPORT: "; -2960 GOSUB 8790:PRINT G2$;" DAMAGED":PRINT:GOTO 3070 -3000 D(R1)=D(R1)+RND(1)*3+1:PRINT"DAMAGE CONTROL REPORT: "; -3030 GOSUB 8790:PRINT G2$;" STATE OF REPAIR IMPROVED":PRINT -3070 A$=" ":Z1=INT(S1):Z2=INT(S2):GOSUB 8670 -3110 X1=C(C1,1)+(C(C1+1,1)-C(C1,1))*(C1-INT(C1)):X=S1:Y=S2 -3140 X2=C(C1,2)+(C(C1+1,2)-C(C1,2))*(C1-INT(C1)):Q4=Q1:Q5=Q2 -3170 FOR I=1 TO N:S1=S1+X1:S2=S2+X2 -3171 IF S1<1 OR S1>=9 OR S2<1 OR S2>=9 THEN 3500 -3240 S8=INT(S1)*24+INT(S2)*3-26:IF MID$(Q$,S8,2)=" "THEN 3360 -3320 S1=INT(S1-X1):S2=INT(S2-X2):PRINT"WARP ENGINES SHUT DOWN AT "; -3350 PRINT"SECTOR";S1;CHR$(8);",";S2;"DUE TO BAD NAVIGATION":GOTO 3370 -3360 NEXT I:S1=INT(S1):S2=INT(S2) -3370 A$="":Z1=INT(S1):Z2=INT(S2):GOSUB 8670:GOSUB 3910:T8=1 -3430 IF W1<1 THEN T8=.1*INT(10*W1) -3450 T=T+T8:IF T>T0+T9 THEN 6220 -3480 GOTO 1980 -3500 X=8*Q1+X+N*X1:Y=8*Q2+Y+N*X2:Q1=INT(X/8):Q2=INT(Y/8):S1=INT(X-Q1*8) -3550 S2=INT(Y-Q2*8):IF S1=0 THEN Q1=Q1-1:S1=8 -3590 IF S2=0 THEN Q2=Q2-1:S2=8 -3620 X5=0:IF Q1<1 THEN X5=1:Q1=1:S1=1 -3670 IF Q1>8 THEN X5=1:Q1=8:S1=8 -3710 IF Q2<1 THEN X5=1:Q2=1:S2=1 -3750 IF Q2>8 THEN X5=1:Q2=8:S2=8 -3790 IF X5=0 THEN 3860 -3800 PRINT"LT. UHURA: MESSAGE FROM STARFLEET COMMAND --" -3810 PRINT" 'PERMISSION TO ATTEMPT CROSSING OF GALACTIC PERIMETER" -3820 PRINT" IS HEREBY *DENIED*. SHUT DOWN YOUR ENGINES.'" -3830 PRINT"CHIEF ENGINEER SCOTT: 'WARP ENGINES SHUT DOWN" -3840 PRINT" AT SECTOR";S1;CHR$(8);",";S2;"OF QUADRANT"; -3841 PRINT Q1;CHR$(8);",";Q2;CHR$(8);".'" -3850 IF T>T0+T9 THEN 6220 -3860 IF 8*Q1+Q2=8*Q4+Q5 THEN 3370 -3870 T=T+1:GOSUB 3910:GOTO 1320 -3910 E=E-N-10:IF E>=0 THEN RETURN -3930 PRINT"SHIELD CONTROL SUPPLIES ENERGY TO COMPLETE THE MANEUVER." -3940 S=S+E:E=0:IF S<=0 THEN S=0 -3980 RETURN -4000 IF D(3)<0 THEN PRINT"LONG RANGE SENSORS ARE INOPERABLE.":GOTO 1990 -4030 PRINT"LONG RANGE SCAN FOR QUADRANT";Q1;CHR$(8);",";Q2:PRINT -4040 O1$="-------------------":PRINT O1$ -4060 FOR I=Q1-1 TO Q1+1:N(1)=-1:N(2)=-2:N(3)=-3:FOR J=Q2-1 TO Q2+1 -4120 IF I>0 AND I<9 AND J>0 AND J<9 THEN N(J-Q2+2)=G(I,J):Z(I,J)=G(I,J) -4180 NEXT J:FOR L=1 TO 3:PRINT"| "; -4181 IF N(L)<0 THEN PRINT"*** ";:GOTO 4230 -4210 PRINT RIGHT$(STR$(N(L)+1000),3);" "; -4230 NEXT L:PRINT"|":PRINT O1$:NEXT I:GOTO 1990 -4260 IF D(4)<0 THEN PRINT"PHASERS INOPERATIVE.":GOTO 1990 -4265 IF K3>0 THEN 4330 -4270 PRINT"SCIENCE OFFICER SPOCK: 'SENSORS SHOW NO ENEMY SHIPS" -4280 PRINT" IN THIS QUADRANT'":GOTO 1990 -4330 IF D(8)<0 THEN PRINT"COMPUTER FAILURE HAMPERS ACCURACY." -4350 PRINT"PHASERS LOCKED ON TARGET; "; -4360 PRINT"ENERGY AVAILABLE =";E;"UNITS" -4370 INPUT"NUMBER OF UNITS TO FIRE";X:IF X<=0 THEN 1990 -4400 IF E-X<0 THEN 4360 -4410 E=E-X:IF D(7)<0 THEN X=X*RND(1) -4450 H1=INT(X/K3):FOR I=1 TO 3:IF K(I,3)<=0 THEN 4670 -4480 H=INT((H1/FND(0))*(RND(1)+2)):IF H>.15*K(I,3)THEN 4530 -4500 PRINT"SENSORS SHOW NO DAMAGE TO ENEMY AT";K(I,1);CHR$(8); -4501 PRINT",";K(I,2);CHR$(8);".":GOTO 4670 -4530 K(I,3)=K(I,3)-H:PRINT H;"UNIT HIT ON KLINGON AT SECTOR"; -4531 PRINT K(I,1);CHR$(8);","; -4550 PRINT K(I,2);CHR$(8);".":IF K(I,3)<=0 THEN PRINT:PRINT CHR$(22); -4551 PRINT"*** KLINGON DESTROYED ***";CHR$(22):PRINT:GOTO 4580 -4560 PRINT" (SENSORS SHOW";K(I,3);"UNITS REMAINING)":GOTO 4670 -4580 K3=K3-1:K9=K9-1:Z1=K(I,1):Z2=K(I,2):A$=" ":GOSUB 8670 -4650 K(I,3)=0:G(Q1,Q2)=G(Q1,Q2)-100:Z(Q1,Q2)=G(Q1,Q2):IF K9<=0 THEN 6370 -4670 NEXT I:GOSUB 6000:GOTO 1990 -4700 IF P<=0 THEN PRINT"ALL PHOTON TORPEDOES EXPENDED.":GOTO 1990 -4730 IF D(5)<0 THEN PRINT"PHOTON TUBES ARE NOT OPERATIONAL.":GOTO 1990 -4760 INPUT"PHOTON TORPEDO COURSE (1-9)";C1:IF C1=9 THEN C1=1 -4780 IF C1>=1 AND C1<9 THEN 4850 -4790 PRINT"ENSIGN CHEKOV: 'INCORRECT COURSE DATA, SIR!'" -4800 GOTO 1990 -4850 X1=C(C1,1)+(C(C1+1,1)-C(C1,1))*(C1-INT(C1)):E=E-2:P=P-1 -4860 X2=C(C1,2)+(C(C1+1,2)-C(C1,2))*(C1-INT(C1)):X=S1:Y=S2 -4910 PRINT"TORPEDO TRACK:" -4920 X=X+X1:Y=Y+X2:X3=INT(X+.5):Y3=INT(Y+.5) -4960 IF X3<1 OR X3>8 OR Y3<1 OR Y3>8 THEN 5490 -5000 PRINT" ";X3;CHR$(8);",";Y3:A$=" ":Z1=X:Z2=Y -5001 GOSUB 8830 -5050 IF Z3<>0 THEN 4920 -5060 A$="+K+":Z1=X:Z2=Y:GOSUB 8830:IF Z3=0 THEN 5210 -5110 PRINT:PRINT CHR$(22);"*** KLINGON DESTROYED ***";CHR$(22) -5111 PRINT:K3=K3-1:K9=K9-1:IF K9<=0 THEN 6370 -5150 FOR I=1 TO 3:IF X3=K(I,1)AND Y3=K(I,2)THEN 5190 -5180 NEXT I:I=3 -5190 K(I,3)=0:GOTO 5430 -5210 A$=" * ":Z1=X:Z2=Y:GOSUB 8830:IF Z3=0 THEN 5280 -5260 PRINT"STAR AT";X3;",";Y3;"ABSORBED TORPEDO ENERGY.":GOSUB 6000 -5261 GOTO 1990 -5280 A$=">!<":Z1=X:Z2=Y:GOSUB 8830:IF Z3=0 THEN 4760 -5330 PRINT CHR$(22);"*** STARBASE DESTROYED ***";CHR$(22) -5331 B3=B3-1:B9=B9-1 -5360 IF B9>0 OR K9>T-T0-T9 THEN 5400 -5370 PRINT"THAT DOES IT, CAPTAIN!! YOU ARE HEREBY RELIEVED OF COMMAND" -5380 PRINT"AND SENTENCED TO 99 STARDATES AT HARD LABOR ON CYGNUS 12!!" -5390 GOTO 6270 -5400 PRINT"STARFLEET COMMAND REVIEWING YOUR RECORD TO CONSIDER" -5410 PRINT"COURT MARTIAL!":D0=0 -5430 Z1=X:Z2=Y:A$=" ":GOSUB 8670 -5470 G(Q1,Q2)=K3*100+B3*10+S3:Z(Q1,Q2)=G(Q1,Q2):GOSUB 6000:GOTO 1990 -5490 PRINT"TORPEDO MISSED.":PRINT:GOSUB 6000:GOTO 1990 -5530 IF D(7)<0 THEN PRINT"SHIELD CONTROL INOPERABLE.":GOTO 1990 -5560 PRINT"ENERGY AVAILABLE =";E+S;:INPUT"NUMBER OF UNITS TO SHIELDS";X -5580 IF X<0 OR S=X THEN PRINT"":GOTO 1990 -5590 IF X<=E+S THEN 5630 -5600 PRINT"SHIELD CONTROL: 'THIS IS NOT THE FEDERATION TREASURY.'" -5610 PRINT"":GOTO 1990 -5630 E=E+S-X:S=X:PRINT"DEFLECTOR CONTROL ROOM:" -5660 PRINT" 'SHIELDS NOW AT";INT(S);"UNITS PER YOUR COMMAND.'" -5661 GOTO 1990 -5690 IF D(6)>=0 THEN 5910 -5700 PRINT"DAMAGE CONTROL REPORT NOT AVAILABLE.":IF D0=0 THEN 1990 -5720 D3=0:FOR I=1 TO 8:IF D(I)<0 THEN D3=D3+.1 -5760 NEXT I:IF D3=0 THEN 1990 -5780 PRINT:D3=D3+D4:IF D3>=1 THEN D3=.9 -5810 PRINT"TECHNICIANS STANDING BY TO EFFECT REPAIRS TO YOUR SHIP;" -5820 PRINT"ESTIMATED TIME TO REPAIR:";.01*INT(100*D3);"STARDATES." -5840 INPUT"WILL YOU AUTHORIZE THE REPAIR ORDER (Y/N)";A$ -5860 IF A$<>"Y"THEN 1990 -5870 FOR I=1 TO 8:IF D(I)<0 THEN D(I)=0 -5890 NEXT I:T=T+D3+.1 -5910 PRINT:PRINT"DEVICE STATE OF REPAIR" -5911 PRINT"------ ---------------":FOR R1=1 TO 8 -5920 GOSUB 8790:PRINT G2$;LEFT$(Z$,25-LEN(G2$));INT(D(R1)*100)*.01 -5950 NEXT R1:PRINT:IF D0<>0 THEN 5720 -5980 GOTO 1990 -6000 IF K3<=0 THEN RETURN -6010 IF D0<>0 THEN PRINT"STARBASE SHIELDS PROTECT THE ENTERPRISE." -6011 RETURN -6040 FOR I=1 TO 3:IF K(I,3)<=0 THEN 6200 -6060 H=INT((K(I,3)/FND(1))*(2+RND(1))) -6061 S=S-H:K(I,3)=K(I,3)/(3+RND(0)) -6080 PRINT:PRINT H;"UNIT HIT ON ENTERPRISE FROM SECTOR"; -6081 PRINT K(I,1);CHR$(8);",";K(I,2);CHR$(8);"." -6090 IF S<=0 THEN 6240 -6100 PRINT" ":IF H<20 THEN 6200 -6120 IF RND(1)>.6 OR H/S<=.02 THEN 6200 -6140 R1=FNR(1):D(R1)=D(R1)-H/S-.5*RND(1):GOSUB 8790 -6170 PRINT"DAMAGE CONTROL: '";G2$;" DAMAGED BY THE HIT'" -6200 NEXT I:RETURN -6220 PRINT:PRINT"IT IS STARDATE";T;CHR$(8);".":PRINT:GOTO 6270 -6240 PRINT:PRINT"THE ENTERPRISE HAS BEEN DESTROYED. THE FEDERATION "; -6250 PRINT"WILL BE CONQUERED.":GOTO 6220 -6270 PRINT"THERE WERE";K9;"KLINGON BATTLE CRUISERS LEFT AT" -6280 PRINT"THE END OF YOUR MISSION." -6290 PRINT:PRINT:IF B9=0 THEN 6360 -6310 PRINT"THE FEDERATION IS IN NEED OF A NEW STARSHIP COMMANDER" -6320 PRINT"FOR A SIMILAR MISSION -- IF THERE IS A VOLUNTEER," -6330 INPUT"LET HIM STEP FORWARD AND ENTER 'AYE'";A$:IF A$="AYE"THEN 10 -6360 PRINT:PRINT "BACK TO SYSTEM.":END -6370 PRINT"CONGRATULATIONS, CAPTAIN! THE LAST KLINGON BATTLE CRUISER" -6380 PRINT"MENACING THE FEDERATION HAS BEEN DESTROYED.":PRINT -6400 PRINT"YOUR EFFICIENCY RATING IS";1000*(K7/(T-T0))^2:GOTO 6290 -6430 FOR I=S1-1 TO S1+1:FOR J=S2-1 TO S2+1 -6450 IF INT(I+.5)<1 OR INT(I+.5)>8 THEN 6540 -6451 IF INT(J+.5)<1 OR INT(J+.5)>8 THEN 6540 -6490 A$=">B<":Z1=I:Z2=J:GOSUB 8830:IF Z3=1 THEN 6580 -6540 NEXT J:NEXT I:D0=0:GOTO 6650 -6580 D0=1:C$="DOCKED":E=E0:P=P0 -6620 PRINT"SHIELDS DROPPED FOR DOCKING PURPOSES.":S=0:GOTO 6720 -6650 IF K3>0 THEN C$="*RED*":GOTO 6720 -6660 C$="GREEN":IF E=0 THEN 6770 -6730 PRINT:PRINT"*** SHORT RANGE SENSORS ARE OUT ***":PRINT:RETURN -6770 O1$=" +--1---2---3---4---5---6---7---8-+":PRINT O1$ -6771 FOR I=1 TO 8:PRINT I;"|"; -6820 FOR J=(I-1)*24+1 TO(I-1)*24+22 STEP 3:PRINT" ";MID$(Q$,J,3); -6821 NEXT J:PRINT"|";I; -6830 ON I GOTO 6850,6900,6960,7020,7070,7120,7180,7240 -6850 PRINT" STARDATE ";:PRINT INT(T*10)*.1 -6851 GOTO 7260 -6900 PRINT" CONDITION "; -6901 IF C$="*RED*" THEN PRINT CHR$(22);"*RED*";CHR$(22):GOTO 7260 -6902 IF C$="DOCKED" THEN PRINT CHR$(22);"DOCKED";CHR$(22):GOTO 7260 -6903 PRINT C$: GOTO 7260 -6960 PRINT" QUADRANT ";Q1;CHR$(8);",";Q2;CHR$(8) -6961 GOTO 7260 -7020 PRINT" SECTOR ";S1;CHR$(8);",";S2;CHR$(8) -7021 GOTO 7260 -7070 PRINT" PHOTON TORPEDOES ";:PRINT INT(P) -7071 GOTO 7260 -7120 PRINT" TOTAL ENERGY ";:PRINT INT(E+S) -7121 GOTO 7260 -7180 PRINT" SHIELDS ";:PRINT INT(S) -7181 GOTO 7260 -7240 PRINT" KLINGONS REMAINING";:PRINT INT(K9) -7260 NEXT I:PRINT O1$:RETURN -7290 IF D(8)<0 THEN PRINT"COMPUTER DISABLED.":GOTO 1990 -7320 INPUT"COMPUTER ACTIVE AND AWAITING COMMAND";A:IF A<0 THEN 1990 -7350 PRINT:H8=1:ON A+1 GOTO 7540,7900,8070,8500,8150,7400 -7360 PRINT"FUNCTIONS AVAILABLE FROM LIBRARY-COMPUTER:" -7365 PRINT "-----------------------------------------":PRINT -7370 PRINT" 0 = CUMULATIVE GALTIC RECORD" -7372 PRINT" 1 = STATUS REPORT" -7374 PRINT" 2 = PHOTON TORPEDO DATA" -7376 PRINT" 3 = STARBASE NAV DATA" -7378 PRINT" 4 = DIRECTION/DISTANCE CALCULATOR" -7380 PRINT" 5 = GALAXY 'REGION NAME' MAP":PRINT:GOTO 7320 -7400 H8=0:G5=1:PRINT" THE GALAXY":GOTO 7550 -7540 REM -7542 REM -7543 PRINT:PRINT" "; -7544 PRINT"COMPUTER RECORD OF GALAXY FOR QUADRANT";Q1;CHR$(8);",";Q2 -7546 PRINT -7550 PRINT" 1 2 3 4 5 6 7 8" -7560 O1$=" +-----+-----+-----+-----+-----+-----+-----+-----+" -7570 PRINT O1$:FOR I=1 TO 8:PRINT I;" ";:IF H8=0 THEN 7740 -7630 FOR J=1 TO 8:PRINT"| ";:IF Z(I,J)=0 THEN PRINT"*** ";:GOTO 7720 -7700 PRINT RIGHT$(STR$(Z(I,J)+1000),3);" "; -7720 IF J=8 THEN PRINT "|" -7721 NEXT J:GOTO 7850 -7740 Z4=I:Z5=1:GOSUB 9030:J0=INT(15-.5*LEN(G2$)):PRINT TAB(J0);G2$; -7800 Z5=5:GOSUB 9030:J0=INT(39-.5*LEN(G2$)):PRINT TAB(J0);G2$ -7850 PRINT O1$:NEXT I:PRINT:GOTO 1990 -7900 PRINT " STATUS REPORT:":PRINT " -------------":X$="" -7901 IF K9>1 THEN X$="S" -7940 PRINT K9;"KLINGON";X$;" LEFT." -7960 PRINT" MISSION MUST BE COMPLETED IN";.1*INT((T0+T9-T)*10); -7961 PRINT"STARDATES." -7970 X$="S":IF B9<2 THEN X$="":IF B9<1 THEN 8010 -7980 PRINT" THE FEDERATION IS MAINTAINING";B9; -7981 PRINT"STARBASE";X$;" IN THE GALAXY." -7990 GOTO 5690 -8010 PRINT"YOUR STUPIDITY HAS LEFT YOU ON YOUR OWN IN" -8020 PRINT" THE GALAXY -- YOU HAVE NO STARBASES LEFT!":GOTO 5690 -8070 IF K3<=0 THEN 4270 -8080 X$="":IF K3>1 THEN X$="S" -8090 PRINT"FROM ENTERPRISE TO KLINGON BATTLE CRUSER";X$ -8100 H8=0:FOR I=1 TO 3:IF K(I,3)<=0 THEN 8480 -8110 W1=K(I,1):X=K(I,2) -8120 C1=S1:A=S2:GOTO 8220 -8150 PRINT"DIRECTION/DISTANCE CALCULATOR:" -8160 PRINT"YOU ARE AT QUADRANT ";Q1;CHR$(8);",";Q2;" SECTOR "; -8161 PRINT S1;CHR$(8);",";S2;CHR$(8);"." -8170 INPUT"PLEASE ENTER INITIAL COORDINATES (X,Y)";C1,A -8200 INPUT"FINAL COORDINATES (X,Y)";W1,X -8220 X=X-A:A=C1-W1:IF X<0 THEN 8350 -8250 IF A<0 THEN 8410 -8260 IF X>0 THEN 8280 -8270 IF A=0 THEN C1=5:GOTO 8290 -8280 C1=1 -8290 IF ABS(A)<=ABS(X)THEN 8330 -8310 PRINT"DIRECTION =";C1+(((ABS(A)-ABS(X))+ABS(A))/ABS(A)):GOTO 8460 -8330 PRINT"DIRECTION =";C1+(ABS(A)/ABS(X)):GOTO 8460 -8350 IF A>0 THEN C1=3:GOTO 8420 -8360 IF X<>0 THEN C1=5:GOTO 8290 -8410 C1=7 -8420 IF ABS(A)>=ABS(X)THEN 8450 -8430 PRINT"DIRECTION =";C1+(((ABS(X)-ABS(A))+ABS(X))/ABS(X)):GOTO 8460 -8450 PRINT"DIRECTION =";C1+(ABS(X)/ABS(A)) -8460 PRINT"DISTANCE =";SQR(X^2+A^2):IF H8=1 THEN 1990 -8480 NEXT I:GOTO 1990 -8500 IF B3<>0 THEN PRINT"FROM ENTERPRISE TO STARBASE:" -8501 W1=B4:X=B5:GOTO 8120 -8510 PRINT"MR. SPOCK: 'SENSORS SHOW NO STARBASES IN THIS QUADRANT.'""; -8520 GOTO 1990 -8590 R1=FNR(1):R2=FNR(1):A$=" ":Z1=R1:Z2=R2:GOSUB 8830 -8591 IF Z3=0 THEN 8590 -8600 RETURN -8670 S8=INT(Z2-.5)*3+INT(Z1-.5)*24+1 -8675 IF LEN(A$)<>3 THEN PRINT"ERROR":STOP -8680 IF S8=1 THEN Q$=A$+RIGHT$(Q$,189):RETURN -8690 IF S8=190 THEN Q$=LEFT$(Q$,189)+A$:RETURN -8700 Q$=LEFT$(Q$,S8-1)+A$+RIGHT$(Q$,190-S8):RETURN -8790 ON R1 GOTO 8792,8794,8796,8798,8800,8802,8804,8806 -8792 G2$="WARP ENGINES":RETURN -8794 G2$="SHORT RANGE SENSORS":RETURN -8796 G2$="LONG RANGE SENSORS":RETURN -8798 G2$="PHASER CONTROL":RETURN -8800 G2$="PHOTON TUBES":RETURN -8802 G2$="DAMAGE CONTROL":RETURN -8804 G2$="SHIELD CONTROL":RETURN -8806 G2$="LIBRARY-COMPUTER":RETURN -8830 Z1=INT(Z1+.5):Z2=INT(Z2+.5):S8=(Z2-1)*3+(Z1-1)*24+1:Z3=0 -8890 IF MID$(Q$,S8,3)<>A$THEN RETURN -8900 Z3=1:RETURN -9030 IF Z5<=4 THEN ON Z4 GOTO 9040,9050,9060,9070,9080,9090,9100,9110 -9035 GOTO 9120 -9040 G2$="ANTARES":GOTO 9210 -9050 G2$="RIGEL":GOTO 9210 -9060 G2$="PROCYON":GOTO 9210 -9070 G2$="VEGA":GOTO 9210 -9080 G2$="CANOPUS":GOTO 9210 -9090 G2$="ALTAIR":GOTO 9210 -9100 G2$="SAGITTARIUS":GOTO 9210 -9110 G2$="POLLUX":GOTO 9210 -9120 ON Z4 GOTO 9130,9140,9150,9160,9170,9180,9190,9200 -9130 G2$="SIRIUS":GOTO 9210 -9140 G2$="DENEB":GOTO 9210 -9150 G2$="CAPELLA":GOTO 9210 -9160 G2$="BETELGEUSE":GOTO 9210 -9170 G2$="ALDEBARAN":GOTO 9210 -9180 G2$="REGULUS":GOTO 9210 -9190 G2$="ARCTURUS":GOTO 9210 -9200 G2$="SPICA" -9210 IF G5<>1 THEN ON Z5 GOTO 9230,9240,9250,9260,9230,9240,9250,9260 -9220 RETURN -9230 G2$=G2$+" I":RETURN -9240 G2$=G2$+" II":RETURN -9250 G2$=G2$+" III":RETURN -9260 G2$=G2$+" IV":RETURN -9999 END -Г3 Copyright (c) 1979, Digital Research????????????CON:RDR:PUN:LST:DEV:VAL:USR:DSK:TTY:CRT:BAT:UC1:TTY:PTR:UR1:UR2:TTY:PTP:UP1:UP2:TTY:CRT:LPT:UL1:R/OR/WSYSDIRR/O R/W SYS DIR ** Aborted **Active User :Active Files: Drive Characteristics65536: 128 Byte Record CapacityKilobyte Drive Capacity32 Byte Directory EntriesChecked Directory EntriesRecords/ ExtentRecords/ BlockSectors/ TrackReserved Tracks is Temp R/O Disk: d:=R/OSet Indicator: d:filename.typ $R/O $R/W $SYS $DIRDisk Status : DSK: d:DSK:User Status : USR:Iobyte Assign: =Bad DelimiterInvalid AssignmentBad Delimiter: Bytes Remaining On R/, Space: Invalid File Indicator** Too Many Files **File Not Found Size Recs Bytes Ext Acc65536 set to R/O Invalid Disk AssignmentWrong CP/M Version (Requires 2.0)!9"2!TщНню ТOНТГ‹!]6:\ЦЦџх:]Ц ЦџБHЎТrН3 Г‹:\юКЂНГ‹Н‡ -/Т‹Нє *2щЙ!"q*"&лНLЙ Нђ -НђЙ НђЙ!$p+q*#~юКС*#NНђ*##"#Г·Й!&p+qН *%DMН±Й НOЙ НOЙ!(q*(&лНLЙ!*p+q*)лНO2'Й!,p+q*+лНO2'ЙНO2'ЙНOЙ!.p+q*-лНLЙНRЙНRЙНLЙНRЙ\НLЙНR"Йя НOЙ!/q*/&л НLЙ!1p+q*0л#НLЙН~*##N!НЅЂНћ"TЙ!Vq*VMНцНіЙ!Xp+q!WНГл* >WеНr#MбНІЙ!_p+q!`6>!`ѕЪ6*`&л*^е*`&Y СѕК/>Й!`4В >Й*]&Ђ ~ю ВO!]4Г9!a6:aюТж*]&Ђ ~2bO>№Тz*bMНлГ Нл>!b–џ/х~Ц,ЦџБH±х~Ц:ЦџБH±х~Ц*ЦџБH±х~Ц.ЦџБH±х~Ц>ЦџБH±х~Ц<ЦџБH±х~Ц=ЦџБH±ТЯ*]&Ђ 6Гг!]4ГT!]4Й!cq*a&Y :cw!a4Й!gr+s+p+q!h6>fНкµКr*dл*fН!is*dлНЃ"dPY! -Нл"f>НУµЖяџ!h¦#х~“ЦџБHЎТaН«Гo!h6:iЖ0OНђГЙ!mr+s+p+q*lTеНZлбs#r*lлНвЪ¶*lлНвл+s#r*jN#F+q#pГЊЙ!nq!"o"q}2uo&"s* лsНЭЪ:nТс*sDMНЫ2u:uЪqoНs*s"sТО*oЙ№НТЙЗНТНЉO -НХНТ!v6>!vѕЪQ*v&w 6`i+4В6П)НA*Н:'юяК“:'懇‡‡‡O!П) ~2vюеКЌ:vжO!w 6Н,Г]!v6>!vѕЪВ*v&w ~Т»*vM -Н!v4ВЙгНТН8ЖAOНђ:НђиН±*##N!НЅ"—* N#F*—лН "™>НУµЦџ!—хНшµЖяџБHЎТ% яНТГ- *™DMНА Н±Н·DMНА  Н±* N#FНА 9Н± * ^#Vл))DMНА TН±* ~ќНкµК -*ќ}Т -*џMНМНГ!ќНГл+s#r#4Ги Й!ўs+p+q!¤6!¦66:ў!¦ѕЪ„ -!Ґ6!Ј6>!ЈѕЪr -*¤&л* е*Ј&Y СѕКi -!Ґ6!¤4+4ВA -:ҐТ} -:¦Й!¦4В- ->Й!Є6Н99Н -2§юВЁ -:ЄЦЖяџЙ!Є4:§юВ :2©!Ё6+6>!§ѕЪ :§‡‡O!9 DMНi ­Н±:©ж‡‡!Ё†O!Y DMНi :ЁЖ2Ё:©жю2©Н !§4ВВ -ГF :§юВ® ІНТИНТъНТНТ)НТ!§6>!§ѕЪ« Н :§‡‡O!9 DMНi 8Н±!Ё6> !ЁѕЪ¤ Г… :ЁЖ2ЁТk Г¤  Нђ:§‡‡‡‡!Ё†O!Y DMНi Гw !§4ВC ГF :§юВї Н>ЙГF :§юВН НЭ ГF :§=2§‡‡‡‡2ЁН9:Yю=Кп ;НТ>ЙН9*Ё&Y DMН -=2ЁюяВ IНТ>Й!©6ь:§=2§юяК8 :©2©:Ё‡‡2ЁГ :©!¦!Ё¶2Н9:Yю ВT >Й:Yю,Кe \НТ>ЙГЊ -Й!¬p+q*«~ю:К‰ *«NНђ*«#"«Гo :НђЙ!®p+q!'"±!°6>±НкµКь *­л*±Н{2Ї*­лНЃ"­PY! -Нл"±>НУµЦџ!°¶+х~“ЖяџБH±Тщ !°6:ЇЖ0OНђГ  kНђН ЙНQ" Н8ЖAOНђjН±ЙН·DMНЏ ЙmНТН Н ЙНZ"іНl"µ!·6>іНкµКҐ *і}Т† *·MНМН ЃН±*µ}Тx OНђГ} WНђ„Н±Н !іНГл+s#r!µНГл+s#r#4ГD Н Й:\юК№ :\=OНМЙНіН© !6!М)6яНlТд :М)юВЪ Й:М)=2М)Гр :]ю Вр Н& Й!"ё}2\!h6?!j6?\Н:'юяКC:'懇‡‡‡ЖЂo&"є)!Л)6!"ѕ):Л)/ёѕ)хНЭџБHЎТН]!Ж)6> !Ж)ѕЪЋ*Ж)&л*є)е*Ж)&л*ј)Б -ѕКy!Ж)6 Г„:Ж)Ц Цџ2Л):Ж)<2Ж)ВM*ѕ)#"ѕ)Г/:Л)Т©*ѕ)+"ѕ)Г`*ё"ѕ)#"ёН]!ёНшџ*ј)л!хНшџ/БH±ТнҐНТ!"ѕ)!"ёН]*ѕ)є) е*ѕ)лбs#r!Ж)6> !Ж)ѕЪ.*Ж)&л*є)е*Ж)&л*ј)Б -w:Ж)<2Ж)В*ѕ)є) >w#6*ѕ)є) w#6*ѕ)є!) w#6*ѕ)є%) w#6*ѕ)є) N#F*ѕ)Еє) Бq#p*ѕ)є%) е*є) ~СНe е*є) е* ~б¦o&ЂНћБ е*ѕ)є%) Бq#p!З)6* >яНхТТ!З)6!Ж)6>!Ж)ѕЪ=Гс:З)!Ж)†wТЧГ=*Ж)&л*є)~2И):З)юВ*Ж)& л*є):И)¶2И):И)юК:*ѕ)є!) е*ѕ)є) лБНsГгН,Г ->ёНкµВXєНТГ\:М)юяВ“>!ёНхТd!"А)>!А)НхТd!"А)!"Д)*ё++л!Д)НшЪa*Д)ј) ^#Vл"ѕ)Н]*ј)"є)*Д)є) ^#Vл"ѕ)Н]!Ж)6> !Ж)ѕЪT*Ж)&л*є)~2Й)е*Ж)&л*ј)~2К)OС№Т;*Д)є) ^#Vл"В)*Д)ј) е*Д)є) гN#Fбq#p*Д)ј) е*В)лбs#r*А)#"А)!Ж)6 ГJ:К)!Й)ѕТJ!Ж)6 :Ж)<2Ж)ВЖ*Д)"Д)Т€Гq:ТtЙНТГwН РН±!"А)ёА)НЭТЌ*А)є) ^#Vл"ѕ)Н]Н .е*ј)DM\б --В°!\6:Тй\НЈ:юКЫжН±Гж*}DM'НН«*ѕ)є%) N#F'НН«*ѕ)є!) N#F'НkНђН«*ѕ)є) N#FиНН«RНђ/Нђ *ј) ~ТIOНђГNWНђН«Н8ЖAOНђ:Нђ -*ј) ~2И)Тt(НђНА:И)Тѓ)Нђ*А)#"А)ГѓН& Г\!"А)ёА)НЭТ\НдТ°НЙ*А)"ѕ)Н]Н НА*М)M! ^#Vлй *ј) >Ђ¶*ј) wГ *ј) >¦*ј) wГ -*ј) >Ђ¶*ј) wГ -*ј) >¦*ј) wГПбу.е*ј)DM\б --В+!\6НuмН±:М)‡‡O!™ DMН±*А)#"А)Г™Й*ѕ)))))П)"ј)Й:mю Вw>Й.Yn --В:YЦSЦџх:ZЦ ЦџБHЎТ§!6>юЙ©Н -2М)юВЅЋНТ>Й!Н)6> !Н)ѕЪ*Н)&л*ј)>¦2О)ю Кч:Н)ю Вр.Нђ*О)MНђ:Н)<2Н)ВЕЙН9Н9:Yю=В/Н9хНюТ&Н© НcГ,щНТГHН© 9Н -юВEНГГHНє ЙГГГНЙЙЙi`N#FЃo€gЙл_л…oЊgЙл_лҐo¤gЙDM!>х)л—)лЌ‘o|gТ с=В†ЙDM!>)л)лТ­ =ВҐЙ~ ВіЙ^#Vл) ВЅЙ^#Vл|·g}o ВЗЙ_{•ozњgЙi`N#F‘ogЙo&•oњgЙ_{–_z#ћWлЙГЯ copyright(c) 1977, digital research -$Error On Line $SUBNo 'SUB' File Present$Disk Write Error$Command Buffer Overflow$Command Too Long$Parameter Error$Invalid Control Character$Directory Full$Cannot Close, Read/Only?$!9"р!“щНМНЉНюН‡Й!Эp+q*Ьл НЉЙ!аp+q*ЯлНЌ2ЮЙ!вp+q*блНЌ2ЮЙ!дp+q*глНЉЙ!жp+q*елНЌЙ!иp+q*злНЌЙ!кp+q*йлНЌ2ЮЙ!пs+p+q+СБp+qХ:п=2пюяК¦*ле*нБ -w*л#"л*н#"нГЙ!уp+q(Нч+Нч¶Нч*тDMНч*рщЙЃЕфНp*Ђ&ф 6:ЕeНp\Н:ЮюяВ=Н§!t6ЂЙ>!tѕТ%\Н=юК >Й!t6:t<2t=O!Ђ ~2uю Вb:ё<2ёO>9№Тb!ё60+~9№Тb!·60+4:uЦaюТt:uж_2u:uЙ»НMюК‰SН§Й!v6!"v!|6:|ТЂ!x6Н 2}ЦЖяџх:}Ц ЖяџБHЎТk:}ю -Кh:}ю$В6Н 2}ю$Вж*}MНДГ3:}Ц02}O> №ТюЌН§Г3!z6Н­:}юК"!}5НЃТГН­ГНЃТ3*yMНДГ"Гh:}ю^ВaН Цa2}O>№ТVќН§Г^:}Й>Й*z&ф ~ю ВГ!z4Г­Й!{q*v#"vяН™ТЮdН§*vv :{w:x<2xO>}№Тэ|Н§Й»Н-!Ы6»Н]:ЮюяВ·Н§Нz2~юКe:~2ЂO!Ѓ 6*~&‚ 6$>!~ѕТ_Нz*~&Ђ w!~5ГBНxГ»Н:ЮюяВyЖН§Й*v+"vv ~ЙГГГНЙЙЙ_{•ozњgЙ001 $$$$ SUB10 REM INSTRUCTIONS FOR "SUPER STARTREK" MAR 5, 1978 -20 FOR I=1 TO 12:PRINT:NEXT I -25 PRINT CHR$(26) -30 PRINT TAB(10);"*************************************" -40 PRINT TAB(10);"* *" -50 PRINT TAB(10);"* *" -60 PRINT TAB(10);"* * * SUPER STAR TREK * * *" -70 PRINT TAB(10);"* *" -80 PRINT TAB(10);"* *" -90 PRINT TAB(10);"*************************************" -100 FOR I=1 TO 8:PRINT:NEXT I -110 INPUT "DO YOU NEED INSTRUCTIONS (Y/N)";K$:IF K$="N" THEN 1210 -120 PRINT CHR$(26) -130 PRINT "NOTE: YOU MUST BE RUNNING 40K CP/M TO RUN STARTREK." -140 PRINT " THIS MEANS THAT BASIC MUST HAVE ABOUT 18K OF FREE MEMORY." -150 PRINT -160 PRINT" INSTRUCTIONS FOR 'SUPER STAR TREK'" -170 PRINT -180 PRINT"1. WHEN YOU SEE \COMMAND ?\ PRINTED, ENTER ONE OF THE LEGAL" -190 PRINT" COMMANDS (NAV,SRS,LRS,PHA,TOR,SHE,DAM,COM, OR XXX)." -200 PRINT"2. IF YOU SHOULD TYPE IN AN ILLEGAL COMMAND, YOU'LL GET A SHORT" -210 PRINT" LIST OF THE LEGAL COMMANDS PRINTED OUT." -220 PRINT"3. SOME COMMANDS REQUIRE YOU TO ENTER DATA (FOR EXAMPLE, THE" -230 PRINT" 'NAV' COMMAND COMES BACK WITH 'COURSE (1-9) ?'.) IF YOU" -240 PRINT" TYPE IN ILLEGAL DATA (LIKE NEGATIVE NUMBERS), THAT COMMAND" -250 PRINT" WILL BE ABORTED" -260 PRINT -270 PRINT" THE GALAXY IS DIVIDED INTO AN 8 X 8 QUADRANT GRID," -280 PRINT"AND EACH QUADRANT IS FURTHER DIVIDED INTO AN 8 X 8 SECTOR GRID." -290 PRINT -300 PRINT" YOU WILL BE ASSIGNED A STARTING POINT SOMEWHERE IN THE" -310 PRINT"GALAXY TO BEGIN A TOUR OF DUTY AS COMMANDER OF THE STARSHIP" -320 PRINT"\ENTERPRISE\; YOUR MISSION: TO SEEK AND DESTROY THE FLEET OF" -330 PRINT"KLINGON WARWHIPS WHICH ARE MENACING THE UNITED FEDERATION OF" -340 PRINT"PLANETS." -350 PRINT -352 LINE INPUT "ENTER [CR] TO CONTINUE";A$:IF A$="" THEN PRINT CHR$(26) -360 PRINT" YOU HAVE THE FOLLOWING COMMANDS AVAILABLE TO YOU AS CAPTAIN" -370 PRINT"OF THE STARSHIP ENTERPRISE:" -380 PRINT -390 PRINT"\NAV\ COMMAND = WARP ENGINE CONTROL --" -400 PRINT" COURSE IS IN A CIRCULAR NUMERICAL 4 3 2" -410 PRINT" VECTOR ARRANGEMENT AS SHOWN . . ." -420 PRINT" INTEGER AND REAL VALUES MAY BE ..." -430 PRINT" USED. (THUS COURSE 1.5 IS HALF- 5 ---*--- 1" -440 PRINT" WAY BETWEEN 1 AND 2 ..." -450 PRINT" . . ." -460 PRINT" VALUES MAY APPROACH 9.0, WHICH 6 7 8" -470 PRINT" ITSELF IS EQUIVALENT TO 1.0" -480 PRINT" COURSE" -490 PRINT" ONE WARP FACTOR IS THE SIZE OF " -500 PRINT" ONE QUADTANT. THEREFORE, TO GET" -510 PRINT" FROM QUADRANT 6,5 TO 5,5, YOU WOULD" -520 PRINT" USE COURSE 3, WARP FACTOR 1." -530 PRINT:PRINT -531 LINE INPUT "ENTER [CR] TO CONTINUE";A$:IF A$="" THEN PRINT CHR$(26) -540 PRINT"\SRS\ COMMAND = SHORT RANGE SENSOR SCAN" -550 PRINT" SHOWS YOU A SCAN OF YOUR PRESENT QUADRANT." -560 PRINT -570 PRINT" SYMBOLOGY ON YOUR SENSOR SCREEN IS AS FOLLOWS:" -580 PRINT" <*> = YOUR STARSHIP'S POSITION" -590 PRINT" +K+ = KLINGON BATTLE CRUISER" -600 PRINT" >!< = FEDERATION STARBASE (REFUEL/REPAIR/RE-ARM HERE!)" -610 PRINT" * = STAR" -620 PRINT -630 PRINT" A CONDENSED 'STATUS REPORT' WILL ALSO BE PRESENTED." -640 PRINT -650 PRINT"\LRS\ COMMAND = LONG RANGE SENSOR SCAN" -660 PRINT" SHOWS CONDITIONS IN SPACE FOR ONE QUADRANT ON EACH SIDE" -670 PRINT" OF THE ENTERPRISE (WHICH IS IN THE MIDDLE OF THE SCAN)" -680 PRINT" THE SCAN IS CODED IN THE FORM \###\, WHERE TH UNITS DIGIT" -690 PRINT" IS THE NUMBER OF STARS, THE TENS DIGIT IS THE NUMBER OF" -700 PRINT" STARBASES, AND THE HUNDRESDS DIGIT IS THE NUMBER OF" -710 PRINT" KLINGONS." -720 PRINT -730 PRINT" EXAMPLE - 207 = 2 KLINGONS, NO STARBASES, & 7 STARS." -740 PRINT:PRINT -741 LINE INPUT "ENTER [CR] TO CONTINUE";A$:IF A$="" THEN PRINT CHR$(26) -750 PRINT"\PHA\ COMMAND = PHASER CONTROL." -760 PRINT" ALLOWS YOU TO DESTROY THE KLINGON BATTLE CRUISERS BY " -770 PRINT" ZAPPING THEM WITH SUITABLY LARGE UNITS OF ENERGY TO" -780 PRINT" DEPLETE THEIR SHIELD POWER. (REMEMBER, KLINGONS HAVE" -790 PRINT" PHASERS TOO!)" -800 PRINT -810 PRINT"\TOR\ COMMAND = PHOTON TORPEDO CONTROL" -820 PRINT" TORPEDO COURSE IS THE SAME AS USED IN WARP ENGINE CONTROL" -830 PRINT" IF YOU HIT THE KLINGON VESSEL, HE IS DESTROYED AND" -840 PRINT" CANNOT FIRE BACK AT YOU. IF YOU MISS, YOU ARE SUBJECT TO" -850 PRINT" HIS PHASER FIRE. IN EITHER CASE, YOU ARE ALSO SUBJECT TO " -860 PRINT" THE PHASER FIRE OF ALL OTHER KLINGONS IN THE QUADRANT." -870 PRINT -880 PRINT" THE LIBRARY-COMPUTER (\COM\ COMMAND) HAS AN OPTION TO " -890 PRINT" COMPUTE TORPEDO TRAJECTORY FOR YOU (OPTION 2)" -900 PRINT -910 PRINT"\SHE\ COMMAND = SHIELD CONTROL" -920 PRINT" DEFINES THE NUMBER OF ENERGY UNITS TO BE ASSIGNED TO THE" -930 PRINT" SHIELDS. ENERGY IS TAKEN FROM TOTAL SHIP'S ENERGY. NOTE" -940 PRINT" THAT THE STATUS DISPLAY TOTAL ENERGY INCLUDES SHIELD ENERGY" -950 PRINT -951 LINE INPUT "ENTER [CR] TO CONTINUE";A$:IF A$="" THEN PRINT CHR$(26) -960 PRINT"\DAM\ COMMAND = DAMMAGE CONTROL REPORT" -970 PRINT" GIVES THE STATE OF REPAIR OF ALL DEVICES. WHERE A NEGATIVE" -980 PRINT" 'STATE OF REPAIR' SHOWS THAT THE DEVICE IS TEMPORARILY" -990 PRINT" DAMAGED." -1000 PRINT -1010 PRINT"\COM\ COMMAND = LIBRARY-COMPUTER" -1020 PRINT" THE LIBRARY-COMPUTER CONTAINS SIX OPTIONS:" -1030 PRINT" OPTION 0 = CUMULATIVE GALACTIC RECORD" -1040 PRINT" THIS OPTION SHOWES COMPUTER MEMORY OF THE RESULTS OF ALL" -1050 PRINT" PREVIOUS SHORT AND LONG RANGE SENSOR SCANS" -1060 PRINT" OPTION 1 = STATUS REPORT" -1070 PRINT" THIS OPTION SHOWS THE NUMBER OF KLINGONS, STARDATES," -1080 PRINT" AND STARBASES REMAINING IN THE GAME." -1090 PRINT" OPTION 2 = PHOTON TORPEDO DATA" -1100 PRINT" WHICH GIVES DIRECTIONS AND DISTANCE FROM THE ENTERPRISE" -1110 PRINT" TO ALL KLINGONS IN YOUR QUADRANT" -1115 PRINT:PRINT -1116 LINE INPUT "ENTER [CR] TO CONTINUE";A$:IF A$="" THEN PRINT CHR$(26) -1117 PRINT"\COM\ COMMAND = LIBRARY-COMPUTER" -1118 PRINT -1120 PRINT" OPTION 3 = STARBASE NAV DATA" -1130 PRINT" THIS OPTION GIVES DIRECTION AND DISTANCE TO ANY " -1140 PRINT" STARBASE WITHIN YOUR QUADRANT" -1150 PRINT" OPTION 4 = DIRECTION/DISTANCE CALCULATOR" -1160 PRINT" THIS OPTION ALLOWS YOU TO ENTER COORDINATES FOR" -1170 PRINT" DIRECTION/DISTANCE CALCULATIONS" -1180 PRINT" OPTION 5 = CALACTIC /REGION NAME/ MAP" -1190 PRINT" THIS OPTION PRINTS THE NAMES OF THE SIXTEEN MAJOR " -1200 PRINT" GALACTIC REGIONS REFERRED TO IN THE GAME." -1210 PRINT:PRINT:PRINT -1220 PRINT "...CHAINING TO STARTREK..." -1230 LOAD "STARTREK.BAS",R -1240 END -01 REM **************************************** -02 REM -03 REM Z80-MBC2 USER led blink demo: -04 REM -05 REM Blink USER led until USER key is pressed -06 REM -07 REM **************************************** -08 REM -13 PRINT "Press USER key to exit" -14 LEDUSER = 0 : REM USER LED write Opcode (0x00) -15 KEYUSER = 128 : REM USER KEY read Opcode (0x80) -16 PRINT "Now blinking..." -18 OUT 1,LEDUSER : REM Write the USER LED write Opcode -20 OUT 0,1 : REM Turn USER LED on -30 GOSUB 505 : REM Delay sub -40 OUT 1,LEDUSER : REM Write the USER LED write Opcode -45 OUT 0,0 : REM Turn USER LED off -50 GOSUB 505 : REM Delay -60 GOTO 18 -490 REM -500 REM * * * * * DELAY SUB -501 REM -505 FOR J=0 TO 150 -506 OUT 1,KEYUSER : REM Write the USER KEY read Opcode -507 IF INP(0)=1 THEN GOTO 700 : REM Exit if USER key is pressed -510 NEXT J -520 RETURN -690 REM -691 REM * * * * * PROGRAM END -692 REM -700 OUT 1,LEDUSER : REM Write the USER LED write Opcode -710 OUT 0,0 : REM Turn USER LED off -720 PRINT "Terminated by USER Key" -;Configuration file for XMODEM 2.X by M. Eberhard -;Must be named XMODEM.CFG and be on CP/M's default disk. -;This file is extremely verbose, for demonstration. -;Obviously, you can trim it WAY down. - -;How this CFG file works: - -;(These commands may also be on the command line. Command -;line options override .CFG file options.) Type XMODEM with -;no options for more help. - -; Anything after a semicolon on a line is a comment. Tabs, -; spaces, carriage returns, and line feeds are generally -; ignored (though not directly following a slash and not -; between 2 digits of a hex value). - -;/C specifies reception with checksums, rather than with -; CRC error checking. (Transmit error checking is set by -; the other end.) - -;/E specifies a RDR: port that returns with Z set when no -; character is waiting (for the /X1 option) - -;The following /I commands install 8080 code that gets used -;with the /X3 option. /I options are available ib XMODEM -;version 2.4 and later only. - -;/I0 hh hh... specifies up to 8 bytes of 8080 code that -; runs once during initialization, once the .CFG file -; and command line have both been parsed. (USeful for -; setting baud rates, etc.) - -;/I1 hh hh... specifies up to 8 bytes of 8080 code for -; the Tx byte routine. The chr to send is in register c. - -;/I2 hh hh... specifies up to 8 bytes of 8080 code for -; the Rx status routine. The routine should return with -; Z cleared if a chr is waiting. - -;/I3 hh hh... specifies up to 8 bytes of 8080 code for the Rx -; data routine. The chr should be returned in register a. - -;/M causes the following message to be printed on the console - -;/O option specifies a port initialization sequence - -; The first byte is a port address, and all subsequent -; bytes are sent to that port. - -; Note that more than one /O option may be specified, so -; that you can set up the UART and also e.g. the baud rate. - -;/P option specifies a custom serial port, for the X2 option - -; Byte 1 = status port address -; Byte 2 = data port address -; Byte 3 = 00 if port ready bits are active low -; = 01 if port ready bits are active high -; Byte 4 = bit bask for receiver ready bit -; Byte 5 = bit mask for transmitter ready bit - -;/Q suppresses pacifiers during data transfer, useful -; when the transfer port is also the console - -;/X0 uses the CON: port for data transfers -;/X1 uses the RDR:/PUN: port for data transfers (default) -;/X2 uses custom serial port (defined by /P) for data transfers -;/X3 uses patched ports (defined by /I) for data transfers -;(/X3 available in vers. 2.4 and later) - -; RC2014: /Z5 seems to be the best setting -/Z5 ;specify a 2 MHz CPU (any integer from 1 to 9) - -; RC2014: Standard full monty likes /X0 -/X0 ;uses the CON: port for data transfers - -;-------------------------------------------------------------- -;Example port configurations (Un-comment the one you will use.) - -;-------------------------------------------------------------- -;MITS 88-SIO (No initialization required) -; -;/MDirect I/O is configured for 88-SIO -;/P 00 01 00 01 80 ;88-SIO (no init needed) - -;-------------------------------------------------------------- -;MITS 88-2SIO (Typical Motorola 6850 ports) -; -;/MDirect I/O is configured for 88-2SIO Port A -;/X2 ;use custom port defined here -;/P 10 11 01 01 02 ;Port A -;/O 10 03 15 ;8 data, 1 stop, no parity - - -;-------------------------------------------------------------- -;Compupro Interfacer/Interfacer II -;Control bits are set by jumpers. The board will -;XOR whatever you write to the control port with the -;DIP switch setting. This assumes all these jumpers -;are set to their '0' position -; -;/MDirect I/O is configured for Interfacer port A -;/X2 ;use custom port defined here -;/P 01 00 01 02 01 ;Port A -;/O 01 AC ;8 data, no parity, controls high, no ints -; -;/MDirect I/O is configured for Interfacer port B -;/X2 ;use custom port defined here -;/P 03 02 01 02 01 ;Port B -;/O 03 AC ;8 data, no parity, controls high, no ints - -;-------------------------------------------------------------- -;Vector Graphic Bitstreamer/Bitstreamer II, Imsai SIO-2 -;(typical Intel 8251 ports) -; -;/MDirect I/O is configured for Bitstreamer port A -;/X2 ;use custom port defined here -;/P 03 02 01 02 01 ;Port A -;/O 03 AA 40 4E 27 ;8 bits, no parity, ports enabled, etc. -; -;/MDirect I/O is configured for Bitstreamer port B -;/X2 ;use custom port defined here -;/P 05 04 01 02 01 ;Port B -;/O 05 AA 40 4E 27 ;8 bits, no parity, ports enabled, etc. -; -;-------------------------------------------------------------- -;Cromemco TU-ART -; -;/MDirect I/O is configured for TU-ART port A -;/X2 ;use custom port defined here -;/P 20 21 01 40 80 ;Port A -;/O 22 01 ;reset UART -;/O 23 00 ;disable interrupts -;/O 20 C0 ;9600 baud low byte -;/O 22 00 ;9600 baud high bit -; -;/MDirect I/O is configured for TU-ART port B -;/X2 ;use custom port defined here -;/P 50 51 01 40 80 ;Port B -;/O 52 01 ;reset UART -;/O 53 00 ;disable interrupts -;/O 50 a0 ;38.4 Kbaud low byte -;/O 52 10 ;38.4 Kbaud high bit - -;-------------------------------------------------------------- -;CCS 2719 serial ports (Typical Zilog DART ports) -; -;/MDirect I/O is configured for CCS 2719 Port A -;/X2 ;use custom port defined here -;(typical Z80 DART & Z80 CTC configuration) -;/P 55 54 01 01 04 ;Port A -;/O 55 48 01 00 03 C1 04 44 05 EA ;DART: 8 bits, 1 stop, no parity -;/O 50 47 03 ;CTC: 38.4K baud -;**/O 50 47 0C ; CTC: 9600 baud -;**/O 50 47 60 ; CTC: 1200 baud -; -;/MDirect I/O is configured for CCS 2719 Port B -;/X2 ;use custom port defined here -;/P 57 56 01 01 04 ;Port B -;/O 57 48 01 00 03 C1 04 44 05 EA ;DART: 8 bits, 1 stop, no parity -;/O 51 47 03 ;CTC: 38.4K baud -;**/O 51 47 0C ; CTC: 9600 baud -;**/O 51 47 60 ; CTC: 1200 baud - -;-------------------------------------------------------------- -;CCS 2810 serial port (which is also the console) -; -;/MDirect I/O is configured for the 2810's serial port, which is also -;/Mthe console. No progress messages will be printed during transfer. -;/X2 ;use custom port defined here -;/Q ;Quiet mode, because this is also CON: -;/P 25 20 01 01 10 ;2810 serial port -;/O 24 0F ;modem control -;/O 23 83 ;Baud rate divisor access -;/O 21 00 ;High baud rate -;/O 20 0C ;Low baud rate, 9600 baud -;**/O 20 03 ; 38.4K Baud -;**/O 20 60 ; 1200 baud -;/O 23 03 ;Line control -;/O 21 00 ;Ints disabled -;/O 25 00 ;handshake lines active - -;-------------------------------------------------------------- -;Processor Technology 3P+S's serial port -;(No initialization required) -; -;/Direct I/O via the 3P+S serial port -;/X2 ;use custom port defined here -;/P 00 01 01 40 80 - -;-------------------------------------------------------------- -;Processor Technology Sol-20 (with SOLOS ROM) or -;Subsystem B (with CUTER ROM) -; -;/MUSing Solos/Cuter serial I/O -;/X3 ;Use the (following) patched I/O -;/I1 48 3E 01 CD 1C C0 ;Tx: call AOUT with a=1 for serial port -;/I2 3E 01 CD 22 C0 ;Rx status: call AINP with a=1 for serial port -;/I3 ;Rx data: no Rx data routine, since AOUT got -; ;the data. (this line is not actually required) - -;-------------------------------------------------------------- -;Poly-88 with POLEX ROM -; -;/MUsing POLEX for serial I/O -;/X3 ;Use the (following) patched I/O -;/I0 3E 1F CD 18 F4 ;Set baud rate to 9600 -;/I1 CD 12 F4 ;Call PXSOUT to transit -;/I2 CD 0C F4 ;Call PXSTA for status -;/I3 CD 0F F4 ;call PXSIN for data -1Нт=ВѓНГ1НСН[!‘"µ*№|µМС+"№*®#"®>Н«:®Н«/Н«ЂQY*·~Н«е&ЄoЄЃO~«W$^б#ВF:Ѕ·КizН«KyН«Н~В/2°"·:ѕ<Д'Г!8"µН@1Ї2°>Н*юВ!>2±Н(W:®_Н(/єВ&“2­ЂQY*·Н(wе&ЄoЄЃO~«W$^б#Вѕ:Ѕ·КдН(єВ5KН(№В8:­=В"·:ј*№#"№МQ*®#"®:ѕ<Д'Н©ГЏ<К ГxюКЏН(В(ГxН(Н:±Н«!°4~ю -Ъ“бГx!"·л*№|µИ+"№НDл\НD·ВxЂГW>xН*оИюВ‘НцяЙНf!°4~ю -ШсГx\НD<АНЈFILE CLOSE ERROR! May be corrupt.$:»·В!"·лНDл\НD·ВЂл*№#"№:єВЯЙ2»*№|µА>Н«Н~ВНTOK -Sent ГР>2ґе*ІГЄ+}ґМ–>НK·К4> ГJ>беХЕНUБСбЙ*oй+}ґМ–>НKКZбЙ+}ґМ–ЫжВjбЫЙ+}ґМ–6ГxК{бЙЙЙЙЙЙЙЙЙНf!ґ5*ІАббг*µгЙ>ЕOГЄ6ГxyБЙе!+|µКТЫжЂВїyУбБЙ)Гx> ГЯ>НKyБЙрШНьНњяНцяН}Г>яХT]< ЪлС_ІИW{Ж0O> ГKНf:ѕ<И-!+2ѕЦ=В2ѕЕНNБГ\! еХЕНБСбЙНW ЉЙНNг~жН~#·тXгЙ>НK·И> НKюАНTABORT: НB:ј·ВЄГљНQН©НTOЛНў*®|µВДН<<КДН¦ -Empty file deleted$НTReceived *®НеН¦ blocks$10 block errors$10 ACK errors$} 0@P`pЃ‘Ў±БСбс2"RBrb“ѓіЈУГуг$4dtDTҐµ…•ехЕХ6&vfVF·§—‡чзЧЗHXhx(8ЙЩйщ‰™©№ZJzj -:*ЫЛыл›‹»«l|L\,< нэНЭ­ЅЌќ~n^N>.япЯПїЇџЏ‘Ѓ±ЎСБсб0 P@p`ѓ“ЈіГУгу"2BRbrµҐ•…хеХЕ4$tdTD§·‡—зчЗЧ&6fvFVЩЙщ陉№©XHxh8(ЛЫлы‹›«»JZjz -*:энЭНЅ­ќЌ|l\L<, пяПЯЇїЏџn~N^.>!Bc„ҐЖз)JkЊ­Оп1sRµ”чЦ9{ZЅњяЮbC жЗ¤…jK( оП¬ЌSr0Чц•ґ[z8ЯюќјД冧@a#МнЋЇHi -+хФ·–qP3эЬїћyX;¦‡дЕ"`A®ЏмН* hI—¶Хф2QpџѕЭь:Yx€©Кл -NoЂЎВг%Fg№ыЪ=^±ђуТ5wVкЛЁ‰nO, вГ ЃfG$Ыъ™ё_~<Ут‘°Wv4Lm/ИйЉ«De'Аб‚Ј}\?щШ»љuT7сРі’.lMЄ‹иЙ&dEўѓаБ>]|›єЩш6Ut“ІСр^C$Sync fail$Lost blocks$Disk write fail$UART Tx fail$Undefined Port$No init from receiver$Z!g"µ:ѕOEКxН(о2ЅКЋюVВg ИНW with CRCуЙ ИНW with checksumуЙНNСНBГђ яC<\НD<К.НTFile open -SenдНWing via :Б=ъ$=ъК НWexternal codеЙНWdirect I/ПЙНWRDR/PUОЙ2ѕНWCOОЙНЈFile not found$\НD<КwНTFile exists. Overwrite (Y/N)їНС юYВЄН<НTFile creatеНD<КЙНWd -ReceiцНб:Б·ВіўhНMНf+}ґВЄ:Ѕ·КА2±НЂМђ:±Г«Н¦ fail. Write protect? Directory full?$х>3НKс—к >2А!ЂP~#В - +НD<Дз Ї2»2їНІЪї -НгЪG ю/В? 4> ю В0 Нз  !\>/#К_ ѕВO 6 #ВX p# В_ !ь:Б‡_‡ѓ_N#F#^#VлюВЉ :В·КЉ !`"2Д(л#^#Vл"®НM:ј·рНTSend or receive (S/R)? НС ЦRюТ© 2јЙЂ> -НD:Ѓ=А:‚жЯЙНІШз Ею;К· -ю/ВНгЪ!ѕ#N#ЪВ -ЇG! - й2ЅЙ<2ВЙНг!њ Ц0К< -!°=К< -!Ѓ=К< -!Ќ=ВuеН„бТG -Їw# В> -ЙНNНгШИНГQ -Нo2g -Н„ШУГb -НooНogНoOНoхНoлге!ЖН\с!qН\СЙ=2ѕЙ<2јЙНгЦ0юТu2БЙНгЦ1юТu<2АЙНгШВ· -ЙНT========================= -XMODEM 2.7 By M. Eberhard -========================= -Z80-MBC2 (CP/M 2.2 only) -patched ver. by J4F -========================= -Usage: XMODEM