home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / magazine / pcmagazi / 1989 / 20 / mcursor.bat < prev    next >
DOS Batch File  |  1988-12-18  |  824b  |  29 lines

  1. ECHO OFF
  2. IF "%2"=="" GOTO BadParams
  3. FOR %%v IN (0 1 2 3 4 5 6 7 8 9 A B C D a b c d) DO IF %%v==%1 GOTO OK1
  4. GOTO BadParams
  5. :OK1
  6. FOR %%v IN (0 1 2 3 4 5 6 7 8 9 A B C D a b c d) DO IF %%v==%2 GOTO OK2
  7. GOTO BadParams
  8. :OK2
  9. ECHO Creating DEBUG script to set cursor lines to %1 and %2
  10. ECHO A 100 > CURSOR.$$$
  11. ECHO MOV AH,01 >> CURSOR.$$$
  12. ECHO MOV CH,0%1 >> CURSOR.$$$
  13. ECHO MOV CL,0%2 >> CURSOR.$$$
  14. ECHO INT 10 >> CURSOR.$$$
  15. ECHO INT 20 >> CURSOR.$$$
  16. REM Using MORE in the next line gets an extra
  17. REM blank line before G, which is necessary to
  18. REM end the Assemble mode.
  19. ECHO G | MORE >> CURSOR.$$$
  20. ECHO Q >> CURSOR.$$$
  21. ECHO Now RUNNING the DEBUG script
  22. DEBUG < CURSOR.$$$ > NUL
  23. DEL CURSOR.$$$
  24. GOTO End
  25. :BadParams
  26. ECHO SYNTAX: "MCURSOR top bot", where top and bot are hex numbers
  27. ECHO 0-9 or A-D.
  28. :End
  29.