home *** CD-ROM | disk | FTP | other *** search
/ PC Open 11 / pcopen11.iso / Risiken / START.DXR / 00001.ls next >
Encoding:
Text File  |  1997-10-21  |  746 b   |  25 lines
  1. on startMovie
  2.   global riferimento, music, Segno, dirpref, Kuntakinte, desinenza, listatrincee, suoni, cdpath, infogen, LIMITESOLDATI, TRINCEAFATTA, percorso, riferimento3, TRINCEA, Avventura, EXPLO, NOMINATO
  3.   set riferimento3 to the pathName & the movieName
  4.   set cdpath to the pathName
  5.   set NOMINATO to "trincea"
  6.   set percorso to the pathName
  7.   set desinenza to ".dir"
  8.   set riferimento to the pathName & "sturm" & desinenza
  9.   set suoni to the pathName & "sound:"
  10.   set Kuntakinte to 0
  11.   set Macchina to the machineType
  12.   if Macchina = 256 then
  13.     set Segno to "\"
  14.   else
  15.     set Segno to ":"
  16.     set music to riferimento & "Music" & Segno
  17.     set EXPLO to 0
  18.   end if
  19. end
  20.  
  21. on stopMovie
  22.   set the visible of sprite 1 to 1
  23.   sound stop 2
  24. end
  25.