WRITESTR.ASM