NIGHT = 014 02740 * BLACK PAWN = 016 02750 * 02760 ***** 02770 02780 ORG $25C0 02790 02800 BSCARY RMB 64 02810 02820 END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                W ORDER 01810 * 01820 * NOT SUITABLE FOR 01830 * DIRECT ACCESS TO 01840 * ENTRIES 01850 * 01860 * TRAVERSE THE ARRAY 01870 * USING SOMETHING LIKE A 01880 * ,U++ MECHANISM 01890 * 01900 ***** 01910 01920 ORG $2580 01930 01940 B2LARY FDB $04E6 1,0 01950 FDB $04EC 3,0 01960 FDB $04F2 5,0 01970 FDB $04F8 7,0 01980 FDB $04C3 0,1 01990 FDB $04C9 2,1 02000 FDB $04CF 4,1 02010 FDB $04D5 6,1 02020 FDB $04A6 1,2 02030 FDB $04AC 3,2 02040 FDB $04B2 5,2 02050 FDB $04B8 7,2 02060 FDB $0483 0,3 02070 FDB $0489 2,3 02080 FDB $048F 4,3 02090 FDB $0495 6,3 02100 FDB $0466 1,4 02110 FDB $046C 3,4 02120 FDB $0472 5,4 02130 FDB $0478 7,4 02140 FDB $0443 0,5 02150 FDB $0449 2,5 02160 FDB $044F 4,5 02170 FDB $0455 6,5 02180 FDB $0426 1,6 02190 FDB $042C 3,6 02200 FDB $0432 5,6 02210 FDB $0438 7,6 02220 FDB $0403 0,7 02230 FDB $0409 2,7 02240 FDB $040F 4,7 02250 FDB $0415 6,7 02260 02270 ***** 02280 * 02290 * BSCARY.ASM 02300 * MDJ 2021/09/19 02310 * 02320 * BOARD SURFACE CONTENTS 02330 * ARRAY 02340 * 02350 * I.E. VISUAL 02360 * APPEARANCE 02370 * 02380 * I.E. ACTUAL CHARACTERS 02390 * BY CODE NUMBER 02400 * 02410 * 8-BIT CODES 02420 * STORED IN 02430 * BOARD ROW ORDER 02440 * 02450 * DIRECTLY ACCESS ENTRIES 02460 * AT ORG ADDRESS + 02470 * (J * 8) + I 02480 * WHERE 0 <= I <= 7 02490 * AND 0 <= J <= 7 02500 * 02510 * ALTERNATIVELY, THE ARRAY 02520 * CAN BE TRAVERSED USING 02530 * SOMETHING LIKE A ,U+ 02540 * MECHANISM 02550 * 02560 ***** 02570 * 02580 * PIECE CODES 02590 * 02600 * NONE = SPACE = 096 02610 * 02620 * WHITE KING = 075 02630 * WHITE QUEEN = 081 02640 * WHITE ROOK = 082 02650 * WHITE BISHOP = 066 02660 * WHITE KNIGHT = 078 02670 * WHITE PAWN = 080 02680 * 02690 * BLACK KING = 011 02700 * BLACK QUEEN = 017 02710 * BLACK ROOK = 018 02720 * BLACK BISHOP = 002 02730 * BLACK K0423 0,6 00950 FDB $0426 1,6 00960 FDB $0429 2,6 00970 FDB $042C 3,6 00980 FDB $042F 4,6 00990 FDB $0432 5,6 01000 FDB $0435 6,6 01010 FDB $0438 7,6 01020 FDB $0403 0,7 01030 FDB $0406 1,7 01040 FDB $0409 2,7 01050 FDB $040C 3,7 01060 FDB $040F 4,7 01070 FDB $0412 5,7 01080 FDB $0415 6,7 01090 FDB $0418 7,7 01100 01110 ***** 01120 * 01130 * B2DARY.ASM 01140 * MDJ 2021/09/04 01150 * 01160 * BOARD DARK SQUARES 01170 * TO SCREEN 01180 * TRANSLATION ARRAY 01190 * 01200 * 16-BIT ADDRESSES 01210 * STORED IN 01220 * BOARD ROW ORDER 01230 * 01240 * NOT SUITABLE FOR 01250 * DIRECT ACCESS TO 01260 * ENTRIES 01270 * 01280 * TRAVERSED THE ARRAY 01290 * USING SOMETHING LIKE A 01300 * ,U++ MECHANISM 01310 * 01320 ***** 01330 01340 ORG $2540 01350 01360 B2DARY FDB $04E3 0,0 01370 FDB $04E9 2,0 01380 FDB $04EF 4,0 01390 FDB $04F5 6,0 01400 FDB $04C6 1,1 01410 FDB $04CC 3,1 01420 FDB $04D2 5,1 01430 FDB $04D8 7,1 01440 FDB $04A3 0,2 01450 FDB $04A9 2,2 01460 FDB $04AF 4,2 01470 FDB $04B5 6,2 01480 FDB $0486 1,3 01490 FDB $048C 3,3 01500 FDB $0492 5,3 01510 FDB $0498 7,3 01520 FDB $0463 0,4 01530 FDB $0469 2,4 01540 FDB $046F 4,4 01550 FDB $0475 6,4 01560 FDB $0446 1,5 01570 FDB $044C 3,5 01580 FDB $0452 5,5 01590 FDB $0458 7,5 01600 FDB $0423 0,6 01610 FDB $0429 2,6 01620 FDB $042F 4,6 01630 FDB $0435 6,6 01640 FDB $0406 1,7 01650 FDB $040C 3,7 01660 FDB $0412 5,7 01670 FDB $0418 7,7 01680 01690 ***** 01700 * 01710 * B2LARY.ASM 01720 * MDJ 2021/09/04 01730 * 01740 * BOARD LIGHT SQUARES 01750 * TO SCREEN 01760 * TRANSLATION ARRAY 01770 * 01780 * 16-BIT ADDRESSES 01790 * STORED IN 01800 * BOARD RO00100 ***** 00110 * 00120 * SM.ASM 00130 * 00140 * YACH SYSTEM 00150 * SCREEN MANAGEMENT 00160 * 00170 ***** 00180 00190 ***** 00200 * 00210 * B2SARY.ASM 00220 * MDJ 2021/09/04 00230 * 00240 * BOARD TO SCREEN 00250 * TRANSLATION ARRAY 00260 * 00270 * 16-BIT ADDRESSES 00280 * STORED IN 00290 * BOARD ROW ORDER 00300 * 00310 * DIRECTLY ACCESS ENTRIES 00320 * AT ORG ADDRESS + 00330 * ((J * 8) + I) * 2 00340 * WHERE 0 <= I <= 7 00350 * AND 0 <= J <= 7 00360 * 00370 * ALTERNATIVELY, THE ARRAY 00380 * CAN BE TRAVERSED USING 00390 * SOMETHING LIKE A ,U++ 00400 * MECHANISM 00410 * 00420 ***** 00430 00440 ORG $24C0 00450 00460 B2SARY FDB $04E3 0,0 00470 FDB $04E6 1,0 00480 FDB $04E9 2,0 00490 FDB $04EC 3,0 00500 FDB $04EF 4,0 00510 FDB $04F2 5,0 00520 FDB $04F5 6,0 00530 FDB $04F8 7,0 00540 FDB $04C3 0,1 00550 FDB $04C6 1,1 00560 FDB $04C9 2,1 00570 FDB $04CC 3,1 00580 FDB $04CF 4,1 00590 FDB $04D2 5,1 00600 FDB $04D5 6,1 00610 FDB $04D8 7,1 00620 FDB $04A3 0,2 00630 FDB $04A6 1,2 00640 FDB $04A9 2,2 00650 FDB $04AC 3,2 00660 FDB $04AF 4,2 00670 FDB $04B2 5,2 00680 FDB $04B5 6,2 00690 FDB $04B8 7,2 00700 FDB $0483 0,3 00710 FDB $0486 1,3 00720 FDB $0489 2,3 00730 FDB $048C 3,3 00740 FDB $048F 4,3 00750 FDB $0492 5,3 00760 FDB $0495 6,3 00770 FDB $0498 7,3 00780 FDB $0463 0,4 00790 FDB $0466 1,4 00800 FDB $0469 2,4 00810 FDB $046C 3,4 00820 FDB $046F 4,4 00830 FDB $0472 5,4 00840 FDB $0475 6,4 00850 FDB $0478 7,4 00860 FDB $0443 0,5 00870 FDB $0446 1,5 00880 FDB $0449 2,5 00890 FDB $044C 3,5 00900 FDB $044F 4,5 00910 FDB $0452 5,5 00920 FDB $0455 6,5 00930 FDB $0458 7,5 00940 FDB $00100 ***** 00110 * 00120 * BSCARY.ASM 00130 * MDJ 2021/09/19 00140 * 00150 * BOARD SURFACE CONTENTS 00160 * ARRAY 00170 * 00180 * I.E. VISUAL 00190 * APPEARANCE 00200 * 00210 * I.E. ACTUAL CHARACTERS 00220 * BY CODE NUMBER 00230 * 00240 * 8-BIT CODES 00250 * STORED IN 00260 * BOARD ROW ORDER 00270 * 00280 * DIRECTLY ACCESS ENTRIES 00290 * AT ORG ADDRESS + 00300 * (J * 8) + I 00310 * WHERE 0 <= I <= 7 00320 * AND 0 <= J <= 7 00330 * 00340 * ALTERNATIVELY, THE ARRAY 00350 * CAN BE TRAVERSED USING 00360 * SOMETHING LIKE A ,U+ 00370 * MECHANISM 00380 * 00390 ***** 00400 * 00410 * PIECE CODES 00420 * 00430 * NONE = SPACE = 096 00440 * 00450 * WHITE KING = 075 00460 * WHITE QUEEN = 081 00470 * WHITE ROOK = 082 00480 * WHITE BISHOP = 066 00490 * WHITE KNIGHT = 078 00500 * WHITE PAWN = 080 00510 * 00520 * BLACK KING = 011 00530 * BLACK QUEEN = 017 00540 * BLACK ROOK = 018 00550 * BLACK BISHOP = 002 00560 * BLACK KNIGHT = 014 00570 * BLACK PAWN = 016 00580 * 00590 ***** 00600 00610 ORG $25C0 00620 00630 BSCARY RMB 64 00640 32767 END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         00100 ***** 00110 * 00120 * B2LARY.ASM 00130 * MDJ 2021/09/04 00140 * 00150 * BOARD LIGHT SQUARES 00160 * TO SCREEN 00170 * TRANSLATION ARRAY 00180 * 00190 * 16-BIT ADDRESSES 00200 * STORED IN 00210 * BOARD ROW ORDER 00220 * 00230 * NOT SUITABLE FOR 00240 * DIRECT ACCESS TO 00250 * ENTRIES 00260 * 00270 * TRAVERSE THE ARRAY 00280 * USING SOMETHING LIKE A 00290 * ,U++ MECHANISM 00300 * 00310 ***** 00320 00330 ORG $2580 00340 00350 B2LARY FDB $04E6 1,0 00360 FDB $04EC 3,0 00370 FDB $04F2 5,0 00380 FDB $04F8 7,0 00390 FDB $04C3 0,1 00400 FDB $04C9 2,1 00410 FDB $04CF 4,1 00420 FDB $04D5 6,1 00430 FDB $04A6 1,2 00440 FDB $04AC 3,2 00450 FDB $04B2 5,2 00460 FDB $04B8 7,2 00470 FDB $0483 0,3 00480 FDB $0489 2,3 00490 FDB $048F 4,3 00500 FDB $0495 6,3 00510 FDB $0466 1,4 00520 FDB $046C 3,4 00530 FDB $0472 5,4 00540 FDB $0478 7,4 00550 FDB $0443 0,5 00560 FDB $0449 2,5 00570 FDB $044F 4,5 00580 FDB $0455 6,5 00590 FDB $0426 1,6 00600 FDB $042C 3,6 00610 FDB $0432 5,6 00620 FDB $0438 7,6 00630 FDB $0403 0,7 00640 FDB $0409 2,7 00650 FDB $040F 4,7 00660 FDB $0415 6,7 00670 32767 END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 00100 ***** 00110 * 00120 * B2DARY.ASM 00130 * MDJ 2021/09/04 00140 * 00150 * BOARD DARK SQUARES 00160 * TO SCREEN 00170 * TRANSLATION ARRAY 00180 * 00190 * 16-BIT ADDRESSES 00200 * STORED IN 00210 * BOARD ROW ORDER 00220 * 00230 * NOT SUITABLE FOR 00240 * DIRECT ACCESS TO 00250 * ENTRIES 00260 * 00270 * TRAVERSED THE ARRAY 00280 * USING SOMETHING LIKE A 00290 * ,U++ MECHANISM 00300 * 00310 ***** 00320 00330 ORG $2540 00340 00350 B2DARY FDB $04E3 0,0 00360 FDB $04E9 2,0 00370 FDB $04EF 4,0 00380 FDB $04F5 6,0 00390 FDB $04C6 1,1 00400 FDB $04CC 3,1 00410 FDB $04D2 5,1 00420 FDB $04D8 7,1 00430 FDB $04A3 0,2 00440 FDB $04A9 2,2 00450 FDB $04AF 4,2 00460 FDB $04B5 6,2 00470 FDB $0486 1,3 00480 FDB $048C 3,3 00490 FDB $0492 5,3 00500 FDB $0498 7,3 00510 FDB $0463 0,4 00520 FDB $0469 2,4 00530 FDB $046F 4,4 00540 FDB $0475 6,4 00550 FDB $0446 1,5 00560 FDB $044C 3,5 00570 FDB $0452 5,5 00580 FDB $0458 7,5 00590 FDB $0423 0,6 00600 FDB $0429 2,6 00610 FDB $042F 4,6 00620 FDB $0435 6,6 00630 FDB $0406 1,7 00640 FDB $040C 3,7 00650 FDB $0412 5,7 00660 FDB $0418 7,7 00670 32767 END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 А$└уцщьяЄї°├╞╔╠╧╥╒╪гжймп▓╡╕ГЖЙМПТХШcfiloruxCFILORUX#&),/258                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                          01220 ORG $2040 01230 01240 * COMMAND VARIABLES 01250 * SEE GETCMD.ASM 01260 01270 * COMMAND INPUT LETTER 01280 * COUNT 01290 CMDCNT RMB 1 01300 01310 * COMMAND INPUT 01320 * CHARACTERS 01330 CMDVAR RMB 5 01340 01350 * COMMAND "FROM" 01360 * FILE CHARACTER 01370 CMDFRF RMB 1 01380 01390 * COMMAND "FROM" 01400 * RANK CHARACTER 01410 CMDFRR RMB 1 01420 01430 * COMMAND "TO" 01440 * FILE CHARACTER 01450 CMDTOF RMB 1 01460 01470 * COMMAND "TO" 01480 * RANK CHARACTER 01490 CMDTOR RMB 1 01500 01510 * COMMAND "FROM" 01520 * I-VALUE 01530 CMDFRI RMB 1 01540 01550 * COMMAND "FROM" 01560 * J-VALUE 01570 CMDFRJ RMB 1 01580 01590 * COMMAND "TO" 01600 * I-VALUE 01610 CMDTOI RMB 1 01620 01630 * COMMAND "TO" 01640 * J-VALUE 01650 CMDTOJ RMB 1 01660 01670 * MATCH VARIABLE 01680 MCHVAR RMB 5 01690 01700 * AS YET UNASSIGNED 01710 TMPUNN RMB 109 01720 END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       00100 ***** 00110 * 00120 * FT.ASM 00130 * 00140 * YACH SYSTEM 00150 * FLAGS AND 00160 * TEMPORARY 00170 * VARIABLES 00180 * 00190 ***** 00200 00210 ***** 00220 * 00230 * FLAGS.ASM 00240 * MDJ 2021/09/18 00250 * 00260 * RESERVED FOR 00270 * YACH CHESS 00280 * SYSTEM FLAGS 00290 * 00300 ***** 00310 00320 ORG $2000 00330 00340 * SCREEN COLORS FLAG 00350 * 0 = COLORS OFF 00360 * 1 = COLORS ON 00370 SCFLAG RMB 1 00380 00390 * GAME STOPPED FLAG 00400 * 0 = STOPPED 00410 * 1 = RUNNING 00420 STFLAG RMB 1 00430 00440 * BOARD FLIPPED FLAG 00450 * 0 = FLIPPED 00460 * 1 = NOT FLIPPED 00470 BFFLAG RMB 1 00480 00490 * AS YET UNASSIGNED 00500 FLAG03 RMB 1 00510 FLAG04 RMB 1 00520 FLAG05 RMB 1 00530 FLAG06 RMB 1 00540 FLAG07 RMB 1 00550 FLAG08 RMB 1 00560 FLAG09 RMB 1 00570 FLAG10 RMB 1 00580 FLAG11 RMB 1 00590 FLAG12 RMB 1 00600 FLAG13 RMB 1 00610 FLAG14 RMB 1 00620 FLAG15 RMB 1 00630 FLAG16 RMB 1 00640 FLAG17 RMB 1 00650 FLAG18 RMB 1 00660 FLAG19 RMB 1 00670 FLAG20 RMB 1 00680 FLAG21 RMB 1 00690 FLAG22 RMB 1 00700 FLAG23 RMB 1 00710 FLAG24 RMB 1 00720 FLAG25 RMB 1 00730 FLAG26 RMB 1 00740 FLAG27 RMB 1 00750 FLAG28 RMB 1 00760 FLAG29 RMB 1 00770 FLAG30 RMB 1 00780 FLAG31 RMB 1 00790 FLAG32 RMB 1 00800 FLAG33 RMB 1 00810 FLAG34 RMB 1 00820 FLAG35 RMB 1 00830 FLAG36 RMB 1 00840 FLAG37 RMB 1 00850 FLAG38 RMB 1 00860 FLAG39 RMB 1 00870 FLAG40 RMB 1 00880 FLAG41 RMB 1 00890 FLAG42 RMB 1 00900 FLAG43 RMB 1 00910 FLAG44 RMB 1 00920 FLAG45 RMB 1 00930 FLAG46 RMB 1 00940 FLAG47 RMB 1 00950 FLAG48 RMB 1 00960 FLAG49 RMB 1 00970 FLAG50 RMB 1 00980 FLAG51 RMB 1 00990 FLAG52 RMB 1 01000 FLAG53 RMB 1 01010 FLAG54 RMB 1 01020 FLAG55 RMB 1 01030 FLAG56 RMB 1 01040 FLAG57 RMB 1 01050 FLAG58 RMB 1 01060 FLAG59 RMB 1 01070 FLAG60 RMB 1 01080 FLAG61 RMB 1 01090 FLAG62 RMB 1 01100 FLAG63 RMB 1 01110 01120 ***** 01130 * 01140 * TMPVAR.ASM 01150 * MDJ 2021/09/19 01160 * 01170 * TEMPORARY VARIABLES 01180 * 128 BYTES TOTAL 01190 * 01200 ***** 0121000100 ***** 00110 * 00120 * TMPVAR.ASM 00130 * MDJ 2021/09/19 00140 * 00150 * TEMPORARY VARIABLES 00160 * 128 BYTES TOTAL 00170 * 00180 ***** 00190 00200 ORG $2040 00210 00220 * COMMAND VARIABLES 00230 * SEE GETCMD.ASM 00240 00250 * COMMAND INPUT LETTER 00260 * COUNT 00270 CMDCNT RMB 1 00280 00290 * COMMAND INPUT 00300 * CHARACTERS 00310 CMDVAR RMB 5 00320 00330 * COMMAND "FROM" 00340 * FILE CHARACTER 00350 CMDFRF RMB 1 00360 00370 * COMMAND "FROM" 00380 * RANK CHARACTER 00390 CMDFRR RMB 1 00400 00410 * COMMAND "TO" 00420 * FILE CHARACTER 00430 CMDTOF RMB 1 00440 00450 * COMMAND "TO" 00460 * RANK CHARACTER 00470 CMDTOR RMB 1 00480 00490 * COMMAND "FROM" 00500 * I-VALUE 00510 CMDFRI RMB 1 00520 00530 * COMMAND "FROM" 00540 * J-VALUE 00550 CMDFRJ RMB 1 00560 00570 * COMMAND "TO" 00580 * I-VALUE 00590 CMDTOI RMB 1 00600 00610 * COMMAND "TO" 00620 * J-VALUE 00630 CMDTOJ RMB 1 00640 00650 * MATCH VARIABLE 00660 MCHVAR RMB 5 00670 00680 * AS YET UNASSIGNED 00690 TMPUNN RMB 109 32767 END                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                         00100 ***** 00110 * 00120 * FLAGS.ASM 00130 * MDJ 2021/09/18 00140 * 00150 * RESERVED FOR 00160 * YACH CHESS 00170 * SYSTEM FLAGS 00180 * 00190 ***** 00200 00210 ORG $2000 00220 00230 * SCREEN COLORS FLAG 00240 * 0 = COLORS OFF 00250 * 1 = COLORS ON 00260 SCFLAG RMB 1 00270 00280 * GAME STOPPED FLAG 00290 * 0 = STOPPED 00300 * 1 = RUNNING 00310 STFLAG RMB 1 00320 00330 * BOARD FLIPPED FLAG 00340 * 0 = FLIPPED 00350 * 1 = NOT FLIPPED 00360 BFFLAG RMB 1 00370 00380 * AS YET UNASSIGNED 00390 FLAG03 RMB 1 00400 FLAG04 RMB 1 00410 FLAG05 RMB 1 00420 FLAG06 RMB 1 00430 FLAG07 RMB 1 00440 FLAG08 RMB 1 00450 FLAG09 RMB 1 00460 FLAG10 RMB 1 00470 FLAG11 RMB 1 00480 FLAG12 RMB 1 00490 FLAG13 RMB 1 00500 FLAG14 RMB 1 00510 FLAG15 RMB 1 00520 FLAG16 RMB 1 00530 FLAG17 RMB 1 00540 FLAG18 RMB 1 00550 FLAG19 RMB 1 00560 FLAG20 RMB 1 00570 FLAG21 RMB 1 00580 FLAG22 RMB 1 00590 FLAG23 RMB 1 00600 FLAG24 RMB 1 00610 FLAG25 RMB 1 00620 FLAG26 RMB 1 00630 FLAG27 RMB 1 00640 FLAG28 RMB 1 00650 FLAG29 RMB 1 00660 FLAG30 RMB 1 00670 FLAG31 RMB 1 00680 FLAG32 RMB 1 00690 FLAG33 RMB 1 00700 FLAG34 RMB 1 00710 FLAG35 RMB 1 00720 FLAG36 RMB 1 00730 FLAG37 RMB 1 00740 FLAG38 RMB 1 00750 FLAG39 RMB 1 00760 FLAG40 RMB 1 00770 FLAG41 RMB 1 00780 FLAG42 RMB 1 00790 FLAG43 RMB 1 00800 FLAG44 RMB 1 00810 FLAG45 RMB 1 00820 FLAG46 RMB 1 00830 FLAG47 RMB 1 00840 FLAG48 RMB 1 00850 FLAG49 RMB 1 00860 FLAG50 RMB 1 00870 FLAG51 RMB 1 00880 FLAG52 RMB 1 00890 FLAG53 RMB 1 00900 FLAG54 RMB 1 00910 FLAG55 RMB 1 00920 FLAG56 RMB 1 00930 FLAG57 RMB 1 00940 FLAG58 RMB 1 00950 FLAG59 RMB 1 00960 FLAG60 RMB 1 00970 FLAG61 RMB 1 00980 FLAG62 RMB 1 00990 FLAG63 RMB 1 01000 32767 END                                                                                                                                                                                                                                                                                           юb4@O94RО]&0ьг%Ж5R$єPюь 3╦├г%O_э жфз─ь├эя5╥ь&№3ЙзЖнЯь¤ь¤%5@эb9~Оь'Ўюь ж╦нШ&ыь ├г%O_э ьГэ ╘┼ 0Г╩$Ж9├э1Й╚п1лoа┐%пЙВпЙU3Й~ЖнЯ■я3ЙR юb4@O94TОь&5╘юь 3╦├г%ЄO_э ж─4ьГэmф5╓~Оьг%О "жДИзДО 1?&№ рнШM'┌4юь 3╦├г%O_э ь├э5з─ ┐┐4v2z `LOAD SOURCE DISKETTE LOAD DESTINATION DISKETTE LOAD S Y S T E M DISKETTE ─ж╚!би!'_чgO_эфэbэd№▄│%%M&QЖзfmg'оh0ИHН ╬fЖнЯ2f5ЎОр╞ жАзаZ&∙!нЯаБ 'Ор╢!Д H4╞ жДД┐кфзАZ&ї5 ▄9зfюl№%э╚$mg'оh0Н╖ЖнЯ&Хьbэ╚)&оj3K1+╞ж└заZ&∙юloф╜ Я&╜ ч&ь╚)├э╚)l╚$lфцфсf&т  Wlaь╚)эbЖнЯжф'ьmg'оh0И( Tюj№%э╚$Ж.нЯ'Б ' ╩ьd&ЖнЯЖ ╝ьd'Ж ┤э╚)╜ Я&м╜ ъ&■ ь╚)├э╚)l╚$jф&фь╚)эdГэ╚оlьэNч╚ЖнЯOma& t ЩЖ4╬цфж└Б[' Г%Ї╬Z&ю!0_Ў!─'Ж[ ЖзД4PнЯа5PM'цБ'PБ 'Б^'!Б 'DБ'4Б %╬Б[% Б`% ─жфбa$Lзф жфБ'JзфЖ[зД ОК@з└ж─Б]'▄ Юж┬Д┐Б&Цж└ ТЙ2bЖ[зД9Й╛└ЖзАж─зА╠эАО╚пжAБH$eА%lД °Л'╞ =1л 4pнЯ└5pж&F4`╞ 3Bжд' + ж└Б*'ба'5`lAжAБH$&1и М╚%╫О╚lД ├жаZ&╓5`lA3M╞ жаз└Z&∙9Ж зA9ц╚!4┴ ' ┴%Ж зф5Ц_ч╚!O╥'P+Б&ьma*шma* ц╚!\ё▐%ржфЕ&Ж ╤ma*o╚!Ж г'*┴Ж ╜жфзaЖ зфЖ зMO_эNэ╚з╚c жфзaoфжИ' Д' mИ'Ж зфжaзИIж╚Д'&╖Жз╚#¤&н4@╬╚╞E.5@╠  э╚)O_э╚+з╚-э╚.o╚0МO4O'*Ж  6ж╚&Ж Їь╚"4╨5&шэ╚"ж╚4o╚Д'o─4╛жM+ цЖoЖjЖШM*ї5╢5Д'OцИ&ьИ'╠эЕ&гМ4@╬╚╞Eж0A╞║Ч5@Жз╚#e'зфmф5Ц42╠Сц╚-OжЛзаl╚-&I&ь╚+├э╚+С'2gзф5▓╘&їьф' Гэф&╩ ж╚б?&┴5ж╚Е@'╠   жeЕ&Єь╚+э╚)ь╚+г╚%&ж╚-б╚% ь╚+э╚ж╚-з╚жeД52' з╚-п╚+п╚.oф5▓4ж╚&Ж2dзф5▓еф&жa ЄжdД&ь╚&Ж у│&▐ь╚+г╚)'С&╨т&╦+&╞ ▄&┐5&о╚.40п╚.о╚+ж╚-4ь╚44 о╚$о╚'942╠НМц╚-Oо╚$0ЛжазДl╚-&#ц&ь╚+├э╚+З'2gзф5▓╩&їЖз╚0ьф' Гэф&└ ж╚б?&╖Жз╚0~ )╠  э╚)O9О╚ж╚!╞E=0Л94V╞ Н 5╓4V╞ Н 5╓ж└зАZ&∙9НЇ94╠з╚"ч╚#╢"4Ж╖"Щ5'ў"Б&зф5ЖЗ&ў ў"ЖзaО╚mф' жД'*oф5ЖжД'+_жЕб┼&\┴ %ї ш0И ja&╫l╚#ж╚#Б %аЖ зф5ЖЖМЖз╚ o╚04╛└ь╚ эБь╚"эБь╚$эБ4OЛН5OцД'X%L ·L5Ф4v╢"╛└nЖ4ц╚!╛└эБь╚"эБ╠╚эБ ╟Ж цm╚0&O9ж╚Д'ўНL&Ї У4p0╚+1╚3╚.oДooж!цA=эж!ц─=уД%эДждцA=уД%эДждц─=ыД%чДM&5ЁЖ5Ёь╚+э╚)жM4О╚ж╚!╞E=0Ль╚)mф+Г %4жbжЖ+зb5 э5ж╚Д&fЖ F╦ жфmЖ*D4цЖ─?сa$ ц╚─&5 ▀&+ж╚Д&$ц╚-OгN% шцa╩└чЖж╚Д & Нi'5Жзф5Т5жфD$╦ ч╚#Б%Lз╚"oф5Тцф*╞"O4жaлфБD$цЖ┴ 'жaаф%цЖ┴ 'жфLзфБD%▌5Ж ▓цb*зM зЕ╞└чЖ55~ Я4╛└ЖзАж╚!зА╠эБьфэБ4OЛнЯ└5жД5Р~ вE=0Ль╚)mф+Г %4жbжЖ+зb5 э5ж╚Д&fЖ F╦ жфmЖ*D4цЖ─?сa$ ц╚─&5 ▀&+ж╚Д&$ц╚-OгN% шцa╩└чЖж╚Д & Нi'5Жзф5Т5жфD$╦ ч╚#Б%Lз╚"oф5Тцф*╞"O4жaлфБD$цЖ┴ 'жaаф%цЖ┴                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ЗюЖяЗ■Ж Зжд╞=4крМжд╞=┴P&Б' " H0Н▐№юЖ 9 99Н*∙█Ю?цД0┼А'0 МЮ?юД 9О · .'Ї0ж>Б'ь0 шцаOМьб45 кьб жцаЦ6№X ца  ьб3л0 ь w ~жаDDDDНж?ДH0Н¤0Ж4┼'╓╩жА┼'Б╒&Ж╙хїM*ю5Уц?0М:жа*Н╓0H&ў9ждH$О_H╔0&∙XH╔M&·▐?ю┼ ц?0Мжа0D$Не&ў9P├╒┘╪D╨┬┴C├ца┼А':0МD─цЕ0МM:ц?┼''Ц╓4vЖ ЧН5vЧ╫ц?Ц'хoЖ ЧН0Ню─ -─┼'╩р|"&-ЙCL═fo═U│║═╔&$ДЖ+МЖ-МЖ[МЖ]МЖ#МЖ,МЖTМЖ=МЖ/х"Н▐ ▀&гЖ МЖ■4НсН╙жфL'Н╠НM53┼9╓84ЖB ╓74ЖA ▄74ЖDН┬ц?Н(53╦9Н>ца Н2ьб4* ННьфCS├·▐ ╓НЙTTTT─0Н▌юЕ0МTжЕ DXYUSЖ>МЖ< +╖ЧфСНє■U Нщ■U0Мф,PC╥&■+¤Л   !" #$%'( )*+,ML  ab Kt uJ{|NOPQRSTUVWXYZ[\]wxyz}~А IHGvF E-  ./ 01245 67 89  :; <=>@A BC D─╪┘╒╙P├┐┐┴┬C├D╨┐┐┐┐FILE NOT FOUN─ END OF FIL┼DIRECTORY FUL╠ DISK FUL╠DISK WRITE PROTECTE─BAD FILE DESCRIPTO╥ FM ERRO╥ BAD RECOR─ILLEGAL NESTIN╟!DISK EDTASM+ 01.00.00 (OVRLAYй!COPYRIGHT (C) 1983 BY MICROSOF╘ BAD COMMAN─BAD LINE NUMBE╥BAD PARAMETER╙LINE TOO LON╟ BUFFER FUL╠NO ROOM BETWEEN LINE╙NO SUCH LINE(SйBUFFER EMPT┘SEARCH FAIL╙EXPRESSION ERRO╥ BAD MEMOR┘ BAD LABE╠ BAD OPERAN─BYTE OVERFLO╫ DP ERRO╥ BAD OPCOD┼MISSING END STATEMEN╘MISSING INFORMANTIO╬MISSING OPERAN─REGISTER ERRO╥ENDC WITHOUT CON─ENDM WITHOUT MACR╧MACRO FORWARD REFERENC┼MACRO TABLE FUL╠SYNTAX ERRO╥BAD BREAKPOIN╘CAN'T CONTINU┼SYMBOL TABLE FUL╠MULTIPLY DEFINED SYMBO╠UNDEFINED SYMBO╠                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       Hд~╧)\~о@)"ъb┘К▒ Д I  б *ЖнЯ M'нЯ~Ў╠в¤%94╢ "D$Ж5Ц4Pжa_Н╞4_DYYНjф&Ў5╞ў  5O5Цў  ╛#0&№94FM' № эA3C  5╞3C4P╬ о─МX' мb' 3^ я5P5╞оп─5P5╞~№ ├¤ OЛ яКА╛%б'4M+Н\ НE'5Д5ОЫ4╛%0404ьД0Л0┐%5Ф4╛%0ьДCS├0Л┐%5ЧКА4ьdэb╠hэd5ЖКА4`╛'╬ЧНz'Ж5р4`Ое╬5Нi&5рО╬ ╞№{╬╞Ё№sН?M' ╬╜▀ЖнЯ qnЯ ■SYSTEM`FAILURE``ЙЖ4╠2ОE╬Н 5НнЯа'·94fЖ нЯ 5ц╛%зЙ─XOьл├o╚+э╚,╠э╚п╚'╠  э╚)Н0ь╪'п╚'0ЛэoДГэ╚НO9ЖнЯ'2b╛%oДM9ЖнЯо╚'О╨╬ ЙОжАз└1?&°╬О╞╚╜ o╬╛ 0┐ ╬UЖнЯ№а¤О жДCзДбД'О? ┐▄Ж╖▐╬5╬╜▀ЖнЯ~д Й R т ш @h▓╥f░┐ цЎов3333399DOS BIN ╚╚DOS BAS ╚ BIN ╚3╠О╬╜<ОЧ╞ж─Б`'ж└Б`%И@зАZ&єЖ нЯ ЖнЯ "╠О%╬╜<ОЧ4PЖ нЯ 5PЖ нЯ 0№▄Г╢¤▄╛%4 ¤%╬_ОЖ нЯ 2d5 ┐%ЖнЯ Т╠FОc╬╜'┴<& мМ нщфцД┴[& ощ┘Б'bцД┴,'}щЙcщ6'QБ,&Jщ■'ЫБ'р╞М╞!S ▒&Ї>ЦиДБ' Б'хБ % Е&▌▄▌й╞╫ж9 $з╓╫й╞╫ж9щ$ п&╝ о' м&┤ЖПЧй▄▌к╞╫ж9ЦиД╧Чи░ м& н& &ЦСЪ'Ж0ЪиЧи иЦСЪ'╞▄Ци ▒'Д┐МКЧи Я м& н&' &#ЮМ.М Ё,Нo%Нk$Н$ЦйКИЧйЦЧк cЦйКЙЧй Д о&чЦДЪйЧй ]╞В▄УГ з'Г▌ м& н& &Н $ ЖНЧйЮ0Як GЖМЧйН $иН─╠ ¤▌ Я▄Г.Г А,C9▄Г .ЎГ -ЁO9ЦмЪн&\ЖЖ┴'J┴ 'ЖЛЧйч═Б,&FНS&B■╫ЦмЪн&9НF&)╞Дч│'Б+' чы┌й╫й ▀╞БчЯ'Б+'яч╫ о&Z х╞В╫йН& о'╛■] йН їцД┴-&ёшBMМ ж2b№КНУГ▌ T$╞С╞■■`└╞М╞O4iУгс■:ч5Б#&оX■4ч┤'■Б-ЭчБ,&ЦXXXX4чЬБ-Йър╫й─И'E┴И'A╞": :ЖМЖЧЖч{'1Б-8╤Ж'¤└┴/└0М4жЕХй'╞"ЪйЧйц╚'Б,'╨ч¤╤ й& ╞"Є Є й&¤Ицї ю @@АНМН ж %НМН¤ЖМЖЧз9й╫и■Е$■-ЖЧ░ ж9Х▌иЖЧ░ д2bЖЧ░цZ'-ЧЗцS'&СЗ'шЧиЖЧж Г+ ЖЧ░√z▄╙е▌▌Дж ╒╞ _НO╙▌ЖЧ░9ЖМЖ]'щ4Н:ЦФГ5&° $Н>ЖЧ░9&·pН╙Б▌▌ДЖЧ░9&uН╫Ъ¤█$¤УЖЧ░9Їу$┴+%Н ▄90Н∙╒4ЖO4rЮУ0ЯУ Г+1НчНmф'1НХН Х5Є1Нч4wнд y& w' 5w4wнд5ў╞ч]Н╝▄▌ Г*'∙ &∙ш▄▌хg' Б*'хЯНЖЎ Г+рЖЧ░1Нч(Нм▐У1Нш,Нд0Н╠ Щ {&ЛЦwЧ'ёж чЮь7%∙▐4Pц└'0m─+!mД'─OцА─жАб└-.Z' 1?&ё5P1М5Pц┴─\3┼ ╩2d▐цА',4жДКАзДч цжюДчpцЮ0МL5─°╚Ах° Ож─Дз┴3┼ц└─&Є 'ьQЦzЪv&! Щ'·\▐·A0НрjД·NЦ~Ф╫'ёйэщє/╒═╙А╧ TOTAL ERROR╙ з' жфZ о' Б]&╞┌й╫йфIБ ' Б 'Б &√9ЖЧ░ Г+ ЦдЪy&╟'ЦwЧН }'хЎН9▐╡чД╓░┴,▐Дцкх╒╓░0МжЕ0М nЖ6CX3?KXXЮе з'0╓зН!╓иННC1Н▐Р ░' 0цаН хЬ0'1цаН ЎOцZ▐М▐иНцT ╓╫иН╓иНф 0МЖпфНёхq╞ М╞хb╤&∙9AOIMLPMONLNONSWESSWS SR Ю┐Ь╣& ╪'¤╔ Я&H ╪&Ю┐Я╡НO0ЛЯ┐9ц╫0Я9ЖЧх0Н▐8Я╡ ╫ё$4 ╫5& %Ю╡Н┌ Ю&Н9¤H╪ьoў ╣╦Ю╡3Н▐Нz3C▀тъ'wБ\&ўтфБ.'Gу$ у %САА0═Ж4▐1Н▌╙Ц▓аф3╞л"БА"oз"╓ЮН35@0Н▐х▐3╞╓▓Н$3┼ зтЦт╚%L╞╫▓Z3Н▐┼з└0Н▐╗НЖ пOхШ0Н▌АЯ╡╠  эД -5$ЦЮЪЭ&ЎэЖ╓Ї_%№Й Я& Я▐┐▀КЯ┐т}ЮЯН╓╫МЖ3LЙO1М&Ж╞Ї-%№W1Н▐Z╠90Оlвбд$чд0&ЇЖ!Ў¤NARG▐╓4FЖ 43фЮНЯ╓М╫▓1Н▐%oCсс'PБ*&m─+HБ &mC'@Б &mC'8m─*o─Б,&mC' Б(&mC& jC ╔Б)&mC&┐╓▓┴$╗ ▓за ╡ц─сB' l─ гц─сB'▓5V▀╫91Н▄Мц"╦ЮИ:Ь$3ЮИ4жазАZ&∙ЯИ5РЦ░Б & б9 Ю' в9 Я' г9C9╞ М╞М╞'√v╞&тЛяЁ0Н▌L╞ фБ&їгНёс!'Ю01Н▌4\с'\┴ &ЎжАзаZ&∙ ;&ї| Г&7 y&3ЖЧ░ w'+№╣эhЇ·'·║ЦЮЪЯ& Ф ЮЮ┐ ╪'ЮИЖ Є╪·°ЖЧ░9 Ю&]'╞·∙ Я'ЮКЯ┐№L№rЮЯЇ╢╞$·╪&їс#'╠Б&&╓1М&ЖсЫ%ўbжацд0Н█3чЖрx'лБ,'╓р░ вр╖ ЭMC NOMCMD NOMDMEX NOMEXLNOL &ЇнЦ╪ЪЮЪЯ&■рэ %щ ╪ │╞·P&ЇО·;У' Э& аМ Э Ч'╞·9 Э& а' аМ Э Б╞#·Ж Ч░°t ╝  >N0Н<┐Ж~╖0Н√%┐rЮ╣0Я▌0Нц▐╞WьЭ╠9╫2Ч0ЧЧЖЧ▄0Ныи0Й yЯ?юdЖ#НV2НыУ НZЮ" *'┴ %'╬D '─чДсД&( +'+*1Н Б н╦ ╜Z-BUG/1.0░ &*фэДгД'▐╞Рю Ж юЦЧюh0Нч,ЯюrБ'ъБ' Б 'Б 'Н┘1М╞ э(∙s' +OзА ╓9╓ю╫ ╠Д/а^_;l=В:М"F а,Dз  ы╜' /Ю 1М%╞ь▀& ыъ' Q┴ $ K╞эtьщ*  zMmBrWЛHДNЕS┌DЇR~EdA¤X=Y▒CХGРIЦO▓TMLЕPwV╟Uэ.·'$Н- +&Я Я"эeЖЧ*э■п&МЮ 0МЮ(МЮ ■ёН8+ ╫+ыгБ%"0Нх[┴# +└'0Z' 0Z& +0Е9 +X °ы;K9 ,' 1НKФНёь░ +' +1Н+Ц+J'#цz40Мы№5Р┼╞╚╔╬┌╓├ && {Я(9+OцАМьБ +&Я( /+ПШьk' jоД +& &&>1 M&■╦ 1НФ1 *OцД0Н # '0╡ 1Н╛nД&█цД Б  &╤жДь ЇЩ▌A■Ь+ЖЧ- '$Д▌A #' НzУ'Ч ╠4ЮA5&э# ''¤╔~╠/4ьд' ¤╖жф└ьд▌1%lфja&ч5Ж'Н0цДзДбД& LзДбД&чД┴?&╞( E╝'ў4Ю│&ю5° °н45%%9'НюГ"Ж=┬▐яе9ОZНэ0&ў9╞(¤╠Н╓/╩А╫/9╠ ╠А0ЖЯ(Ж_╫&╓/─╫/9╞_╫/,9Нў ,93НуZ 3Ну|НУM& ┴' ┴ '┴'╞ ▓ч─9щБH'%щV+ pщH h4№╥Я ■#ЁЮ(мф#я5Ршэъ╦ЁЯ Н╬ъ┴ЁТ9№й0МG1НыxO╓7Н-╓8Н)╓6Н%╓5Н!¤°№Л3Ну╞41НыYь┴Н jф&°5№rь─4FъOюфндъi5╞┴┬D╨C├╪┘╒╙P├ЖLї╦'4▐Ю▌Н^' НX'▌▌5ЁL╞ М╞№╣НЁ5№!шм%ы9ЖPїУ№шЫ%▌4шwН4pгb"╥цfоgюiяfЁ~О■А4шX0&Ї5ЁшO'■m√9Нты%4v +) 1415+&( /'$0М4У'Ц0Б " %ъ└Е5ЎщЮъtъFО34▐ж└Д'23╞ьфг┴+Ёгb$ыэb! х5`Г3$ щыУ'├32 1НЙ ╢0Нс╦╢ОзД■ПяC2НцИчFьA▌7оDЯ9Я;оHЯ=ж─Ч'цC▌5оJ0ЯA3L▀?я¤пНO'5НiН[ЮAНH& ю#3_я#&╣l$Н▄A $ 'Л0ш■0МшФ BRK @аН( -'v-Ю(4ЮA№%5Я(·lН,МН0Oмд'1%LZ&Ў\9НН ╞ oвZ&√9Нод'ж"зД1%Z&є9╞1Нс9╞1Нс 9НзДбД&5Ж?зДбД&-я#9ЛН█╞=1епджДз"╠э#9Н╧од'жДз"Ж?зД1%Z&я )НЧ╞)·╪ЮAЖ?бд'ЄН5▐A!OНк ' +сЬ$'Ю$ЖНЪЦ2╖ОЮ3┐ПЮ;▐=▐?▄5ЮA4Ю9▄75Й╞ ╫Н╞╫9.#жаБ'чБ'°0М1цА'с?&° БА%*╞^БН'6Б═'.Д?Б'(Б'$ц?┼@'╩М── n~Эн╜Б`%Д0Н?цЖ┴ '─Нqж?╞=0М9цЖ*ц?─ъЖ─T0М9цЕ%TTTT─0М цЕO0НїнЛ▀$9-1НЦєБ&▐ Ї&┌9Н/ ц3НЄ6╞жаз└Z&∙Яў0НЄЯ∙0НЄ&ЖзДН0НЄ ЖзДg&*9цхЖЧєЇ1М9BINхН х ЖЧх х ╫'■WН&T90Нё╨ЖзД- ╫'¤=40Нё╜ЖзД&Цц5РжБ&)Ж5РНсЙН▌Й9 ╫'¤C4Чц0НёПЖзДНГ5УНюЙ ъц╓ўл И ' ▐А4` ) гM& ║ ╡уbНZ ъL&c з д▌A ~'. ~Б&Pюф Т НН6офЯ3_▀0Мў[▐°kўS▐°c 25рSYMTBL: FIRST╜ LAST╜ 5з─б└&0&є9╞ М╞ f■▒O Gьbгd├ Kьd DНЖ  -O_ 8ьф 3 ~'Х■╧5╢ж└ 0&ў9О╞dїr4w▀ SН5wo9жДБ'%Б'&Б'2Б'Шж╚Б!'Б.'Б>&ОН& 9О ОЖН&29нФM9НHЖ!m'Ж>Н!4Н─5Н6жИзKжИзLЖ.Н жKзИжLзИ94ОН╚' Б &╜жфБ!'ы╠э╚5Т40п╚$1п╚'0жАз╚!╠э╚О ўк5░3ДЖ з╪оD0╞ў╚оDоB4Pж!Б:& ждЇ╞%Нg1!╞0Н5'иБ.'Б/& 4╞ўЧ5╞НБ:&Н@1!1?ждН/&:5PпBmД*oД94жаН'Б/'Б.' Б:']'`зАZ ц0Ерр9'Б 'Б 9жаА0%GБ"Cm╪*>з╪9m&╬1НЁЬ9╬21НёФ94v0Ня'Нфэ╚,5ЎБ%Б#1Мбд'mб&°╞Мц!М╞ М╞▐ 5оbч5Ў   ╫'ЇЖ/X&fєЎ0М_9 ╓р╨┘ЦрЧ┘Ж НZ&∙┘94wБ '5 ┘&Н<Б & ┌&Н*Ж ·L ┌Б & ┌ ┘Ц┘С▀&Н┴Ц┌Сс& т&ъН ц·)5ўЖ МЖ ·╓4 w'2 ┘0НяКЖАзИ ЇШ╞ 4Н▄5Z&ў0МЇЗ █╓█Oї╙╞ x╞╫┘5╫9EDTASM+/01.00.00 PAGEаЖ№ВН№ЛO_№Ж▐¤Z▄У├9єНv&∙~Н 'ЖSНj& ~9╫ЖC^' LX' ╫9 ╫■947&Б/'Б:'5╖Ю1М╞Oєй$ 1!\┴#Ї ш57√9L P LS LD PS PD LDS PDS 4Є_'бф'ЄЧбф5В0Ню╞_ЄЕЄE'Б &Ж Б ' з└\┴#ъC9Єnз─O9ЖO4√zБ'KБ 'їБ 'ёЮ╞  ї,%3_√^Є+$Є]&'пБ0Н&Б &√FБ 'зА\Нб&┴А%ь╞М╞М╞OО5В4чдme'Я╣╠  эД5ЗёР╢ К╖ п В Е Ж @Ж╨╖ HИИ╢ HЦ▄Б'╓ўЮ│Я╣╠  эД9▀ 4p3Ны╧4@НX▌<'Б'8Б&81Нj╠Єh%,mд*ёОmЇ'Н? °2b╓&O▄5ЁН0ждбЇ#°▐4` ╕mд*Ё╞▐ 2zC5Ё╠ ш0ы3НяШ4@╞мс#у95V4ц0М:0нД▌9╙9У9Ф╘9Ъ┌9Ш╪9У'O_9НўCS9▐$3╦XIЮ&Є09╠LZ'< $ЎЙ▐44@% УIИF$УiaiфXI$\jb&фFV■jc&°5╞╞ SН┤9Ю'+XI0&·9DV0&·9┴)%р╫O_9&'1Б&╓O4╗5%ьд9 '┘жДБF"╙ЖН■9_Б'wБ& mд*] Н├CS9Б&TжДБ*& ▄ '▄ 9Б.'єБ'&я∙ЙO9Б+'ЪБ-&Н╠├9╞Б@''XБ$'"╞ Б&'Б(&■Sя╠Б)&▄9╞М╞М╞■Ф4ЁAБ'~М4▐ж_БD&цa' ┴ '┴'/ e╓┴$'╞  !╞БO'IБQ'EXБH'@╞ БT':цa&╓ '╞ ▐OZэфжАяИ$АА0бa"#4оa03╦1?&·53╞ &▄05└ ma'╠сa'╚╞■я╖'цД┴.'9▐╓4VяеБ&яБ.& ╓1НOЖЁ$ 5V▀╫√95VЖ ў+-*!/4! &<Г= А А,А                                                                                                                                                                                                                                                                                      ┴   ─├─╟!"#$%╚┬─├ +├                        RRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRREDTASM BIN КDECMAL ASM ╨╨DCHARK ASM &,,DOS BINRDOS BAS*╪CLRSTR ASM ччCLRSCO ASM 'ффCLRL14 ASM ▌▌CLRL13 ASM (▄▄BCHARK ASM FFMPVAR BIN1T ASM · ·T BIN22SARY ASM 3п п2SARY BINКК2DARY ASM   2DARY BIN5JJ2LARY ASM   2LARY BIN6JJSCARY ASM XXSCARY BIN7M ASM  ббM BIN8                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                ;А)А]АANDDIV4EQUMOD~NEQNOTАOR XORoт┴#╞■4W3фЮЖяД$0 &═ _Ю╦P0ЕЬИ"╞(╜ЯцA─ъBчАцBжазАZ&∙oДoцBS0ЕцДжAЕ&EЕ&+┼&6┼А&Ж ' Г*╩чД┼@'Нw┼'Ж Ч5Wод5Д┼'┼А&ф╩чДНRМНUМНO фД4жДДир&6┼А&┼'┼&ф╩АчДжAЕ'╩ чДоCпд ╕4оCмд5'оцД┼ 'жAЕ&ф╩@чДН ЪЖМЖ#МЖ*МЖ)зGж─Кз─9BADаBUFFERаDEFINEDа ERRO╥FUL╠LIN┼MISSINGаNOаOPERAN─SYMBO╠MACR╧ TABLEаEN─ WITHOUTаАDRIVE NOT READ┘IOАDOSАFILE NOT FOUN─W.END OF FIL┼DIRECTORY АDISK АDISK WRITE PROTECTE─FILE DESCRIPTO╥FMАRECOR─ILLEGAL NESTIN╟COMMAN─ NUMBE╥PARAMETER╙ TOO LON╟АROOM BETWEEN LINE╙SUCH (SйEMPT┘SEARCH FAIL╙EXPRESSIONАMEMOR┘LABE╠АBYTE OVERFLO╫DPАOPCOD┼ STATEMEN╘INFORMATIO╬АREGISTERА C CON─ M А FORWARD REFERENC┼ АSYNTAXАBREAKPOIN╘CAN'T CONTINU┼ АMULTIPLY  АUN А0НSЯ│Я╣╠  эД╛▄Я0Я╖ыh▄ЖU╖q╠  ¤h0Н∙┴┐r╠ ▌╗╠ ▌╟Ю│Я╡ ┴ %┴$ю@Ю│Ь╣& 0Ню0Я╡┴%Fы2 ╓ьх2Нъ}╫╓┘╪█w┴ ЖЧь╢lы'╫Н1М╞ь='в╞ М╞ oБa%Бz"И 9╒AВD/F┴H╨P№Nу ▀^┐TWАEйRБMАCIDL5ЦzЪv&ъи w'ыЮ0ЯЯoАЦuCФv&ЮЯБЯП0ЯСЖ■ЧГЧ Ю│Я┐Ж Ч╠990Н▀╚эБэД▐У0Н▐+╞уLбвЮБЯ Г+0 v',Ё[▐И3AЮц▀0╦3▀ЦxЪuЪА& А С ╪'ьVPЮ╣0ЯИє2НтJщф%т Х' |' ъ%╒АCЧ|Х▄╙е▌▌Д0Н▌╟╞т╓]0М╔4у`'DцД└ ')└щ'%└!'6╓Б&┴" т╖'Б 'Б ' ЦЮЪЭ&╞ C4у('цД┴*& Жmф&h2c+1Нх№╞ 44 mа*lb_\mа*√\5 ╤'\1еоamд&т╓╞tжаДбА&шZ&їтO'Б 'Б &утждЧи5 Ю'Б&д Э'Б 'Б&ШH3Н-ю╞5$]'Б0'БB'Б&$ ЮЖєА$"]сфtЮ&▄е'ЬС$ЯС▄е0ЛЬП#ЯП Г+9ВЦzCФж'/▐Юе1Н▄╡ з'1? v'#▄У#╙е А'У" жаз─б└&0&Ї9╞╣ Щ&Н- УЧ'Н"0Н▌KжБА%Н3A▀ЧЮЫжазАЯЫ0Н▌3lZ&▀9Н4Ж ЧЩ0Н▌ oА▄эБяБЯЫ5Ц4vЩх1Н▌ о! & 0жаНE0&°5Ўжд&ь#├УСэ!1% ф▄ПУС├э ╓ ╫' ЦCЪzЪvЪГ&хЖН ▄ПУСН▄СНЙъ}9  "4";"Z"T"i "v"и"л######3#>#z#Е#И#з#╕$/"0(l(У(░(╙(∙)b)Б)Ш)│ п ╓и╩@╫и ▒с-'`цД┴#']╓и╩ ╫и ░ Б'цД┴>'┴<& мМ нсцД┴[& ор·Б'bцД┴,'}ркcрW'QБ,&Jс'ЫБ'р╞М╞S ▒&Ї>ЦиДБ' Б'хБ % Е&▌▄▌й╞╫ж9 $з╓╫й╞╫ж9рE п&╝ о' м&┤ЖПЧй▄▌к╞╫ж9ЦиД╧Чи░ м& н& &ЦСЪ'Ж0ЪиЧи иЦСЪ'╞▄Ци ▒'Д┐МКЧи Я м& н&' &#ЮМ.М Ё,Нo%Нk$Н$ЦйКИЧйЦЧк cЦйКЙЧй Д о&чЦДЪйЧй ]╞В▄УГ з'Г▌ м& н& &Н $ ЖНЧйЮ0Як GЖМЧйН $иН─╠ ¤▌ Я▄Г.Г А,C9▄Г .ЎГ -ЁO9ЦмЪн&\ЖЖ┴'J┴ 'ЖЛЧй▐юБ,&FНS&B■╫ЦмЪн&9НF&)╞Д▐╘'Б+' ▀ ┌й╫й ▀╞Б▐└'Б+'я▐° о&Z х╞В╫йН& о'╛■] йН їцД┴-&ё▀cMМ ж2b№КНУГ▌ T$╞С╞■■`└╞М╞O4iУгс■:▐VБ#&оX■4▐╒'■Б-Э▐>Б,&ЦXXXX4▐╜Б-Йър╫й─И'E┴И'A╞ : :ЖМЖЧЖ▐Ь'1Б-8╤Ж'¤└┴/└0М4жЕХй'╞ ЪйЧй▌щ'Б,'╨▐!¤╤ й& ╞ Є Є й&¤И▐ ю @@АНМН ж %НМН¤ЖМЖЧз9й╫и■Е$■-ЖЧ░ ж9Х▌иЖЧ░ д2bЖЧ░▌{'-ЧЗ▌t'&СЗ'уЧиЖЧж Г+ ЖЧ░√z▄╙е▌▌Дж ╒╞ _НO╙▌ЖЧ░9ЖМЖ]'щ4Н:ЦФГ5&юЫ$Н>ЖЧ░9&·pН╙Б▌▌ДЖЧ░9&uН╫Ъ¤█$¤УЖЧ░9ыq$┴)%Н ▄90Н∙╒4ЖO4rЮУ0ЯУ Г+1Н▐#Нmф'1НРН Х5Є1Н▐4wнд y& w' 5w4wнд5ў╞▐BН╝▄▌ Г*'∙ &∙ш▄▌▄И' Б*'▄└НЖё Г+рЖЧ░1Н▐ Нм▐У1Н▀Нд0Н╠ Щ {&ЛЦwЧ'шЬ ▌шЮу%∙▐4Pц└'0m─+!mД'─OцА─жАб└-.Z' 1?&ё5P1М5Pц┴─\3┼ ╩2d▐цА',4жДКАзД▐▌ЛюД▐U▌Г0МL5─°╚А▌ Ож─Дз┴3┼ц└─&Є 'у;ЦzЪv&! Щ'·\▐·A0Н╫gjД·NЦ~Ф╫'шЯф┘Ё$╒═╙А╧ TOTAL╙ з' ж█А о' Б]&╞┌й╫й█oБ ' Б 'Б &√9ЖЧ░ Г+ ЦдЪy&╟'ЦwЧН }'▄рН9▐╡▐n╓░┴,▐Д▌Ф▄┐╓░0МжЕ0М nЖ6CX3?KXXЮе з'0╓зН!╓иННC1Н╒▀ ░' 0цаН ▄Ж0'1цаН ЎO▌D▐М▐иН▌> ╓╫иН╓иНф 0МЖпфНё▄[╞ М╞▄L╤&∙9AOIMLPMONLNONSWESSWS SR Ю┐Ь╣& ╪'¤╬ Я&H ╪&Ю┐Я╡НO0ЛЯ┐9ц╫0Я9ЖЧх0Н╒ЗЯ╡ ╫ш4 ╫5& %Ю╡Н┌ Ю&Н9¤M╪уdў ╣╦Ю╡3Н╒UНz3C▀┌'wБ\&ў┌ Б.'G┌+$ ┌3%САА0═Ж4▐1Н╒"Ц▓аф3╞л"БА"oз"╓ЮН35@0Н╓4▐3╞╓▓Н$3┼ з┘╝┘ю%L╞╫▓Z3Н╓з└0Н╓ НЖ пO▄В0Н╘╧Я╡╠  эД -5$ЦЮЪЭ&ЎЄЖ╓ъЄ%№О Я& Я▐┐▀КЯ┐┘гЮЯН╓╫МЖ3LЙO1М&Ж╞ъ└%№\1Н╒й╠90Оlвбд$чд0&ЇЖ!ўNARG▐╓4FЖ 43фЮНЯ╓М╫▓1Н╒toC┘'PБ*&m─+HБ &mC'@Б &mC'8m─*o─Б,&mC' Б(&mC& jC ╔Б)&mC&┐╓▓┴$╗ ▓за ╡ц─сB' l─ гц─сB'▓5V▀╫91Н╙█ц"╦ЮИ:Ь$3ЮИ4жазАZ&∙ЯИ5РЦ░Б & б9 Ю' в9 Я' г9C9╞ М╞М╞%√{╞$э╟0Н╘Ю╞ █n&їлНё╪J'Ю01Н╘Ж\╪?'\┴ &ЎжАзаZ&∙ ;&їД Г&7 y&3ЖЧ░ w'+№╝фfї'·┬ЦЮЪЯ& Ч ЮЮ┐ ╪'ЮИЖ щn√ЖЧ░9 Ю&]'╞√ Я'ЮКЯ┐№O№uЮЯЇ╛╞"·р&ї╪L'╠Б&&╓1М&Ж╪─%ўjжацд0Н╥ЕчЖ╫б'лБ,'╓╫┘ в╫р ЭMC NOMCMD NOMDMEX NOMEXLNOL &Ї╡Ц╪ЪЮЪЯ&■уф¤%р ╪ │╞·X&ЇЦ·CУ' Э& аМ Э Ч'╞·A Э& а' аМ Э Б╞!·&Ж Ч░°|0Н<┐Ж~╖0Нх:┐rЮ╣0Я▌0Н╤G╞W╓▌╠9╫2Ч0ЧЧЖЧ▄0Н╓0Й yЯ?╪hЖ#НV2Н╒№ НZЮ" *'┴ %'╬; '─чДсД&( +'+*1Н К н╦ ╜Z-BUG/1.0░ &*фэДгД'▐╞Р╪Ж ╪ ЦЧ╪l0Н╤ХЯ╪vБ'ъБ' Б 'Б 'Н┘1М╞ ╫hуИ' +OзА ╓9╓╪╫ ╠{/Ч^V;c=y:Г"= Ч,;Ю  ╒¤' /Ю 1М%╞╫& ╓*' Q┴ $ K╞ ╫x╫)*  qMdBiWВH{N|S╤DыRuE[AЇX4YиCМGЗIНOйTDL|PnV╛U╫2щў'$Н- +&Я Я"╫eЖЧ*╫■п&МЮ 0МЮ(МЮ ■ёН8+ ╫+╒уБ%"0Н╧─┴# +└'0Z' 0Z& +0Е9 +X °╒{K9 ,' 1НKФНё╓┤ +' +1Н+Ц+J'#цz40М╓<5Р┼╞╚╔╬┌╓├ && {Я(9+OцАМьБ +&Я( /+ПШ╓o' jоД +& &&>1 M&■╦ 1НФ1 *OцД0Н # '0╡ 1Н╛nД&█цД Б  &╤жД╓" ЇЩ▌A■Ь+ЖЧ- '$Д▌A #' НzУ'Ч ╠4ЮA5&э# ''¤╔~╠/4ьд' ¤╖жф└ьд▌1%lфja&ч5Ж'Н0цДзДбД& LзДбД&чД┴?&╞& E╝'ў4Ю│&ю5° тZ45%%9'НюГ"Ж=┬▐яе9ОZНэ0&ў9╞&¤╠Н╓/╩А╫/9╠ ╠А0ЖЯ(Ж_╫&╓/─╫/9╞_╫/,9Нў ,93Н═├ 3Н═хНУM& ┴' ┴ '┴'╞ ▓ч─9╙\БH'%╙Ц+ p╙И h4№╥Я ■#┌Ю(мф#я5Р╙-╘╧┌и Н╬╘┼┌Ы9№й0МG1Н╒|O╓7Н-╓8Н)╓6Н%╓5Н!¤°№Л3Н═o╞41Н╒]ь┴Н jф&°5№rь─4F╘5Oюфнд╘m5╞┴┬D╨C├╪┘╒╙P├ЖL▀р'4▐Ю▌Н^' НX'▌▌5┌U╞ М╞№╣Н┌>№!╥ь%ы9ЖP▀и№╥█%▌4╥╖Н4pгb"╥цfоgюiяf┌ЗО■А4╥Ш0&Ї5Ё╥П'■m√9Нт╒)4v +) 1415+&( /'$0М4У'Ц0Б " %╘─Е5Ў╙в╘x╘JО34▐ж└Д'23╞ьфг┴+Ёгb$ыэb! х5`Г3$ ╙яУ'├32 1НЙ ╢0Н╠4╢ОзД■ПяC2Н╨ё╤ЖьA▌7оDЯ9Я;оHЯ=ж─Ч'цC▌5оJ0ЯA3L▀?┌пНO'5НiН[ЮAНH& ю#3_я#&╣l$Н▄A $ 'Л0╙0М╥▒ BRK @аН( -'v-Ю(4ЮA№%5Я(·lН,МН0Oмд'1%LZ&Ў\9НН ╞ oвZ&√9Нод'ж"зД1%Z&є9╞1Н╦Ж9╞1Н╦Й9НзДбД&5Ж?зДбД&-я#9ЛН█╞=1епджДз"╠э#9Н╧од'жДз"Ж?зД1%Z&я )НЧ╞'·╪ЮAЖ?бд'ЄН5▐A!OНк ' +сЬ$'Ю$ЖНЪЦ2╖ОЮ3┐ПЮ;▐=▐?▄5ЮA4Ю9▄75Й╞ ╫Н╞╫9.#жаБ'чБ'°0М1цА'с?&° БА%*╞^БН'6Б═'.Д?Б'(Б'$ц?┼@'╩М── n~Эн╜Б`%Д0Н?цЖ┴ '─Нqж?╞=0М9цЖ*ц?─ъЖ─T0М9цЕ%TTTT─0М цЕO0НїнЛ▀$9-1Б'ь0 шцаOМьб45 кьб жцаЦ6№X ца  ьб3л0 ь w ~жаDDDDНж?ДH0Н¤0Ж4┼'╓╩жА┼'Б╒&Ж╙╧∙M*ю5Уц?0М:жа*Н╓0H&ў9ждH$О_H╔0&∙XH╔M&·▐?ю┼ ц?0Мжа0D$Не&ў9P├╒┘╪D╨┬┴C├ца┼А':0МD─цЕ0МM:ц?┼''Ц╓4vЖ ЧН5vЧ╫ц?Ц'╧sЖ ЧН0Ню─ -─┼'╩р|"&-ЙCL═fo═U│║═╔&$ДЖ+МЖ-МЖ[МЖ]МЖ#МЖ,МЖTМЖ=МЖ/╧&Н▐ ▀&гЖ МЖ■4НсН╙жфL'Н╠НM53┼9╓84ЖB ╓74ЖA ▄74ЖDН┬ц?Н(53╦9Н>ца Н2ьб4* ННьфCS├·▐ ╓НЙTTTT─0Н╟ЖюЕ0МTжЕ DXYUSЖ>МЖ< +╖Ч╬ХНє■U Нщ■U0М╬8,PC╥&■+¤Л   !" #$%'( )*+,ML  ab Kt uJ{|NOPQRSTUVWXYZ[\]wxyz}~А IHGvF E-  ./ 01245 67 89  :; <=>@A BC D─╪┘╒╙P├┐┐┴┬C├D╨┐┐┐┐                                                                                                                                                                                                                                                                                                                                                                                       00100 ***** 00110 * 00120 * DCHARK.ASM 00130 * MDJ 2024/02/13 00140 * 00150 * GO DOWN KEY 00160 * (D-KEY) 00170 * EVENT HANDLER 00180 * 00190 * NOT IMPLEMENTED FOR 00200 * MALKY'S WARREN 00210 * 00220 ***** 00230 00240 ORG $5CC0 00250 00260 DCHARK RTS 00270 00280 END 5'Б& ╓┴" O]9Н╥0М]■9C9NONAMEН▒Ю╠Ч j'8$!НЩЙ%0Н401М*Ж╓НSцд─ждDDDD√5░  @' $ў n$Є u Ж9AhBiD`XqYrUsStPCUCCZDP[PCROоbZыф1еМ4цд'1!─сa&ыжабА&тZ&ў5Ц4_юбба'\сф&ї√2a9▐+ S╫НSX&ў0Ч90ННЖO4жАБ # ?M*Їmр&49oтжАД ч]'жА*№Z&∙94Й0НжНыН╦5 ╩Ж*МЖ0МЖQМЖ МЖ Ж 4G +( 'Б  v'╠ Д'Б '  ' i N5╟ ─ЦД&ў є]'жВБ 'ZННоЖН│  9Нї&№Z'°40Н·ЁжАНЭZ&∙5Ф 'Н╫&№9ц─жАНЗZ&∙94м0М╞бА' Z&∙Б %эБz"щ5Ф ╞4DO_Н&]'Л0НL\OН Н jф&ы 75─hdicI9╞А ╞_4D3фm─+цaНцbН5─Ж=НЖ=Нm─&Б0'l─БA%4■ў5 ДЛ0Б:%Л9╞_1М"Ж/40lфгд$°5]&Б0'\Н╙ж!1"J&▀9'шd 0Н∙ЛЯЯ94vЬ'мf' "  3╦0ЛНМН5ЎжАз└1?&°903AжВз┬1?&°9Ж зАZ&√94v ЗЖ Ч■m5Ў╙UB┴АCMP┴БSBC┴ВSUB─ГAND┴ДBIT┴ЕLD┴ЖST┴ЗEOR┴ИADC┴ЙOR┴КADD┴ЛCMP╪МJS╥НLD╪ОST╪ПSUB┬└CMP┬┴SBC┬┬ADD─├AND┬─BIT┬┼LD┬╞ST┬╟EOR┬╚ADC┬╔OR┬╩ADD┬╦LD─╠ST─═LD╒╬ST╒╧╬E╟CO═LS╥RO╥AS╥AS╠LS╠RO╠ DE├ IN├ TS╘ JM╨CL╥╬EG┴@COM┴CLSR┴DROR┴FASR┴GASL┴HLSL┴HROL┴IDEC┴JINC┴LTST┴MCLR┴ONEG┬PCOM┬SLSR┬TROR┬VASR┬WASL┬XLSL┬XROL┬YDEC┬ZINC┬\TST┬]CLR┬_SW╔?MU╠=RT╔;AB╪:RT╙9SE╪DA┴SYN├NO╨┬R┴ BR╬!BH╔"BL╙#BH╙$BL╧%BN┼&BE╤'BV├(BV╙)BP╠*BM╔+BG┼,BL╘-BG╘.BL┼/BS╥НBC├$BC╙%╠BR┴LBS╥╠BR╬!LBH╔"LBL╙#LBH╙$LBL╧%LBN┼&LBE╤'LBV├(LBV╙)LBP╠*LBM╔+LBG┼,LBL╘-LBG╘.LBL┼/LBC├$LBC╙%╧RC├ANDC├CWA╔<╠EA╪0LEA┘1LEA╙2LEA╒3┼X╟TF╥╨SH╙4PUL╙5╨SH╒6PUL╒7╙WI▓?├MP─ГCMP┘МLD┘ОST┘ПLD╙╬ST╙╧╙WI│?├MP╒ГCMP╙М4_Ы╜зщ5 q╬╫╬а1─~а*OЛJnЯНEМ4|_Ы╞`╚@чЯИОPнЯа&0&Ў ы╞`чЯИБ_&ЖБ '╤5№4 _Ы╞ ўo╜бv}p'Ж5М4_Ы╜й(5ИЎo4Н5ўo9_М╞■М╞ ўo4 _ЫнЯа5М4|OЛнЯа5|'Б'Б' ■9 ·°√╛ ъ4НЖ ╖ox54_Ын─5И40М+ ┘5ў╤'4╞1ДО╥№Б05жазАZ&∙9~0М ▒READY CASSETT┼READY PRINTE╥Ж ╖o╬д- вНйx╬ею Ш w&╩4@╬жH |5Ж▒т&╜╬е}ф'3М q┐╙|x╜ж5Н,4Н!Нє╙¤Эжр'~д-НзДбА&1?&Ї ┘ННЙ9Ж ╖o╜бv}p'Є~ж w&хюd чюф х  563М 44v_Ы 5ИЖ╛К╜ж_x||╜з╪оd┐~Ж ╖}ьb│~$2f~дСГ $\ў}╜зЇ ▌4Ж~╖О0М ┐П5Т╞ 2НўШ°*¤э┴*'ъ╞∙╥∙  Я╞ ┴Н>НЦУБ&ё Ф&э9Н/ Ж3НЇя╞жаз└Z&∙ЯЧ0НЇ╫ЯЩ0НЇ▀ЖзДН0НЇ├ЖзДc&*9ЖЕЖЧУФ1М9BINЕН Е ЖЧЕ Е w'■ГН&T90НЇЙЖ00100 ***** 00110 * 00120 * CLRSCO.ASM 00130 * MDJ 2024/02/13 00140 * 00150 * BRUTE FORCE 00160 * CLEAR THE 00170 * SCORE FIELD 00180 * 00190 * ENTRY CONDITIONS 00200 * NONE 00210 * 00220 * EXIT CONDITIONS: 00230 * NONE 00240 * 00250 ***** 00260 00270 PTFCHR EQU $5300 00280 00290 ORG $6380 00300 00310 CLRSCO PSHS A,B,X 00320 00330 LDA #27 00340 LDB #15 00350 LDX #$0020 00360 JSR PTFCHR 00370 LDA #28 00380 LDB #15 00390 LDX #$0020 00400 JSR PTFCHR 00410 LDA #29 00420 LDB #15 00430 LDX #$0020 00440 JSR PTFCHR 00450 LDA #30 00460 LDB #15 00470 LDX #$0020 00480 JSR PTFCHR 00490 LDA #31 00500 LDB #15 00510 LDX #$0020 00520 JSR PTFCHR 00530 00540 PULS A,B,X 00550 ENDCHK RTS 00560 00570 END Їє█'Б &Ж Б ' з└\┴#ъC9Їз─O9єС╢ К╖ п В Е Ж @Ж╨╖ HИИ╢ HЦ|Б ▀ 4p3Няс4@НX▌<'Б'8Б&81Нj╠Їe%,mд*єЭmЇ'Н? °2b╓&O▄5ЁН0ждбЇ#°▐4` ╕mд*Ё╞▐ 2zC5Ё╠ ш0ы3НёФ4@╞мс#у95V4ц0М:0нД▌9╙9У9Ф╘9Ъ┌9Ш╪9У'O_9НўCS9▐$3╦XIЮ&Є09╠LZ'< $ЎЙ▐44@% УIИF$УiaiфXI$\jb&фFV■jc&°5╞╞ SН┤9Ю'+XI0&·9DV0&·9┴%р╫O_9&'1Б&╓O4╗5%ьд9 '┘жДБF"╙ЖН■9_Б'wБ& mд*] Н├CS9Б&TжДБ*& ▄ '▄!9Б.'єБ'&ЄЙO9Б+'ЪБ-&Н╠├9╞Б@''XБ$'"╞ Б&'Б(&■Sё█Б)&▄9╞М╞М╞■Ф4ЄPБ'~М4▐ж_БD&цa' ┴ '┴'/ e╓┴$'╞  !╞БO'IБQ'EXБH'@╞ БT':цa&╓ '╞ ▐OZэфжАёЧ$АА0бa"#4оa03╦1?&·53╞ &▄05└ ma'╠сa'╚╞■ё╞'цД┴.'9▐╓4Vё┤Б&ё!Б.& ╓1НOЖЄ$ 5V▀╫√95VЖ ў+-*!/4! &<Г= А А,А;А)А]АANDDIV4EQUMOD~NEQNOTАOR XORoт┴#╞■4W3фЮЖёБ$, &Ж HЮ0:Ь%╞нЮчАжазАZ&∙oАoАoДЯ0цBS0ЕцДmA&┼А&НN '┼@'НG┼'Ж Ч5Wод5Д┼А&╩АчДжAЕ'╩ чДоCпд т4оCмд5'╪цД┼ 'жAЕ&ф╩@чДН ─ЖМЖзGж─Кз─9BADаBUFFERаDEFINEDа ERRO╥FUL╠LIN┼MISSINGаNOаOPERAN─SYMBO╠АDRIVE NOT READ┘IOАDOSАFILE NOT FOUN─W.END OF FIL┼DIRECTORY АDISK АDISK WRITE PROTECTE─FILE DESCRIPTO╥FMАRECOR─COMMAN─PARAMETER╙EXPRESSIONАMEMOR┘АBREAKPOIN╘CAN'T CONTINU┼ TABLE АMULTIPLY  АUN А0Н2┐Ж~╖0Н√┐00100 ***** 00110 * 00120 * CLRL13.ASM 00130 * MDJ 2024/02/13 00140 * 00150 * CLEAR LINE 13 00160 * 00170 * ENTRY CONDITIONS 00180 * NONE 00190 * 00200 * EXIT CONDITIONS: 00210 * NONE 00220 * 00230 ***** 00240 00250 PTFSLS EQU $63C0 00260 00270 ORG $62C0 00280 00290 CLRL13 JMP PTFL13 00300 00310 LENL13 FDB $0020 STRING LENGTH = 32 00320 TXTL13 FCC " " 00330 00340 PTFL13 PSHS A,B,X,Y 00350 00360 LDA #0 00370 LDB #13 00380 LDX #TXTL13 00390 LDY LENL13 00400 00410 JSR PTFSLS 00420 00430 PULS A,B,X,Y 00440 ENDCHK RTS 00450 00460 END цДзДбД& LзДбД&чД┴?&╞ E╝'ў4Ю│&ю5° °#45%%9'НюГ"Ж=┬▐яе9ОZНэ0&ў9╞¤╠Н╓0╩А╫09╠ ╠А0ЖЯ)Ж_╫'╓0─╫09╞_╫0-9Нў -93НчЮ 3Нч┴НУM& ┴' ┴ '┴'╞ ▓ч─9ы4БH'%ыn, pы` h4№╥Я!■#ёCЮ)мф#я5РыьХёЦ Н╬ьЛёЙ9№й0МG1НэBO╓8Н-╓9Н)╓7Н%╓6Н!¤°№Л3НчK╞41Нэ#ь┴Н jф&°5№rь─4Fы√Oюфндь35╞┴┬D╨C├╪┘╒╙P├ЖLЎ"'4▐Ю}Н^' НX'▌}5ёC╞ М╞ №╣Нё,№!ъ─%ы9ЖPїъ№ъ│%▌4ъПН4pгb"╥цfоgюiяfёuО■А4ъp0&Ї5Ёъg'■m√9Нтья4v +) 2425+&( 0'$0М4У'Ц1Б " %ьКЕ5Ўыhь>ьО34▐ж└Д'23╞ьфг┴+Ёгb$ыэb! х5`Г3$ ы╡У'├32 2НЙ ╢0Нц╢ОзД■ПяC2Нш╠щ^ьA▌8оDЯ:Я<оHЯ>ж─Ч(цC▌6оJ0ЯB3L▀@ЁЇпНO'5НiН[ЮBНH& ю#3_я#&╣l$Н▄B $ 'Л0ъ╚0Мъw BRK @аН( .'v.Ю)4ЮB№%5Я)·vН,МН0Oмд'1%LZ&Ў\9НН ╞ oвZ&√9Нод'ж"зД1%Z&є9╞1Нхb9╞1Нхe9НзДбД&5Ж?зДбД&-я#9ЛН█╞=1епджДз"╠э#9Н╧од'жДз"Ж?зД1%Z&я )НЧ╞·╪ЮBЖ?бд'ЄН5▐B!OНк ' +сЬ%'Ю%ЖНЪЦ3╖ОЮ4┐ПЮ<▐>▐@▄6ЮB4Ю:▄85Й╞ ╫Н╞╫9 /#жаБ'чБ'°0М1цА'с?&° БА%*╞^БН'6Б═'.Д?Б'(Б'$ц?┼@'╩М── n~Эн╜Б`%Д0Н?цЖ┴ '─Нqж?╞=0М9цЖ*ц?─ъЖ─T0М9цЕ%TTTT─0М цЕO0НїнЛ▀%9-1Б'ь0 шцаOМьб45 кьб жцаЦ7№X ца  ьб3л0 ь w ~жаDDDDНж?ДH0Н¤0Ж4┼'╓╩жА┼'Б╒&Ж╙ч┐M*ю5Уц?0М:жа*Н╓0H&ў9ждH$О_H╔0&∙XH╔M&·▐@ю┼ ц?0Мжа0D$Не&ў9P├╒┘╪D╨┬┴C├ца┼А':0МD─цЕ0МM:ц?┼''Ц ╓4vЖ ЧН5vЧ ╫ц?Ц'ч9Ж ЧН0Ню─ -─┼'╩р|"&-ЙCL═fo═U│║═╔&$ДЖ+МЖ-МЖ[МЖ]МЖ#МЖ,МЖTМЖ=МЖ/цьН▐ ▀&гЖ МЖ■4НсН╙жфL'Н╠НM53┼9╓94ЖB ╓84ЖA ▄84ЖDН┬ц?Н(53╦9Н>ца Н2ьб4* ННьфCS├·▐ ╓НЙTTTT─0НсbюЕ0МTжЕ DXYUSЖ>МЖ< +╖Чц[Нє■U Нщ■U0Мх■,PC╥&■+¤Л   !" #$%'( )*+,ML  ab Kt uJ{|NOPQRSTUVWXYZ[\]wxyz}~А IHGvF E-  ./ 01245 67 89  :; <=>@A BC D─╪┘╒╙P├┐┐┴┬C├D╨┐┐┐┐ ё▄[╞ М╞▄L╤&∙9AOIMLPMONLNONSWESSWS SR Ю┐Ь╣& ╪'¤╬ Я&H ╪&Ю┐Я╡НO0ЛЯ┐9ц╫0Я9ЖЧх0Н╒ЗЯ╡ ╫ш4 ╫5& %Ю╡Н┌ Ю&Н9¤M╪уdў ╣╦Ю╡3Н╒UНz3C▀┌'wБ\&ў┌ Б.'G┌+$ ┌3%САА0═Ж4▐1Н╒"Ц▓аф3╞л"БА"oз"╓ЮН35@0Н╓4▐3╞╓                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  ╒& ┌ И& ╙M"DOS/BIN"&)╣ Г0│&H10A2&5A│ Г(0)&;2В&\7ВTHE FOLLOWING HAS OCCURRED:&b<В&З>В[ ]&НAВ&кEВPRESS A KEY TO CONTINUE&╠FВ F R E E S P A C E M A P&юGВ ---------------------------&ЇHВ'KВFREE SPACE DRIVE ZERO'3LВ .... .... .... .... .... ....'WMВ .... .... .... .... .... ....'vNВ .... .... .... .... ....'|OВ'ЦPВFREE SPACE DRIVE ONE'║QВ .... .... .... .... .... ....'▐RВ .... .... .... .... .... ....'¤SВ .... .... .... .... ....(UВ(#VВ(PUSH ANY KEY TO CONTINUE)()dВ(KeВCOLOR TRSDOS 01.07.00 11/82(_fВBY R.G. KILGUS({gВCOPR. 1982 TANDY CORP.(ФiВALL RIGHTS RESERVED(ЪoВ(▓xВ 1. EXIT TO BASIC(╦}В 2. EXEC A PROGRAM(щВВ 3. START CLOCK DISPLAY)ЗВ 4. DISK ALLOCATION MAP)МВ 5. COPY FILES)0СВ 6. DIRECTORY)EВ** NO ERRORS **)fВI/O ERROR - DRIVE NOT READY)ЗВI/O ERROR - WRITE PROTECTED)дВI/O ERROR - WRITE FAULT)└ВI/O ERROR - SEEK ERROR)█ВI/O ERROR - CRC ERROR)ЎВI/O ERROR - LOST DATA*ВI/O ERROR - UNDEFINED BIT 1*8ВI/O ERROR - UNDEFINED BIT 0*W ВREGISTER ARGUMENT INVALID*v ВDIRECTORY ENTRY NOT FOUND*Н ВDIRECTORY IS FULL*м ВOPEN CAUSED FILE CREATION*╧ ВFILE NOT CLOSED AFTER CHANGES*шВFILE NOT YET OPENED+ВNOT OPENED FOR READING+)ВRBA OVERFLOW (RBA > 16,777,216)+OВNOT ALLOWED - BEYOND END OF FILE+fВFAT REWRITE ERROR+БВCLOSING UNOPENED FILE+жВCANT USE RANDOM - REC SZ = ZERO+┬ВNOT OPENED FOR WRITING+фВCANT EXTEND FILE - DISK FULL, ВOVERLAY LOAD ERROR - FUNCTION NG,0ВNOT ENOUGH SPACE FOR PRINT BUFR.,UВBASIC LINE READ FAILED, I/O ERR,zВPROGRAM LOAD ADDRESS IS TOO LOW,аВPROG FILE DOSN'T START WITH ZERO,─ВNOT ENOUGH SPACE FOR BUFRD KBD,█ВNOT ENOUGH MEMORY,√ВOUTPUT FILE ALREADY EXISTS-В-ВEXECUTE A PROGRAM-В-@ ВPROGRAM NAME: [ ]/BIN-FВ-L%В-d&В COPY A FILE-j(В-М*В SOURCE FILE NAME [ ]-й,В EXTENSION [BIN]-─.В DRIVE [0]-╩0В-ь2В DESTINATION NAME [ ]. 4В EXTENSION [BIN].$6В DRIVE [0].*8В.G:В IF DRIVES ARE THE SAME.e<В ARE YOU USING DIFFERENT.Г>В DISKETTES (Y OR N)? [N].Й@В.бBВUSE UP/DOWN ARROWS.╛DВPRESS WHEN DONE.уZВ[********] [***]:[0]