Mov bx,www[k]
Dec bx
Cicle
Inc bx
Mov ax,[bx]
Out ax
Xor [bx],["/"]
Jz carpeta
Xor [bx],[" "]
Jz final
carpeta
Inter dx
Jmp cicle
final
Mov bx,www[not(k)]
Inc bx
Cicle
Dec bx
In ax
Mov [bx],ax
Sys [bx],["/"]
Jf carpeta
Sys [bx],[" "]
Jf final
carpeta
Outer dx
Jmp cicle
final
No hay comentarios:
Publicar un comentario