Microsoft (R) Macro Assembler Version 6.11 05/04/10 22:01:39 u:\vtor_ko.asm Page 1 - 1 include io.asm C C .nolist ;запрет записи этого файла в листинг C .list C 0000 stack segment stack 0000 0080 [ dw 128 dup (?) 0000 ] 0100 stack ends 0000 data segment = 0063 chart equ 'c' 0000 data ends 0000 code segment 'code' assume ss:stack, ds:data, cs:code 0000 pro proc inch bl 0000 50 1 push ax 0001 B0 00 1 mov al,0 0003 9A ---- 0000 E 1 call procinch 0008 8A D8 1 mov bl,al 000A 58 1 pop ax 000B 80 FB 24 cmp bl,'$' 000E 74 0C je L2 0010 53 push bx 0011 E8 FFEC call pro 0014 5B pop bx 0015 83 FB 63 cmp bx,chart 0018 75 01 jne L1 001A 40 inc ax 001B C3 L1:ret 001C B8 0000 L2:mov ax,0 001F C3 ret 0020 pro endp 0020 start: 0020 B8 ---- R mov ax,data 0023 8E D8 mov ds,ax 0025 53 push bx 0026 E8 FFD7 call pro 0029 5B pop bx outint ax 002A 50 2 push ax 002B 52 2 push dx 002C B2 00 2 mov dl,0 002E 8B C0 2 mov ax,ax 0030 B6 01 2 mov dh,1 0032 9A ---- 0000 E 2 call procoutnum 0037 5A 2 pop dx 0038 58 2 pop ax finish 0039 B4 4C 1 mov ah,4Ch 003B CD 21 1 int 21h 003D code ends end start Microsoft (R) Macro Assembler Version 6.11 05/04/10 22:01:39 u:\vtor_ko.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 Segments and Groups: N a m e Size Length Align Combine Class code . . . . . . . . . . . . . . 16 Bit 003D Para Private 'CODE' data . . . . . . . . . . . . . . 16 Bit 0000 Para Private stack . . . . . . . . . . . . . 16 Bit 0100 Para Stack Procedures, parameters and locals: N a m e Type Value Attr pro . . . . . . . . . . . . . . P Near 0000 code Length= 0020 Private Symbols: N a m e Type Value Attr ??0000 . . . . . . . . . . . . . Number 0000h ??0001 . . . . . . . . . . . . . Number 0000h L1 . . . . . . . . . . . . . . . L Near 001B code L2 . . . . . . . . . . . . . . . L Near 001C code chart . . . . . . . . . . . . . Number 0063h 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 start . . . . . . . . . . . . . L Near 0020 code 0 Warnings 0 Errors