home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 3 / PDCD_3.iso / utilities / utilsm / mpeg / !MPEG / PCATS / PCATSplay next >
Text File  |  1993-05-12  |  870b  |  39 lines
  1. | PCATS 16bpp runner for MPEG
  2. | Chris Marshall
  3. | 16 April 1993
  4.  
  5. Run <Obey$Dir>.StoreMode
  6.  
  7. | Set wimp mode to 120, change to 122 if desired
  8. WimpMode 120
  9.  
  10. | If you're PCATS card has a turbo board, and flakes
  11. | out at 36MHz, uncomment and alter the following line
  12. | to wind the clock up a bit. You need a 40MHz crystal
  13. | ideally
  14. | Clock 4
  15.  
  16. | Set palette to red scale
  17. PalSet 1
  18.  
  19. | Thunderbirds are go!
  20. Run <MPEG$Dir>.mpeg_play %*0
  21.  
  22. | Go back to origial mode
  23. | (Alias$ used because WimpMode doesn't expect to
  24. | receive an expression as a parameter)
  25. SetEval Alias$pcatstmode "WimpMode <Current$Mode>"
  26. pcatstmode
  27. Unset pcatstmode
  28.  
  29. | Reset palette to default. 
  30. | Tough luck if your old one was different
  31. PalSet 0
  32.  
  33. | Switch PCATS card out of 16bpp DAC mode. This should
  34. | happen on a mode change but some cards are dodgy
  35. NormalVideo
  36.  
  37. | Dispense with "Press SPACE etc etc"
  38. Desktop
  39.