      xor    ah,ah
      mov    al,16
      int    10h
      mov    cx,200
      mov    dx,200
@l:
      mov    al,12
      mov    ah,12
      int    10h
      inc    dx
      inc    byte ptr col
      mov    al,col
      cmp    al,15
      jle    L2
      mov    al,1
      mov    col,al
L2:
      loop   @l
      xor    ax,ax
      int    16h
      xor    ah,ah
      mov    al,3
      int    10h      
      int    20h
Col   db     1
      end
