home *** CD-ROM | disk | FTP | other *** search
/ Enter 2003: The Beautiful Scenery / enter-parhaat-2003.iso / files / frendz.exe / frendz.dcr / Scripts_38_b_BackPageLoop.ls < prev    next >
Encoding:
Text File  |  2002-12-31  |  373 b   |  17 lines
  1. global gOldKey
  2.  
  3. on exitFrame me
  4.   go(the frame)
  5.   checkGameTime()
  6.   if the controlDown = 1 then
  7.     theKey = the keyPressed
  8.     if (theKey <> EMPTY) and (gOldKey = EMPTY) then
  9.       whichOne = theKey - "0"
  10.       if (whichOne >= 1) and (whichOne <= 6) then
  11.         playHolidayReminder(3, whichOne, random(4) - 1, 1)
  12.       end if
  13.     end if
  14.     gOldKey = theKey
  15.   end if
  16. end
  17.