home *** CD-ROM | disk | FTP | other *** search
/ Skål! / Skål!Multimedia.iso / controls.cst / 00012_Script_12 < prev    next >
Text File  |  1999-05-06  |  1KB  |  36 lines
  1. on preparemovie
  2.   global frame_history
  3.   global movie_history
  4.   if voidP(frame_history) then frame_history=[]
  5.   if voidP(movie_history) then movie_history=[]  
  6.   global kieli
  7.   case the moviename of
  8.     "kaupungit.dir","kaupungit.dir ":set prefix="kau_"
  9.     "esineet.dir","esineet.dir ":set prefix="esi_"
  10.     "skal.dir","skal.dir ": set prefix="main_"  
  11.     "valmistus.dir","valmistus.dir ": set prefix="valm_"
  12.     "aika.dir","aika.dir ": set prefix="aik_"
  13.     "kartta.dir","kartta.dir ": set prefix="kartta_"
  14.     "lasi.dir","lasi.dir ": set prefix="lasi_"
  15.     "opaste.dir","opaste.dir ": set prefix="opa_"
  16.     "peli.dir","peli.dir ": set prefix="peli_"  
  17.     "kaika.dir","kaika.dir ": set prefix="kaika_"      
  18.   end case
  19.   case kieli of
  20.     "suomi":
  21.       set the filename of castlib "kieli" to (prefix & "finska.cst")
  22.       set the filename of castlib "bin" to "fin_bin.cst"
  23.     "english":
  24.       set the filename of castlib "kieli" = (prefix & "engelska.cst")
  25.       set the filename of castlib "bin" to "eng_bin.cst"
  26.     "svenska":
  27.       set the filename of castlib "kieli" = (prefix & "svenska.cst")
  28.       set the filename of castlib "bin" to "sve_bin.cst"
  29.     "norsk":
  30.       set the filename of castlib "kieli" = (prefix & "norska.cst")
  31.       set the filename of castlib "bin" to "nor_bin.cst"
  32.     "eesti":
  33.       set the filename of castlib "kieli" = (prefix & "estniska.cst")
  34.       set the filename of castlib "bin" to "est_bin.cst"
  35.   end case    
  36. end