Este macro se llama mArray. El mismo funciona enviandole como parámetros tres arreglos.

El primero de los arreglos se llenará al generar un numero al azar utilizando el macro mRandom. Este numero nos dara  la posicion dentro del arreglo en donde se guardara el caracter escogido y luego buscaremos otro numero al azar para generar el caracter deseado. Para convertir de numero a caracter se le sumo el codigo ASCII de la “A” mayuscula para que el se escoja una letra entre la A a la Z. Este macro se encargara de guardar una copia exacta del arreglo creado y luego ambos arreglos, el original y su copia, se vaciaran de manera aleatoria dentro del arreglo que sera devuelto por el macro.

De igual manera se creo el macro mArrayMM. Este macro tiene la misma funcionalidad del macro anterior, solamente que esta vez generara letras al azar desde la “a” minuscula hasta la “Z” mayuscula. El mismo difiere del macro anterior ya que tiene varias comparaciones necesarias para  saber si la letra generada aleatoriamente es mayuscula o minuscula para saber si ya existia una de estas en los arreglos. De no existir dicha letra el macro guardara en el arreglo de la copia el caracter correspondiente a la letra miniscula del mismo. Luego estos arreglos se vaciaran y crearan el arreglo que sera devuelto para llenar el tablero.

 push dx
 push si
 in  al, speaker 

 push  ax  
 or  al,00000011b 

 out speaker,al 
 mov  al, 60  
 mov si,0
 mov dl,0 

L1:     out     timer, al     
  
 
 
 mov  cx, delay1

Lext: push  cx  
 mov  cx, delay2 
Lin: 
    
 loop Lin
 pop cx
 loop Lext
 sub  al,60  
 
 jnz L1  

 inc dl
 inc si

 sub al,80
 cmp si, 10
 
 jbe L1

 sub al,10
 cmp dl, 10
 
 jbe L1

 
 pop dx
 pop si
 pop ax  

 and al,11111100b 
 out speaker, al 

        mov     ah, 4ch
        int     21h
main endp
end main

mov ah,00h

int 1ah  

El uso de esta interuptor almacena el tiempo del reloj en CS:DX y guarda el byte menos significativo en dl. Si tomamos el valor  almacenado en dl y lo plasmamos en la pantalla se genera de esta manera caracteres aleatorios.

    call AcquireSeed           
     mov ax,4c00h
     int 21h        
     main endp    

AcquireSeed proc 
    push ax 
    push cx  
    push dx
    push si       
    mov ah, 00h                            ;get system time
    int 1ah                                        ;return the clock in CX:DX and  save the less significant byte on dl          
    mov ah,2
    int 21h                  
jne AcquireSeed   
pop:
    pop si    
    pop dx
    pop cx
    pop ax
    ret
AcquireSeed endp    
end main