Contents
Articles
Behaviors
Books
Director News
Director Web Sites
FAQ
Games
Mailing Lists
News Groups
Project Examples
Reviews
Software
Tools
Useful Web Sites
Utilities
Xtras

Don't miss these
Controlling DIgital Video
Sprite Group Movement behavior
A Simple Coloring Book
Write a file
The Multimedia Workshop
Get Xtra Info
Digital Video Button Control
myMailTo
Binary Opperations
PostScript Xtra
 

 

 

Behavior Prepare for movie (Sound Card and Screen Saver Check)

Added on 9/16/1999

 

Compatibilities:
D6_5 D7 D8 PC Script

Required Xtras:
Buddy API

This item has not yet been rated

Author: MediaMacros (website)

Checks for sound card and disables the screen saver. End director restores the screen saver.

--Code by Chuck Neal
--Chuck@mediamacros.coc

on prepareDirector
  global gOldSSav, gOldVolume
  --Check Sound Card
  if baSoundCard( ) = 0 then
    set continue = baMsgBox( "You do not appear to have a soundcard installed.  No audio will be heard if you choose to continue.  Click OK to continue without sound or cancel to exit.", "Continue?" , "OKCancel", "Stop" , 2 )
    if continue = "Cancel" then quit
  end if
  --Disable Screen Saver, save settings
  set gOldSSav = baSetScreenSaver( "" )
  --Hide taskbar
  baHideTaskBar(true)
  --Normalize Audio Volume (50%)  Works best with volume control in program
  set gOldVolume = baGetVolume( "wave" )
  baSetVolume( "wave" ,  50 )
end

on endDirector
  global gOldSSav, gOldVolume
  
  baSetScreenSaver (gOldSSav)
  baHideTaskBar(false)
  baSetVolume( "wave" ,  gOldVolume)
end

 


Contact

MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA

Send e-mail