home *** CD-ROM | disk | FTP | other *** search
/ Cani & Cani / CANI.ISO / pc / program / ecole2.dxr / 00004.ls < prev    next >
Encoding:
Text File  |  1997-11-11  |  269 b   |  17 lines
  1. on exitFrame
  2.   NavigDog()
  3.   ControlRollOver(1, 4, 69)
  4.   go(the frame)
  5. end
  6.  
  7. on mouseUp
  8.   case the clickOn of
  9.     4:
  10.       EndDogPuppet()
  11.       set Page to random(3)
  12.       set SonPage to string(Page)
  13.       puppetSound("PAGE_" & SonPage)
  14.       go(label(1))
  15.   end case
  16. end
  17.