Microsoft (R) Macro Assembler Version 6.11 05/19/10 10:14:14 u:\292.asm Page 1 - 1 INCLUDE IO.ASM C C .nolist ;запрет записи этого файла в листинг C .list C ;------------------------------------------- 0000 STACK SEGMENT STACK 0000 0080 [ DB 128 DUP (?) 00 ] 0080 STACK ENDS ;------------------------------------------- 0000 DATA SEGMENT 0000 0008 [ X DW 8 DUP (NIL) 0000 ] 0010 0008 [ Y DB 8 DUP (?) 00 ] 0018 01 Z DB 1 0019 53 4C 4F 56 4F 3A SL DB 'SLOVO: $' 20 24 0021 50 4F 52 41 44 4B PR DB 'PORADKOVII NOMER: $' 4F 56 49 49 20 4E 4F 4D 45 52 3A 20 24 0034 49 4E 50 55 54 54 INP DB 'INPUTTATIONS FINISHED$' 41 54 49 4F 4E 53 20 46 49 4E 49 53 48 45 44 24 004A 4F 55 54 50 55 54 OUTP DB 'OUTPUTTATIONS FINISHED$' 54 41 54 49 4F 4E 53 20 46 49 4E 49 53 48 45 44 24 0061 DATA ENDS ;------------------------------------------- 000B NODE STRUC 0000 00 L1 DB ? 0001 00 L2 DB ? 0002 00 L3 DB ? 0003 00 L4 DB ? 0004 00 L5 DB ? 0005 00 L6 DB ? 0006 00 L7 DB ? 0007 00 L8 DB ? 0008 01 NUM DB 1 0009 0000 NEXT DW ? NODE ENDS ;------------------------------------------- = 0064 HSIZE EQU 100 = 0000 NIL EQU 0 0000 HEAP SEGMENT 0000 0000 HPTR DW ? 0002 044C [ DB 11*HSIZE DUP (?) 00 ] 044E HEAP ENDS ;------------------------------------------- 0000 CODE SEGMENT ASSUME CS: CODE, DS: DATA, SS: STACK, ES:HEAP ;----------------------------------- 0000 IHEAP PROC FAR 0000 56 PUSH SI u:\292.asm(41): warning A4012: line number information for segment without class 'CODE' : CODE 0001 53 PUSH BX 0002 51 PUSH CX 0003 B9 ---- R MOV CX,HEAP 0006 8E C1 MOV ES,CX 0008 B9 0064 MOV CX, HSIZE 000B BB 0000 MOV BX,NIL 000E BE 044A MOV SI,11*HSIZE-2 0011 26: 89 5C 09 INPO: MOV ES:[SI].NEXT,BX 0015 8B DE MOV BX,SI 0017 83 EE 0B SUB SI,11 001A E2 F5 LOOP INPO 001C 26: 89 1E 0000 R MOV ES:HPTR,BX 0021 59 POP CX 0022 5B POP BX 0023 5E POP SI 0024 CB RET 0025 IHEAP ENDP ;------------------------------------------- 0025 DISPOSE PROC FAR 0025 26: FF 36 0000 R PUSH ES:HPTR 002A 26: 8F 45 09 POP ES:[DI].NEXT 002E 26: 89 3E 0000 R MOV ES:HPTR,DI 0033 CB RET 0034 DISPOSE ENDP ;------------------------------------------- 0034 DELETE PROC 0034 50 PUSH AX 0035 53 PUSH BX 0036 51 PUSH CX 0037 52 PUSH DX 0038 57 PUSH DI 0039 56 PUSH SI 003A 8D 1E 0000 R LEA BX,X 003E B9 0008 MOV CX,8 0041 8B 3F INMAS: MOV DI,[BX] 0043 BB 0000 MOV WORD PTR BX, NIL 0046 83 FF 00 INLIST: CMP DI, NIL 0049 74 0C JE NEXTA 004B 26: 8B 75 09 MOV SI, ES:[DI].NEXT 004F 0E E8 FFD2 CALL DISPOSE 0053 8B FE MOV DI, SI 0055 EB EF JMP INLIST 0057 83 C3 02 NEXTA: ADD BX, 2 005A E2 E5 LOOP INMAS 005C 5E POP SI 005D 5F POP DI 005E 5A POP DX 005F 59 POP CX 0060 5B POP BX 0061 58 POP AX 0062 C3 RET 0063 DELETE ENDP ;------------------------------------------- 0063 NEW PROC FAR 0063 26: 8B 3E 0000 R MOV DI,ES:HPTR 0068 83 FF 00 CMP DI,NIL 006B 74 0A JE EH 006D 26: FF 75 09 PUSH ES:[DI].NEXT 0071 26: 8F 06 0000 R POP ES:HPTR 0076 CB RET 0077 2E: C5 16 0099 R EH: LDS DX,CS:AE OUTSTR 007C 50 1 push ax 007D B4 09 1 mov ah,9 007F CD 21 1 int 21h 0081 58 1 pop ax NEWLINE 0082 9A ---- 0000 E 1 call procnl OUTCH '<' 0087 52 1 push dx 0088 50 1 push ax 0089 B2 3C 1 mov dl,'<' 008B B4 02 1 mov ah,2 008D CD 21 1 int 21h 008F 58 1 pop ax 0090 5A 1 pop dx ;CALL DELETE 0091 0E E8 FF6B call iheap FINISH 0095 B4 4C 1 mov ah,4Ch 0097 CD 21 1 int 21h 0099 ---- 009D R AE DD E 009D 4B 55 21 24 E DB 'KU!','$' 00A1 NEW ENDP ;------------------------------------------- 00A1 INSP PROC 00A1 55 PUSH BP 00A2 8B EC MOV BP,SP 00A4 50 PUSH AX 00A5 53 PUSH BX 00A6 51 PUSH CX 00A7 52 PUSH DX 00A8 57 PUSH DI 00A9 56 PUSH SI 00AA 8B 5E 04 MOV BX,[BP+4] 00AD 8B 76 06 MOV SI,[BP+6] 00B0 4B DEC BX 00B1 03 DB ADD BX,BX 00B3 33 ED XOR BP,BP 00B5 33 D2 XOR DX,DX 00B7 42 INC DX 00B8 8B CB MOV CX,BX 00BA 8B 87 0000 R MOV AX,X[BX] 00BE 8B D8 MOV BX,AX 00C0 83 FB 00 OP: CMP BX,NIL 00C3 74 07 JE FOUND 00C5 45 INC BP 00C6 26: 8B 5F 09 MOV BX,ES:[BX].NEXT 00CA EB F4 JMP OP 00CC 0E E8 FF93 FOUND: CALL NEW 00D0 BB 0000 MOV BX,0 00D3 8A 20 MOV AH,[SI][BX] 00D5 26: 88 25 MOV ES:[DI].L1,AH 00D8 43 INC BX 00D9 8A 20 MOV AH,[SI][BX] 00DB 26: 88 65 01 MOV ES:[DI].L2,AH 00DF 43 INC BX 00E0 8A 20 MOV AH,[SI][BX] 00E2 26: 88 65 02 MOV ES:[DI].L3,AH 00E6 43 INC BX 00E7 8A 20 MOV AH,[SI][BX] 00E9 26: 88 65 03 MOV ES:[DI].L4,AH 00ED 43 INC BX 00EE 8A 20 MOV AH,[SI][BX] 00F0 26: 88 65 04 MOV ES:[DI].L5,AH 00F4 43 INC BX 00F5 8A 20 MOV AH,[SI][BX] 00F7 26: 88 65 05 MOV ES:[DI].L6,AH 00FB 43 INC BX 00FC 8A 20 MOV AH,[SI][BX] 00FE 26: 88 65 06 MOV ES:[DI].L7,AH 0102 43 INC BX 0103 8A 20 MOV AH,[SI][BX] 0105 26: 88 65 07 MOV ES:[DI].L8,AH 0109 8A 16 0018 R MOV DL,Z 010D 26: 88 55 08 MOV ES:[DI].NUM,DL 0111 FE 06 0018 R INC Z 0115 26: C7 45 09 0000 MOV ES:[DI].NEXT,NIL 011B 83 FD 00 CMP BP,0 011E 75 08 JNE LV 0120 8B D9 MOV BX,CX 0122 89 BF 0000 R MOV X[BX],DI 0126 EB 17 JMP FININ 0128 8B D9 LV: MOV BX,CX 012A 8B 9F 0000 R MOV BX,X[BX] 012E 26: 83 7F 09 00 CU: CMP ES:[BX].NEXT,NIL 0133 74 06 JE N 0135 26: 8B 5F 09 MOV BX,ES:[BX].NEXT 0139 EB F3 JMP CU 013B 26: 89 7F 09 N: MOV ES:[BX].NEXT,DI 013F 5E FININ: POP SI 0140 5F POP DI 0141 5A POP DX 0142 59 POP CX 0143 5B POP BX 0144 58 POP AX 0145 5D POP BP 0146 C2 0004 RET 4 0149 INSP ENDP ;------------------------------------------- 0149 INPUT PROC 0149 55 PUSH BP 014A 50 PUSH AX 014B 53 PUSH BX 014C 51 PUSH CX 014D 52 PUSH DX 014E 57 PUSH DI 014F 56 PUSH SI 0150 32 D2 XOR DL,DL 0152 32 C0 AGAIN: XOR AL,AL 0154 33 DB XOR BX,BX 0156 B9 0008 MOV CX,8 0159 C6 87 0010 R 20 MC: MOV Y[BX],' ' 015E 43 INC BX 015F E2 F8 LOOP MC 0161 33 DB XOR BX,BX 0163 B0 00 MOV AL,0 0165 V: INCH AH 0165 86 E0 1 xchg ah,al 0167 B0 00 1 mov al,0 0169 9A ---- 0000 E 1 call procinch 016E 86 E0 1 xchg ah,al 0170 80 FC 2C CMP AH,',' 0173 74 15 JE ZP1 0175 80 FC 2E ZP3: CMP AH,'.' 0178 75 02 JNE PR10 017A EB 1D JMP ZP2 017C FE C0 PR10: INC AL 017E 83 FB 08 CMP BX,8 0181 74 E2 JE V 0183 88 A7 0010 R MOV Y[BX],AH 0187 43 INC BX 0188 EB DB JMP V 018A 80 FC 2C ZP1: CMP AH,',' 018D 75 0A JNE ZP2 018F FE C2 INC DL 0191 80 FA 14 CMP DL,20 0194 7C 03 JL ZP2 0196 E9 012E JMP INCOR 0199 3C 00 ZP2: CMP AL,0 019B 75 03 JNE PR11 019D E9 0127 JMP INCOR 01A0 83 FB 00 PR11: CMP BX,0 01A3 74 C0 JE V 01A5 8B CB MOV CX,BX 01A7 BD 0000 MOV BP,0 01AA 3E: 80 BE 0010 R PF: CMP Y[BP],'A' 41 01B0 73 03 JAE PR1 01B2 E9 0112 JMP INCOR 01B5 3E: 80 BE 0010 R PR1: CMP Y[BP],'Z' 5A 01BB 76 03 JBE PR2 01BD E9 0107 JMP INCOR 01C0 E2 E8 PR2: LOOP PF 01C2 52 PUSH DX 01C3 8B D3 MOV DX,BX 01C5 4B DEC BX 01C6 03 DB ADD BX,BX 01C8 83 BF 0000 R 00 CMP X[BX],NIL 01CD 75 0B JNE NEMPTY 01CF BF 0010 R MOV DI,OFFSET Y 01D2 57 PUSH DI 01D3 52 PUSH DX 01D4 E8 FECA CALL INSP 01D7 E9 0130 JMP VH 01DA 8B 9F 0000 R NEMPTY: MOV BX,X[BX] 01DE BE 0000 MOV SI,0 01E1 8A 2E 0010 R COMP: MOV CH,Y 01E5 26: 3A 2F CMP CH,ES:[BX].L1 01E8 76 03 JBE PR3 01EA E9 0081 JMP GR 01ED 73 03 PR3: JAE PR4 01EF E9 0097 JMP LE1 01F2 BD 0001 PR4: MOV BP,1 01F5 3E: 8A AE 0010 R MOV CH,Y[BP] 01FA 26: 3A 6F 01 CMP CH,ES:[BX].L2 01FE 76 02 JBE PR5 0200 EB 6C JMP GR 0202 73 03 PR5: JAE PR6 0204 E9 0082 JMP LE1 0207 BD 0002 PR6: MOV BP,2 020A 3E: 8A AE 0010 R MOV CH,Y[BP] 020F 26: 3A 6F 02 CMP CH,ES:[BX].L3 0213 77 59 JA GR 0215 72 72 JB LE1 0217 BD 0003 MOV BP,3 021A 3E: 8A AE 0010 R MOV CH,Y[BP] 021F 26: 3A 6F 03 CMP CH,ES:[BX].L4 0223 77 49 JA GR 0225 72 62 JB LE1 0227 BD 0004 MOV BP,4 022A 3E: 8A AE 0010 R MOV CH,Y[BP] 022F 26: 3A 6F 04 CMP CH,ES:[BX].L5 0233 77 39 JA GR 0235 72 52 JB LE1 0237 BD 0005 MOV BP,5 023A 3E: 8A AE 0010 R MOV CH,Y[BP] 023F 26: 3A 6F 05 CMP CH,ES:[BX].L6 0243 77 29 JA GR 0245 72 42 JB LE1 0247 BD 0006 MOV BP,6 024A 3E: 8A AE 0010 R MOV CH,Y[BP] 024F 26: 3A 6F 06 CMP CH,ES:[BX].L7 0253 77 19 JA GR 0255 72 32 JB LE1 0257 BD 0007 MOV BP,7 025A 3E: 8A AE 0010 R MOV CH,Y[BP] 025F 26: 3A 6F 07 CMP CH,ES:[BX].L8 0263 77 09 JA GR 0265 72 22 JB LE1 0267 FE 06 0018 R EQVAL: INC Z 026B E9 009C JMP VH 026E 8B F3 GR: MOV SI,BX 0270 26: 83 7F 09 00 CMP ES:[BX].NEXT,NIL 0275 74 07 JE KK 0277 26: 8B 5F 09 MOV BX,ES:[BX].NEXT 027B E9 FF63 JMP COMP 027E BF 0010 R KK: MOV DI,OFFSET Y 0281 57 PUSH DI 0282 52 PUSH DX 0283 E8 FE1B CALL INSP 0286 E9 0081 JMP VH 0289 83 FE 00 LE1: CMP SI,NIL 028C 75 21 JNE KE 028E 8B DA MOV BX,DX 0290 4B DEC BX 0291 03 DB ADD BX,BX 0293 8B B7 0000 R MOV SI,X[BX] 0297 C7 87 0000 R 0000 MOV X[BX],NIL 029D BF 0010 R MOV DI,OFFSET Y 02A0 57 PUSH DI 02A1 52 PUSH DX 02A2 E8 FDFC CALL INSP 02A5 8B 9F 0000 R MOV BX,X[BX] 02A9 26: 89 77 09 MOV ES:[BX].NEXT,SI 02AD EB 5B JMP VH 02AF 26: C7 44 09 0000 KE: MOV ES:[SI].NEXT,NIL 02B5 BF 0010 R MOV DI,OFFSET Y 02B8 57 PUSH DI 02B9 52 PUSH DX 02BA E8 FDE4 CALL INSP 02BD 26: 8B 74 09 MOV SI,ES:[SI].NEXT 02C1 26: 89 5C 09 MOV ES:[SI].NEXT,BX 02C5 EB 43 JMP VH 02C7 2E: C5 16 02F3 R INCOR: LDS DX,CS:AR OUTSTR 02CC 50 1 push ax 02CD B4 09 1 mov ah,9 02CF CD 21 1 int 21h 02D1 58 1 pop ax FLUSH 02D2 9A ---- 0000 E 1 call procflush NEWLINE 02D7 9A ---- 0000 E 1 call procnl OUTCH '<' 02DC 52 1 push dx 02DD 50 1 push ax 02DE B2 3C 1 mov dl,'<' 02E0 B4 02 1 mov ah,2 02E2 CD 21 1 int 21h 02E4 58 1 pop ax 02E5 5A 1 pop dx ;LL DELETE 02E6 0E E8 FD16 call iheap FLUSH 02EA 9A ---- 0000 E 1 call procflush FINISH 02EF B4 4C 1 mov ah,4Ch 02F1 CD 21 1 int 21h 02F3 ---- 02F7 R AR DD R 02F7 57 52 4F 4E 47 20 R DB 'WRONG INPUTTATION!','$' 49 4E 50 55 54 54 41 54 49 4F 4E 21 24 030A 80 FC 2E VH: CMP AH,'.' 030D 5A POP DX 030E 74 03 JE PR7 0310 E9 FE3F JMP AGAIN 0313 5E PR7: POP SI 0314 5F POP DI 0315 5A POP DX 0316 59 POP CX 0317 5B POP BX 0318 58 POP AX 0319 5D POP BP 031A C3 RET 031B INPUT ENDP ;------------------------------------------- 031B MOUT PROC 031B 55 PUSH BP 031C 8B EC MOV BP,SP 031E 50 PUSH AX 031F 53 PUSH BX 0320 51 PUSH CX 0321 52 PUSH DX 0322 57 PUSH DI 0323 56 PUSH SI 0324 8B 5E 04 MOV BX,[BP+4] 0327 4B DEC BX 0328 03 DB ADD BX,BX 032A 8B 9F 0000 R MOV BX,X[BX] 032E 83 FB 00 CMP BX,NIL 0331 75 03 JNE VV 0333 E9 00A4 JMP POH 0336 8D 16 0019 R VV: LEA DX,SL OUTSTR 033A 50 1 push ax 033B B4 09 1 mov ah,9 033D CD 21 1 int 21h 033F 58 1 pop ax OUTCH ES:[BX].L1 0340 52 1 push dx 0341 50 1 push ax 0342 26: 8A 17 1 mov dl,ES:[BX].L1 0345 B4 02 1 mov ah,2 0347 CD 21 1 int 21h 0349 58 1 pop ax 034A 5A 1 pop dx OUTCH ES:[BX].L2 034B 52 1 push dx 034C 50 1 push ax 034D 26: 8A 57 01 1 mov dl,ES:[BX].L2 0351 B4 02 1 mov ah,2 0353 CD 21 1 int 21h 0355 58 1 pop ax 0356 5A 1 pop dx OUTCH ES:[BX].L3 0357 52 1 push dx 0358 50 1 push ax 0359 26: 8A 57 02 1 mov dl,ES:[BX].L3 035D B4 02 1 mov ah,2 035F CD 21 1 int 21h 0361 58 1 pop ax 0362 5A 1 pop dx OUTCH ES:[BX].L4 0363 52 1 push dx 0364 50 1 push ax 0365 26: 8A 57 03 1 mov dl,ES:[BX].L4 0369 B4 02 1 mov ah,2 036B CD 21 1 int 21h 036D 58 1 pop ax 036E 5A 1 pop dx OUTCH ES:[BX].L5 036F 52 1 push dx 0370 50 1 push ax 0371 26: 8A 57 04 1 mov dl,ES:[BX].L5 0375 B4 02 1 mov ah,2 0377 CD 21 1 int 21h 0379 58 1 pop ax 037A 5A 1 pop dx OUTCH ES:[BX].L6 037B 52 1 push dx 037C 50 1 push ax 037D 26: 8A 57 05 1 mov dl,ES:[BX].L6 0381 B4 02 1 mov ah,2 0383 CD 21 1 int 21h 0385 58 1 pop ax 0386 5A 1 pop dx OUTCH ES:[BX].L7 0387 52 1 push dx 0388 50 1 push ax 0389 26: 8A 57 06 1 mov dl,ES:[BX].L7 038D B4 02 1 mov ah,2 038F CD 21 1 int 21h 0391 58 1 pop ax 0392 5A 1 pop dx OUTCH ES:[BX].L8 0393 52 1 push dx 0394 50 1 push ax 0395 26: 8A 57 07 1 mov dl,ES:[BX].L8 0399 B4 02 1 mov ah,2 039B CD 21 1 int 21h 039D 58 1 pop ax 039E 5A 1 pop dx OUTCH ' ' 039F 52 1 push dx 03A0 50 1 push ax 03A1 B2 20 1 mov dl,' ' 03A3 B4 02 1 mov ah,2 03A5 CD 21 1 int 21h 03A7 58 1 pop ax 03A8 5A 1 pop dx 03A9 8D 16 0021 R LEA DX,PR OUTSTR 03AD 50 1 push ax 03AE B4 09 1 mov ah,9 03B0 CD 21 1 int 21h 03B2 58 1 pop ax 03B3 26: 8A 47 08 MOV AL,ES:[BX].NUM 03B7 98 CBW OUTINT AX 03B8 50 2 push ax 03B9 52 2 push dx 03BA B2 00 2 mov dl,0 03BC 8B C0 2 mov ax,AX 03BE B6 01 2 mov dh,1 03C0 9A ---- 0000 E 2 call procoutnum 03C5 5A 2 pop dx 03C6 58 2 pop ax NEWLINE 03C7 9A ---- 0000 E 1 call procnl 03CC 26: 83 7F 09 00 CMP ES:[BX].NEXT,NIL 03D1 74 07 JE POH 03D3 26: 8B 5F 09 MOV BX,ES:[BX].NEXT 03D7 E9 FF5C JMP VV 03DA 5E POH: POP SI 03DB 5F POP DI 03DC 5A POP DX 03DD 59 POP CX 03DE 5B POP BX 03DF 58 POP AX 03E0 5D POP BP 03E1 C2 0002 RET 2 03E4 MOUT ENDP ;------------------------------------------- 03E4 B8 ---- R START: MOV AX, DATA 03E7 8E D8 MOV DS, AX 03E9 0E E8 FC13 CALL IHEAP OUTCH '>' 03ED 52 1 push dx 03EE 50 1 push ax 03EF B2 3E 1 mov dl,'>' 03F1 B4 02 1 mov ah,2 03F3 CD 21 1 int 21h 03F5 58 1 pop ax 03F6 5A 1 pop dx NEWLINE 03F7 9A ---- 0000 E 1 call procnl NEWLINE 03FC 9A ---- 0000 E 1 call procnl 0401 33 D2 XOR DX,DX 0403 33 DB XOR BX,BX 0405 E8 FD41 CALL INPUT NEWLINE 0408 9A ---- 0000 E 1 call procnl 040D 8D 16 0034 R LEA DX,INP OUTSTR 0411 50 1 push ax 0412 B4 09 1 mov ah,9 0414 CD 21 1 int 21h 0416 58 1 pop ax NEWLINE 0417 9A ---- 0000 E 1 call procnl NEWLINE 041C 9A ---- 0000 E 1 call procnl 0421 BB 0002 MOV BX,2 0424 8B 9F 0000 R MOV BX,X[BX] 0428 BB 0001 MOV BX,1 042B 53 PUSH BX 042C E8 FEEC CALL MOUT 042F BB 0002 MOV BX,2 0432 53 PUSH BX 0433 E8 FEE5 CALL MOUT 0436 BB 0003 MOV BX,3 0439 53 PUSH BX 043A E8 FEDE CALL MOUT 043D BB 0004 MOV BX,4 0440 53 PUSH BX 0441 E8 FED7 CALL MOUT 0444 BB 0005 MOV BX,5 0447 53 PUSH BX 0448 E8 FED0 CALL MOUT 044B BB 0006 MOV BX,6 044E 53 PUSH BX 044F E8 FEC9 CALL MOUT 0452 BB 0007 MOV BX,7 0455 53 PUSH BX 0456 E8 FEC2 CALL MOUT 0459 BB 0008 MOV BX,8 045C 53 PUSH BX 045D E8 FEBB CALL MOUT NEWLINE 0460 9A ---- 0000 E 1 call procnl 0465 8D 16 004A R LEA DX,OUTP OUTSTR 0469 50 1 push ax 046A B4 09 1 mov ah,9 046C CD 21 1 int 21h 046E 58 1 pop ax NEWLINE 046F 9A ---- 0000 E 1 call procnl NEWLINE 0474 9A ---- 0000 E 1 call procnl OUTCH '<' 0479 52 1 push dx 047A 50 1 push ax 047B B2 3C 1 mov dl,'<' 047D B4 02 1 mov ah,2 047F CD 21 1 int 21h 0481 58 1 pop ax 0482 5A 1 pop dx ;CALL DELETE 0483 0E E8 FB79 call iheap FINISH 0487 B4 4C 1 mov ah,4Ch 0489 CD 21 1 int 21h 048B CODE ENDS END START Microsoft (R) Macro Assembler Version 6.11 05/19/10 10:14:14 u:\292.asm Symbols 2 - 1 Macros: N a m e Type finish . . . . . . . . . . . . . Proc flush . . . . . . . . . . . . . Proc inch . . . . . . . . . . . . . . Proc inint . . . . . . . . . . . . . Proc newline . . . . . . . . . . . . Proc outch . . . . . . . . . . . . . Proc outint . . . . . . . . . . . . . Proc outnum . . . . . . . . . . . . . Proc outstr . . . . . . . . . . . . . Proc outword . . . . . . . . . . . . Proc same . . . . . . . . . . . . . . Proc Structures and Unions: N a m e Size Offset Type NODE . . . . . . . . . . . . . . 000B L1 . . . . . . . . . . . . . . 0000 Byte L2 . . . . . . . . . . . . . . 0001 Byte L3 . . . . . . . . . . . . . . 0002 Byte L4 . . . . . . . . . . . . . . 0003 Byte L5 . . . . . . . . . . . . . . 0004 Byte L6 . . . . . . . . . . . . . . 0005 Byte L7 . . . . . . . . . . . . . . 0006 Byte L8 . . . . . . . . . . . . . . 0007 Byte NUM . . . . . . . . . . . . . 0008 Byte NEXT . . . . . . . . . . . . . 0009 Word Segments and Groups: N a m e Size Length Align Combine Class CODE . . . . . . . . . . . . . . 16 Bit 048B Para Private DATA . . . . . . . . . . . . . . 16 Bit 0061 Para Private HEAP . . . . . . . . . . . . . . 16 Bit 044E Para Private STACK . . . . . . . . . . . . . 16 Bit 0080 Para Stack Procedures, parameters and locals: N a m e Type Value Attr DELETE . . . . . . . . . . . . . P Near 0034 CODE Length= 002F Private DISPOSE . . . . . . . . . . . . P Far 0025 CODE Length= 000F Private IHEAP . . . . . . . . . . . . . P Far 0000 CODE Length= 0025 Private INPUT . . . . . . . . . . . . . P Near 0149 CODE Length= 01FD Private INSP . . . . . . . . . . . . . . P Near 00A1 CODE Length= 00A8 Private MOUT . . . . . . . . . . . . . . P Near 031B CODE Length= 00C9 Private NEW . . . . . . . . . . . . . . P Far 0063 CODE Length= 003E Private Symbols: N a m e Type Value Attr ??0000 . . . . . . . . . . . . . Number 0001h ??0001 . . . . . . . . . . . . . Number 0000h AE . . . . . . . . . . . . . . . DWord 0099 CODE AGAIN . . . . . . . . . . . . . L Near 0152 CODE AR . . . . . . . . . . . . . . . DWord 02F3 CODE COMP . . . . . . . . . . . . . . L Near 01E1 CODE CU . . . . . . . . . . . . . . . L Near 012E CODE EH . . . . . . . . . . . . . . . L Near 0077 CODE EQVAL . . . . . . . . . . . . . L Near 0267 CODE E . . . . . . . . . . . . . . . Byte 009D CODE FININ . . . . . . . . . . . . . L Near 013F CODE FOUND . . . . . . . . . . . . . L Near 00CC CODE GR . . . . . . . . . . . . . . . L Near 026E CODE HPTR . . . . . . . . . . . . . . Word 0000 HEAP HSIZE . . . . . . . . . . . . . Number 0064h INCOR . . . . . . . . . . . . . L Near 02C7 CODE INLIST . . . . . . . . . . . . . L Near 0046 CODE INMAS . . . . . . . . . . . . . L Near 0041 CODE INPO . . . . . . . . . . . . . . L Near 0011 CODE INP . . . . . . . . . . . . . . Byte 0034 DATA KE . . . . . . . . . . . . . . . L Near 02AF CODE KK . . . . . . . . . . . . . . . L Near 027E CODE LE1 . . . . . . . . . . . . . . L Near 0289 CODE LV . . . . . . . . . . . . . . . L Near 0128 CODE MC . . . . . . . . . . . . . . . L Near 0159 CODE NEMPTY . . . . . . . . . . . . . L Near 01DA CODE NEXTA . . . . . . . . . . . . . L Near 0057 CODE NIL . . . . . . . . . . . . . . Number 0000h N . . . . . . . . . . . . . . . L Near 013B CODE OP . . . . . . . . . . . . . . . L Near 00C0 CODE OUTP . . . . . . . . . . . . . . Byte 004A DATA PF . . . . . . . . . . . . . . . L Near 01AA CODE POH . . . . . . . . . . . . . . L Near 03DA CODE PR10 . . . . . . . . . . . . . . L Near 017C CODE PR11 . . . . . . . . . . . . . . L Near 01A0 CODE PR1 . . . . . . . . . . . . . . L Near 01B5 CODE PR2 . . . . . . . . . . . . . . L Near 01C0 CODE PR3 . . . . . . . . . . . . . . L Near 01ED CODE PR4 . . . . . . . . . . . . . . L Near 01F2 CODE PR5 . . . . . . . . . . . . . . L Near 0202 CODE PR6 . . . . . . . . . . . . . . L Near 0207 CODE PR7 . . . . . . . . . . . . . . L Near 0313 CODE PR . . . . . . . . . . . . . . . Byte 0021 DATA R . . . . . . . . . . . . . . . Byte 02F7 CODE SL . . . . . . . . . . . . . . . Byte 0019 DATA START . . . . . . . . . . . . . L Near 03E4 CODE VH . . . . . . . . . . . . . . . L Near 030A CODE VV . . . . . . . . . . . . . . . L Near 0336 CODE V . . . . . . . . . . . . . . . L Near 0165 CODE X . . . . . . . . . . . . . . . Word 0000 DATA Y . . . . . . . . . . . . . . . Byte 0010 DATA ZP1 . . . . . . . . . . . . . . L Near 018A CODE ZP2 . . . . . . . . . . . . . . L Near 0199 CODE ZP3 . . . . . . . . . . . . . . L Near 0175 CODE Z . . . . . . . . . . . . . . . Byte 0018 DATA procflush . . . . . . . . . . . L Far 0000 External procinch . . . . . . . . . . . . L Far 0000 External procinint . . . . . . . . . . . L Far 0000 External procnl . . . . . . . . . . . . . L Far 0000 External procoutnum . . . . . . . . . . . L Far 0000 External 1 Warnings 0 Errors