IMD 1.18: 23/09/2017 17:43:42 MS PASCAL Pre-Release 11-9-81 Disk 1 Serial P-14 Copyright 1981 by Microsoft, Inc.  @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@  @`   @`! #@%`')+-1 3@5`79;=?A C@E`GIKMOQ S@U`WY[]_ac@e`gikmoq s@u`wy{} @` @ ` @ `  @ ` @ ` ǀ ɠ @ ` ׀ ٠  @` @`!Aa   !Aa!!#A%a')+-/1!3A5a79;=?A!CAEaGIKMOQ!SAUaWY[]_a!cAeagikmoq!sAuawy{}!Aa/@`   @`! #@%`')+-1 3@5`79;=?A C@E`GIKMOQ S@U`WY[]_ac@e`gikmoq s@u`wy{} @` @ ` @ `  @ ` @ ` ǀ ɠ @ ` ׀ ٠  @` @`!Aa   !Aa!!#A%a')+-/1!3A5a79;=?A!CAEaGIKMOQ!SAUaWY[]_a!cAeagikmoq!sAuawy{}!Aa/READ ME mFINU j FINK j FINKXM jPASKEY d( ENTX6L ASMj/ PASCAL MAPj@DPAS1 EXEdb*PASCAL LIBj*NULL LIBdPRIMES PASlASIBF SYMm ASIBF BINmXASIBF TMPlRIMES OBJl This describes the contents of the accompanying diskettes. A detailed description of how to use the compiler and other utilities is given in the appropriate User manuals. However, since these are still in preparation and are not available, a brief outline is given below. Files on this distribution -------------------------- Pascal Compiler READ.ME This Memo PAS1.EXE Pascal Compiler Pass 1 PAS2.EXE Compiler Pass 2 (Common to Fortran and Pascal) Pascal Run-Time LINK.EXE Microsoft Linker for .OBJ files PASCAL.LIB The Pascal Library To use this distribution of Microsoft Pascal you need an MS-DOS system with at least least 128K of contiguous main memory, and at least one standard MS-DOS compatible floppy disk drive. These files are distributed on two disks because they won't all fit on one single-density disk. Disk 1 has the compiler first pass, PAS1.EXE; the Pascal library, PASCAL.LIB; and other assorted files. Disk 2 has the compiler second pass, PAS2.EXE; and the linker, LINK.EXE. If you have a double-density disk system, you will find it much more convenient to use the compiler if you copy all these files onto one double-density disk. Compiling --------- To use Microsoft Pascal please follow these instructions: Place the disk containing pass one of the compiler (PAS1.EXE) in a drive. Place a disk containing at least 160K free space in the default drive. The intermediate files generated by the first pass of the compiler will be put on this disk. If there is sufficient space on the disk with the first pass of the compiler, it can be used to store the intermediate files. The source file can be on any drive. Initiate the first pass of the compiler by typing: d:PAS1 sourcefile,objectfile,sourcelist,objectlist You should note the following about the command line: 1. Filemanes can appear on the command line, of (if not enough are given) the user is prompted for filenames. 2. Commas between filenames, and a trailing semicolon, are optional. Lower case is always converted to upper case. 3. Filesnames occure in the following order: source, object, source listing, object listing; 4. The source extension defaults to .PAS. The object extension defaults to source.OBJ, listing file extensions to .LST for the source listing, and .COD for the object listing. Default extensions are given in the prompt. 5. There is no default source filename. Object filename defaults to the same as the source, and listing filenames default to NUL except that when a comma preceeds a missing listing filename it defaults to the source filename as well: "d:PAS1 SS,,,;" read SS.PAS, write SS.OBJ, SS.LST, SS.COD "d:PAS1 SS;" read SS.PAS, write SS.OBJ, listings to NUL. 6. Blanks are permitted, except within filenames. 7. If the trailing ";" is missing from the command line and more files could follow, the prompt sequence starts, giving default to use. 8. A new drive (as in "B:") or extension (as in ".REL") can be given in an y file position to override the default; does not affect the filename itself. Examples: A:PAS1 pascalfn; B:PAS1 Source file [.PAS]: pascalfn Object file [.OBJ]: A: Source list [.LST]: /c/d Object list [.COD]: ; Complete the compilation by inserting the disk with the compiler second pass (PAS2.EXE) and typing: d:PAS2 PAS2 is the same for Microsoft Fortran and Pascal because both languages have a common intermediate form. As PAS2 executes, it will read the intermediate files created by PAS1 from the default drive and create a new file on the default drive: PASIBF.TMP as well as the object and listing files. PASIBF.TMP is a temporary file used by PAS2 for scratch. All of the PASIBF files are automatically deleted when PAS2 completes normally. The object file is the relocatable binary object file for input to the Microsoft Linker. Linking ------- Link the object program by typing: LINK objectfile; The Linker links the object file(s) using PASCAL.LIB as the library. The command line syntax is similar to that of the Pascal front end, except that more than one .OBJ file can be specified as input using "+" as a separator. There are other features as well. Read the Linker Manual to find out about them. Running your Program -------------------- Run the .EXE file by typing the name of the file without the extension, e.g. to run A.EXE just type: A \\UxUvx]Ut|(]GDFCBFQQQ8]\\\RUNTQQQ \D[  TEMSEQQ [bZD8[ Z^AP[bZ:XD8Z[ Z^AZ:XTz?XbZ FILQ WAIpXPRTD\f?T:Xo rrorDect>T?sT D\D.\  [FILLSC .\E\\84D  [FILLSC \G[D8.\]{MS-Pascal and Fortran OS Dependent File System Interface Unit} INTERFACE; UNIT FILUQQ (FNSUQQ, INPUQQ, OUTUQQ, INIUQQ, OPNUQQ, CLSUQQ, CLDUQQ, ENDUQQ, GETUQQ, PUTUQQ, PERUQQ, PCCUQQ, SEKUQQ, GTYUQQ, PLYUQQ, PTYUQQ, GFNUQQ, PFNUQQ, BUFUQQ, NEWUQQ, TFNUQQ, PPMUQQ, NEFUQQ, DIFUQQ, IOCUQQ, FPSUQQ, TFDUQQ, EOFUQQ); USES FILKQQ; TYPE ERRORET = WORD; {return code, error if non-zero} VAR FNSUQQ: SET OF CHAR; {allowed chars in a filename} INPUQQ, OUTUQQ: STRING (8); {filenames for user terminal} PROCEDURE INIUQQ; {Overall initialization call; set FNSUQQ, INPUQQ, and OUTUQQ} FUNCTION OPNUQQ (VAR F: FCBFQQ): ERRORET; {Open a file; INPT determines whether for input or output; if OLDF true and file not found, error, else create file; DIRECT mode record length is in SIZE; file's mode is in CMOD, but if mode is SEQUENTIAL and file is a terminal (or printer) reset CMOD to TERMINAL; set EORF true; set EOFF to NOT INPT} FUNCTION CLSUQQ (VAR F: FCBFQQ): ERRORET; {CLOSE; close the file (if error occurs file assumed closed)} FUNCTION CLDUQQ (VAR F: FCBFQQ): ERRORET; {CLOSE DELETE; close the file and delete it (errors ignored)} PROCEDURE ENDUQQ; { Overall termination, all files should already be closed} FUNCTION GETUQQ (VAR F: FCBFQQ; LEN: WORD; DST: ADSMEM): ERRORET; {Copy bytes from the file to the string until the string fills, an error occurs, or the end of record or end of file is found. Set EOFF if last byte of file has already been read (not an error); else copy from zero to UPPER(S) characters from the file to S. Set BCNT to actual number of bytes copied (zero to UPPER(S)); value of bytes in S from BCNT+1 to UPPER(S) is undefined. USED is always the number of bytes read from this record. Use TXTF and CMOD as appropriate for various kinds of files: If CMOD=SEQUENTIAL or TERMINAL and TXTF is true, set EORF if last byte of record read and BCNT < UPPER (S). If CMOD=TERMINAL, reading user line from a console: If TXTF, read whole line with user editing and echo, If NOT TXTF, read characters as typed, without echo.} FUNCTION PUTUQQ (VAR F: FCBFQQ; LEN: WORD; SRC: ADSMEM): ERRORET; {Copy bytes from string to file, at end of current record; USED is always the number of bytes written to this record. Set EORF false iff (CMOD=SEQUENTIAL or DIRECT) and TXTF true} FUNCTION PERUQQ (VAR F: FCBFQQ): ERRORET; {End writing the current record and setup to write the next; Set EORF true iff CMOD=SEQUENTIAL or TERMINAL and TXTF true} FUNCTION PCCUQQ (VAR F: FCBFQQ; CH: CHAR): ERRORET; {Start of line carriage control; CMOD is TERMINAL; CC is one of: ' ': single space (normal) '0': double space '+': no spacing (overprint) '1': new page EORF will always be true, set it false} FUNCTION SEKUQQ (VAR F: FCBFQQ; LREC, HREC: WORD): ERRORET; {Reposition direct-access file to record number LREC/HREC.} FUNCTION GTYUQQ (LEN: WORD; DST: ADSMEM): WORD; {Read up to LEN chars from user's terminal to DST, return number read} PROCEDURE PLYUQQ; {Output an end of record (crlf or equivalent) to the user's console} PROCEDURE PTYUQQ (LEN: WORD; SRC: ADSMEM); {If LEN=0, output end of line to user's terminal, else output LEN chars from SRC} FUNCTION GFNUQQ (VAR F: FCBFQQ; LEN: WORD; DST: ADSMEM): WORD; {Move filename to DST, max of LEN chars, return actual length} PROCEDURE PFNUQQ (VAR F: FCBFQQ; LEN: WORD; SRC: ADSMEM); {Get filename from SRC of length LEN, for use in later OPNUQQ calls} {Pascal-only calls} PROCEDURE BUFUQQ (VAR F: FCBFQQ); {Wait for I/O transfer to finish, set REDY true (defer errors)} PROCEDURE NEWUQQ (VAR F: FCBFQQ); {Initialize OS dependent fields; SIZE and TXTF set (defer errors)} PROCEDURE TFNUQQ (VAR F: FCBFQQ); {Set the NAME field to a unique OS temporary filename (defer errors)} FUNCTION PPMUQQ (LEN: WORD; ADRP: ADRMEM; VAR DST: LSTRING): ERRORET; {Like GETUQQ, but used to read program parameters from user. String P is a user prompt, which may or may not be used. If user input string is shorter than UPPER(S), blank pad; if it is longer, either re-prompt or give an error. Called once per program parameter requested} {Fortran-only calls} FUNCTION NEFUQQ: ADRMEM; {If possible, allocate a file of size BOFFQQ, initialize OS dependent fields, and return the address of the FCB; else return zero} PROCEDURE DIFUQQ (F: ADRMEM); {Deallocate the file at address F of size  BOFFQQ} FUNCTION IOCUQQ (VAR F: FCBFQQ): ERRORET; {Change from read to write or vice versa, based on new INPT value; CMOD is SEQUENTIAL or TERMINAL; set EORF and EOFF as in OPNUQQ} FUNCTION FPSUQQ (VAR F: FCBFQQ; RELPOS: INTEGER): ERRORET; {Position RELPOS bytes forward(+), backward(-), or rewind(0). If INPT is false, write eof first. Set EORF and EOFF as in OPNUQQ} FUNCTION TFDUQQ (VAR F: FCBFQQ): ERRORET; {Truncate DIRECT file before current record; CMOD is always DIRECT. If truncation is difficult, ignore operation. Set EOFF true} FUNCTION EOFUQQ (VAR F: FCBFQQ; VAR FEOF: BOOLEAN): ERRORET; {Set FEOF true if next GETUQQ would return with EOFF true, else set it false. If difficult to detect, just set it false} END;  by Pascal user as .} TRAP: BOOLEAN; {00 Pascal user trapping errors if true} ERRS: WRD(0)..15; {MS-Pascal / MS-FORTRAN FCB Declaration Include File} INTERFACE; UNIT FILKQQ (FCBFQQ, FILEMODES, SEQUENTIAL, TERMINAL, DIRECT); TYPE FILEMODES = (SEQUENTIAL, TERMINAL, DIRECT); FCBFQQ = RECORD {byte offsets start every field comment} {fields accessible by Pascal user as .} TRAP: BOOLEAN; {00 Pascal user trapping errors if true} ERRS: WRD(0)..15; {01 error status, set only by all units} MODE: FILEMODES; {02 user file mode; not used in unit U} MISC: BYTE; {03 pad to word bound, special user use} {fields shared by units F, V, U; ERRC / ESTS are write-only} ERRC: WORD;  {04 error code, error exists if nonzero} {1000..1099: set for unit U errors}  {1100..1199: set for unit F errors} {1200..1299: set for unit V errors} ESTS: WORD; {06 error specific data usually from OS} CMOD: FILEMODES; {08 system file mode; copied from MODE} {fields set / used by units F and V, and read-only in unit U} TXTF: BOOLEAN; {09 true: formatted / ASCII / TEXT file} {false: not formatted / binary file} SIZE: WORD; {10 record size set when file is opened} {DIRECT: always fixed record length} {others: max length (UPPER (BUFFA))} MISB: WORD; {12 unused, exists for historic reasons} OLDF: BOOLEAN; {14 true: must exist before open; RESET} {false: can create on open; REWRITE} INPT: BOOLEAN; {15 true: user is now reading from file} {false: user is now writing to file} RECL: WORD; {16 DIRECT record number, lo order word} RECH: WORD; {18 DIRECT record number, hi order word} USED: WORD; {20 number bytes used in current record} {field used internally by units F and V not needed by unit U} LINK: ADR OF FCBFQQ;{22 DS offset address of next open file} {fields used internally by unit F not needed by units V or U} BADR: ADRMEM; {24 ADR of buffer variable (end of FCB)} TMPF: BOOLEAN; {26 true if temp file; delete on CLOSE} FULL: BOOLEAN; {27 buffer lazy evaluation status, TEXT} MISA: BYTE; {28 unused, exists for historic reasons} O PEN: BOOLEAN; {29 file opened; RESET / REWRITE called} {fields used internally by unit V not needed by units F or U} FUNT: INTEGER; {30 Fortran unit number, always above 0} ENDF: BOOLEAN; {32 last operation was the ENDFILE stmt} {fields set / used by unit U, and read-only in units F and V} REDY: BOOLEAN; {33 buffer ready if true; set by F / U} BCNT: WORD; {34 number of data bytes actually moved} EORF: BOOLEAN; {36 true if end of record read, written} EOFF: BOOLEAN;  {37 end of file flag set after EOF read} {unit U (operating system) information starts here} {end of section for unit U specific OS information} END; END; { Pascal File Control Block, DOS Specific Version } INTERFACE; UNIT FILKQQ (FCBFQQ, FILEMODES, SEQUENTIAL, TERMINAL, DIRECT, DEVICETYPE, CONSOLE, LDEVICE, DISK, DOSEXT, DOSFCB, FNLUQQ, SCTRLNTH); CONST {$INCONST:SCPDOS Seattle Computer Products versions } FNLUQQ = 21; { length of a DOS filename } {$IF SCPDOS $THEN} SCTRLNTH = 512; { length of a disk sector } {$ELSE} SCTRLNTH = 128; { length of a disk sector } {$END} TYPE DOSEXT = RECORD { DOS file control block extension } PS [0]: BYTE; { boundary byte, not in extension } FG [1]: BYTE; { flag; must be 255 in extension } XZ [2]: ARRAY [0..4] OF BYTE; { padding, internal use } AB [7]: BYTE; { attribute bits } END; DOSFCB = RECORD { DOS file control block (normal) } DR [0]: BYTE; { drive number, 0=def, 1=A etc } FN [1]: STRING (8); { file name - 8 bytes } FT [9]: STRING (3); { file extension - 3 bytes } EX [12]: BYTE; { current extent, lo byte } E2 [13]: BYTE; { current extent, hi byte } S2 [14]: BYTE; { sector size, lo byte } RC [15]: BYTE; { sector size, hi hyte (ext sect) } Z1 [16]: WORD; { file size, lo word; readonly } Z2 [18]: WORD; { file size, hi word; readonly } DA [20]: WORD; { date, bits DDDDDMMMMYYYYYYY } DN [16]: ARRAY [0..9] OF BYTE; { reserved for DOS } CR [32]: BYTE; { current sector within extent } RN [33]: WORD; { direct sector number lo word } R2 [35]: BYTE; { direct sector number hi byte } R3 [36]: BYTE; { hi byte (iff sect size < 64) } PD [37]: BYTE; { pad to a word boundary, not DOS } END; DEVICETYPE = (CONSOLE, LDEVICE, DISK); { physical device type } FILEMODES = (SEQUENTIAL, TERMINAL, DIRECT); { access mode for file } TYPE FCBFQQ = RECORD {byte offsets start every field comment} {fields accessible by Pascal user as .} TRAP: BOOLEAN; {00 Pascal user trapping errors if true} ERRS: WRD(0)..15; {01 error status, set only by all units} MODE: FILEMODES; {02 user file mode; not used in unit U} MISC: BYTE; {03 pad to word bound, special user use} {fields shared by units F, V, U; ERRC / ESTS are write-only} ERRC: WORD; {04 error code, error exists if nonzero} {1000..1099: set for unit U errors} {1100..1199: set for unit F errors} {1200..1299: set for unit V errors} ESTS: WORD; {06 error s pecific data usually from OS} CMOD: FILEMODES; {08 system file mode; copied from MODE} {fields set / used by units F and V, and read-only in unit U} TXTF: BOOLEAN; {09 true: formatted / ASCII / TEXT file} {false: not formatted / binary file} SIZE: WORD; {10 record size set when file is opened} {DIRECT: always fixed record length} {others: max length (UPPER (BUFFA))} MISB: WORD; {12 unused, exists for historic reasons} OLDF: BOOLEAN; {14 true: must exist before open; RESET} {false: can create on open; REWRITE} INPT: BOOLEAN; {15 true: user is now reading from file} {false: user is now writing to file} RECL: WORD; {16 DIRECT record number, lo order word} RECH: WORD; {18 DIRECT record number, hi order word} USED: WORD; {20 number bytes used in current record} {field used internally by units F and V not needed by unit U} LINK: ADR OF FCBFQQ;{22 DS offset address of next open file} {fields used internally by unit F not needed by units V or U} BADR: ADRMEM; {24 ADR of buffer variable (end of FCB)} TMPF: BOOLEAN; {26 true if temp file; delete on CLOSE} FULL: BOOLEAN; {27 buffer lazy evaluation status, TEXT} MISA: BYTE; {28 unused, exists for historic reasons} OPEN: BOOLEAN; {29 file opened; RESET / REWRITE called} {fields used internally by unit V not needed by units F or U}  FUNT: INTEGER; {30 Unit V's unit number always above 0} ENDF: BOOLEAN; {32 last operation was the ENDFILE stmt}  {fields set / used by unit U, and read-only in units F and V} REDY: BOOLEAN; {33 buffer ready if true; set by F / U} BCNT: WORD; {34 number of data bytes actually moved} EORF: BOOLEAN; {36 true if end of record read, written} EOFF: BOOLEAN; {37 end of file flag set after EOF read} {unit U (operating system) information starts here} NAME: LSTRING (FNLUQQ); { 38 DOS file name for this file } DEVT: DEVICETYPE; { 60 type of device accessed by this file } RDFC: BYTE; { 61 function code to read from a device } WRFC: BYTE; { 62 function code to write to a device } CHNG: BOOLEAN; { 63 true if data in sbuf was changed } SPTR: WORD; { 64 pointer (index) into sbuf } LNSB: WORD; { 66 # of valid bytes in sbuf } DOSX: DOSEXT; { 68 extended DOS file control block } DOSF: DOSFCB; { 76 normal DOS file control block } IEOF: BOOLEAN; {114 true if eoff should be true next get } FNER: BOOLEAN; {115 true if a filename error has occured } SBFL: BYTE; {116 max length of textfile line in sbuf } SBFC: BYTE; {117 number of chars read into sbuf } SBUF: ARRAY [WRD(0)..SCTRLNTH-1] OF BYTE; {118 sector buffer } PMET: ARRAY [0..3] OF BYTE; {118 + sctrlnth: reserved pad } BUFF: CHAR; { Pascal buffer variable, (component) } {end of section for unit U specific OS information} END; END; { DOS version of PASKEY (Pascal Pre-declaration) File} INTEGER WORD CHAR REAL {primitive types} 634 {size in bytes of FCB without buffer variable} {intrinsic pre-declared procedures and functions} READLN WRITELN READ WRITE PAGE READFN   READSET NEW DISPOSE PACK UNPACK EVAL * * * * EOF EOLN CHR ORD ABS SQR PRED SUCC ODD LOWER UPPER HIBYTE LOBYTE WRD DECODE ENCODE SIZEOF RETYPE RESULT BYWORD {intrinsic pre-declared constants and data types} CONST MAXINT=32767; MAXWORD=65535; NULL=0;  TYPE BOOLEAN=(FALSE,TRUE); TEXT=FILE OF CHAR; STRING =SUPER PACKED ARRAY [1..*] OF CHAR; SINT=-127..127; LSTRING=SUPER PACKED ARRAY [0..*] OF CHAR; BYTE=WRD(0)..255; ADRPQQQ=RECORD R:WORD END; ADSPQQQ=RECORD R:WORD; S:WORD END; LSTLQQQ=RECORD LEN:BYTE END; ADAPQQQ=ARRAY [WRD(0)..32765] OF BYTE; ADRMEM=ADR OF ADAPQQQ; ADSMEM=ADS OF ADAPQQQ; END {terminate declaration section} {runtime unit interface; as a unit, allows renaming entry points} INTERFACE; UNIT RUNTQQQ (FCBFQQ,INPFQQ,OUTFQQ,FILEMODES,SEQUENTIAL,TERMINAL,DIRECT, SEKFQQ,RESFQQ,REWFQQ,ASSFQQ,CLOFQQ,CLDFQQ,GETFQQ,PUTFQQ, SRTRQQ,SINRQQ,COSRQQ,ATNRQQ,EXPRQQ,LNERQQ,TRNRQQ,ROURQQ,FLTRQQ, CONLQQ,DELLQQ,INSLQQ,CPLLQQ,POSLQQ,SEQLQQ,SNELQQ,CPSLQQ, MOVEL,MOVER,FILLC,MOVESL,MOVESR,FILLSC,EMSEQQ); TYPE FILEMODES = (SEQUENTIAL, TERMINAL, DIRECT); FCBFQQ = RECORD TRAP:BOOLEAN; ERRS:BYTE; MODE:FILEMODES END; VAR INPFQQ,OUTFQQ:TEXT; PROCEDURE SEKFQQ (VAR F:FCBFQQ;N:WORD); PROCEDURE RESFQQ (VAR F:FCBFQQ); PROCEDURE REWFQQ (VAR F:FCBFQQ); PROCEDURE ASSFQQ (VAR F:FCBFQQ;CONSTS N:STRING); PROCEDURE CLOFQQ (VAR F:FCBFQQ); PROCEDURE CLDFQQ (VAR F:FCBFQQ); PROCEDURE GETFQQ (VAR F:FCBFQQ); PROCEDURE PUTFQQ (VAR F:FCBFQQ); FUNCTION SRTRQQ (A:REAL):REAL; FUNCTION SINRQQ (A:REAL):REAL; FUNCTION COSRQQ (A:REAL):REAL; FUNCTION ATNRQQ (A:REAL):REAL; FUNCTION EXPRQQ (A:REAL):REAL; FUNCTION LNERQQ (A:REAL):REAL; FUNCTION TRNRQQ (A:REAL):INTEGER; FUNCTION ROURQQ (A:REAL):INTEGER; FUNCTION FLTRQQ (A:INTEGER):REAL; PROCEDURE CONLQQ (VARS D:LSTRING;CONSTS S:STRING); PROCEDURE DELLQQ (VARS D:LSTRING;I,L:INTEGER); PROCEDURE INSLQQ (CONSTS S:STRING;VARS D:LSTRING;I:INTEGER); PROCEDURE CPLLQQ (CONSTS S:STRING;VARS D:LSTRING); FUNCTION POSLQQ (CONSTS P,S:STRING;I:INTEGER):INTEGER; FUNCTION SEQLQQ (L:INTEGER;C:CHAR;CONSTS S:STRING;I:INTEGER):INTEGER; FUNCTION SNELQQ (L:INTEGER;C:CHAR;CONSTS S:STRING;I:INTEGER):INTEGER; PROCEDURE CPSLQQ (CONSTS S:STRING;VARS D:STRING); PROCEDURE MOVEL (S,D:ADRMEM;L:WORD); PROCEDURE MOVER (S,D:ADRMEM;L:WORD); PROCEDURE FILLC (D:ADRMEM;L:WORD;C:CHAR); PROCEDURE MOVESL (S,D:ADSMEM;L:WORD); PROCEDURE MOVESR (S,D:ADSMEM;L:WORD); PROCEDURE FILLSC (D:ADSMEM;L:WORD;C:CHAR); PROCEDURE EMSEQQ (CONST MS:LSTRING;EC,ES:WORD); END; USES RUNTQQQ (FCBFQQ,INPUT,OUTPUT,FILEMODES,SEQUENTIAL,TERMINAL,DIRECT, SEEK,RESET,REWRITE,ASSIGN,CLOSE,DISCARD,GET,PUT, SQRT,SIN,COS,ARCTAN,EXP,LN,TRUNC,ROUND,FLOAT, CONCAT,DELETE,INSERT,COPYLST,POSITN,SCANEQ,SCANNE,COPYSTR, MOVEL,MOVER,FILLC,MOVESL,MOVESR,FILLSC,ABORT); END. D DX,4096 ;optimal end-of-data paragraph CMP DX,BP ;enough memory for 64K data ? JLE  MEMA ;yes, can use optimal address MOV DX,BP ;no, must use highest address MEMA: SUB DX,4096 ;DX is final DS (may be negative) STD ;set direction flag MOV DS,AX  NAME ENTX ; Microsoft MS-DOS Computer Pascal runtime system control ; Version 1.00 (C) Copyright 1981 by Microsoft Corp ;Memory Layout: ; ; Hi -> COMMAND (may be overlayed) ; CONST segment ; DATA segment ; STACK segment ; MEMORY segment ; HEAP segment ; CODE segments ; Lo -> DOS code and data (fixed) ; ;The linker is told to load low and use DS allocation. Only 512 bytes ;of initial stack are allocated, and no heap at all. BEGXQQ moves all ;data to high memory, creating a gap in which the stack grows downward ;and the heap grows upward. The heap can grow downward over code too. EXTRN ENTGQQ:FAR ;Main program entry point EXTRN INIUQQ:FAR,ENDUQQ:FAR ;file system initialize/terminate EXTRN ENDYQQ:FAR ;file system, close files EXTRN BEGOQQ:FAR,ENDOQQ:FAR ;user system initialize/terminate ;First dummy code segment tells linker to load code lowest ; INIXQQ SEGMENT 'CODE' INIXQQ ENDS ;Heap segment definition (lowest of the data segments) ; HEAP SEGMENT PUBLIC 'MEMORY' MEMLO EQU THIS BYTE ;lowest data byte address HEAP ENDS ;Memory segment definition (special purpose zero length) ; MEMORY SEGMENT PUBLIC 'MEMORY' MEMORY ENDS ;Stack segment definition (fixed initial minimal length) ; STACK SEGMENT STACK 'STACK' DB 256 DUP (?) SKTOP EQU THIS BYTE STACK ENDS ;FIRST resident public data ; DATA SEGMENT PUBLIC 'DATA' PUBLIC CSXEQQ  ;pointer to sourcef context list CSXEQQ DW 0 PUBLIC CLNEQQ ;last line number encountered CLNEQQ DW 0 PUBLIC PNUXQQ ;pointer to unit initialization list PNUXQQ DW 0 PUBLIC HDRFQQ  ;Pascal open file list header HDRFQQ DW 0 PUBLIC HDRVQQ ;Unit V open file list header HDRVQQ DW 0 PUBLIC RESEQQ ;machine error context, stack ptr RESEQQ DW 0 PUBLIC REFEQQ  ;machine error context, frame ptr REFEQQ DW 0 PUBLIC REPEQQ ;machine error context, program offset  REPEQQ DW 0 PUBLIC RECEQQ ;machine error context, program segment RECEQQ DW 0 PUBLIC BEGHQQ  ;first header word in heap BEGHQQ DW 0 PUBLIC CURHQQ ;pointer to current heap item CURHQQ DW 0 PUBLIC ENDHQQ ;just past end of the heap ENDHQQ DW 0 PUBLIC STKBQQ ;stack start, to fix long GOTO STKBQQ DW 0 PUBLIC STKHQQ ;stack limit, to check overflow STKHQQ DW 0  PUBLIC CRCXQQ ;value of CX for DOS call CRCXQQ DW 0 PUBLIC CRDXQQ ;value of DX for DOS call CRDXQQ DW 0 PUBLIC CESXQQ ;DOS saved ES value (for command line) DOSOFF DW 0  ;DOS exit offset, 0 CESXQQ DW 0 ;DOS saved ES value DATA ENDS ;Constant segment definition ; CONST SEGMENT PUBLIC 'CONST' CONST ENDS ;Code for this module ; ENTXQQ SEGMENT 'CODE' DGROUP GROUP DATA,STACK,CONST,HEAP,MEMORY ASSUME CS:ENTXQQ,DS:DGROUP,ES:DGROUP,SS:DGROUP PUBLIC BEGXQQ,ENDXQQ,DOSXQQ ;main entry and exit poi  nts ;BEGXQQ: Initialization code ; - move DGROUP up as much as possible to get gap ; - set initial stackpointer, framepointer, STKBQQ ; - clear RESEQQ (machine error context) ; - clear CSXEQQ (sourcef error context) ; - clear PNUXQQ (unit init list header) ; - clear HDRFQQ and HDRVQQ (open file headers) ; - set BEGHQQ, CURHQQ, ENDHQQ, STKHQQ (heap init) ; - call INIUQQ (file initialization) ; - call BEGOQQ (user initialization) ; - call ENTGQQ (main program entry) ; BEGXQQ PROC FAR  MOV AX,DGROUP ;get assumed data segment value MOV DS,AX ;only need to address CESXQQ  MOV CESXQQ,ES ;save incomming ES value MOV DX,OFFSET DGROUP:MEMLO ;DS offset to lowest data SHR DX,1 ;make into word offset address MOV CX,32768 ;highest word address possible SUB CX,DX ;count of words in data segment SHR DX,1 ;make count SHR DX,1 ; into paragraph SHR DX,1 ; (segment) address INC DX ;round to next paragraph address ADD DX,AX ;DX is start-of-data paragraph MOV BX,2 ;[assembler rejects ES:2] MOV BP,ES:[BX] ;DOS end paragraph MOV BX,DX ;save to initialize heap later ADD DX,4096 ;optimal end-of-data paragraph CMP DX,BP ;enough memory for 64K data ? JLE  MEMA ;yes, can use optimal address MOV DX,BP ;no, must use highest address MEMA: SUB DX,4096 ;DX is final DS (may be negative) STD ;set direction flag MOV DS,AX  ;source segment MOV SI,65534 ;source offset MOV ES,DX ;target segment MOV DI,SI ;target offset REP MOVSW ;move DS:SI-- to ES:DI-- until CX-=0 MOV DS,DX ;final DS value (may be negative) CLI ;no interrupts (no stack) MOV SS,DX  ;initialize stack segment MOV SP,OFFSET DGROUP:SKTOP ;set stackpointer STI ;interrupts ok (stack ok) MOV STKBQQ,SP ;to re-init SP after long GOTO SUB BP,BP ;initial frame pointer zero MOV RESEQQ,BP ;machine error context zero MOV CSXEQQ,BP ;sourcef error context NIL MOV PNUXQQ,BP ;unit init list header NIL MOV HDRFQQ,BP ;Pascal open file header NIL  MOV HDRVQQ,BP ;Unit V open file header NIL SUB BX,DX ;para addr of start of heap  SHL BX,1 ;make SHL BX,1 ;into SHL BX,1 ;offr SHL BX,1 ;addr MOV BEGHQQ,BX ;start of heap address MOV CURHQQ,BX ;current heap item adr  MOV WORD PTR[BX],1 ;current header; free ADD BX,2 ;byte after end of heap MOV ENDHQQ,BX ;address after end of heap ADD BX,384 ;comfortable boundary MOV STKHQQ,BX ;  stack overflow address CALL INIUQQ ;initialize file system CALL BEGOQQ ;initialize user system CALL ENTGQQ ;call main program ;ENDXQQ: Termination code ; - call ENDOQQ (user termination) ; - call ENDYQQ (close open files) ; - call ENDUQQ (file termination) ; - return to operating system ; ENDXQQ LABEL FAR  ;termination entry point CALL ENDOQQ ;user system termination CALL ENDYQQ ;close all open files CALL ENDUQQ ;file system termination MOV DOSOFF,0 ;make sure jump offset zero JMP DWORD PTR DOSOFF ;return to DOS BEGXQQ ENDP ;DOSXQQ: Call DOS Operating System ; DOSXQQ PROC FAR POP SI ;get return ads POP DI ;get return ads POP DX  ;get address parameter POP AX ;get function parameter MOV AH,AL ;must be in high half MOV CX,CRCXQQ ;need CX for some functions PUSH DI ;save return ads PUSH SI ;save return ads PUSH BP ;have to save this one INT 33 ;onward to DOS MOV CRCXQQ,CX ;return CX value MOV CRDXQQ,DX ;return DX value POP BP ;restore frame pointer RET ;return (DOS ret in AX) DOSXQQ ENDP ENTXQQ ENDS  END BEGXQQ uV~V~U s~t F~u FRV2NQR? ~C ~u VR?UVVRR-Rx ~UVvƄ^U;t^VF;~ +FأTF@T܋FFVRT܁RFP? V~EvF~~~Vv4LVVu/u3Rx꾂 gRRR? >uRKv3R63R^'UR6 ABSRQQ..........................REAR6 ACSRQQ..........................RFAR ADDRQQ..........................REAR6 ADDSQQ..........................SETS AINRQQ..........................RFAR ALLHQQ..........................HEAH ANNRQQ..........................RFAR ASMGQQ..........................MISG6 ASNEQQ..........................ERRE ASNGQQ..........................MISG6 ASNRQQ..........................RFAR ASSFQQ..........................FILF AT2RQQ..........................RFAR ATNRQQ..........................TNSR AVAGQQ..........................MISG6 BEGHQQ..........................ENTX6S BEGOQQ..........................MISO BEGXQQ..........................ENTX6S BRTEQQ..........................MISG6 BUFFQQ..........................FILF BUFUQQ..........................PASUXM CEQRQQ..........................REAR6 CEQSQQ..........................SETS CESGQQ..........................MISG6 CESXQQ..........................ENTX6S CINSQQ..........................MISG6 CISSQQ..........................SETS CLDFQQ..........................FILF CLDUQQ..........................FILUXM CLERQQ..........................REAR6 CLESQQ..........................SETS CLNEQQ..........................ENTX6S CLOFQQ..........................FILF C  LSGQQ..........................MISG6 CLSUQQ..........................FILUXM CLTRQQ..........................REAR6 CLTSQQ..........................SETS CNVEQQ..........................ERRE CNVR............................CNVR CODCQQ..........................CODC CONLQQ..........................LSTL COSRQQ..........................TNSR CPLLQQ..........................LSTL CPSLQQ..........................LSTL CRCXQQ..........................ENTX6S CRDXQQ..........................ENTX6S CSHRQQ..........................RFAR CSLEQQ..........................PASE CSXEQQ..........................ENTX6S CURHQQ..........................ENTX6S CUTHQQ..........................MISHM DATE............................TIDGS DEBCQQ..........................CODC DEBEQQ..........................DEBE DEICQQ..........................CODC DEJCQQ..........................CODC DELLQQ..........................LSTL DERCQQ..........................REAC DEWCQQ..........................CODC DEXCQQ..........................CODC DIG2............................TIDGS DISEQQ..........................PASE DIVRQQ..........................REAR6 DOSXQQ..........................ENTX6S DXPRQQ..........................UTLR DZIEQQ..........................ERRE DZREQQ..........................ERRE DZWEQQ..........................ERRE EMSEQQ..........................ERRE ENBCQQ..........................CODC ENDHQQ..........................ENTX6S ENDOQQ..........................MISO ENDUQQ..........................FILUXM ENDXQQ..........................ENTX6S ENDYQQ..........................MISY ENICQQ..........................CODC ENRCQQ..........................REAC ENTEQQ..........................DEBE ENWCQQ..........................CODC EOFFQQ..........................FILF EOLFQQ..........................FILF EQCLQQ..........................LSTL EQDLQQ..........................LSTL ERCFQQ..........................FILF ERREQQ..........................ERRE ERTEQQ..........................MISG6 EXPEQQ..........................ERRE EXPRQQ..........................TNSR EXTEQQ..........................DEBE FERFQQ..........................FILF FILFQQ..........................FILF FILKQQ..........................MISY FILLC...........................MISG6  FILLSC..........................MISG6 FILUQQ..........................FILUXM FLBUQQ..........................FILUXM FLTRQQ..........................CNVR FNSUQQ..........................FILUXM GETFQQ..........................FILF GETHQQ..........................HEAH GETUQQ..........................FILUXM GFNUQQ..........................FILUXM GHIEQQ..........................ERRE GHSEQQ..........................ERRE GHVEQQ..........................ERRE GROHQQ..........................MISHM GTUFQQ..........................FILF GTYUQQ..........................FILUXM HDRFQQ..........................ENTX6S HDRVQQ..........................ENTX6S HEAHQQ..........................HEAH INIEQQ..........................PASE INIFQQ..........................FILF INIUQQ..........................FILUXM INJEQQ..........................PASE INPFQQ..........................FILF INPUQQ..........................FILUXM INSLQQ..........................LSTL INUEQQ..........................PASE INUXQQ....... ...................PASE LECLQQ..........................LSTL LEDLQQ..........................LSTL LNDRQQ..........................RFAR LNEEQQ..........................ERRE LNERQQ..........................TNSR LNTEQQ..........................DEBE LOCKED..........................MISG6 LSLEQQ..........................PASE LSTLQQ..........................LSTL LTCLQQ..........................LSTL LTDLQQ..........................LSTL M10RQQ..........................UTLR MAXRQQ..........................RFAR MICEQQ..........................PASE MIN.............................SETS MIN8............................TIDGS MINRQQ..........................RFAR MISHQQ..........................MISHM MISOQQ..........................MISO MISYQQ..........................MISY MOVEL...........................MISG6 MOVER...........................MISG6 MOVESL..........................MISG6 MOVESR..........................MISG6 MP2RQQ..........................REAR6 MTBUQQ..........................MISG6 MULRQQ..........................REAR6 MULSQQ..........................SETS NECLQQ..........................LSTL NEDLQQ..........................LSTL NEGRQQ..........................REAR6 NEWFQQ..........................FILF NEWUQQ..........................PASUXM NILEQQ..........................PASE NXTUQQ..........................FILUXM ONESQQ..........................SETS OPNUQQ..........................FILUXM ORDFQQ..........................ORDF OUTFQQ..........................FILF OUTUQQ..........................FILUXM OVIEQQ..........................ERRE OVREQQ..........................ERRE OVWEQQ..........................ERRE PADFQQ..........................FILF PASEQQ..........................PASE PASUQQ..........................PASUXM PBAFQQ..........................FILF PBCFQQ..........................FILF PBFFQQ..........................FILF PBLFQQ..........................FILF PCCUQQ..........................FILUXM PCDEQQ..........................PASE PERUQQ..........................FILUXM PFNUQQ..........................FILUXM PLYRQQ..........................TNSR PLYUQQ..........................FILUXM PNUXQQ..........................ENTX6S POSLQQ..........................LSTL PPAFQQ..........................FILF PPEFQQ..........................FILF PPLFQQ..........................FILF PPMFQQ..........................FILF PPMUQQ..........................FILUXM PTUFQQ..........................FILF PTYUQQ..........................FILUXM PUTFQQ..........................FILF PUTUQQ..........................FILUXM RCIEQQ..........................PASE RCWEQQ..........................PASE REAC............................REAC RECEQQ..........................ENTX6S REFEQQ..........................ENTX6S REPEQQ..........................ENTX6S RESEQQ..........................ENTX6S RESFQQ..........................FILF REWFQQ..........................FILF RFARQQ..........................RFAR RIOFQQ..........................RIOF RNPEQQ..........................ERRE ROURQQ..........................CNVR RSIRQQ..........................RFAR RSRRQQ..........................RFAR RSTFQQ..........................STRF RTAFQQ..........................ORDF RTBFQQ..........................ORDF RTCFQQ...................... ....STRF RTIFQQ..........................ORDF RTJFQQ..........................ORDF RTLFQQ..........................FILF RTQFQQ..........................ORDF RTRFQQ..........................RIOF RTSFQQ..........................STRF RTTFQQ..........................STRF RTWFQQ..........................ORDF RTXFQQ..........................ORDF SADDOK..........................MISG6 SAOGQQ..........................MISG6 SCALQQ..........................LSTL SDZGQQ..........................MISG6 SEKFQQ..........................FILF SEKUQQ..........................FILUXM SELEQQ..........................PASE SEQLQQ..........................LSTL SETEQQ..........................PASE SETSQQ..........................SETS SINEQQ..........................ERRE SINRQQ..........................TNSR SMULOK..........................MISG6 SNELQQ..........................LSTL SNHRQQ..........................RFAR SOVEQQ..........................ERRE SOVGQQ..........................MISG6 SQRRQQ..........................TNSR SRTEQQ..........................ERRE SRTRQQ..........................TNSR STKBQQ..........................ENTX6S STKHQQ..........................ENTX6S STRFQQ..........................STRF SUBRQQ..........................REAR6 SUBSQQ..........................SETS TANEQQ..........................ERRE TANRQQ..........................RFAR TFNUQQ..........................PASUXM TICS............................TIDGS TIDGQQ..........................TIDGS TIME............................TIDGS TNHRQQ..........................RFAR TNSR............................TNSR TRAEQQ..........................DEBE TRNRQQ..........................CNVR TWOSQQ..........................SETS UADDOK..........................MISG6 UAOGQQ..........................MISG6 UDZGQQ..........................MISG6 UM46OK..........................UTLX UMULOK..........................MISG6 UNLOCK..........................MISG6 UTLR............................UTLR UTLXQQ..........................UTLX VASGQQ..........................MISG6 WEFUQQ..........................FILUXM WSBFQQ..........................FILF WTBFQQ..........................ORDF WTCFQQ..........................STRF WTIFQQ..........................ORDF WTLFQQ..........................FILF WTPFQQ..........................FILF WTRFQQ..........................RIOF WTSFQQ..........................STRF WTTFQQ..........................STRF WTWFQQ..........................ORDF ZERSQQ..........................SETS CNVR (Length 0313H bytes) CNVR FLTRQQ ROURQQ TRNRQQ CODC (Length 07C9H bytes) CODCQQ DEBCQQ DEICQQ DEJCQQ DEWCQQ DEXCQQ ENBCQQ ENICQQ ENWCQQ DEBE (Length 00FEH bytes) DEBEQQ ENTEQQ EXTEQQ LNTEQQ TRAEQQ ENTX6S (Length 01EBH bytes) BEGHQQ BEGXQQ CESXQQ CLNEQQ CRCXQQ CRDXQQ CSXEQQ CURHQQ DOSXQQ ENDHQQ ENDXQQ HDRFQQ HDRVQQ P NUXQQ RECEQQ REFEQQ REPEQQ RESEQQ STKBQQ STKHQQ ERRE (Length 0785H bytes) ASNEQQ CNVEQQ DZIEQQ DZREQQ DZWEQQ EMSEQQ ERREQQ EXPEQQ GHIEQQ GHSEQQ GHVEQQ LNEEQQ OVIEQQ OVREQQ OVWEQQ RNPEQQ  SINEQQ SOVEQQ SRTEQQ TANEQQ FILF (Length 1557H bytes) ASSFQQ  BUFFQQ CLDFQQ CLOFQQ EOFFQQ EOLFQQ ERCFQQ  FERFQQ FILFQQ GETFQQ GTUFQQ INIFQQ INPFQQ  NEWFQQ OUTFQQ PADFQQ PBAFQQ PBCFQQ PBFFQQ  PBLFQQ PPAFQQ PPEFQQ PPLFQQ PPMFQQ PTUFQQ  PUTFQQ RESFQQ REWFQQ RTLFQQ SEKFQQ WSBFQQ WTLFQQ WTPFQQ FILUXM (Length 11A7H bytes) CLDUQQ CLSUQQ ENDUQQ FILUQQ FLBUQQ FNSUQQ GETUQQ GFNUQQ GTYUQQ INIUQQ INPUQQ NXTUQQ OPNUQQ OUTUQQ PCCUQQ PERUQQ PFNUQQ PLYUQQ PPMUQQ PTYUQQ PUTUQQ SEKUQQ WEFUQQ HEAH (Length 01CDH bytes) ALLHQQ GETHQQ HEAHQQ LSTL (Length 0759H bytes) CONLQQ CPLLQQ CPSLQQ DELLQQ EQCLQQ EQDLQQ INSLQQ LECLQQ LEDLQQ LSTLQQ LTCLQQ LTDLQQ NECLQQ NEDLQQ POSLQQ SCALQQ SEQLQQ SNELQQ MISG6 (Length 0302H bytes) ASMGQQ ASNGQQ AVAGQQ  BRTEQQ CESGQQ CINSQQ CLSGQQ ERTEQQ FILLC  FILLSC LOCKED MOVEL MOVER MOVESL MOVESR  MTBUQQ SADDOK SAOGQQ SDZGQQ SMULOK SOVGQQ  UADDOK UAOGQQ UDZGQQ UMULOK UNLOCK VASGQQ MISHM (Length 00BDH bytes) CUTHQQ GROHQQ MISHQQ MISO (Length 0050H bytes) BEGOQQ  ENDOQQ MISOQQ MISY (Length 00F2H bytes) ENDYQQ FILKQQ MISYQQ ORDF (Length 0653H bytes) ORDFQQ RTAFQQ RTBFQQ RTIFQQ RTJFQQ   RTQFQQ RTWFQQ RTXFQQ WTBFQQ WTIFQQ WTWFQQ PASE (Length 065BH bytes) CSLEQQ DISEQQ INIEQQ INJEQQ INUEQQ  INUXQQ LSLEQQ MICEQQ NILEQQ PASEQQ PCDEQQ  RCIEQQ RCWEQQ SELEQQ SETEQQ PASUXM (Length 00EFH bytes) BUFUQQ  NEWUQQ PASUQQ TFNUQQ REAC (Length 0951H bytes) DERCQQ  ENRCQQ REAC REAR6 (Length 034AH bytes) ABSRQQ ADDRQQ CEQRQQ  CLERQQ CLTRQQ DIVRQQ MP2RQQ MULRQQ NEGRQQ  SUBRQQ RFAR (Length 0941H bytes) ACSRQQ AINRQQ ANNRQQ ASNRQQ AT2RQQ CSHRQQ LNDRQQ MAXRQQ MINRQQ RFARQQ RSIRQQ RSRRQQ SNHRQQ TANRQQ TNHRQQ RIOF (Length 0125H bytes) RIOFQQ RTRFQQ WTRFQQ SETS (Length 0586H bytes) ADDSQQ CEQSQQ CISSQQ CLESQQ CLTSQQ MIN MULSQQ ONESQQ  SETSQQ SUBSQQ TWOSQQ ZERSQQ STRF (Length 0399H bytes) RSTFQQ  RTCFQQ RTSFQQ RTTFQQ STRFQQ WTCFQQ WTSFQQ  WTTFQQ TIDGS (Length 01C4H bytes) DATE DIG2 MIN8  TICS TIDGQQ TIME TNSR (Length 0805H bytes) ATNRQQ COSRQQ EXPRQQ LNERQQ PLYRQQ SINRQQ SQRRQQ SRTRQQ TNSR UTLR (Length 02D6H bytes) DXPRQQ M10RQQ UTLR UTLX (Length 0143H bytes) UM46OK UTLXQQ MZ'3`V- 9oJ_vjrFOe#?Pj E  ^ /wDY0 %7Pk}ns  j"""#t'''()-|../V/w///A0P000001L1[1j1y11M2\2k239a/my|{Ut 1Jt Ia͊9SŒ#v֐.Xaɩv* !"L|'@YnYfkpug Ug xg g g Cg Yg ^g cg g g g g g g !g 5g Ig ]g qg 9            H # V d n   T \ p w |   :9:::::I:x:::=:::8::M:::8:::::m : : :f : : : ::(::V:p:gJ~mmmmmmmmmm1m@mOmUmrmjDhHw,ݾF~t F30~݋F3FVJVuӍf]FFF ~}#u FF{~2|o~}#u+~}2uF~}8uFFF;~}#u2~}1u)~}0uF ~}6uFFF~VV~2VV;V}}VV~~2ЉV~5vW ~|B##VV~1rF~rF~5vW V;VsA##NNVBVJ;VuVVFf].~U2#uE~U2P RڎS :c RڎS :O RڎS :; RڎS :' wr.$ RڎS :v(R^ӌڎSb:FҋV2R^ӌڎS :~u RڎS :R݌ڎS :~}t-~uJ RڎS :R݌ڎS : :RڎS : : f]* ~E~E~E~VU~E4~E%~VU~VU~Ev~2RGߌڎS:v:~Ev!f] |RC r6rPRR,g H蘗r剕rRvv3RR8&f]P"t~2RGߌڎS :R~2RGߌڎS:܋~2庀Rsf]"t :R6 :R RJ :ܺR1f]~Ev~u ~]ڎS:܋~U ~Uv6 :vf]h ~uT ~2T܃~t RvTBV<VV;V|VVRRVBVJ;Vuf]s@X F"~u_>u RTRR(RRE6bRR3RfR(V;V}F麐RR _V)V ~|RRv? ~|A j f]t6VBRRR? +RRR? $"6R3rf] Ftu+;|JRk܉V~=tVRC ~~V~VU VU FtGG0~GG8Ft~U^܉UT~UV~|1F~b u>TܗT+T܋VBVJ;Vuԋ~}|BM+T܉Mf]R3QRvf]~3RRRvf]c3RRRvf]H3RQRvf] -3RRRvjf]~s>uF>uFf] RR Rx F-vRRR? vtRRR? FtFf]|VRR Rx ~ʃRVRU2R? f]:VBRRR? vRVR#$":Rf] ~u~=}uUVEvv~5|uTr vRWq~=}t}u~5Tr vRWG~=}tu } uV~=} uV ~=E V܋^7~=u6V܀} tBRFvRVR$:~=}U2˜R%RR? F8~=EV܋V܁`V܀} s} 狕VF~狕#Vt'fxPVRR? F~ƅ VBV uvev~u\v~uP~5|u| u4Lv4Lf]ju܉V N~tB#$#뒢"u.u~t6~u:~U;v"UH;u&uV~V~U s~t F~u FRV2NQR? ~C ~u VR?UVVRR-Rx ~UVvƄ^U;t^VF;~ +FأTF@T܋FFVRT܁RFP? V~EvF~~~Vv4LVVu/u3Rx꾂 gRRR? >uRKv3R63R^'UR6:R&v>u u R5RRR? +R>t^>܀}uTUVv~uu RRRR? ~}U2˜R%RR? 7RU6>tUR>53>E .t3RYu>|J; ~ .t3R*݃>| ;J| b鹑>ꢈ>ꢉt ܢꡨܢܣܡ`ܣ硞ܢܣ(t ( ;,u .,;*u .*^&tk>rU%r+E6r序RcڎS:܋>rE"bE6ru>rE%&&tbW^g H=|=r^g H蘖r4LHH蘗狅狅rr`c &tF>rU$r!WR܌ڎS:܋>rEԡb2`>r eR>`܏|`܎`ܣ^ܺfR^`܁cR+`R Rx >`u`>`܀b u |``ܢbf]v"GRRR? Rv663RRR^g >tvRg Rg vR^g R^g >tGRڎS :6eR݌ڎS :RڎS : : RڎS :>uRڎS :6R݌ڎS :RڎS : :>u@& f] RF>^܋bV~ar~{s V2V~ArB~[sA#ʀ~0rB~:s@#€~_uB #V шVFtR^܃>R } RFVFtt~R܈ ҹtAN | ~gR4Ff]>^܋bvT~}0r}:r(~}Ar}Gr~}arT}gsN~UsD~=s#~2B~~U~=~^܋>^܋bvTuhRf]~=s ~2B~>^܋b~=~^܍f] dž>^܋bvT`;^|4^>^܋b鋶v:Tuc:Tu^á^;`~iR^~}"ujRRRBR? VFf].^;`~v>^܀b tb u`;^|^ߡ`;^}&t&VsFuu kR0Ff]~UϋvL2Q +R Rx FF~}~ʋF2~:tFVBV uϋFf]N3svRs >^܀b$t|^v3RshvVRsrulRW&F+ƆdƆb*b:dr&dVUv sVVVBVJ:bu~+uumRF2痋VFv3RJs~u>>^܋bvT~}+t}-u^܋~}+uB2V~}:t ~&t~&t^v3Rsb~$uFFvVRZsYVR9F̋~̀}u=u|r| sUV$~u sVRṼR"nRnRV>^܀b'u vF@~EvVR~t"VRfRts fVpRqR rR~t~u ~u~u sRrdtFV2 m~|B~}A#ʈNFutR-C~}+u@((4F(~|*,~2a| uRChvaH=u vR"H蘗牍BH`RhR~|J;F~F~|J;F~FFR~|BRjFR~|BR~|@ .963NRC >&>ꉕL꣔>u wRW6&󥡔꣖ꗋL꾖4Lft*,FR2RER2R~}F~|8}GRvpmjg~x3RS~2RGߌڎS : :5Fv3RzsvVRr xRVRuFʍVRR7~̋l܉U RڎS :V2R^όڎS :RڎS :R^όڎSg:F΍VRṼR04V2|A syRY~E~ʋV̉_\v3Rs$>^܀b$uBVFta^v3RusvVRFFt:U'Rs~}@U(Rs~|@FFuzRt꣞{R꣞>r{RlER~|BRnmRNe*wr.Y.======@=jCtwz"0=@CFFFZxNQ+Ftf~uF2痋VL~u~|BʋF2痈)~u#F2P F2痋VK~&u?~(u;u)~)u#>r{R<롞;vvRs>^܀b,u^\f]蝸tZܢXܡZ9܉^F܉܌^܌ܡZܢXܡܣ\ܿ088@3sURs0>tkRdܘ#tzR>X_uU+Z_>^܋bVcVtU6;r>܋2R܋u>R܋=ЋR܃>Rr|Z >R܋Z܀>Zt;>ZNu>܀}CuZX6܋>Z܁狕$Rj#tZ~{u?^U3r1`;^|^܋>^܀a}uUU3Rsɀ~(uQ~*uK^U3r<`;^|^܋>^܀a*ub)u^~UU3Rvsj뾀~!u^ܡ`;^| U6`@^Gt^9~$u|RU %~'t~"uUjZZ>F>^܀b0uc2RRR s^U69>^܀b#uBVFtU6U6>^܀b.u3c:s,c0r%U6>܀=u~R ZU6>^܀b.u*6܀<t!c)tc.tUVS~RZ>^܀bEtbeu/U6->^܀b-tb+uU6ZU6]>܀=t^R~)rF~?s@R>R܋:Vu!:Vu^ܗZR>R|ƃ>R|KR>R:Vu Z R܃>R|܃>R|~ u (E R93^ܣB@DH蘣F>XuBh;\ܹtA#ʑ܀>Zu 6r hܣܡ8;0t>X_utR>X_u@f]ֳvvVR0 rV2…RhFVVFf]蛳vvVR rV2…R-FVVFf]`vvVRP rV2…RFVVF f]%vvVR rV2…RFVVFf]~uV2…RFVډVFf]跲~=t %sf]薲~=rW~VFf]p~=Zr0~=9uA ~2Bf]?~=1sZ~=Au9 ~2Jf] V;VwAF;FwB#ыF4#‹V;VAV;VNA#N#N ȈNFf]跱V;VsAF4#;V}A#N ȈNFf]胱\܉V~}uUVF~}uUtANFf]B~}uU VVVFf]~}uB#U VFf]~}uB#U VFf]հ~}uB#U VFf]貰~} rB}sA#;>pܺuB ;>rܹuA ʈN} u uQFFf]_~}uUV~}uUV~}uB}uA#M ʀ}uB#U ;>ܹuA ;>~uB шVFf]v;jܺtB~}uA}s@#}sA# stFFtFFFf]x~~~}uUv~Uvmj;Fu ~\n;Fu ~Kt;Fu ~:~} r}rl;Fu ~~}u UvRf]ҮVVVBBRC FV~~=Vf]蛮~=t4Lf]~v~=2R~BR~BR2R? f]E>uRC ~~>E ~=E~=E~=j܉~=U~=VU~=Ef]ϭ~=U5V#Fs ~ R ~=U ~f]臭RC ~~=E f]b~5T V4LVf]=~2RC ~~t~uF~uF~uF~=d܈U~=VU~=܉U~܍f]ɬ~u VRRu~u VRRb VRRU~VU~Ev~E ~E ~E~EVVFf]N~U ;ju"}rB}rA:Ѹt@r~E+EV~EU£V6VܺR3RSFFf]~U V~t>~;jܹuA2Qu ~u us~U V ~UV뼺RZދFf]} VRR/~E ~E ~U~U~U~U~U ~U ~U ~U ~U~U~VUVRR~UVvtT~UVUT U VVFf]תV R,~Ef]蹪F~t~Us ~F ~UVۋFf]VF%‰FFf]Wv_=r vFVVFf]"~U5V\#Fs V Rb~j܉~E~E f]ީ>r RVFf]谩 VRRb~EVRRM~UVvVTVTVT ~Ff]_bܘ=}Bdܘ=}9Rbܘ@bܡbܘDžFtdܘ@dܡdܘDžRۺRٍf]bܘ=|7RbܘbFt dܘd6\6Rۍf]襨 bܘF~|eVVF㣤>tTu+>T} >E >E뽋VJVu>u h܉V>=u h܉V >VFf]*FF~~U~Sւ t V2BV֋VBVu׍VRR Rx VRFԋVԉV;huReڋFf]舧 FX2R RVR sN>X_u%uR!~tFX%F~L:Xu1V2R RVRN욗 sFX܋V“RVBV uV2R RNQ sT~tNZ2R QFPV욗 s,v RhQ rX2R RhR stFuRCFOTF~`:VuT܋VBVuT܁¢R ءZܢXܢZ܋FXFtR؍f] $X:Ft9VRg VRV2Rg vvܹ ;>zs2f]谥$X:Ft9VRg VRV2Rg vvܹ ;>zs蜥f]b$X:FtM:FtHVRg VRV2Rg VRV2Rg vvڹ ;>zs:f]$X:Fta:Ft\:FtWVRg VRV2Rg VRV2Rg VRV2Rg vvع ;>zsĤ f]芤X2R RVR rE>X_t>X܈V~u>Xt >X_t~u>Xt >X_t룍f] Uv ;>zs.qR֍f] $VRg VRV2Rg VRV2Rg vڹ ;>zsf]蛣3RRR66ef]耣~}t}u;~}t vu~}t vudܘ狕8;Vu~EBvF@R^эf]>utV>tE܉V~}t}t}t}u~U 2#uUv>~EEFuUdܘ8GRЍf]舢 >ui tV2RRR >r RFFFFFvR[ЋVFf]  vvvvva܍f] ߡvv3RRRCFFf]辡vv3RRR"܍f]蠡RvFFf]胡RvFFf]fvv3RRRFFf]Evv3RRR܍f]'vvv3RRFFf]vvv3RRf܍f]SRv3RRRG܍f]ŠRvR3RR%FFf]蠠PRvRR3R܍f]{PRvPRR3R܍f]RRvvzPv3RFFf]( <R6vV2N2QV2N2Q6vRG주f] ؟ ~UrE~5rR~u 5 P{~ERF~u 2V5sR~} 53RRR=FRvVRP)~E~} 2yyJV~|tFFT܁>T} TRR~} 2+T܉V~rFv~} >TuuuR܋5VBVJ;Vuvf]褞 ~uFOFNFtFFv~2M2QU2M2QvvIf]CVR3RRRRFFf]%VR3RRRR܍f] TRv3RRRf]RRvvPmPf]ȝ~5T s}tUV ~uF~=}uFFf]~RRvP~=}uPv3RPRPv3RF~=uE =u1 RR\PRRPPvv3RPv3RvFVVFf]~}tuRR~~E~}t uTUf]豜>rXRPRf]菜~5HPR~u Paf]d~u3Rv~E~u PFFf]/v~}u~}uR3RFFf] R~}uR~}u3RQRJPR3R?FFf]躛'RvP3RPR3RFFf]苛 ~u RK~t~U~5Vo=uB#Vsh~} r3Rw~EG(R R~+u PQP~uR3R}P3R9PR3Rk~E~E~UsRRRR"RRRR vPR~uR5P3R~Ur5HPR~u PUv~E~t܉~;t }U V~;t }U Vn܉V~5#=uB~5V=uB#VrV2eU!R~EkU~E_U R~EOU'R|~E?:RU(RhPUPg~E"U~E~.VF~=}u~ V~;puF~=}uF~=} r\}sV~'t ~(tF~=} uF2~5s&~u3RRg~Ev3RRTFF~5s6~'sF~=U sF~=U rFFF~u R~uURvv~}uU}Rvvh~|M~|)~u~=}UVF~CVv~uvv3RK~E~tR~uN~ER~u;~E~ĝR^F~Ur5~Ur+FDRVRRR~un~ue%RVRRR~u!~u~Eb~(uBVFtF'~uU~`vvJU~~vvCFt9R~uU~E~'r~+r~u ~t܉f]蓔 F~u~UsU V~u uuP3RFV;VsVV~Us3UV~t%~u F~UVV;VsVV ~UVxVRcFFf] F~U2&FMFEF=F5F-F%~U ;ju }}}}~U ;jt}sFF~}}FFF~UVv!sF~UV~U sF ~uF~uPv3R߉Fr~uUFd~}UBBVJ6|~uP3R߉F1/wr.CYBYBaBaBBBiBqBByBBCnt;>tt }t*Fu!vVRVRvCF~}uU V~Us9~t~u,j;FuB2R~u vvrR~uu~uuj;FuRRRRRRRRvPR~uRv3RkPRvPRv3RS~t~u v|FPRvRv3R)~Ef]v݉Fv݉F~}uKv|uB;>uv;FuVV~Uv:TtAru{݉F~uo݉FV;VuAN;jul;Ftl;Fuj;Fu RF~}uE E 4#FF~}u E 4#FF~}uav|uXU s T sFD~U s:vT s0uTv|;UuA~E D 4#U T 4#ˆF~} u%v| u;>ܺuB;6ܹuA NN~} u ~} t~} u ~} uFVVFf]{~UrRv ܉Fl;Fu~;ju1~}uJv4|u?Us8Tr1;6t+VRRߋ~E~=U~U~V~} uEv<} u:V~us%V RvP݋~} E~} Evr~;nu1E V6xܺR~V RR݋~} V܈U~5]s;~U s1U rv4tT};Uw 6z܋~u 2R~f]~5;jup;Fu }Rv3R vvbv~5r R~V~U~E~}uvW3R3R f]菋~5|td|u~V~5sR"Ra~8~5| uR*RD~~5| uR2R'~f]FtFF~U2d~UV~t>~UsF+~uvu v#Pvvvv~UVC~U sU;lu~;ttx;ntr}tjWFF~}UVUVV;VrDVV~uvvvPvvvvvvv~։FVBVJ;VuFtFt~}u U ;jt.uFF>r%Fu 63R.FFu v裺~} uF~} uFv=uFvމFu-Ft'=RvvRPvvvP3R6*IR6vvPRvvPR3R Ft7dܘ=}Fu&R:R3R3R>6vRP;R>R3R3R6vRZP~u$~U 2Rk1/wr.M'LMMM'LM'LM'LMMK=KM%Mf] VsR>\܋U:dtvf](@F~t~;luFu vv~u~=} r R蜺v݋VVFf]·~53RF~=uv~Ur RRvr݋~U VVRًFf]zVRFj;FuB2Rvvs RVVVVFf]1  ~5֋~}uB#Ѓ}uA#s0u3RR~EFt R~uR~E3s>Xt >XtR3RFv΋~=}tRaRR~=ut u DF~5T s WFFv~53Rv~=}U ;juFF~5T sWvF1~=uىF~=u=u VRJӣvFRvvv3R9FvRvR~u~=}uPv3RPv3RFVR׋~=UsU r FtR~5Tv`RR߀>Xu>ZuX>Xu}̋~5)FR~uRvv6PR3RhPv3R^~E~5r~E~E>Xtvv~=}t Rl3R.ۋ~=Ubܘ牕6ۣ\܀>Xu>\܀}u U ~;tR3RLl>\܋U~~u6\t t4P~E>\܋} U s FtR賶3RU >XtEv~;~uv܉~5| tUsT~5sG~uRRB~EFt R~uRP~E~u3RR~EtMRBRRRFt" R~uRPnRP~up~ER~u5 P~E~E~=}tU sGRFR3R3RFt ~uR~u:Pt~UsR[~u6|5tP ~E~5TFtR״k~5| u'T R~u5HP ~E~E9~5| u'T R~u5P~E~ER軴 ~Us FuR聴f]~5| r|sW3RRRlf]薁~5mЋ>\܀}uB#s,} t} u>\܋U~UR6\oߋ~Ef]A~5|u@t| uEv~5t6P~=u uP~E~5TVv~5ߋ~E~5| uE~5T t RutPߋ~E~E~5Tf]蓀 ~=}tEFdܘFV;V|/VV~狕8~;uA ܑ܋VBVJ;VuuR~5DƅYtrދ~E~5tT vRvWf]>\܀}t}u} u>\܀}uJU 2#uAt:VR3Raы~\܉vFuR4vRRvHFu8F~Ur R)v.Ճ~t vv~5svW> ~E<RXuh;\u R薱R荱ۍVR3RhvԋVVFf]~3RR3RFFf]z~R3R3RFFf]Z~3RR3RaFFf]:~RR3RCFFf]~ ~U r ~=U sR豰~}UBV~=}UBVV;VsJVt>RJRRRߋ~u3RRVP3R#vݺnRNPHVVFf]{} vF~5xFV;VsVVV~=}Uvt;TrT;UsitbRNQRRu޺R~uPދ~}u܋~}uu܋~5P`ܺ RPvۋ~EFf]|JRvvvUPvvvHPv3Rڍf] | ~5viv܋~5(ˋ~~5| sIRu~uV\P3R?H~5|sJRu~uV3P3R ~58s%U~u3RvtRv5VP*~=}tvWvOF~5FU~u3R~uRvV;VsTIQ~uRR9P3RPR3RxًVBB;Vs&U~uR Ruv3PvV+VRR~=}t}u:FJ~=}uuh#tFKv~uvt5P3RRȭVR͍VR͍f]z~u3~}f]zR腭RR֋~}5zЍf]zv~}53Rf]wz~=5|u WܣVV6Vً~=u]ٍf]:z~Us$R~UR3R3Rrۋ~}=u$!R~URR3RMv~unf]yF~}5ȉF~}V~Cu ~Us~Au~=}tF ~IuB~WuA ʋ~}5N=uB#V#Vs V2BV~}5Mȋ~#Es~}=U sFTFSF~}=} uBWV=rB#Vs~}u3RR~؋~E~ u R肫FI~VUv}Ff]x ~uʋ~E>Xtt⿋\܉VFt^7~E 1~E~}=}t;>~um~vUt~EFuR~}=u~֋~E~}=UsRɪ>XuO~}=;~uv܉>XtB~}tA ʈNV~=E~}=uSFt |܉V~܉V~u3R5ɋ~}=V~}5~=}uuR橡|;Fut~;Fu'u u~}Ru R薩R荩Ff]wRRRр>Xu>Zt>6j3RF&VRR|Ȁ>Xu~j܉~E vֺPR~uRR3RԍVRȍf]zv~54~ EsRRQЍf]Kvu>VRRR3R3R}׋~U2VvՋVR@Pv׋VRL͉F~UR3RNj~}VVE ~};ht}t~uˋ~U F~uv4LVR~}u^7~EvRzs ~uPԋ~}Au"~}uNԋ~}UsR ~}u׋~}=U2RRVR~ s(vVRVRhŋ~}5ĉFvQvKԋ~URƍf]t~}u U-~E~uv3Rs#~uPӺR~}uP\4~}RuVVPR~}u6V5LP3R/v)v#~URKƍf]t~} t}uxFv%F~}uB2RR6z~U~5L~}uX^FUd\^FUYՋ~=E~=t܉U~}tF`^FURr R,U~u ^7FUvUVRVRYŋ^7F~=}u@t3UV~U ;nܹuA}uB#с}uA#ʑuR薥~uԍVR|~}t}t }t~}uFWFRU~}tB2RsR6RRn΋~}uRdRR3RC~==U r R~}uRhR3R3RkRlRR3RWӋ~=u Ӌ~=E~=t܉p^FF~}t}uFWFRU~RuBRFFu~==U s~RuU2UVR3R%Ë~==U~~5g݉F~=u6|vЋ~E~RuB^7F R~uvϋ~E^7vvzRtR3R3RN%)F^7vvSRxR3R3R'ҋ~=ut>tBV"RR9ˀ>XuBVFt~}t}u8~==U rR0FLRVR3R3Rы~=uYҋ~=Ef]*p^7F~V~l܉~E~}!t"~} tv*~UV~VRRiʀ>XuBVFu~}tUVv ۋ~E ~tvĉF~uv۶'(F~UrF~t'~uvB~uvdÉFvڋ~E VR`RRɀ>XtHvr1FVV~ER/΋~Evͽr v;F~ut u Fvv3R3R&v~}u%IR~uvR>P~uR3R~̺ R~uRGPvR΋~ER~uvRPR3Rˋ~E~UVVRYRRȀ>Xt%R~uvP:PR3Rlˋ~Evͼsv vF/vً~E ~} tBvV蓼#Fsv~}uOR|RR3Rv͋~u1ϋ~EIR~u3RRP~uR3RHˋ~}!t?vr5R~uv:Pˣv3RR3RR~}tB2R~} t R~u3RRPRˉFt$RRRRv̺nRlPfFt*RR3RRv̋~uvVκiR~u)ˍVR蘾f]`l~==U 2Vu褳F~r~t ~tR#Ƌ^pUvU~5U$URgUR~55 U~u UR=UR3~5=5R3R(]UURNU~=U5VM;jܺuB~=5V6;lܺuB V#Vs)~u~=U U ~=U U ~u URUR~=l܉3R3R~~56nܺR3RgںR3R3RFv6nܺR3RCڋ~=Us-vTs#U L ʉM ~=EJ~5vʺRR~=uR~PR3RP~uR3RNj~E~=l܉U[~==} r} t } t}~=UrQ;ju#Ru3R~6PR3RhNj~E&R~=u3R~PR3R@Nj~E~u ~=j܉ ~=l܉UF>Xu>\܀}t}t }tUv袻v1~~=5A~uB#s+~5Vwˋ~E~=E~=5T~=5T2RRR~vN䚗 s`~u ~U~~=5|uT~=5VRVRI~u ~=VU ~=VU ~=EU<U~ u'R/!FRrvF~5-RX‹~Vv~R> Fv[ȋ~==}u=v4|u2Ur+Ts$U rT rUrTrU;TtU&X~==uvvNj~==}U ;juFF~=uP~=uHP3RjFR~=uR5t~PPR~u~==}uPv3RPR3RPv3Rċ~E~u3RvƋ~ER~uv4t赺P:Pv3Rmċ~Ev~=53R3ROֺnR~uōVR~ uJR~u~=uv3RJR~=u~uv3R2>Xu,FvƺnR~uōVR莸RR>Xu>\܀}r }suUn\܉VR3҉F|RU.~=5;FtR蕘~=U5V6vF-:FtB#VrvsU~=U V WvPնV~=} U~=} =rUUV~=} U>~=} U2V=rVM2ʉN~ R蟶~=VU ~ =VRF~5P>\܀}uuU;B>\܋}U~=~=E>\uQË~=E,RF~5_UY$wr.qjjjjjjjjjmmoyqyqyqyqjjyqk%j4jIjIj{jlljjkjjjoqkFtRGf]Ad~Uv:TuAE VT;‰NuA#NN~uFt}Ut;TuA#NN~UV~UV~tf~t`~} u ~} t(~U v:T uAU;Tu@##FFv~u~u9~UV~UV딃~u ~uFuR f]Fc~uoʼnF~}5T~u3Ƌ~}UvT~}UvT~uܱsvPRvRR3Rf]b>\܀}uUV\܉V~UtRrVVMN~t ~U;Vu=>Xu33RR;>zsb4R >Xu覩R艼虩~} tFF>Xu?>\܀}t}u/>\܋U 2#t RȔ\܉V~UtωF>Xu>\܀}u } uUV~u R胔A~U t~U uR_UR6\v3RRyU~uv,ͨ~} t F~uv:vk~5fsqv~uv FVRg~U ;Vv)PQQQ+VRٿP~U +VRRR龺PR~u3RvPvRRǾy~5|uRvvtW1FVV~U ;Vv 3RFPR~u3Rv'PvR3RjPR~uvt 5iP3RLVRw~} t } t~~U;Vup~} uFTFS~UtA2Q~TuBRuF~uŮr~;nuvT;xu6xܺR:~~5ծ~U;xܹuA#sQPR R~uRXP3RR"PRR3Rd~UV~uRR~EB~=}uv;|tU;Tt Rّ~UVU~;VtRԑ4~~;Ut'}t;>~u~U;t ;~tR胑v~u3RRR蹼VR䰺RRF~UV~U;Vu~u>Xt ~tE>Xu~t)R=3RR;>zs{^(>Xu补f]7^ VR3R⯋~VFt8vݺRlv3RRRֺRFUvv[~U 2#t UVRm~}uVR믺MR6\U胿\LR6\ݻU~5tTV| u =~E&vPλP膼 R PvpP1~E~VVVFf]:]蔤~u3Rԋ~~}u ~=vT~=Us} rRÏ~=E f]\RVR3R3R$~uP׻f]\:VR R3Rx FFFRٶ>Zu8UVR:RRRe>XuUVRRRVV~Us`vTsVFU VȋT VƋV;V|Xt褢~t FuVRR⬋~܉FFt6F ~{uFVRAv3RNQ2~V R R~} VVR~U BR R? ~uVVAVR3RRv~E~U~FtRvvVR藬VVFf]VZ~E~}v|Vf]2Z v~uv.ƉF~}Ur R֌vHs^~}5sVVV܉VVVV;V|'VVv~}} ~5QVBVJ;VuJ~r R^;~}u v#VvVܹ2R~uvV܁2Rf]GY \܉V蚠R耳~}uBVFtCU su!ő3F ~u詬FFv~uP3R跥F~UVWĉF~rBz;FuA~;EVuB #V VWV/ Fs!R8ⴍVR3R.~UYVRv芩F跟>X:u譟lRuЉFR8FF VV~sFFt V;Vw R֊ FU~uG~u R踊8~U VUrUu~UsuvثF ~UVVBVJ;VuVRȩRR*>Xt+➋V;Vs~U rFu ~t FuR'v3s!~Vv~}UVJR豫F~VVRRѨ~VU ~VVVFf]V~E~}uR諉~}}vuVf]V~2V~| Fv~~5VBVJ;Vuf]{VFFVRR>Xu躝>Xu">܀=uR݈U6R薧>Xt>\܀}u6us U>\uM>\܋U;nu UU2RFy>\܀}ukU 2ua0RůVR3R3R͉FRv6nܺR3Rŋ~Us UU 2R~t RKFFFŜ>Xu~Us Fu~tFtRFUR3~u~n܉~Us 2U H~|FV RvR~U BRv? 6xvO~~=E܋VVFf]T~}>܋VFf]T~Uv;T}~Us~E~Ef]YT v<:sBvV<0rB#V~#UVvv2~EFtv~VVFf]S.>Xt>\܀}u#U 2u UXF 6\3RF>\܀}u;} u5}}u-RqVR3ROvl>\u3RHF>\܀}t }tVR3R~\܉vRv裚vxы~5;jܺuB#.sG~5,=uRRRR\RRRRG~uB蜴~E>\܀}uzuΡ>\܋U;nܹuA ;>ܺtB#s U$FEVRRJ>\܋U~>\܋U~U ~5輡sV R\܃Rڣ踙Z>\܀}t}u UF@>\܀}t~舙UmFv,F~u 2VUs!V;V|=uT vt;T t ;>tR謄~VVRvVBRv3Rx V;V~M AQNAQR? V R~VU h;\u RIR@͘VRRv7>Xt>Xt>Xt>XuER >Xu RR7%>Xu {RR#>XugRЃ]\>XuKVRR螢~j܉6܋V Rzr R蔃~E ~} rl܉ >Xt(VRRI~p܉F>܋2BV~ F0^FX^֌FFFFFFtdUsDvvvv֚ S~ĝ0S ^F~tFV)VދVVU@<.u UWFU(XuʕFRY>X5t譕vIF~Usl5T2RRQvҚ sPt;Fu~+U U 8~;lu} uE ~u RRPR隋~E Rv3R">Xu"VRRa~܉~E >XDt>XEun>XEuBV֔Rv3R͉FFt' R~u꫋~EVR R~E VR R~~U~V}>Xu UFm>Xu UGF]Z2RRR s-X2R RrR r RvF R}VRRZvwvʋ~5I~VVFf]vL ~;pt~;pt~u0~;ju }RW3R`~;ju }RW3RH~5v螾~5v蓾~9t~5~5ἈF3~=}u;>tv4uF~;ܹuANFu5Rn~~~~E~E~9uvo~܉f]KvzFX2RRR r>X7u >ZuuX܈V蟒v;Fvv vv~Ur(vTr=U2RRR~ rV2RRR rt;Fu ~7t~7u~U v#T U ~t~} u RJ}~;juH~uu vt R~E (~(u~vD } D ~vD } T K~u~u vt R~E *~(u~vD 3u D ~vD 3u T ~vvVR_VVFf]I>XuBV>XuB VVFtv FFu~=U2RRR r R|Fu~Usr;pu:U BRVRR? vvꚨ ^FVR~U BRR? .~u R~E ~U U ~;luRu{ Rv3RX2R RR rP>X8u >Zu?X܈Vv Fvvvv~UrvTr=U2RRR~蚗 rt;Fu ~s~8u~U v T U ~@u~U v3T U ~;ju4~u~u R~E ~u vt R~E D~u%~U ~;U s R_z ~U ~)U ~u vt R铋~E ~vv茯VR蒙VVFf]NGUFX2RRR rBX܈VUWFUvvv~ t~ u"~ uFF VVVVVV~UrvTr~9u5T2RRRv rj;Fu~U ~;U }AN~U ~;U sAN~U v;T uAN~ uBF4#€~ uB~ uA #N Ȁ~u@ #F 2E ~vvVR!~t܉VVFf]E bܘ狕VF~tMVVvRjR܃>R}BV>RuRYxFt ~UV ~UV뭋~2r&RC F~vRC F~v~~E~EVV~u bܘ牕Ft ~VU ~VUFf]D6FFf]D R3RR蟟>Xu,>܀}#t }#t}#uRwX6ʛ\܀>XtR1wh܉Vh;\t&>\܀}uUdܘ;8tFtFtZFtRwVRRЖ\܋Us RvRv\܉VFf]C~uTTT܉V~|;F~2;V|~~~~U ~~E VBVJ;Vuʍf]-C vߑ;jܺuBVtX2R RrR s RuMFt VRR衕 RC FVR~E ~U U~VU~E F~V~tav~u ~u͐sVVMN9v~u ~u uMsR#u~uR3R襎~E 뙺RRR&>XuCv~u 薺~E~tv~u~u ;sRtRRz~u~~UV~~VU~VU>Xtf]A~trv~uvv~uv~=}uIU u@} r:W豟~=u3RuM ;Ѹt@2P} uBRv f]AXRvRf]@(t$3RR;>zs@謜"3RR;>zs@舜f]@FBFv诠~;ttRHs>X8u~u臖F_R~uvN^R~uvX8t>X7u苇X7>X7t~t ^7vf]@R臍W3R3R÷Fv FaR~uv5ߏP3RR ەFFЕF^7vVR~5v3Ra^7~u~u9`Rv+RRCRaF>Xu >ZCu讆>XCuUcF^7v>Zu Rq腆肆^7~u~uRR螙>Xu׺`Rv誝>Xu >ZuA>Xt#R莌-~u,t%ܔF^7vRR3R3Rs^7vw~u~;juFdFbF FeFcFVV~}tUVv~uv3~u R VR ܋~U ;Vt~t vvv~u|v~uu蜋~}tX~tR}u RVR ܋~uT ;VtA~duBRvuN#Fs vvv臜~UV{fR3R0^7vTVR蔏f]\="uFoF~}t}E ~}VU ~}VU>Xu@XRv̛vvg:R^7vv`Rv褛^7v>X ucR]쒉FXRvx^7vvkR/R?>X/uݺRT^7vrvv^7v^уF>X4u6>Zu/3R趃6vF6j艪F~ދVF\F>\܀}uu!Rn:RR>X:uc5>\܋U:dt} u">\܋U u} t} t }} r#Rn\܉VR]>Xt/>X t($Rnn3R;>zs;ZRr"F)R.R>X)uFgFh豂FFt ~~U~u쉉Fv:F~Ur/vYFIRveP~uv3Rvl~E~Ur/v FIRv,P~uv3R軘v3~E~Us$vTs} uj;Ft ~guVR3R3~v vvv胚v}~gu)R~u~uv3R讗V)R~u~uv3R萗Vܺ_R6VvVR1~uv孋~uv٭:RvIRv1P~uv3R~Urvt|u nRu\~UVU谏FXRv<^7vv2^7vR~VU~Us u 芘V vVv6Vv蔗Pvv)Ft3R%Fj;Fu>.t7F~u=u vuFIRvGPvPv3RՖVRVRf]8>X3uQ3RRF~Udܘ;8u [RWɖ\Rv轖~E t&Rk>XVuR@k`R~=u>XTuBVFt RkRk|>Xt>Xu63RRQF~U sFtEV ~E V(Rj)~}tFtEV ~EV)Rdj`R6V\f]7~tF~U~U~Us%UV~tv~u ~UV ~UV봍f]A7X2R RR s RlF>Xt>Xuc>\܀}t>ZuR3RR;F~E ~Us,Ri~ERĐ~U s ZRW YRv V t7DR686Xt>\܀}t}t }t}uS>\܀}u.} u(}}u -RhU>\u3R׉F6\܋>\܀}tBR׉Fh;\u /Rh0RhU>Xt >XtR5(V>Xu@((tFF|vvv/>Xt>X/uR.h>X/t>Xu |UKRv؏X:FuF(RFt|>X*t~.FUvaRvvv>Xu>Zu Rwg:|>Xu30|슉F`Rvxvvvvvgvv vv~>X#t{FRR3R荴Fvۨ~=}t*Rg:RR`{3R⊋~5TbܘΖ扔tTVuu蓢F~~UFt~EU~=uV:RR胎69܀>X:u4{X#vvv}VVU~=u3R譊VRЅ>Xt>X t>X'uU'>X3t>XTt>XUt>XVuU`>X%uUOS(t'3R3RR;>zsX3蝋%3R3RR ;>zs13vf]2 >Xt'>Xt dܘ=t>ft >ft∉Fdܘ狽85Ͽ| qRPѐ>fu&oR6:RrRR3R3R=>ftuoR6:肐RRR3R芓6l3R[F~E v葐Pp>:}u 舑6pܺR/F~3RR菟~E~E =R~uR踐vPΐ>:R蟠PR诓_RSPv苐oR6:ď>Xu1RGddܘ狽8Ut-t&R R3RR裒dܘ狽8u 軐dܘ 狽8}t`8tY<R}uR68臆P6<PR$R3RRD6APdܘ狽8}uRג蝒Udܘ3Rd=|>tG>:6uBrMR6贎>}u =>E벀>fuA>t:R(R@P3RщFVRSR0R3R3Rm >XuU3RRUvdܘ狕㋽8U UdܘR38tR4R3RR荑dܘ狽8UttR8R3RR]dܘ=|WR8譍rR3RpR66L?dܘ狅㣢܃|8E=|dܘXr2RaR_vdܘ=| RR؈*>Xu 3Ra)v>X_u3R3RRRR6<%f].dܘ#t8t譜~}E~Ru܍f]q.VRR#~E~E~VU~E~E VRR~uD܋VBBU ~U U VR6ܺRaVVFf]->Xt#>Zu *u'uFt3ulRݥ>Xu9R7`RR襉R芇t>XGr>XTr 6RC`X2痋TrFu.X2痋UrFtX2痋X#t5R_X2痋V 㣨>XKt >XJt[t0VtlR>Xu 9t㣬lRRRY>Xt)tf],3RRR6@6>qf],>Xt)>Zu"X2R RhR r 7R*_s>XuBVFf]<, FFvr 8R^yVR~~t ;~ ~[s~r5vR~uB2R~U~U~U~uVV ~VU VV~u >XuXRR!>Xur>XtCrFf]b+vs~F:R^vFFf])+ >\܀}sB}rA#ʋWNz6\܉Fy F#F4#F#s \܉VXGu R[]Ff]*~} uF,~} uF~} uF ~uiFFf]H* RvvP旋~Ef]$*~}u3RF}F~E ~}VU~VU~}UvT~uxsvvv}f])RRdܘ=|RRRF>Xtp>X+t >X,t}>X,uBVp>XuVR{Fu ~p <R\F~UVvvRcF~E܋~VUR FFpFF>X0u FX4>XXu FXW>XWu F$p>X4uFp^7 F2@PcFU~uBRdF~uVRR9{~VU~VU ~VU~u$~}u}uW~E ~E v?~E ~uVV ~VUVVEFuu ~=VVVvvsUUvVRfz;RRX>Xt%oFtR蟁URoF^73RRdܘ=}>fu 㣨>ZSuZG>ZGuB>fuA ʋt@ ~E~Us Ft VRRy VRRyFt VRRy VRRy~Us Ftmv3RyF~E܋v|~} u uu~}r@t%~E Uv,~uVV ~VU~E~U~VU~E ~EHEu)Fuu>ZFt>ftFu8t0VRRx~}E܋U~}U~EVVFf]%F>X+t >X,tX>X+uFFl>\܋U:VtUsU:dtu~lR{~uT bܘ牕T d牕~UV~t,~U;Vt!~}u ܉UF܋~UV΀>Xt>Xt>Xu @RWv!>ZFuERWWUvVRKr U~uBR3RF~V~VVRVRV2BRRR~E FtRR~E FtRR呣  RRՑ܋~}u}} uRu ~賑~Edܘ狕~U ~Ut>ZGtARV~Ut}u}uBRV~Uu>ZGu~E=|CR[V$FRRVVRR7v>:~~Ev4RG}>XFt>fuMu(bܘ狕~}U dܘ狕~}U R z>fuB~U&~Evv5~}tBdܘX>XFt>XGt>XSum>fu GRwUS>XFtL~UU~Uʁt*M>fuHR>U>fut\R)URVyiRD|VVFf]5"~u:=r ~UR`of]"~URRt~UV~M~MvLM EvLM NMEr$~}~u~uP3R n~E~}u~UvT~UvtT~UvTf]e! R3RRB;>zsl!y~F>Xuz^7RF^7VR3R$F~ VU~t'~}uUV~VU3RVRisӺRRR{>Xuh>X%t^h>Xu8>Zt>Zu*ۉF>Xug^7RRVF>\܀}r} st~gIR Sj܉VRR7|RmzUU~uB2RVRJmFVRv3RRܺRyvvvVRoF~ VFtJRWRRyVV~t~} uVU ~UVRRR~z>Xu>Zt>Zuf>Xt >XtY~VU~E~ut܉VUR Ff]&>\܀}s0t)}r} rKRQn܉V\܉VLfE>Xt>Ztb܈Vudܢbf^73RrFFb܍VRR]qF~t3VRRGq~VU~VUF~=VVRpNjV~UVV6uX2RRHR rtDVRRp~E V R3~ERw~u un~EVV9NRPj܉V>Xu%e>Xueg֋~=E~=URoFf] veF~}t.VRR7p~VU vVRVRmVVVVFf]AvlrMROx܉V~}u u蚕Vܡz;Fu>VrOROv6VsqFFf]3RP ;>zs4u~>XuB>XDuA ʀ>XEuB шVFtH>XuVR R9ocF->XEu VR Ro VR RocRCvF>XuNRNj܉V>Xth;\tZ2RRZR sAFt;VRRn~UF㗋VU~ 6ܹh܉Vh;\u Ft ch;\t >\܀}r UjF\܉Vb>XuB>XuA ʈNFtRWuv7jsrFt]UvFVV>Xu0bU~uF~VUVVRRRvɋ~uisQRM FuPRM7v;Fu/Ft)VRRm~n܉U~E lRݒ~EFtRtv3j~M>XBuaFuPRFMF>X!uBVFta>X1taRtFaVRRl~VU~VU ~E ~E~E ~E FtYVRRl~UV~E W~E~U ;juE~ERsRs U~E~uVV ~VUVVRRRkt>Xt >XtRRsRKsvv3R]F~VU~Us;}U ;jt;lu)n;Fu!~u|uE ~E ~x܉U~U s~sRRrKVV~~U~UVV;VusFtSRvK^7j܉VT>X-u\_VRR?k3RoUv3Rv~E~VU ~~U bܘ狕~U3R?oR0r>X&uS_RrVRRjUw~E~VU~}}s}rTRJ>z܋U~U>X$uU-_RqVRR{jvv3R~E~u豃~E~E ~sURSJ~;FttVR7J\܉V^>X_tFtWRIUFFt~VU! VVVVFf]>Xt6>Xu Rp$8;0uYRI^7u R nF>}UVh;FueRIIj܉VV;Vt ;htfRHV;VtAvNEe#FshR I>}VU>Esf]13R^ ;>zs=n>X"u3>fugRHU]R3R5щFRRxp>Xu3]>X0uz)]vVRZs^ Ro`ΉF~Ur WykiRgHVRRLh~~U~U ~U~j܉VRg~VU>>Xt>X2u>\vVRs R)oUVRR;~U>XtU?>X4t`\vR3R VVtjRGvRFUVR3RFU~ui~U VVVtVtjRYGVudܘ=|>funVuu FtlRFVVVu>ftFFvvXgF~E VR~Rvk v3R-gFVu!>ft~} uBRu 脁~EVtaV t?~E 3RRZ~E=R~uR~u iP~uhPyq ~U~UFtmRE~VU~=VVReU&>Xu[>XAtnZt[RE>fudRE>\܀}uU:duucREv=>\܀} u UtcREv\܉VZv~U U~UVUVRRRm>Xt >Xt*>XtY~}t^R+ERR`ncv~uS~PVRfP~}uR9_PRE^PR^PRp^F~UVRRl>XuX>XuAY;YVRB~}t_RDRRmf3ROh~Ubܘ牕6h\܀>Xu.>\܀}u$U ;Vuvu R]F>\܋UV`R*D3RXhX>Xt>X tbR DvcR%kɉFvv~Ur aRC2v}FvB`r =Rvv~u vfP3Rnv_s6F=RvR~} 2R3RnvRR\FVV~sFVT܁>T} TRRV+T܉V~rF=Rvv~} >T܋E2M2QE2R܋ 2QmvvRO\FVBVJ;VtbvdVRaU>XuX2RRhR r >X_touRnRg~f]~~Uvtt ~}E ~}E~}}u)W~}RRˋ~}UU~}}t}u;~UR~}RRSˋ~}UU~Uvtf]>X[tV>\}uunRlARRjjvRR F>\܁} t^uWuoR@VF~tVVMN~uF ~VU>\܋U ~}U >\܋UVtE[URRRh>Xt1~t(~RljF~=VUA~U VUv3RiF~tG~tA~=V~VUVR`tv4LVR` ~U V볃~t!pR@~t~=j܉VR_~tqR?RRg>XuX[hTDf]  >XZtfVR3R_u~UF%TRRUg>Xu*TlR؄~E Rf~} uR@?~E RvfYRofvVRs~V~VsR?RAf3Rb>Xtv3Rߋ~E ~E|S3RcR f4%Pbv6vv;F>X_t>Xt>Xu܀>Xu/S~E ReRe~UV~t\~RbF>t b:t ~Rţ>j܉uR>v4L~~U V랡4%PDbEf]3 ^7Rvܣ:>fu >\܋V^7VRrvR=R;~:>:Vv^76:ܺRVa>:E f]  >X]tQfU3RRRRe>Xt 3RaQv3Rޣ3RQaVF~tc~R" aF|;Ft~;Fu3~u ~E  ~U ~U |;FuVV~U Vj>X\t(QRc>\܀}uuwRy<R:>\܋UVf} t@U2RD>\܋U >:}U ~u~R{ÉF~=V~V~E~}u"UU3R~u v~E/~}t}u ~UU~E~V~U Vi%PX>X^uCPfU3Rw>Xuv3RRڡ㣀%tAR0;xRB;RV9R`bf]Z~2BVR~2`+Q Rx F3R~~U2~~M2Q~~U2~~M2Q~~U2~~M2Q~~U2~~M2QeF~~= tpf]Ft UUdܘ@FUЋF牕8RRvR3RR!4R~R4hRRY>h܋Eܺ RC ܺ RC ܺRC ܋>>EVNSNhܣ\‰FjRRY~j܉FlRRY~l܉FnRRhY~n܉FpR RNY~p܉lR~|VRR0Y~j܉U~E~E F>XuMerF~sVRRX~EVRRX~VU~VU ~E~E~E~E~VVBV%uU>Xt UFMRR]t>tERR]v܋>vE >vEPRR]xܺRRu]zܺRRg]ܡh;ztA;t;>zE >zE >z܋}ER3RQV6z3RY>܉ER RW>܋h܉URRW>E܃RRW>܋U44t܉U EE>Xt UURR\|ܺRR\~ܺRR\܋>܋|U >tVE v4L6r^g 6r^g r4LR^g g >܋E |>RڎS : :L:<(RRR>R:RrdP 󤍾\ RR:Q 8RR:Q 46RR:Q 8 RR:Q 8. RR:Q 6RR:Q 6RR:R 6RR:Q 6RR:Q 8 RR:Q RR:Q 88 RR:Q 8FRR:R 4$ g t@..uh󥺀R`RR3RR/R`RdR3RR/vR`RR3RR.URU>R3RaPRcsRlaR R_GRRR`ER2R`FR2R`^`R(R/ II=R3RRWBRWP3R_(2)Q`+Q Rx F=RVRR~)2⋋*2Q+2⋋,2Q&_F~( u=RRRVR3R^6n3R+T>E>E >VU RpRX~UUU>t5>UV~t~=t4LVR,S>Ečf]yg RPRR,g vR R3R,g R6R3R,g 3Rdܘ=|>X_t R&>X_tyR23rgGf][2.Cju!܋_ݍFjGl_npU]F;jrjU؎v ~Ns]U؎v ~NNO]U؎~ NFs]UF؋v F ~Ns] UF؋v F ~NNO] UF ~ NFs]UF FnFr@]UF fnFr@]UF FnFp~t@]UF nnFp~t@]U^@%]U^];>rr;>vs E;vA؎X>ju[X&j.lnp&xdg XX[PS(g XX[PSg XX[PSg XX[PSg Uvn3&VE&8uC]Uvn3&VE&8| C]Uvnǎ&FE&C]&CGZ^++;&zr&CCGGVRRVP Uv ;vwvN ,r3]U^Ӌ^~ vn &FE< t<t &C3 2ڋ+щ] S2FF2^2s-+ x =r[ty [`FN[2ˀÀЀĀsBuuFu ;uV~ ߈^ ܀wU ^VF u tA3ɋvF*s ن߉^ߓ֊2㜴 2 tGrvf% ĈFr֊2ۀtЀ ˀ uy%*̊Ês+VuBuus Ft\~ x)ur:ފԀ t-@uu؀ ~^F]Ë]+ێ]]X[SPg ]X[SPg U ^VF t t'N2FSQRQPXsBZXsBZXs Ft yFuӊՊߊ!U ^VF uo uS3Ҋ߹ FUnVW+s_^] yFuӊ֊܀g܋G twG_ܸO;O u O;OuY_X[^ZWQ3ʎu RVSP ˋ܋O;O uϋO;OuǸU^Ø;uF ,pF ^F ]]X[SPg UFt ~5R:I~=U s3U$r,Ur%}uU2#uW6 :~5 RJ :~5:~5Tf]U>ftUfR>fuj>ht UhR3RVf]Uf]Uf]UFvvzf]U ^ڎ‰^FV+v€V~s ~rFV;Vs vN^&Vvvzf]Uf]UVBVv;tw>tv+t;wFud>t@t ;Fst1tBBVV>tFFt;Fv +F>tnt@@tv;tuO>uFK>t6 vt>u VBBR+v;turtsFf]UR v F~s~uPg <g - Ff]UR - f]URVvR ~U?s&"RVLR 2#t~VU~E~E?~U2 ҹuANFf]UvR:r~E@~}mu ~Em~Em~}mu~E~Ef~Ur ~}uS!RVLR 2>u~}t~U\~UB>tB>tA#ʋ~M%~U2 ҹuA~E~#E%4#FFf]U~Ur1~}u(~U s~}<tvRxڎS:~U2#t~}<tvR:~Urs~}uj~U\~U@~Um~E^~U\~;Ums~Uo2~Up~EZ~E[|(RVLR f]UF$ ~}<uRVLR Ff]Uvb:~}<uRVLR ~U2VFf]U ~E"~U%~ Ur~U%~Er~U%r~uFQ~U rW~}<t~U";Vr~U=2R3R ~U$s~E$2 u2u1~U~U" ҹuA~M%~E%4~Er~E$/2 u ~E$~E"~U"^ڋ&U~E$~U";VrC~UB~;U@wT~}<u8 RVtR R R ~}u~Ev ~E@vu:r~Ev~F+E"~vTB+U@;s~vDB+E@~U@vVڌَS~U"^SR ~U"~M@>t@2‹~E@> u~E$~}<u ~UB~U@;>u1~U~U" ҹuA~M%~E%4~Er~E$~U$s8~}<u/~U@~;UBuvu:~}@~Uv2 u~E@~}<t6~U";Vs(~U=2RR ~U"^&~E"~U";Vr~UB~;U@wvu:r~E%~E"j~F+E"~vTB+U@;s~vDB+E@~U@vVڌَS~U"^S6 ~U"~U@]~U2VFf]U ~U&2;Vs ~U&2VVV~r,F^ڋU&&@H;FuڋVVFf]U V^&2 u ~rF߃~rB~Us~Uss ~E& ~VU&~U&2V~r,^&FM&@H;Fuf]U ~s VrƆr RrR tڎSvvs2R R|ڎS :s2VFf]Uf]Uf]U~E~E~=U&2~;U|Rv4u|&.tDv4u|&:t6vT2BvT֋v4uT&~M֋vtց~E뜋~=U&2~;U|v4uT&~U~Ef]U*F~Uss~E~EtVLR$R3Rx ~EtFU~E<~:tBVFu\V2Vԃ~r(>{ar S2S֡@H;FuދV2u~ArV2~ULFUV2#t |~E~EV2;|>S~UL FEL @= uπ~rV2;|#>{`sSֈS>S2S>C @=u~쾀tBr9~U s~E=~E>~E=~E>~E~E<~쾄tBr~E=~E>~E~E<L~쾈uBr~쾌tBr~E=~E>~E~E<~.u"U V2|~E~E:FV2;|>S~UT FET @=uϋ~}<uq~Ur ~}tRVLR 2=rG~Us~E~E )RVLR 2=r~E~E~EZ~E[~}u~}<t~E~E~E?~Em~E$~E4~E%~EB~Er~E~E!~E@~U2VFf]U~}t~U rڎ‰V2@me]ڎ‰F~E~E51w r.  ~U2#uv666:~E$~U2VFf]U~U s#~}tvRڎS:FF~E$Ff]UR R R R f]U VVR^&2R @H;Fuݍf]U &2 ҹtA&2+ы~F2;VwtF:~2V~|*B&F @H;FuFf]U ~E$~VU"~}<tU~U>2u?VV~r3~U>2R^&2Q @H;Fu;Fr~UB~;U@wvu:riF+~vTB+U@;s~vDB+E@^% S~U@vVڌَS6 ~E?~U@p~U2VFf]U ~VU~NM#tF FFV2 ҹuAvv~U ~E 2PRRN#Fr>r  £~Um;tKvR:~Um!RVLR 2>tB>tA#ʋ~Mr ~U%~Ur~U@~Ur~MB~;M@w@ ‹~Er~Er~E%~U2VFf]Uf]U~E!f]UVz~U~Es~E&f]URV&R R?  30FU&3H=uӍf]Uf]U> 3VFf]U ~huF{~2 $VV~er!&e>&2$&@&H;Fu$V~2ʃNV;VrxF$(>$:(v)(2B(U*< tU< u UС F F= uݡ$@$H;Fu ~f]Uf]Uv~*u Gtw]UF3F]U F30~ F30~U~,Uf]UF~sVVFf]U,R3R ,:|2R0Rm|2R3Rm~2R6Rmvv Rx 0RvvEmP? f]U*R3R ,-~2R0Rm~2R3Rm|”R6Rmvv Rx 0RvvEmP? f]U,R3R ~2VFf]Uf] Hrˌ˃+r+~,2~;*rAv,*:Vu@#FFt~*Ff]Z~,v*V~ar V2VFf]$ v Rlsv/R\r~,2~;*sv2PR~u sbvi2~~*~UvV2VN3.2 N~~ vE~*f]X vv Rx FVV~rbF~,2~;*r v,*2RRv r)v~~EF~*VBVJ;VuFf]v~ sv~t~6~,2~;*rv^ڎS :F~{ tRVߌڎS :VBV uպR>ڎS :R^ڎS :RBڎS :R~-ڎSg:~,~Dž*~E .~,2~;*vWv-*<:uGvR~$RRRFs-~$~~E:~*v~t ~FvRVBBRBRFv:Rs~H] E vD Bv.Rws(vRV RBRv~t ~^] E Fu~GGvv~VVF~~2 t~2B~~~ VBVuʋFf]z~LuB~TuA ʈNFf]=\^Fdž&(Ğ&&2BdžĞ&&,BJ;udž*Ɔ ~`URhRvVR6|6zr6U,RUR~RvVR66U,R URRvVR66U,R URRvVR66uUU;RU~ԾuBr V2V~ľuBr V2V~uBr V2VUVR>s V2VUVR&s V2V,2;*s ^~EhRڎS :,2+*Br,*ڌS :RڎS : :dž*s-f] f][2.C>>>>> Error Count ExceededOffset Length Variable - (function return) : Return offset, Frame length128 Forward Proc Miss' ing: 129 Label Not Encountered: 130 Program Parameter Bad: >>>>>> Fatal Program Error - Compiler Cannot Continue!Errors Warns In Pass One  CAB -+* =/%STACKCK aRANGECK aMATHCK aNILCK aINDEXCK aTAGCK aINITCK aLINESIZE aOPAGESIZE a5PAGE aLIST aINCLUDE aTITLE aSYMTAB aSUBTITLE aERRORS aWARN aBRAVE aPAGEIF aSKIP aDEBUG aGOTO aROM aPUSH aPOP aENTRY aLINE aOPTBUG  aSTANDARD aEXTEND aSYSTEM aSIMPLE aSIZE aSPEED aMESSAGE aINCONST aRUNTIME aIF aTHEN aELSE aEND aOCODE aELSEEXTERNRORRETURNTYPEREPEATTHENNOTENDRECORD OTHERWISEORORIGINTODODOWNTOFILEFORFUNCTIONFORTRANFORWARDOF PROCEDUREPUREPORTPACKEDSUPERSHRSET INTERFACEISRINIMPLEMENTATION INTERRUPTIFEXTERNALROLNILSHLLABELCASECYCLECONSTSTATICPUBLICMODULEMODPROGRAMPLMVALUEVARDIVVARSWHILEADRANDADSREADONLYOVERLAYLIBRARYARRAYBEGINUNITUSESUNTILXORGOTOWITHBREAKCONSTS ,.A1 %8E#TA/Q1S"G@4%UPIE:.J;\?NB6F&H!M]*h,7#zX].K}a0Qxb*(AAN ~$7=ErDj IZR2ns ;,=:+*-/()[]<>.^@?:=<><=>=(..)..   WBWB@ @` WBWBWBWBUSER USER WBWBType Extra Hexadecimal Too Invalid Line Number Long , Truncated In Meta String Not Insert Out Expression Identifier Value Character Of Zero Assumed Wrong Skip To Or EXTERN Variable Command Integer Range : Expected Skipped Constant Assign Cannot = Unknown Static Memory Ignored Symbol As Real Overflow Supertype Array LSTRING For Operator Function Compiler Size Assignment Compatible Identical Index Use TO Word Field Record Dereference VAR Parameter Set With Many Components List 255 Types GOTO Statement Procedure Considered Harmful Label Loop Ordinal ; CONST File Procedural Forward * THEN END OF WITH Numeric End Pointer Declared CASE Previous Already Boolean := DO [ ] .. FOR TEXT Begin Contains PACKED Attribute Section Origin Initialize Unexpected Found UNIT Program ( ) NULL Designator Stack INPUT . Levels OUTPUT Module ROM Segment Address       ] s r]T !*' *#'\#  2 " "T"ET}q ( S!{ "r "r -#"6.#).().z).#.=#. 2?E5O5E}55b_r]T && d&&dfvvfwggwRR+R&dZgwfve |hY<XW+k]]oC34-34234565# 8D=I 78I 8  0kQ;mF ?>*>T@MN%@Q #2CHlTk0F*?F*#!5F!2.HF #;x%$D/1  # !H4%$%;,SB'kAB[?k%$L4BkT{2T{~1!TB!kC!rBk jT6 9UBG 8%;LDnrBk%;L4,BB L4k/0B 85ASBI 9BG6kUBC#2'  B:>k\#-\#%k"%k#.=#.=#.`#!b ;+O!OO_ c]K5R* "!2iKki Q(_ LdJJMNO PO P?!kOb ;a;*;L4B'KKK !47 srY"5nn!!m?p!R'k!55aVBG nD4Bn L45bV!2L4+"DnQ!klT%q! / !H21%;/;y/y slT%q/ 0RCHTlTm*rmRR%;oD)tL4 0k ?k>#! 73R%qR%;o'V^^V%;Oo#!nlTqplT%qt!RqqtG]tG*t!5 tG _u!t!u sT]!]u sV^/WBWB_ paspp6.mpa PASPA  0Hard DataDisk FullFile AccessFile System Error In ; Code: ; Status: Compiler Cannot Continue    Pag N JG IC Line# Microsoft MS-Pascal Compiler MS-DOS Version 1.10, 10/81    Warning  Symtab Pass On Warnings Detected. Pass One No Errors Detected.Inconst: =   *444  CISSCINSRCIERCWELSTLQQQADSPQQQADRPQQQCLOFNEWFNILEBUFFRCWESETEPPMFDE_CEN_CRTQFEOFFWTPFEOLF_T_FGETFPUTFGETHNILEDISEDx!Dx!ZERSONESTWOSINIEINJE@ @Dx!x!MICEB @LNTEDPPINIFINUXUNITQQBRTEENTEREADFN PPEFEXTEERTE|JD,0 @0FCBFQQ CON.LSTPASKEY BOOLEANTEXT STRING LSTRINGNULL INPUT OUTPUT FCBFQQ Microsoft MS-Pascal Compiler MS-DOS Version 1.10, 10/81 Microsoft MS-Pascal Compiler MS-DOS Version 1.10, 10/81 LNx PASIBF.SYM PASIBF.BINCON.LSTFCBFQQ mip1.pas[22,24] MISBQQ @ Error: Compiler Out Of MemoryInternal Error rcnb.pas RCNBQU misy.pas[22,21] MISYQQ mishm.pas[22,21] MISHQQ heah.pas[22,21] HEAHQQ filuxm.pas[22,21] FILUQQ  USERLINELPT1PRN  pasuxm.pas[22,21] PASUQQ PAS00000.$$$perb.pas[22,24] FERBBQ tidgs.pas[22,21] TIDGQQ filbm.pas PARSE @ NUL: .]: : CON  USER Source filename [PASObject filename [OBJSource listing [LSTObject listing [CODNUL: NUL: NUL: Line invalid: '', start again. ;DKRy   //$f%')/1234 56!7(8/95:EGVH[RSTdijkmnqy~(<FM:2 u:2u1~U~U" ҹuA~M%~E%4~Er~E$/:2 u ~E$~E"~U"^ڋ:&U~E$~U";VrC~UB~;U@wT~}<u8 RV MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ)  MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZCNVR MS PASCAL PASCAL:4CONSTDATASTACKMEMORYHEAPCODE CNVR_CODEDGROUP^@-DTHH3 J)ROURQQTRNRQQCNVRFLTRQQQCNVEQQBRTEQQADDRQQNEGRQQERTEQQCLTRQQABSRQQFLTRQQCLERQQSUBRQQ̜ DWBcnvr.pas[22,21] NDLCNVR b3UR~}V#yډVFFuF<`l0 ^FF~t:F%svv~ĝ$S^FVyVFFtvv^F .3F\FK|d^^F^f]* F>zFLTRQQ`|mURvv6b6`svv^FFFRSvvsF$F"F1FJFWF`F0FVV~ĝdSvv~sd$F wREvv~ĝS^FFVJVuFt VډVVVFf]? F @F:zTRNRQQ`|UR3RSvvsvv66^Fvv66^FvvFFf]Ȝ(FF$F 48;FOSVF gOoFzROURQQ}` |!URf]J FF zCNVR`|s)+,&.,/00:1?3E4m5z78HJKMNOPRS&UEV_YnZ~bcdtMJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZCODC MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE CODCQQ_CODEDGROUPؘ@DTHH7 J]ENBCQQtENICQQ$ENWCQQ]DEBCQQBDEICQQDEJCQQDEWCQQDEXCQQCODCQQF/STKHQQSOVGQQUADDOKUMULOKMOVELFILLC DWBcodc.pas[22,21] nD CODCQQ VFALSETRUE wM~| V+VBVFV#yڋ~GW~2RvvVVRv~}0u~=-u 0~E-f]  ;FMFzMOVEPAs |t~~u V2+ʉNV#yډV~|F~uB~uA ʋV#y;V@#FFt!vvF2Pvv RFf] |SzENBCQQt` =| D~~uF ~uB~uA ʃ~ uB у~uA ʈNFuFN܋F3v0~܈S߀{:r S2SߋF3vF~uFt N܋~C-+V܉Vށ~uFV#y;V}VމVV#y;VANFt/~| ~ tF0F vvVVRvvvFf]*  zENCSUB  [|=$*vvV#yR~}B2RvvFFf] wzENICQQ$9` |,]vvv3RvvFFf] JzENWCQQ](` | F~F~2V~|yF~~= t= u ~uFK~uF~u5V;V}-F~~~~U~~}ar Ǡ  1 &TRUE ̠ ,0 v 2FALSECU2U~VBVJ;VuVV ҹtA~# Ff] &zCOPY_G |zB  RVRvvVR(FVBV~}VV~C VBVu~ uB~&uA ʍ~&K_̓/01@2R3c4m=z>?@AHI"JSL\MaNaOdPuRSTUVWXZ[\]^b*fcnopqtuxyz{|}~#8H`G&~,uA ʋѹ~2uA #NNFf]  $ zDEBCQQB` U|S *RVRvvVRoF~-uB~~+t ~s*NVVԃ~|F~SֈSՋVBVJ;VuFF ~#u FF`~|Z~#u%~2uF~8uFFF/~#u)~1u#~0uF ~6uFFFV;VA#NN~VVҋVVЋV;V|qV҉V~S2ЉV~5vW~|B##VV~rF~5vWV;VsA##NNVBVJ;VuVVFf] /F[FzDECSUB || vvVRVRYFFtVڍ~& ~V&~&;V|A&;V@#~sB##VVFf] zDEICQQx`@|K vvVRVRFFtV2ڍ~& ~V&~&;F|B&;FA#ʁ~sB##VVFf] OzDEJCQQ|`|` vvVRVReF~V&&;VrA&;Vw@#ЋF4##FFFf] zDEWCQQ\`Y|os vvVRVR F~V&&2;Nr@&2;NwB#Ё~sA#ʋF4##FFFf] zDEXCQQk`|BFf][2.C`|7ak}@FJn{ ?u<7tZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZDEBE MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE DEBEQQ_CODEDGROUP@>DTH H  J TRAEQQ+LNTEQQEXTEQQWDEBEQQENTEQQ)STKHQQSOVGQQCLNEQQCSXEQQGETHQQ DWBdebe.pas[22,21] wD DEBEQQ _QRZJR>v>"v>UF>UHf]U# F#59@DJM@zENTEQQV`|2WI>EF>EH4Lf]$'zEXTEQQW.`|Ff], zLNTEQQ`|Bf][2.C+ `|',-.4/J0P5]6q<@t MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZENTX6S9CODECONSTDATADGROUPENTXQQHEAPINIXQQMEMORYSTACKNhh$̘`1h `h  t ך F1BEGOQQENDOQQENDUQQENDYQQENTGQQINIUQQQ(6،+Bл&/ځ;~Ձؾ‹Ҽ&+.....+À.^_ZXWVU!]4" DIO SW[_mq|Ą̇&̌&̑&̖&̛&̠&Ħ Ĭ ĶĿr BEGHQQ BEGXQQ CESXQQ"d CLNEQQ CRCXQQm CRDXQQj CSXEQQ CURHQQs DOSXQQ̐ ENDHQQ ENDXQQ HDRFQQ HDRVQQ} PNUXQQj RECEQQ REFEQQ REPEQQ RESEQQ STKBQQm STKHQQe MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZERRE MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE ERREQQ_CODEDGROUPØ@vDTHH  JGHIEQQ(GHSEQQGHVEQQSOVEQQRNPEQQdASNEQQ3TANEQQCNVEQQLNEEQQSRTEQQoEXPEQQ>SINEQQ OVREQQOVIEQQOVWEQQzDZREQQIDZIEQQDZWEQQERREQQYEMSEQQYCSXEQQCLNEQQRESEQQREFEQQRECEQQREPEQQPTYUQQPLYUQQENDXQQBRTEQQERTEQQʜ DWBerre.pas[22,21] YDERREQQ 0Uà &? Error: e0 Error Code, Status = v^ڎSf]' F9zPUTMES" F|T#U ~ F~t-F3v0~S{:r S2SF3vF,  F Line C"sVJVuvRVRwf]zPUTWOR#n |U  RvF 4 L In Of <U R&RQU~2RGWAU R0R0Uv RG F'ՠ TPC =:ԠZ, FP =, SP =f~tU R<RUvR*>te>tURFRU6 RURLRU>U&2R'RURPRU>2RBRO1 F$+6?NWapyĂ̊FfUnsigned Divide By Zerou#j>teURTRU6R  ~Signed Divide By ZeroDLURXRlU6RURZRTU6RjUR`RUR֜F 4NTRUNC/ROUND Argument Range "QRR7R3Rf]< OF gzEXPEQQ>1`|oURF 4jTangent Argument Too Small"RR8R3Rf] OF gzSRTEQQo1`|URtF 4#Arcsin or Arccos of REAL > 1.0q"R2R9R3Rf]ˡ OF gzLNEEQQ1`q|URCF 4 Negative REAL To REAL Power"RNR:R3Rf]T OF gzCNVEQQ1`8|URF 4Stack Overflow "RjRSR3Rf] OF gzTANEQQ1` |3URF 4No Room in HeapV"FRRTR3Rf]˛ OF gzASNEQQ31`|dURF 4Heap Is Invalid"wRRUR3Rf]L OF gzRNPEQQd1`|UR~F 4Heap Allocator Interrupted:"RRR3Rf]˒ OF gzSOVEQQ1`b|5URRRR3Rf]F #O(F zGHVEQQ1`D|5URRRR3Rf]ܜF #O(F zGHSEQQ1`|5(URRRR3Rf]ˎF #O(F zGHIEQQ(1`|!YURf] F F zERREQQY`| -;FW]hs|,-./023 4$5F6e7j8j:q;<=>?@AEH+K\NQTW ZQ]`cfiFlworu x;tZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZFILF MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE FILFQQ_CODEDGROUPИ@ DTH HFњ JSINPFQQOUTFQQ~PBAFQQPBCFQQPBFFQQPBLFQQPPAFQQPPLFQQWSBFQQ(PTUFQQGTUFQQwERCFQQINIFQQNEWFQQPPMFQQ7 PPEFQQ RESFQQ REWFQQn ASSFQQCLOFQQCLDFQQGETFQQPUTFQQ BUFFQQSEKFQQ EOFFQQEOLFQQMRTLFQQ WTLFQQ WTPFQQ FILFQQFERFQQPADFQQSTKHQQSOVGQQINPUQQOUTUQQOPNUQQCLSUQQCLDUQQGETUQQPUTUQQPERUQQPCCUQQSEKUQQGTYUQQPTYUQQGFNUQQPFNUQQBUFUQQNEWUQQTFNUQQPPMUQQHDRFQQEMSEQQMOVELBRTEQQEOFFQQERTEQQGETHQQNEWFQQx DWBfilf.pas[22,21- ] fD FILFQQ N error in file Hard data file Device nameile Operationmeile File systemile Device offline  Lost filefline File namefline Device fulline Unknown device File not found Protected file File in useile File not opene  Data formatene Line too longe Ġ~UrFt vh~U2#uT~U sJ~U$r@~Ur6~}uv~vT +URv#u v Rv~}u~E~EvF;Ft~U~U ~E~Ev~E~f] FgOoF F ̇FĬO$zCLTFQQ | R~}u F4~E~U2#tt~Ur~EN~E d~U:VtAr~EP~E@~UvV:FtBr"~}u ~Us~EO~E~U2 ҹuANFf] F4̈FFzERCFQQ`y| R~U2#u~s~}狕2~U2RRRR2R2Bv+BRڌَSRR~u~uf]( F>XeFjx~FĄ̮FFF3zFERFQQ`|9& V;Ft~U;VtVVVFf] zFINDLI5 | ~U~U~E$~E~E~E~E~E!~Ev~U~U~U2 ҹuA~M~Us~U LFāؔ$Nl+5=FYaj5N] $,4@V`jFf]]zOPNFQQ |8w^  Rvvvv~U$r ~U r= FF '9~E~U s ~} ~}t~E~E0 $~E ~U"~Uf]ԜFzGTUFQQw` (| R~sFVVV;Vw2~U2#u&FvR ڎS~U"~UƹF3V~r,~U2#u vv0ڎS~U"~Uf]C FJSF ċ̔F ̥F5zPADFQQ`||%  R~}u$~U ~MN;s~EW~EvvvvV~U~U2 ҹuANFf] FIF jF(zPTUFQQx` |l(  RvRs5Ftv~2RGߌڎSVL~U~Evf]  FO:OXO]FzWSBFQQ(h` |E  R~Us~EL~EH~uB~& ɸu@#~E~Us vvv~Svf] FZFnFvO{FzASSFQQ` |R~U2#uj~UsQ~U!rv~U s3~Us)~UrvR~]ڎSw~E~EM~Evf] F3FiỎO̎FzBUFFQQ`|)&RvR9f]k FFzCLDFQQ%`t|+Rv~uf] FFzCLOFQQ'`B|R̜ F*j)+,-+/?0B1W3e4r67GIJNOQ\7]G`hauc|suv{|}~%1;MkG ~Ur~EQ~Ev~U%. VvFf] O0O5FszEOFFQQR`|BMRv3Rrv~U$VFf]ܜ FO"O0FVzEOLFQQM>`|JR~U2#t~Ur~ER~E~}u~Ur~E~E%~Ur~ET~E~U%s~ES~Ej~U rv~u ~]ڎSwD~Us ~E1vR~]ڎSw~U%s~ES~Evf]e F̲OOOFzGETFQQ`|r: R~E~E~E~E~E~E~VU ~E~~VU vf]] F^FcFzNEWFQQn`"| Rќ F*@: # t 4Lf]לFEzPPEFQQ .`|f7 RuRFF;rkvvR6#u>=t + FF $*17:>NQF[͓ %-6\s CVnx      ( 'F )M *Y ,_ -d .j /p 1y zi 2<v^ڎSR@ڎSRBڌَS>u@&f]&F(F2>F CGMWZFczPPMFQQ7 `+| R~U2#t~Ur~EU~E~}u~E~Us~EV~Er~U svR~]ڎSNv~u ~]ڎSs0v~}t~E~E~E~Evf]g F̃O̟O̫F OFzPUTFQQ `6| Rv3R~E%~E~E~Ev~Us-~U r#~}tv~u ~]ڎSwvf] FmOuOzFbzRESFQQ `|Kn gRv3R{~E%~E~EvCvf]М F7O6u~}t~U\~UB>6tB>6tA#ʋ~M%~U2 ҹuA~E~#E%4#FFf]< F7BKzNXTUQQo`|\U~Ur1~}u(~U s~}<tvR$ڎS~U2#t~}<tvR~Urs~}uj~U\~U@~Um~E^8~U\~;Ums8~8Uo2~Up~EZ~E[(RVLRf]8AOhOĜĮĶFzWEFUQQ\`|6LUF~}<uRVLRFf]$$F&zCLDUQQL2`|D~Uv\~}<uRVLR~U2VFf]O'FzCLSUQQ~@`p|U ~E"~U%~ Ur~U%~Er~U%r~uFQ~U rW~}<t~U";Vr~U=2R3R:~U$s~E$wF|Ô ;DKRy   //$f%')/1234 56!7(8/95:EGVH[RSTdijkmnqy~(<FM:2 u:2u1~U~U" ҹuA~M%~E%4~Er~E$/:2 u ~E$~E"~U"^ڋ:&U~E$~U";VrC~UB~;U@wT~}<u8 RVtRR R~}u~Ev ~E@vor~Ev~F+E">~vTB+U@;>s~vDB+E@>~U@vVڌَS~U"^S>R<>~U"~M@><t@2‹~E@>< u~E$~}<u ~UB~U@;><u1~U~U" ҹuA~M%~E%4~Er~E$~U$s8~}<u/~U@~;UBuvo~}@~Uv2 u~E@~}<t6~U";Vs(~U=2RR~U"^&~E"~U";Vr~UB~;U@wvor~E%~E"j~F+E">~vTB+U@;>s~vDB+E@>~U@vVڌَS~U"^S6>QKp̳FFO AEFJN^uŚO:FwOƚƪƻF^MZe",?Kl 3Ibeny ,4>~U"~U@]~U2VFf]zGETUQQ` |n\U ~U&2;Vs ~U&2VVV~r,@@F@^ڋU&&@@0 @H;FuڋVVFf]05=NR=zGFNUQQ\j` e|/U V^&2 u ~rF߱( !t~rB~Us~Uss ~E& ~VU&~U&2V~r,BB^&BFM&B@BH;Fuڍf]?ES]azPFNUQQ` |aU ֠5USER USER p4"hk~s VrƆr RrRtڎSvvs2RR(ڎS s2VFf]iF;FDMOzGTYUQQan`D|Uf]zENDUQQ`X|Uf]zINIUQQ`@|U~E~E~=U&2~;U|Rv4u|&.tDv4u|&:t6vT2BvT֋v4uT&~M֋vtց~E뜋~=U&2~;U|v4uT&~U~Ef]zGETATO |U*F~Uss~E~EtVLR$R3R~EtFU~E<~:tBVFu\V2Vԃ~r(F>F{ar S2S֡F@FH;FuދV2u~ArV2~ULFUV2#t |~E~EDќ:Fx~ĒĖ'4>Gf~ !3k4{5678BKrstw2xAy`{h|  ! 9 I W [ _ m u |  ,USERO V2;D|>DS~UL DFEL D@D= uπ~rDV2;D|#؜ &*D{`sSֈS>DS2S>DC D@D=u%,0 4LPT1PRN  ~,tBr9~U s~E=~E>~E=~E>~E~E<~0tBr~E=~E>~E~E<L~4uBr~8tBr~E=~E>~E~E<~.u"U V2|~E~E:FDV2;D|>DS~UT DFET D@D=uϋ~}<uq~Ur ~}tRVLR2=rG~Us~E~E )RVLR2=r~E~E~EZ~E['XĎĦ  +/^F͓FH          ) 0 9 @ G G N X p w ~       * , - / 0 1 4 5 6 7 8& >= ?F Dp Fz G H K M N O X Y 9< X ~}u~}<t~E~E~E?~Em~E$~E4~E%~EB~Er @  / ~E~E!~E@~U2VFf]zOPNUQQ`|vD U~}t~U r<ڎ‰HJV2@LmLeL]L@ڎ‰HJF~E$,0=EMUZbfנF ~ ~E51w r.  ~U2#uv6L6J6H~E$~U2VFf]IFOOOO O"O$O&O(O*O,O.O0O2O4O6O8O:O2u?VV~r3V~U>2RV^&2QV@VH;FuVV;Fr~UB~;U@wvoriF+VX DSdFimz̛OĪĭДe g h k l m n o p q r s' t/ N g v            : M g l        %<v*x4~vTB+U@;Xs~vDB+E@X^VS~U@vVڌَS6X~E?X~U@Vp~U2VFf]&@CFPZPzPUTUQQ#` \|LU ~VU~NM#tF FFV2 ҹuAvv~U ~E 2P\R^RN#Fr>^r\ ^ £Z~Um;ZtKvR~ZUm!RVLR2^>^tB>^tA#ʋ~Mr ~U%~Ur\~U@~Ur~MB~;M@w@ ‹~Er~Er~E%~U2VFf]0X\cFs~ĉĐĚ̦OįFzSEKUQQH`+|Uf]ˬzFILUQQ`*|g4U{$$%:'F(R+\,q236:;<UtZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZHEAH MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE HEAHQQ_CODEDGROUPۘ@pDTH  H  J!GETHQQAHEAHQQALLHQQ-IBEGHQQCURHQQENDHQQGROHQQCUTHQQGHVEQQGHSEQQBRTEQQERTEQQʜ DWBheah.pas[22,21] qD HEAHQQ YDUVBV;w>+;wFud>t@ ;Fs1BBVV>FF;Fv +F>n@@;uO>uFK>t6>u VBBR;usFf]̜ "&/48<@NWZ^flptwząĈĐēęĥİijFF $(ͼzALLHQQ@`|IAURvF~s~uFf]4FO+F2F7F zGETHQQAE`|!URf]՜ FF zHEAHQQ`|6 789":"<.=7>E?M@WCeDlEFGJKLMNOQRSUVWXY#Z-[-\7bTc_deewt MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZLSTL MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE LSTLQQ_CODEDGROUP@7֘DTHH  JSNELQQSEQLQQSCALQQPOSLQQmCPSLQQCPLLQQINSLQQDELLQQCONLQQLEDLQQLTDLQQMNEDLQQEQDLQQLECLQQlLTCLQQNECLQQLSTLQQEQCLQQٌ9LSLEQQCSLEQQMOVESLMOVESRFILLSCBRTEQQERTEQQf DWBlstl.pas[22,21] HD LSTLQQ 0U R~&v&2 :Ѹu@FFtB&2V~r2F~^&~^&:tF VBVJ;VuӚFf] FwFzEQCLQQ` |>U  R~S~S4FFf]Ӝ F"O,FzNECLQQ:` |U  R~&v&:Ѹs@F&2VFt &2VVV~rIF~^&v^&:t^&^&:Ѹs@F VBVJ;VuFf] F̞F}zLTCLQQ` |>lU  R~S~S4FFf]- F"O,FzLECLQQl:` |yU R~~:uANFt:~2V~r*F~~~~:tF VBVJ;VuۚFf]՜ FgFzEQDLQQu`#|6URvv4FFf]8 FO$FzNEDLQQ2`|MU R~~:sAN~2VFt ~2VVV~r?F~~~~:t~~~~:sAN VBVJ;VuƚFf]Ĝ F̌FzLTDLQQM`L|6URvvM4FFf]Ĝ FO$FzLEDLQQ2`)|lUR~&2V;V~~S~&2BSv~&2V&f] F&FFF]F"zCONLQQh`|uU R~&2NN;s~&2+V&VVS^S&2+VBRf] ӜF+FaFfFzDELLQQq` I|UR~&2V;V &2;V}~^SVVS&2+VBR~S~^Sv~&2V&f](F2FYFrF̉FKzINSLQQ`|tURV;V}VV~r-FV~&~^&VBVJ;Vu؍~V&f] FFeFzCPLLQQp`8|{URV;V}~Sv RVV~r,FV~&~&VBVJ;Vuٚf] FF/FlF1zCPSLQQw`|mURFVVVVV;VrpVVVV~rIFVV;Vw'VV~&V~&:tVBVJ;VuVVNF8/Jw !"#]&./01 4.9`:s;<=@L,MCNcOuUVWX^_#`(aObhczjklmv wx)ya" VBVJ;VuFf]9F6zPOSLQQm`|URF~|FF~tBV~&:NuB:VtAr~|V;VVV)VV븚Ff]% FsFzSCALQQ`|DURvvv~Sv3RFFf] F*O2FzSEQLQQ@`I|EURvvv~SvRFFf] F+O3FzSNELQQA` |!URf]; FFzLSTLQQ`|/ +B| tZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZMISG6CODEDATADGROUPMISGQQdh`^iBEGHQQDZIEQQDZWEQQENDHQQOVIEQQOVWEQQRECEQQREFEQQREPEQQRESEQQSOVEQQSTKBQQSTKHQQ-U]>u!܋_ݍFG_U]F;rU؎v ~3 Ns]U؎v ~NNO]U؎~ NFs]UF؋v F ~Ns] UF؋v F ~NNO] UF ~ NFs];$  $ (4 : UF FnFr@]UF fnFr@]UF FnFp~t@]UF nnFp~t@]U^@%]U^];>r;>s E;vA؎X>u[X&.&XX[PSXX[PSXX[PSXX[PSH=ĘĞĹ    & &&&Uvn3&VE&8uC]Uvn3&VE&8| C]Uvnǎ&FE&C]&CGZ^++;&r&CCGGVRRVPUv ;vwvN ,r3]U^Ӌ^~ vn &FE< t<t &C3 2ٜ&ă ̛Ѡڋ+щ] ASMGQQKD ASNGQQi% AVAGQQ BRTEQQ CESGQQ CINSQQ CLSGQQ!m ERTEQQ-\ FILLCx{ FILLSC LOCKEDp8 MOVEL? MOVER[y MOVESL MOVESRŐ MTBUQQ SADDOK0t SAOGQQ SDZGQQ SMULOKP/ SOVGQQǐ UADDOK UAOGQQ UDZGQQ UMULOKf UNLOCK VASGQQstJZ MJZMISHM MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE MISHQQ_CODEDGROUP@}DTHH$ J!GROHQQ!MISHQQCUTHQQENDHQQSTKHQQ DWBmishm.pas[22,21] @ MISHQQ :$UFf][ zCUTHQQ `|k!U ^ڎ‰^FV+€V~s ~rFV;Vs N^&Vf]BUX^.zGROHQQ!g`|Uf]$zMISHQQ`|7 +8FTYahqx ĊtZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZMISO MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE MISOQQ_CODEDGROUP@.DTHH  J!ENDOQQMISOQQBEGOQQ DWBmiso.pas[22,21] OD MISOQQ 7Uf]˫zBEGOQQ`<|Uf]˜zENDOQQ`$|Uf]ˍzMISOQQ`|  6tMJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZMISY MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE MISYQQ_CODEDGROUP@DDTHH  J!FILKQQMISYQQENDYQQwԌ1CLSUQQCLDUQQPERUQQPCCUQQHDRFQQHDRVQQ5 DWBmisy.pas[22,21] ED MISYQQ -zUFt ~5I~=U s3U$r,Ur%}uU2#uW~5 R~5~5Tf])FIFWFaFzENDFCBv .|?wU>tUR4 >uj>t UR3RVf]ٜ $+zENDYQQw;`|Uf]zFILKQQ`|Uf]zMISYQQ`W|3  F\ffpϊtZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZORDF MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE ORDFQQ_CODEDGROUPƘ@~DTHHW JqWTWFQQ/WTIFQQWTBFQQRTXFQQRTWFQQRTJFQQRTIFQQRTBFQQRTAFQQORDFQQtRTQFQQ FNSUQQPBAFQQPBCFQQPBFFQQPBLFQQPPAFQQPPLFQQASSFQQDEBCQQDEICQQDEJCQQDEWCQQDEXCQQERCFQQFERFQQGTUFQQPPMFQQWSBFQQBRTEQQCINSQQERTEQQENBCQQENICQQENWCQQo DWBordf.pas[22,21] \D ORDFQQ DUtV;v 66;vB~=U$~=U$s ~E vTA~=Us~=E~=}vT~5R~]ڎSf]l1  #F),0VZ̤FzGETNEX |U  Rv3RrFU#~U2#u&~U%r~U$r܀~ tր~ tЀ~ tʋ~U$rG~U%r=~U2#u1V2RRvsFV;V VN Uu~}V~E~E$42)V;V~#~VƜFF̎Fij$ F<F<C3~U2#u~E~E]vf] F$FzRTQFQQ ` S|AURvRRRv2RW}F $O9F$@~~ f]F7zRTAFQQI`|uU $Rv3RsGvRVR R~U2#u'RVR~Sr~EX~EvFF.2ORF mF٠$`~~f]F7zRTBFQQ}`|{U$ Rv3RsMvRVR@R~U2#u-RVR~Svvr~EZ~EvXFF.2OXF sF̠$~~ؠ f] F7zRTIFQQ` |{U$ Rv3RsMvRVR`R~U2#u-RVR~Svvr~E[~EvFF.2OXF sFˠ$~~f] F7zRTJFQQ` |U$ RDF+x z{(|,}A~Vfht}FI[ahs|,;Os{,;Oy  tv3RsMvRVRR~U2#u-RVR~Svvr~E^~Evf] FOEF `FeFzRTWFQQ` |U$ Rv3RsMvRVRR~U2#u-RVR~Svvr~E_~Evf] FF.2OXF sFxF&zRTXFQQ` u|LU  RvRQRQV2RvvPRf]F.F8F=F zWTBFQQH5 ` @|IU  RvRQRQvvvPRf]F+F5F:FzWTIFQQE` |I/U  RvRQRQvvvPRf]sF+F5F:FzWTWFQQ/E` |!tURf] FFzORDFQQt`|? !$ 022A3U569HT`BZt MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZPASUXM MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE PASUQQ_CODEDGROUP@^DTH H1 J+TFNUQQENEWUQQPASUQQBUFUQQMOVEL DWBpasuxm.pas[22,21] %@PASUQQ PAS00000.$$$U~E!f]kzBUFUQQ`|0UVz~U~Es~E&f]zNEWUQQ,`|fEU$RV&R R 30FU&3H=uӍf]& F"&*2N?T@XAlBrCDFGHMNO"TAULWXYjklnop.q0r2sDtN#tMJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZREAC MS PASCAL PASCAL:4CONSTDATASTACKMEMORYHEAPCODE REAC_CODEDGROUP|@mDTHHg JENRCQQ;REACSDERCQQ[STKHQQSOVGQQDXPRQQM10RQQTRNRQQBRTEQQMULRQQADDRQQNEGRQQDIVRQQERTEQQFLTRQQCLTRQQABSRQQCLERQQSUBRQQCEQRQQ DWBreac.pas[22,21] lD REAC ^h~}v|؀= t= u~}2~;U|~EЋ~}2B~;UعuANFf];zSKIPBLZ +|/[ $ RF~=uFUs~~=-uBV=+tFtF؋~2B;Vu`V؉VVVNFF؋~~=0uFuV؉V9~~=1r =:sV؉V!~~=.uFuF N ~2;VuFF~2;V}~؀=Et=etF؋~~=-uBV=+tFtF؋~2;V} F< 3@~~=0rX=:sSv2;V|G nFFt2N+ʃ0N0$ @ @`Y~~2VЉV~%}~}5FUr%V;Vu V=.uF ^ڌFcM̃PVV֋VVԋV;V|lV։VEF/G7NjOnPyX~Z[]^defghijlmoqrtu wxz{|-05TWitw7   1~~=.uFHvv6&6$S~~=ĝhS^ڌFFt N~}VBVJ;Vu6R6PV#yR^FFtvv^F~}#vvvvS~X&GX&!vvvvS~X&GX&FFf]x, F8=FhlyF̐F ̭F FF zDERCQQ[` |(A VVVVV;V|hVV~Us~}v|04~Uvt~}v|~EƋ~}|~E~EVBVJ;Vuf]5zMOVEDI( |5~E~|F~}~ 2~ T~]~}~=:r+~0~}~ 2A~ ~EN~E~| ~Urf]zROUNDS 0|8;.<R~|BV̋V#yډV~uF F<X7l E\ovv3RSFvv^FFvvF6V6TV#yR^ҌFq F F F4F=ANFg d00000004l@ @` n~}vvvvҚ^FvvvvҚ^Fvv6Z6X^F6^6\vvsvv6b6`^FF~dFvv0F66vv~ĝSS^F~܋VSvv66s VBV܃u~}BV֒IF,F >BEFQU^FnruF Ć̜FĨĬFFFp1<@Bx~.Hc    JWco#()*+,.-/F4I5W7\8m9:<V#yډVFFF~un~}>FtFVBVUV2N+NQFt&FV#yVF42Fڃ~}BV֋V2VVBVV;V}VVV;V}V+VV΋~VFt~|~~ FNFt ~~-FFtFVVދVމVVډVV;V|hVV;V2N;~(Ft~~1F~ƋS~~F ~~0F~u ~~.FVJVB;Vu~|~~ FN~}FV;V}VVUv G01234567890123456789 ~V>=CDEFKLMNO,Q2R5SATKVXWgXuYZ^_abchjkpqrtuwx |}!&/28AQW`ckvFtE-~E Ft ~E1 ~VU~E.FV2+ʉNUvƋVVƃR:~~EFFt ~~- ~~+ F~~UF~~MFFf] ćĜ̬F MzENRCQQ;`|PSRf][2.C6<s @^FvvF~|vv6F6DvS^F3R^FVV~|tF$ F+FCGMFTFbF PfvvFvv6J6HSvS^FvvvSS6N6L^Fa)F F'F.FBFIFQUXFҠX{3VBVJ;VuFtvv^F ^^FݜF\]wJ^f]9F@?a@ABCHIKL6M[Q}U[\<]S``ancwdfgh(i(jJkJplqrv|,}=~`~'Tv  ^>vv^Fvv66sK66vvsvv66^F1#F  F*.7FGKNF ,vv66^F^f]& FFzAT2RQQ` |U RAF 1-GYvv^F66vv66vvSS^F^f]!F !%.F5FOf};KKlt MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZRIOF MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE RIOFQQ_CODEDGROUP@1DTHH@ך J!WTRFQQ~RIOFQQRTRFQQ`AERCFQQFERFQQWSBFQQBRTEQQRTQFQQDERCQQERTEQQENRCQQ DWBriof.pas[22,21] WD,RIOFQQ BU &RVVv3RsIvRVR R~ԃ}u$RVR~Sr ~E\Evf]F F48F: UFmFrFdzRTRFQQ}`|L~U RvRQRQvvvvPRf] F.F8F=FCzWTRFQQ~H` V|!URf]˖ FF zRIOFQQ`V|'9:<)==>F@^AfCjPmtMJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZSETS MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE SETSQQ_CODEDGROUP@TDTHH0 JxTWOSQQONESQQZERSQQKCLTSQQCLESQQ?CEQSQQ[MULSQQSUBSQQ9ADDSQQMINdSETSQQ7CISSQQߌSELEQQBRTEQQERTEQQݜ DWBsets.pas[22,21] HDSETSQQ @ )gU  RFV;Vw/~&2FF3 2#NtBVFf]P FDUFzCISSQQc` |9dURV;VsVVVFf] F'FzMINd5`|U RF~~VBV uVVF~^&~~VBVJ;VuVVF~~2~^&2 ʋ~~ VBVJ;VuҚFf]' F̒FzADDSQQ`|9U RF~~VBV uVVF~^&~~VBVJ;VuVVF~~2~^&2#ʋ~~ VBVJ;VuКFf] F̔FzSUBSQQ9`B|URF~~VBV uvvdFF~^&2~^&2#ʋ~~ VBVJ;VuϚFf] F4OrF_zMULSQQ`|[URFvvdFVVF~^&~^&:tFVBVJ;VuՋVBVVVV;Vr(VV~^&2#tFVBVJ;VuދVBVVVV;Vr(VV~^&2#tFVBVJ;VuޚFf] Y FOFzCEQSQQ[`|?URFvvdFVVF~^&2~^&2#tFVBVJ;VuϋVBVVVV;Vr(VV~^&2#tFVBVJ;VuޚFf]  FO̟FHzCLESQQ?`G|UR F< (@ (Pv~Sv~S?v~Sv~SF[4#FFFf] O1O>FzCLTSQQ_`|=KURF~~VBV uf] F.FzZERSQQK9`|fUR~r~~ 2‰NFF3(2 N~~ f]FFGWFzONESQQb`F|UU RVVVVV;VrVVvvVBVJ;Vuf]5 F4OFFzTWOSQQQ`|!7URf] FFzSETSQQ7`|&U w&'()**0L1f234:;<=LCnDEFGHIJ0PRQdRoSTUZ[<a^bxhijqr+tMJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZSTRF MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE STRFQQ_CODEDGROUP@wDTHH  JSWTCFQQ$WTTFQQWTSFQQRTTFQQRTSFQQJRTCFQQSTRFQQZRSTFQQŒaPBAFQQPB; CFQQPBFFQQPBLFQQERCFQQFERFQQGTUFQQMOVESLPADFQQPTUFQQBRTEQQERTEQQY DWBstrf.pas[22,21] HD STRFQQ 0U  Rv3Rrt@+;Vs +VBڌَSvvvVL~}^&~U$sF-vVR^S~U$~U~U"BVVVvFf]9F F'.2;?FK_Fh̞FFF zRSTFQQ` L|xU Rv3Rs>~}v&~E&2;Vr &2;Vv~EY~Evf] QF FdFiF zRTCFQQt` |mJU  Rvv~S@FVVV;V|&VVV~ں &VBVJ;Vuf]2 F !O^F tzRTSFQQJi` n|@U  Rvv~S~&f]֜ F $O1F zRTTFQQ<` 1|U R~uV#yځuvv~SV#y+VV~}F~}~|FV#yڋN+AN~|~uVVVV~| vv~U2#u4vV+VBRV~Ss~} vvf] F 9F F F F F zWTSFQQ`3|CURv~&2RSvvf] F /O4F zWTTFQQ?`|:$U  RvR~Wvvf] F &O+F zWTCFQQ$6` |!ZURf] F F zSTRFQQZ`|QR&T-UEVdZm[{^_`cdprstv'w/z6] />I\n7t MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZTIDGS MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE TIDGQQ_CODEDGROUPɘ@DTHH$ J5TICSZDATETIMEfMIN8ATIDGQQDIG2O'CRCXQQCRDXQQDOSXQQMOVELFILLC DWBtidgs.pas[22,21] @ TIDGQQ CDU F30~ F30~U~Uf]ɜ4͛zDIG2@`|)AUF~sVVFf]BzMIN8A%`|~fU,R3R:2RR2R R2R Rvv RRvvAPf]4F%)O/59O?GKOZF_iOoFwzTIMEfz`|~U*R3R-2RR2R R”R Rvv RRvvAPf]g4F%)O/59O?GKOZF_iOoFvzDATEz`|+ZU,R3R2VFf]ˡ FzTICSZ'`Z|Uf]*zTIDGQQ`|S 0:Kp"#$ %&/'>(S,d\tMJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ< TNSR MS PASCAL PASCAL:4CONSTDATASTACKMEMORYHEAPCODE TNSR_CODEDGROUPP@DTHH  J[SRTRQQRSQRRQQSINRQQ+LNERQQ!EXPRQQ1COSRQQATNRQQTNSRPLYRQQHDXPRQQLNEEQQM10RQQMP2RQQSRTEQQSINRQQEXPRQQLNERQQTRNRQQBRTEQQMULRQQADDRQQERTEQQABSRQQCLTRQQFLTRQQDIVRQQSUBRQQNEGRQQCLERQQCEQRQQ DWBtnsr.pas[22,21] @DTNSR _U  R~^FVV~|>F~~SvvvvS^F F JF QF V$0 ׳]׳] Q)\VBVJ;Vu^^F^f]F )zPLYRQQ` |>URvv^F6"6 vvFnF F&*3F(8c5~P$L~zI=FtRSvv^F6&6$vvsP FF$(1F+P^6*6(vvS6.6,S6260vvS^F4^F 8^FМ)F F&*3F :FFR}TIKcNvvvvvvvvSR<RSS^FFt6N6Lvv^F袜F $(O/F 6F HLUFM X7vv6R6Psvv^F ^^F FF(`;8|Yt&wz^Pc|u~r1^f]F ?zATNRQQn`@|FURvv6V6TS^F^f]F "F )F4F zCOSRQQB`|i1URvv6Z6Xs \^FvvS6b6`^FvvF$F "F,>FFJMF ^F ˠϠvvvS^Fe FFJtvvRdRSv^Fvv66sRSvv^F ^^F^f]! OF+/2F?FLFbF 1zEXPRQQ1`|!URF 44!Z?|An!0} x~y 1P+z ~uw]n4vv66svvF66VB#yR^FVB|vvvv^F6! FF#F,0>F^F(Evvvv^F F 5;oBz66vvRRSvvRRSSvSSRSS^F^f]/O(,O3F=FDF OFVF ]F hF vv^Fvv66s ^^F66vvs3R^Fp66vvsvv66^FӜ1F F6:CFOF^bkF{̂Fڠvv66^F}  F d&X4#]IqvvvvPS^F66vvsKvv66s66vv^F+ F FF&*3FCGJFTXaFo[Rvv66^Fvv^FvvvvvvSRRS^Fvv66svv^F5+ F F=F HLOSF eilF{FnW.vv66svv^F K FF N ^^Fʠ ^f]vF ?zSINRQQ+` |UR= F 4-./00iQVWacd8fDjNlmn{D[eh 4P^|>Ofor  R k+|-./h*,vvvv^F^f]0 F F zSQRRQQ9`|RURvv66svv66s ^F'6 6vvSS^F^f]z6F "F+F7;>FHTXaFhF oFzF hzSRTRQQR`:|!URf]| F F zTNSR`|=,LeMN;tZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZUTLR MS PASCAL PASCAL:4CONSTDATASTACKMEMORYHEAPCODE UTLR_CODEDGROUPP@kDTHH, JM10RQQUTLRDXPRQQΌ)BRTEQQCEQRQQCLERQQMULRQQERTEQQ DWButlr.pas[22,21] @D|UTLR OfKw+fQs #zL} H@ >OfKw+fQs #zL} H@ >냠3U Rvv6"6 sFF"FlOfKw+fQs #zL} H@ >OfKw+fQs #zL} H@ >G0F6&6$vvs[F VV~ĝ$Svvs$Fvv +~ĝ\S^FVJVu\Fq F5@F]bFh8OfKw+fQs #zL} H@ >pVVvv~ĝSs$Nvv +~ĝS^FVBVuNVVFf]F9>F^FzDXPRQQ` |tU RF~t:FF%svv~ĝS^FVyV^^F^f]F:?FbFzM10RQQp`|!URf]М FFzUTLR`|_(*++0-3.8/O1T2\4x5{:<=?@CES.T3V9W<XdZs6t MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZUTLX MS PASCAL PASCAL:6CONSTDATASTACKMEMORYHEAPCODE UTLXQQ_CODEDGROUP@!DTHH  JUTLXQQUM46OKBRTEQQERTEQQ DWButlx.pas[22,21] :D UTLXQQ "U R~tV2#tF2V2ʉFFV2‰FFV2FF2fFfFV2N2ʋV2щVV2N2ʋ~ V2N2ʋV2ыN2ʋV2ы~~2N2ʋV2 ҹuANFFf]  FF0zUM46OK` V|!URf]W FFzUTLXQQ`|/,.(/<0M1Y2h3o4579AtJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ> Z MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ";hc'rw@1Y^6JO,m|TEEOFFQQSAOGQQAUDZGQQAATNRQQ|ONESQQpTRAEQQ SELEQQRRSTFQQuALLHQQ7GTYUQQ(PPLFQQFILLSCAPFNUQQ(RTRFQQnLSLEQQRADDSQQpGHVEQQMP2RQQaDIVRQQaDXPRQQGTUFQQLSTL!:MISO!Fr|;,h^'TJwE"c1@6YmOPCCUQQ(ENDYQQGRTJFQQISOVGQQAMAXRQQdSCALQQ:SEKFQQDZWEQQORDFQQIPTYUQQ(CRCXQQSRTEQQLNEEQQROURQQZERSQQpTRNRQQCUTHQQDGETHQQ7WTBFQQIM10RQQRTAFQQIRECEQQNEWUQQPGETUQQ(PPEFQQPTUFQQRTTFQQuINIUQQ(UTLX!FILF!PASUXM!Pg:D]!5lSX0?&I+NbqDOSXQQUADDOKAMIN8yCPLLQQ:CNVEQQUNLOCKAPBFFQQASSFQQINUEQQRRTLFQQRTCFQQuANNRQQdCLERQQaBEGOQQFBUFUQQPDERCQQYSNHRQQdMISHQQDCURHQQ,T1@mEw|rŁJ';O"6h^cYRCWEQQRERREQQINUXQQRUMULOKANILEQQRGHIEQQLNDRQQdAVAGQQARTXFQQIENWCQQCLOFQQDEJCQQOVWEQQPOSLQQ:FILUQQ(RFARQQdGFNUQQ(EQDLQQ:WTSFQQuASNGQQAGHSEQQNEWFQQPERUQQ(EXPEQQGETFQQINIFQQCPSLQQ:TIDGQQyMTBUQQACLSUQQ(RCIEQQRTNHRQQdPUTUQQ(EXPRQQ|ORDF!IRIOF!nDEBE! hw,mY^'O"ET;c@r~61J{COSRQQ|SINEQQSOVEQQFILKQQGSTKBQQPBAFQQCODCQQSINRQQ|WSBFQQCINSQQAERTEQQAMULRQQaBUFFQQLEDLQQ:MISYQQGCEQRQQaRTQFQQISETEQQRCLTRQQaRESEQQTICSyMINpCSXEQQCLDFQQOUTUQQ(NECLQQ:CNVR!HEAH!7REAR6!aSTRF!uMISG6!Ah^"OT|@;'1Jm6rwE,YcDZREQQRIOFQQnPBCFQQUAOGQQACRDXQQRTIFQQIFILFQQLOCKEDACLNEQQAINRQQdUM46OKBRTEQQAENTEQQ PPMFQQDEXCQQHDRFQQPASUQQPSQRRQQ|RTSFQQuSUBRQQaREFEQQCONLQQ:? REACYPUTFQQWTWFQQICESGQQAEXTEQQ ERRE!TIDGS!ypafE'@kT;X,u1JzO\"6SEKUQQ(DELLQQ:RSRRQQdTANEQQENRCQQYSDZGQQAENDUQQ(STKHQQPCDEQQRRNPEQQENDOQQFTANRQQdMINRQQdUTLRTIMEyPLYRQQ|WTLFQQASNEQQWTCFQQuREWFQQDEWCQQINJEQQROUTFQQEOLFQQCLESQQpPADFQQFLTRQQASNRQQdUTLR!CODC!SETS!p5?NgD]IX",:S0b'lqACSRQQdOPNUQQ(OVREQQINSLQQ:PLYUQQ(FILLCACISSQQpCESXQQBEGHQQADDRQQaASMGQQAHDRVQQPASEQQRLTDLQQ:HEAHQQ7RTWFQQIDISEQQREMSEQQAT2RQQd&"L}_iHUPsx09Zd>C5+nUTLXQQPNUXQQENDXQQTNSR|SADDOKASRTRQQ|MOVESLAMOVELADEICQQINPUQQ(MULSQQpMOVERADIG2ySTRFQQuRTBFQQICEQSQQpNXTUQQ(DZIEQQWTPFQQCSHRQQdCLTSQQpSEQLQQ:FLBUQQ(DEBEQQ NEGRQQaRESFQQVASGQQAMOVESRASETSQQpMISOQQFPBLFQQTNSR!|FILUXM!(MISHM!DPASE!RMISY!G,'E^@Oc;6mJTqY"1vh{LSTLQQ:ENBCQQERCFQQLNERQQ|WTIFQQIABSRQQaFNSUQQ(SUBSQQpNEDLQQ:WTRFQQnCLSGQQACLDUQQ(LTCLQQ:FERFQQWEFUQQ(MICEQQRGROHQQDBEGXQQDATEyEQCLQQ:REPEQQ?]SX'"I:Np+b5D0lgtySMULOKAINPFQQPPMUQQ(SNELQQ:CNVRENDHQQLNTEQQ TFNUQQPCSLEQQRENICQQPPAFQQRSIRQQdINIEQQROVIEQQDEBCQQTWOSQQpWTTFQQuLECLQQ:RFAR!dREAC!YENTX6S!MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ@ Z MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ MJZ"NEWUXMNEWUQQNEWUQQ!(* Eratosthenes Sieve Prime Number Program in Pascal *) (* From September, 1981 Byte magazine, page 182 *) PROGRAM PRIME (OUTPUT); (*$DEBUG- added, of course *) CONST SIZE = 8190; VAR FLAGS : ARRAY [0..SIZE] OF BOOLEAN; I,PRIME,K,COUNT,ITER : INTEGER; PROCEDURE FILLC(LOC: ADRMEM; LEN: WORD; VAL: CHAR); EXTERN; BEGIN WRITELN ('10 iterations'); FOR ITER := 1 TO 10 DO BEGIN COUNT := 0; FILLC(ADR FLAGS,SIZEOF(FLAGS),CHR(TRUE)); FOR I := 0 TO SIZE DO IF FLAGS[I] THEN BEGIN  PRIME := I+I+3; K := I + PRIME; WHILE K <= SIZE DO BEGIN FLAGS[K] := FALSE; K := K + PRIME END; COUNT := COUNT + 1 (* WRITELN(PRIME) *) END; END; WRITELN(COUNT,' primes') END. ine, page 182 *) PROGRAM PRIME (OUTP2,21] %@PASUQQ PAS00000.$$$U~E!f]kzBUFUQQ`|0UVz~U~Es~E&f]zNEWUQQ,`|fEU$RV&R R 30FU&3z@PE\8[[^A+\o# #/ET@GD8[TDv[  :[MOVESR  v[P[D84TD  :[MOVESR P[:[^Av[D8:[Z^AP[^Av[ZDZ  ZMOVESL ZZD84D  ZMOVESL ZZ^AZD8ZZ^AZ^AZZCZ  YFILLC ZY\84C  YFILLC YYD8Z\8YnedYA Ytagain.D8dYCNY  YMOVER A  gNY f(YD8je4C  YMOVER (Y: YA NY  ur fD8YXA (Y : A NY  XTCX  ZXMOVEL 1XpXD8P0.4TC  ZXMOVEL pX ZXA Xuxs[22,21]X D8PZXWAIpXPR A Xuxs[22,2WCW WCPSLQQ W,2W*?M4C WCPSLQQ WU W?m Ws[,2*?M4C WerW*?Wb. CNU ?mWle W? WIer*?Wb. VW W,8a4]WCPSLQQRError:om WB W VVWSNELQQ  F W V,8O io4B VVWSNELQQ V10V*?i Wt ascal Coil ,8OV V? Vn 10*?i Wt ascal VFCV\8rVMScal Comper ? VRIV,8NV PUT OUUTFC\8rLVV,8CP WSNELQQREANTEXT VBV xULVSEQLQQ VBRU,8D EF4B xULVSEQLQQ UU*?EVINIFINUXITBR,8DU!U?EU *?EVINIFINUxU\8@U@!?ExUZE U,8SUJE\8@BUQF U,8OGEVSEQLQQRDx!Dx UlBT TBUPOSLQQ CTCIT,8E Q4lB TBUPOSLQQ T PR*?TCICI,8EPRT?R T CHlT:R,8R)TT*?PR *?TTct>T?sT *?PR *?>T,B(T SCPLLQQ (T.1Tz? 4,B SCPLLQQ T Sf?S (Ton.1z? 4,B S LS*?cT Mscal Comle f?SS S?gS I L*?cT Mscal CSN@jS RINSLQQ jS DS,8d Di4N@ RINSLQQ DS.Sz?jSppa AS ,8d.SSf? DSz?jSppa SR*?.SWB_f?R]!R?/S*?.SWBR>R  $RDELLQQ  qR4pR,8734>  $RDELLQQ pRlT:R,8R)4,8734> :RT%$Rz?/pR?R T CH$R!Qf?D:RkT%z?/pR?Q``Q fQCONLQQ RQ_Q*?NP?4`` fQCONLQQ Q]|Q?2 Q Q_*?NP?4`` |Q"%fQz?=Q!+O!OO c]?2fQPf?\|Q#%"%z?=Q!+O!O0QkPt8L B QCONLQQRC#2' P@`P  P0QFLTRQQ nPkxP,8%4B4@`  P0QFLTRQQ P*#xP,8. x%P[FLTRQQU%;,SB'xP `bP  bPPROURQQ  bPOt880k4 `  bPPROURQQ ,P|O,8 oxPROURQQU456O`O  OB ,PTRNRQQ O2tOt8}]4`  O,PTRNRQQ OETtOt8 r OTRNRQQU).z).#..tO_^O ^OOLNERQQ ^ONt8 4_ ^OOLNERQQ (ONt8 tORRZLNERQQUN_N N(OEXPRQQ NpNt84_ N(OEXPRQQ NpNt8 Nz\EXPRQQUpN_ZN ZNNATNRQQ  ZNMt84_ ZNNATNRQQ $NROMt8  s pNATNRQQUM_M M$NCOSRQQ lMd lMt8Tam4_ M$NCOSRQQ Ms lMt8t SMFQRCOSRQQUlize UneeclM`_VM VMMSINRQQ aVMr Lt8Cev4`_ VMMSINRQQ MocLt8r TlMXUbVSINRQQUric End inL@_L L MSRTRQQ LTO~Lt8tdu4@_ L MSRTRQQ ~L _hL hLPUTFQQ hhLdeLGd T4 _ hLPUTFQQ L_K KGETFQQ mK SKGRer4_ KGETFQQ K^K KCLDFQQ nKER:KGend4^ KCLDFQQ :K^$K $KCLOFQQ f$KteJG  N4^ $KCLOFQQ J^J  |JASSFQQ  oJJ*?4^  |JASSFQQ JER|J? J*?4^ |J&JGJER? &J^J JREWFQQ JIG4^ JREWFQQ I`^I IRESFQQ IINIGn4`^ IRESFQQ NI@^8I  ISEKFQQ 8IhID84@^  ISEKFQQ I>HG\:BRPMISEO.JB UN:L aPcsla GREF=BW=:ARP =MISE = P.SA = = <PIR< EMRCFofHONIFIVRPOFQBPLD  D H  <01i <etar<itno<sOTWFSS  P TPPVOTWFLS VD R!I "XDFQIDM2.LPL   P   P  VDOIX DLO       ^ DBPOOIDPOBPIDX P*^ DLC P         IDPPBPI` X DFQFQIX XOg DX RgDFQHOTWFISPP P V  <p ir < emsOTWFSSP TPPVOTWFLSVX8IF!M*hD8H4%H> |ROUTFQQ HRH> 1|INPFQQ  8t8,88&9:READLN8t8,88&9:READLN2.RbV  SFILLC bV WXU\8QEA TEXT RI,8NV XUVSD8QbV Dx!DxZE,8SUJES>TRAQXUan t Coin ?gS IRRFQ,8Q nDITER 45!RPOFQBPLp# Og DX RgDFQHOTWFISPP P V  <p ir < emsOTWFSSP TPPVOTWFLSVXf?D:RkFQQP,8Q CCOUNT f?\|Q#%PPBP,8Q %K 'k,8%4BBPxPO,8Q 4PRIME t880kOOL,8Q ).I .2t8}]LLHLKQ t FLAGS s TOt8tduIIfHRESFQQU DjIGnfHIbGIPRIME  ObGON\8GIRTAED P|G SbGON\8GIRTAED P|G S45!f]،p+Bл&/ځ;~Ձؾ‹Ҽp&+.....+À w.^_ZXWVU!]URVvR~U?s&"RVLR2#t~VU~E~E?~U2 ҹuANFf]UvRr~E@~}mu ~Em~Em~}mu~E~Ef~Ur ~}uS!RVLR2>u~}t~U\~UB>tB>tA#ʋ~M%~U2 ҹuA~E~#E%4#FFf]U~Ur1~}u(~U s~}<tvRڎS~U2#t~}<tvR~Urs~}uj~U\~U@~Um~E^~U\~;Ums~Uo2~Up~EZ~E[(RVLRf]UF~}<uRVLRFf]Uv\~}<uRVLR~U2VFf]U ~E"~U%~ Ur~U%~Er~U%r~uFQ~U rW~}<t~U"D ;Vr~U=2R3R~U$s~E$2 u2u1~U~U" ҹuA~M%~E%4~Er~E$/2 u ~E$~E"~U"^ڋ&U~E$~U";VrC~UB~;U@wT~}<u8 RVtRR R~}u~Ev ~E@vor~Ev~F+E"~vTB+U@;s~vDB+E@~U@vVڌَS~U"^SRh~U"~M@>t@2‹~E@> u~E$~}<u ~UB~U@;>u1~U~U" ҹuA~M%~E%4~Er~E$~U$s8~}<u/~U@~;UBuvo~}@~Uv2 u~E@~}<t6~U";Vs(~U=2RR~U"^&~E"~U";Vr~UB~;U@wvor~E%~E"j~F+E"~vTB+U@;s~vDB+E@~U@vVڌَS~U"^S6h~U"~U@]~U2VFf]U ~U&2;Vs ~U&2VVV~r,F^ڋU&&@H;FuڋVVFf]U V^&2 u ~rF߃~rB~Us~Uss ~E& ~VU&~PRIME MS PASCAL SYSTEM PASCAL:0CONSTDATASTACKMEMORYHEAPCODEPRIMEDGROUP@4DTH H# JENTGQQPRIME8BEGXQQFILLCOUTFQQINIFQQWTSFQQWTLFQQWTIFQQ DWBPRIMES.PAS ' IPRIMECR10 iterationsbU( F>  primesR RWRRR  R RR > s2    > }> ƅ    @ =u @ = uR6 RRRRWRRRf]r FF"(-9F?EIVY]`dlpuyĂĆĎĒĚģ̆FĬĴ̾FF zPRIME`|;06<MS_hrztES.PAS ' IPRIMECR10 iterationsbU( F>  primesR RWRRR  R RR > s2    > }> ƅ    @ =U&2V~r,^&FM&@H;Fuڍf]U ~s VrƆr RrRtڎSvvs2RhRڎS s2VFf]Uf]Uf]U~E~E~=U&2~;U|Rv4u|&.tDv4u|&:t6vT2BvT֋v4uT&~M֋vtց~E뜋~=U&2~;U|v4uT&~U~Ef]U*F~Uss~E~EtVLR$R3Rxh~EtFU~E<~:tBVFu\V2Vԃ~r(>{ar S2S֡@H;FuދV2u~ArV2~ULFUV2#t |~E~EV2;|>S~UL FEL @= uπ~rV2;|#>{`sSֈS>S2S>C @=u~쾼tBr9~U s~E=~E>~E=~E>~E~E<~tBr~E=~E>~E~E<L~uBr~tBr~E=~E>~E~E<~.u"U V2|~E~E:FV2;|>S~UT FET @=uϋ~}<uq~Ur ~}tRVLR2=rG~Us~E~E )RVLR2=r~E~E~EZ~E[~}u~}<t~E~E~E?~Em~E$~E4~E%~EB~Er~EE ~E!~E@~U2VFf]U~}t~U rڎ‰V2@me]ڎ‰F~E~E51w r.  ~U2#uv666~E$~U2VFf]U~U s#~}tvRڎSFF~E$Ff]UR RR Rf]U VVR^&2R@H;Fuݍf]U &2 ҹtA&2+ы~F2;VwtF:~2V~|*B&F @H;FuFf]U ~E$~VU"~}<tU~U>2u?VV~r3 ~U>2R ^&2Q @ H;Fu ;Fr~UB~;U@wvoriF+ ~vTB+U@; s~vDB+E@ ^ S~U@vVڌَS6 h~E? ~U@ p~U2VFf]U ~VU~NM#tF FFV2 ҹuAvv~U ~E 2PRRN#Fr>r  £~Um;tKvR~Um!RVLR2>tB>tA#ʋ~Mr ~U%~Ur~U@~Ur~MB~;M@w@ ‹~Er~Er~E%~U2VFf]Uf]UFt ~5LI~=U s3U$r,Ur%}uU2#uW0 ~5 RD ~5~~5Tf]U>tUR>uj>t UR3RVf]Uf]Uf]Uv^ڎS f]U ~F~t-F3v0~S{:r S2SF3vFVJVuvRVRwf]U  RhU RRQU~2RGWA} U R(R0Uv RG~tU R4RUvR*} >te>tUR>RU6 RURDRU>U&2R'RURHRU>2RBR} >teURLRU6RURPRlU6RURRRTU6RjURXR6+;6wF6u642d>2t64@42 644;Fs21BBVV>FF4;Fv +F>n4@@;uO>8uFK>2t62>8u VBBR%;u82sFf]URhvF~s~u-hFf]URh-hf]U Rh~tV2#tF2V2ʉFFV2‰FFV2FF2fFfFV2N2ʋV2щVV2N2ʋ~ V2N2ʋV2ыN2ʋV2ы~~2N2ʋV2 ҹuANF-hFf] URh-hf]UFf]U ^ڎ‰^FV+€V~s ~rFV;Vs N^&Vf]Uf]WB PRIMES.PAS G H I WBWB error in file Hard data file Device nameile Operationmeile File systemile Device offline Lost filefline File namefline Device fulline Unknown device File not found Protected file File in useile File not opene Data formatene Line too longe WBWBUSER USER WBWBWBFALSETRUE WBWBWBWBWBPRIMECR10 iterations primesordf.pas[22,21] ORDFQQ F<F<~~~~~~~~filf.pas[22,21] FILFQQ : strf.pas[22,21] STRFQQ filuxm.pas[22,21] FILUQQ  USERLINELPT1PRN  misy.pas[22,21] MISYQQ erre.pas[22,21] ERREQQ 0? Error: Error Code, Status Line In Of PC =:, FP =, SP =Unsigned Divide By ZeroSigned DiJ vide By ZeroREAL Divide By ZeroUnsigned Math OverflowSigned Math OverflowREAL Math OverflowSIN or COS Argument RangeEXP Argument RangeSQRT of Negative ArgumentLN of Non-Positive ArgumentTRUNC/ROUND Argument RangeTangent Argument Too SmallArcsin or Arccos of REAL > 1.0Negative REAL To REAL PowerStack OverflowNo Room in HeapHeap Is InvalidHeap Allocator Interruptedcodc.pas[22,21] CODCQQ 1 TRUE 0 FALSEmiso.pas[22,21] MISOQQ pasuxm.pas[22,21] PASUQQ PAS00000.$$$heah.pas[22,21] HEAHQQ utlx.pas[22,21] UTLXQQ mishm.pas[22,21] MISHQQ CINSQQAERTEQQAMULRQQaBUFFQQLEDLQQ:MISYQQGCEQRQQaRTQFQQISETEQQRCLTRQQaRESEQQTICSyMINpCSXEQQCLDFQQOUTUQQ(NECLQQ:CNVR!HEAH!7REAR6!aSTRF!uMISG6!ASTACK 040F0H 067BDH 26CEH DATA DATA 067C0H 06C73H 04B4H CONST CONST Program entry point at 01C1:0000 REACYPUTFQQWTWFQQICESGQQAEXTEQQ ERRE!TIDGS!ypafE'@kT;X,u1JzO\"6SEKUQQ(DELLQQ:RSRRQQdTANEQQENRCQQYSDZGQQAENDUQQ(STKHQQPCDEQQRRNPEQQENDOQQFTANRQQdMINRQQdUTLRTIMEyPLYRQQ|WTLFQQASNEQQWTCFQQuREWFQQDEWCQQINJEQQROUTFQQEOLFQQCLESQQpPADFQQFLTRQQASNRQQdUTLR!CODC!SETS!p5?NgD]IX",:S0b'lqACSRQQdOPNUQQ(OVREQQINSLQQ:PLYUQQ(FILLCACISSQQpCESXQQBEGHQQADDRQQaASMGQQAHDRVQQPASEQQRLTDLQQ:HEAHQQ7RTWFQQIDISEQQREMSEQQAT2RQQd&"L}_iHUPsx09Zd>C5+nUTLXQQPNUXQQENDXQQTNSR|SADDOKASRTRQQ|MOVESLAMOVELADEICQQINPUQQ(MULSQQpMOVERADIG2ySTRFQQuRTBFQQICEQSQQpNXTUQQ(DZIEQQWTPFQQCSHRQQdCLTSQQpSEQLQQ:FLBUQQ(DEBEQQ NEGRQQaRESFQQVASGQQAMOVESRASETSQQpMISOQQFPBLFQQTNSR!|FILUXM!(MISHM!DPASE!RMISY!G,'E^@Oc;6mJTqY"1vh{LSTLQQ:ENBCQQERCFQQLNERQQ|WTIFQQIABSRQQaFNSUQQ(SUBSQQpNEDLQQ:WTRFQQnCLSGQQACLDUQQ(LTCLQQ:FERFQQWEFUQQ(MICEQQRGROHQQDBEGXQQDATEyEQCLQQ:REPEQQK ?]SX'"I:Np+b5D0lgtySMULOKAINPFQQPPMUQQ(SNELQQ:CNVRENDHQQLNTEQQ TFNUQQPCSLEQQRENICQQPPAFQQRSIRQQdINIEQQROVIEQQDEBCQQTWOSQQpWTTFQQuLECLQQ:RFAR!dREAC!YENTX6S!L