          ᥬ  IBM PC                                      98


          
                                 TITLE   RECORD (COM) ஢ઠ ४⨢ RECORD
          0000            CODESG SEGMENT PARA 'Code'
                                 ASSUME  CS:CODESG,DS:CODESG,SS:CODESG
          0100                   ORG     100H
          0100 EB 02      BEGIN:         JMP    SHORT MAIN
                          ; -----------------------------------------------------
                          BITREC RECORD  BIT1:3,BIT2:7,BIT3:6    ;। 
          0102 9A AD      DEFBITS BITREC <101B,0110110B,011010B> ;樠஢ 
                          ; -----------------------------------------------------
          0104            MAIN   PROC    NEAR
          0104            A10:                             ;ਭ:
          0104 B7 10             MOV     BH,WIDTH BITREC   ;   (16)
          0106 B0 07             MOV     AL,WIDTH BIT2     ;   (07)
          0108            B10:                             ;稭 ᤢ:
          0108 B1 0D             MOV     CL,BIT1           ;  .0D
          010A B1 06             MOV     CL,BIT2           ;       06
          010C B1 00             MOV     CL,BIT3           ;       00
          010E            C10:                             ;᪠:
          010E B8 E000           MOV     AX,MASK BIT1      ;  .E000
          0111 BB 1FC0           MOV     BX,MASK BIT2      ;       1FC0
          0114 B9 003F           MOV     CX,MASK BIT3      ;       003F
          0117            D10:                             ;뤥 BIT2:
          0117 A1 0102 R         MOV     AX,DEFBITS        ;   ,
          011A 25 1FC0           AND     AX,MASK BIT2      ;   BIT1  BIT3,
          011D B1 06             MOV     CL,BIT2           ;   ᤢ 06,
          011F D3 E8             SHR     AX,CL             ;  ᤢ ࠢ
          0121            E10:                             ;뤥 BIT1:
          0121 A1 0102 R         MOV     AX,DEFBITS        ;   ,
          0124 B1 0D             MOV     CL,BIT1           ;   ᤢ 13,
          0126 D3 E8             SHR     AX,CL             ;  ᤢ ࠢ
          0128 C3                RET
          0129                   MAIN    ENDP
          0129           CODESG  ENDS
                                 END     BEGIN
          
          
          Structures and records:
                         N a m e           Widht  # fields
                                                  Shift   Widht   Mask    Initial
             BITREC . . . . . . . . . . .  0010   0003
             BIT1 . . . . . . . . . . . .  000D   0003    E000    0000
             BIT2 . . . . . . . . . . . . .       0006    0007    1FC0    0000
             BIT3 . . . . . . . . . . . .  0000   0006    003F    0000
          
          Segments and Groups:
                          N a m e          Size   Align   Combine Class
          CODESG . . . . . . . . . . . .   0129   PARA    NONE    'CODE'
          
          Symbols:
                          N a m e         Type    Value   Attr
          A10. . . . . . . . . . . . . . L NEAR   0104    CODESG
          B10. . . . . . . . . . . . . . L NEAR   0108    CODESG

          
          ᥬ  IBM PC                                      99


          BEGIN. . . . . . . . . . . . . L NEAR   0100    CODESG
          C10. . . . . . . . . . . . . . L NEAR   010E    CODESG
          D10. . . . . . . . . . . . . . L NEAR   0117    CODESG
          DEFBITS. . . . . . . . . . . . L WORD   0102    CODESG
          E10. . . . . . . . . . . . . . L NEAR   0121    CODESG
          MAIN . . . . . . . . . . . . . N PROC   0104    CODESG  Length =0025
















































          
          ᥬ  IBM PC                                     100


          
                                  TITLE   DSTRUC  (COM) । 
          0000                    CODESG  SEGMENT PARA 'Code'
                                          ASSUME  CS:CODESG,DS:CODESG,SS:CODESG
          0100                            ORG     100H
          0100 EB 29              BEGIN:  JMP     SHORT MAIN
                                  ; ---------------------------------------------
                                  PARLIST         STRUC           ;᮪ ࠬ஢
          0000 19                 MAXLEN  DB      25              ;
          0001 ??                 ACTLEN  DB      ?               ;
          0002    19 [ 20 ]       NAMEIN  DB      25 DUP(' ')     ;
          001B                    PARLIST         ENDS
                                                                  ;
          0102 19                 PARAMS  PARLIST <>              ; 
          0103 ??
          0104    19 [ 20 ]
          011D 57 68 61 74 20 69  PROMPT  DB      'What is name?', 'S'
               73 20 6E 61 6D 65
               3F 24
                                  ; ---------------------------------------------
          012B                    MAIN    PROC    NEAR
          012B B4 09                      MOV     AH,09            ;뤠 
          012D 8D 16 011D R               LEA     DX,PROMPT
          0131 CD 21                      INT     21H
          0133 B4 0A                      MOV     AH,0AH           ; 
          0135 8D 16 0102 R               LEA     DX,PARAMS
          0139 CD 21                      INT     21H
          013B A0 0103 R                  MOV     AL,PARAMS.ACTLEN ; 
                                  ;       ...
          013E C3                         RET
          013F                    MAIN    ENDP
          013F                    CODESG  ENDS
                                          END     BEGIN
          
          
          Structures and records:
                          N a m e          Width  # fields
                                           Shift  Width   Masc    Initial
          PARLIST. . . . . . . . . . . . . 001B   0003
            MAXLEN . . . . . . . . . . . . 0000
            ACTLEN . . . . . . . . . . . . 0001
            NAMEIN . . . . . . . . . . . . 0002
          
          Segments and Groups:
                          N a m e          Size   Align   Combine Class
          CODESG . . . . . . . . . . . . . 013F   PARA    NONE    'CODE'
          
          Symbols:
                          N a m e          Type   Value   Attr
          BEGIN. . . . . . . . . . . . . L NEAR   0100    CODESG
          MAIN . . . . . . . . . . . . . N PROC   012B    CODESG  Length =0014
          PARAMS . . . . . . . . . . . . L 001B   0102    CODESG
          PROMPT . . . . . . . . . . . . L BYTE   011D    CODESG

          
          ᥬ  IBM PC                                     101


          
          ᭮,    ॣ:
              :      w = 0        w = 1
              000          AL          AX
              001          CL          CX
              010          DL          DX
              011          BL          BX
              100          AH          SP
              101          CH          BP
              110          DH          SI
              111          BH          DI
          
              :   ॣ:
               00          ES
               01          CS
               10          SS
               11          DS
          
          
          
          r/m   mod=00    mod=01         mod=10      mod=1.1    mod=11
                                                       w=0        w=1
          000   BX+SI     BX+SI+disp     BX+SI+disp    AL         AX
          001   BX+DI     BX+DI+disp     BX+DI+disp    CL         CX
          010   BP+SI     BP+SI+disp     BP+SI+disp    DL         DX
          011   BP+DI     BP+DI+disp     BP+DI+disp    BL         BX
          100    SI        SI+disp         SI+disp     AH         SP
          101    DI        DI+disp         DI+disp     CH         BP
          110   Direct     BP+disp         BP+disp     DH         SI
          111    BX        BX+disp         BX+disp     BH         DI
























          
          ᥬ  IBM PC                                     102


          
                                                     A-1    ASCII ᨬ
          
                                          
          
          000  00h                032  20h  sp     064  40h   @     096  60h   `
          001  01h  砫   033  21h   !     065  41h   A     097  61h   a
          002  02h  砫 ⥪     034  22h   "     066  42h   B     098  62h   b
          003  03h   ⥪      035  23h   #     067  43h   C     099  63h   c
          004  04h   ।    036  24h   $     068  44h   D     100  64h   d
          005  05h                 037  25h   %     069  45h   E     101  65h   e
          006  06h                  038  26h   &     070  46h   F     102  66h   f
          007  07h              039  27h   '     071  47h   G     103  67h   g
          008  08h    蠣    040  28h   (     072  48h   H     104  68h   h
          009  09h  ਧ.⠡   041  29h   )     073  49h   I     105  69h   i
          010  0Ah  ॢ ப    042  2Ah   *     074  4Ah   J     106  6Ah   j
          011  0Bh  .⠡    043  2Bh   +     075  4Bh   K     107  6Bh   k
          012  0Ch  ॢ ࠭  044  2Ch   ,     076  4Ch   L     108  6Ch   l
          013  0Dh   ⪨   045  2Dh   -     077  4Dh   M     109  6Dh   m
          014  0Eh  Shift out         046  2Eh   .     078  4Eh   N     110  6Eh   n
          015  0Fh  Shift in          047  2Fh   /     079  4Fh   O     111  6Fh   o
          016  10h  Data line esc     048  30h   0     080  50h   P     112  70h   p
          017  11h  ࠢ 1      049  31h   1     081  51h   Q     113  71h   q
          018  12h  ࠢ 2      050  32h   2     082  52h   R     114  72h   r
          019  13h  ࠢ 3      051  33h   3     083  53h   S     115  73h   s
          020  14h  ࠢ 4      052  34h   4     084  54h   T     116  74h   t
          021  15h                 053  35h   5     085  55h   U     117  75h   u
          022  16h  ஭     054  36h   6     086  56h   V     118  76h   v
          023  17h          055  37h   7     087  57h   W     119  77h   w
          024  18h  㫨஢      056  38h   8     088  58h   X     120  78h   x
          025  19h  End of medium     057  39h   9     089  59h   Y     121  79h   y
          026  1Ah              058  3Ah   :     090  5Ah   Z     122  7Ah   z
          027  1Bh  Escape            059  3Bh   ;     091  5Bh   [     123  7Bh   {
          028  1Ch  .䠩      060  3Ch   <     092  5Ch   \     124  7Ch   |
          029  1Dh  .㯯     061  3Dh   =     093  5Dh         125  7Dh   }
          030  1Eh  .     062  3Eh   >     094  5Eh   ^     126  7Eh   ~
          031  1Fh  .    063  3Fh   ?     095  5Fh   _     127  7Fh  

















          
          ᥬ  IBM PC                                     103


          
                 B-1   ⭠筮- ८ࠧ
              Ŀ
                                                                       
                                                                       
                                                                       
                                               
              Ĵ
              0          00         00        00      00     00    00    00   0
              1  2684354561  167772161  10485761  655361  40961  2561   161   1
              2  5368709122  335544322  20971522 1310722  81922  5122   322   2
              3  8053063683  503316483  31457283 1966083 122883  7683   483   3
              4 10737418244  671088644  41943044 2621444 163844 10244   644   4
              5 13421772805  838860805  52428805 3276805 204805 12805   805   5
              6 16106127366 1006632966  62914566 3932166 245766 15366   966   6
              7 18790481927 1174405127  73400327 4587527 286727 17927  1127   7
              8 21474836488 1342177288  83886088 5242888 327688 20488  1288   8
              9 24159191049 1509949449  94371849 5898249 368649 23049  1449   9
              A 2684354560A 167772160A 10485760A 655360A 40960A 2560A  160A  10
              B 2952790016B 184549376B 11534336B 720896B 45056B 2816B  176B  11
              C 3221225472C 201326592C 12582912C 786432C 49152C 3072C  192C  12
              D 3489660928D 218103808D 13631488D 851968D 53248D 3328D  208D  13
              E 3758096384E 234881024E 14680064E 917504E 57344E 3584E  224E  14
              F 4026531840F 251658240F 15728640F 983040F 61440F 3840F  240F  15
          Ĵ
          .      8          7          6        5      4      3     2    1  
              



























          
