home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s070 / 1.img / AA.BAK < prev    next >
Encoding:
Text File  |  1992-01-27  |  335 b   |  34 lines
  1. ECHO OFF
  2. CD\213
  3. MENUK
  4. IF ERRORLEVEL 9 GOTO GW
  5. IF ERRORLEVEL 1 GOTO DISP
  6. IF ERRORLEVEL 0 GOTO X
  7. :GW
  8. READK
  9. CKBD GW
  10. 014
  11. GWINT10K
  12. GOTO Y
  13. :DISP
  14. READK
  15. CKBD
  16. CCDISP
  17. INT10K
  18. :Y
  19. YX0
  20. READ16
  21. READ24 1SFHK
  22. READ32 1SFHK
  23. READ40 1SFHK
  24. ZF24 3
  25. SPCZ 1
  26. GOTO Z
  27. :X
  28. CLS
  29. :Z
  30. KEY
  31. CD\
  32. PATH C:\;C:\213;C:\DOS;F:
  33. SUBST F: C:\WS>NUL
  34.