第12章表的處理.pptVIP

第12章 表的处理 ;12.1 定 义 表; 例如：以英文月份的缩写定义一个表，可以是如下的格式： MONTAB DB ‘JAN’, ‘FEB’, ‘MAR’，…，‘DEC’ 这个表具有连续、数据项等长的特点，处理起来就很方便。只要指定月份，就很容易查出该月的英文月份的缩写。 ;12.2 表的直接存取;MONTAB DB ‘JAN’ DB ‘FEB’ DB ‘MAR’ … ; 表中的第一项‘JAN’的偏移地址是MONTAB＋0，‘FEB’的偏移地址是MONTAB＋3，‘MAR’的地址是MONTAB＋6。为了找到3月份在表中的月份缩写名称，程序必须做下列操作： (1) 输入月份3的ASCII码33，33转换成二进制的3。 (2) 从月份中减去1：3-1＝2。 (3) 将差值乘以3(月份字符长度)：2×3＝6。 ; (4) 将所得的乘积加到MONTAB的偏移地址：MONTAB＋6，结果即为3月份‘MAR’的偏移地址。 下例是完成上述工作的程序。; 例12.1 从键盘输入一个数字月份，显示其对应的英文缩写。 源程序清单如下： ; filename:L121. ASM ? ; ————————————————————— ? DATA SEGMENT ? THREE DB 3 ? MONIN DB ‘11’ ；假设已输入的月份 ? ;ALFMON DB ‘???’, ‘$’ MONTAB DB ‘JAN’, ‘FEB’, ‘MAR’, ‘APR’, ‘MAY’, ‘JUN’ DB ‘JUL’, ‘AUG’, ‘SEP’, ‘OCT’, ‘NOV’, ‘DEC’ DATA ENDS ; ————————————————————— CODE SEGMENT ASSUME CS:CODE,DS:DATA,ES:DATA START: MOV AX,DATA;MOV DS,AX MOV ES,AX CALL C10CONV CALL D10LOC CALL F10DISP MOV AH,4CH INT 21H ; ASCII码转换成二进制 ; ————————————————————— ; C10CONV PROC MOV AH,MONIN MOV AL,MONIN+1 XOR AX,3030H CMP AH,00 ; JZ C20 SUB AH,AH ADD AL,10 C20: RET C10CONV ENDP ; Locate month table ; ————————————————————— D10LOC PROC;LEA SI,MONTAB DEC AL ；月份减1 MUL THREE ADD SI,AX ；形成该月英文的首地址 MOV CX,03 CLD LEA DI,ALFMON REP MOVSB ；传送3个字符 RET;D10LOC ENDP ; Display alpha month ; ————————————————————— F10DISP PROC LEA DX,ALFMON MOV AH,09 ；显示月份英文缩写 INT