home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0010 - 0019 / ibm0010-0019 / ibm0010.tar / ibm0010 / RIX13-2.ZIP / VRIXDEMO.BAT < prev    next >
Encoding:
DOS Batch File  |  1990-03-28  |  1.3 KB  |  66 lines
  1. @echo off
  2. rem demonstration batch file for vrix and vrx
  3. vrx/?        ; check if vrix is installed
  4. if errorlevel 10 goto novrix
  5. vrx/S        ; save video state
  6. vrx/F 20     ; set fade
  7. vrx/M I      ; set mode to 320 x 200      
  8. vrx/?        ; check if mode allowed
  9. if errorlevel 1 goto nomode
  10. :again
  11. vrx/L VGAPAINT.SCI ; load screen 
  12. vrx/?        ; Check screen
  13. if errorlevel 1 goto nofile
  14. vrx #5       ; wait 5 seconds or until key pressed
  15. if not errorlevel 255 goto done
  16. vrx/F 0      ; change fade
  17. vrx/L cityzoom.sci
  18. vrx/?
  19. if errorlevel 1 goto nofile
  20. vrx #5
  21. if not errorlevel 255 goto done
  22. vrx/F 1
  23. vrx/L hsvop1.sci
  24. vrx/?
  25. if errorlevel 1 goto nofile
  26. vrx #5
  27. if not errorlevel 255 goto done
  28. vrx/F 25
  29. vrx/L hsvop2.sci
  30. vrx/?
  31. if errorlevel 1 goto nofile
  32. vrx #5
  33. if not errorlevel 255 goto done
  34. vrx/l makegrad.sci
  35. vrx/?
  36. if errorlevel 1 goto nofile
  37. vrx #5
  38. if not errorlevel 255 goto done
  39. vrx/L rot1.sci
  40. vrx/?
  41. if errorlevel 1 goto nofile
  42. vrx #5
  43. if not errorlevel 255 goto done
  44. vrx/L rot3.sci
  45. vrx/?
  46. if errorlevel 1 goto nofile
  47. vrx #5
  48. if not errorlevel 255 goto done
  49. vrx/L vgast.sci
  50. vrx/?
  51. if errorlevel 1 goto nofile
  52. vrx #5
  53. if not errorlevel 255 goto done
  54. goto again
  55. :nofile
  56. echo cannot load file
  57. goto done
  58. :nomode
  59. echo cannot do mode
  60. :done
  61. vrx/R
  62. goto end
  63. :novrix
  64. echo VRIX is not installed
  65. :end
  66.