home *** CD-ROM | disk | FTP | other *** search
/ SVM Mac - Best of 1995 / SVM-MAC-WIN-1995-133.img / mac / PARTCOM / control.DIR / 00005_Script_5 < prev    next >
Text File  |  1995-11-07  |  1KB  |  59 lines
  1.  
  2. on BECANEtype
  3.   global becane
  4.   if the machinetype=256 then
  5.     put "PC" into becane
  6.     set the text of field "control4" to "Compatible PC"
  7.   else if the machinetype <> 256 then
  8.     put "mac" into becane
  9.     set the text of field "control4" to "Mac"
  10.   end if
  11. end
  12.  
  13.  
  14.  
  15.  
  16.  
  17. on moniteur
  18.   Global control,becane
  19.   set the colorDepth to 16
  20.   if the colorDepth =8 then
  21.     set the text of field "control2" to "256 couleurs"
  22.     put "oui" into control
  23.   else if the colorDepth =16 then
  24.     set the text of field "control2" to "32.000 couleurs"
  25.     put "oui" into control
  26.   else
  27.     put "non" into control
  28.     alert "Ce CD-ROM nÈcessite un moniteur affichant 256 ou 32.000 couleurs"
  29.   end if
  30. end
  31.  
  32.  
  33.  
  34. on QT
  35.   Global control
  36.   if the quickTimePresent = 1 then
  37.     set the text of field "control" to "QuickTime installÈ"
  38.     put "oui" into control
  39.   else
  40.     set the text of field "control" to "QuickTime n'est pas installÈ"
  41.     go to "instal"
  42.     put "non" into control
  43.   end if
  44. end
  45.  
  46. on memory
  47.   Global control
  48.   put the memorysize / 1024 && "Ko de memoire allouÈe ‡ l'application" & RETURN &¨
  49. the freeBytes / 1024 && "Ko de memoire libre" into field "control3"
  50.   
  51.   if the freeBytes / 1024 < 500 then
  52.     alert "mÈmoire disponible insuffisante, veuillez quitter toutes les autres applications ouvertes."
  53.     quit
  54.     
  55.     put "non" into control
  56.   end if
  57.   
  58. end
  59.