用汇编语言随机产生字母的子程序

randomchar proc far
         mov di,0
         mov bx,78           ；产生78个字母
      rec:
         push cx                ；寄存器入栈
         push dx
         push ax
         sti
         mov ah,0     
         in al,40h                 ；从40H号端口获得随机数原始值
         and ah,3
         mov dl,26               
         div dl                          ；用26除所获得的随机数原始值
         add ah,97                         
         mov letters[di],ah                 ；letters是数据段中定义的一个存储单元
         inc di
         pop ax                         ；寄存器出栈
         pop dx
         pop cx
         dec bx
         jnz rec                          ；循环
         ret
randomchar endp