home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / magazine / pcmagazi / 1992 / 09 / inwin.scr < prev    next >
Text File  |  1991-08-26  |  676b  |  49 lines
  1. NINWIN.COM
  2. A100
  3. MOV  AX,[002C]
  4. MOV  ES,AX
  5. MOV  DI,0000
  6. ;              :Label1
  7. ES:
  8. MOV  AL,[DI]
  9. CMP  AL,00
  10. ;              JZ Exit
  11. JZ   0134
  12. MOV  SI,013D
  13. ;              :Label2
  14. MOV  BL,[SI]
  15. CMP  BL,00
  16. ;              JZ Label3
  17. JZ   012F
  18. ES:
  19. MOV  AL,[DI]
  20. CMP  AL,BL
  21. ;              JNZ Label4
  22. JNZ  0124
  23. INC  DI
  24. INC  SI
  25. ;              JMP Label2
  26. JMP  0112
  27. ;              :Label3
  28. INC  DI
  29. ES:
  30. MOV  AL,[DI]
  31. OR   AL,AL
  32. ;              JNZ Label4
  33. JNZ  0124
  34. INC  DI
  35. ;              JMP Label1
  36. JMP  0108
  37. ;              :Label4
  38. MOV  BYTE PTR [013C],01
  39. ;              :Exit
  40. MOV  AH,4C
  41. MOV  AL,[013C]
  42. INT  21
  43.  
  44. E13B 0, 0, "windir=", 0
  45. RCX
  46. 45
  47. W
  48. Q
  49.