home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast.iso / pcmag / vol9n13.zip / WIPEMEM.SCR < prev    next >
Text File  |  1990-06-06  |  726b  |  32 lines
  1. NWIPEMEM.COM
  2. A100
  3. MOV  SP,0178        ;move the stack to just above the program
  4. PUSH CS
  5. POP  AX
  6. ADD  AX,0012        ;figure the lowest segment ABOVE the program
  7. MOV  BX,AX          ;...and put it in BX
  8. INT  12
  9. MOV  CL,06
  10. SHL  AX,CL          ;figure the highest segment in use
  11. MOV  DX,AX          ;...and put it in DX
  12. MOV  AL,0           ;fill RAM with 0 -- you can change this
  13. DEC  DX
  14. PUSH DX             ;start of loop
  15. POP  ES
  16. XOR  DI,DI
  17. MOV  CX,0010
  18. REPZ
  19. STOSB               ;fill 16 bytes with what's in AL
  20. DEC  DX
  21. CMP  DX,BX          ;reached the lowest segment?
  22. JNZ  0115           ;if NOT, loop back to start
  23. MOV  AX,4C00
  24. INT  21             ;terminate with error code of 0
  25.  
  26. RCX
  27. 28
  28. W
  29. Q
  30.  
  31.  
  32.