home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 6 / 06.iso / b / b022 / 1.ddi / ZWNEW.BAT < prev   
Encoding:
DOS Batch File  |  1993-01-11  |  419 b   |  30 lines

  1. @ECHO OFF
  2. SET CLIPPER=F40;SWAPK:10240
  3. :ZWRC
  4. ZW_RC %1
  5. GOTO CONDI
  6. :ZWGL
  7. ZW_GL %1
  8. GOTO CONDI
  9. :ZWZB
  10. ZW_ZB
  11. GOTO CONDI
  12. :ZWCX
  13. ZW_CX
  14. GOTO CONDI
  15. :ZWPT
  16. ZW_PT
  17. GOTO CONDI
  18. :ZWSZ
  19. ZW_SZ
  20. GOTO CONDI
  21. :CONDI
  22. IF ERRORLEVEL 255 GOTO ZWGL
  23. IF ERRORLEVEL 254 GOTO END
  24. IF ERRORLEVEL 253 GOTO ZWRC
  25. IF ERRORLEVEL 252 GOTO ZWZB
  26. IF ERRORLEVEL 251 GOTO ZWCX
  27. IF ERRORLEVEL 250 GOTO ZWPT
  28. IF ERRORLEVEL 249 GOTO ZWSZ
  29. :END
  30.