home *** CD-ROM | disk | FTP | other *** search
/ Mundo do CD-ROM 25 / CDROM25.iso / lazer / fpwtdemo / Poster.dcr / Behaviors_31_PrevPoster.ls < prev    next >
Encoding:
Text File  |  1998-02-10  |  213 b   |  11 lines
  1. global glstFaces, gnPoster, HAT_CH, HEAD_CH, BODY_CH
  2.  
  3. on mouseUp me
  4.   SaveFace(gnPoster)
  5.   set gnPoster to gnPoster - 1
  6.   if gnPoster < 1 then
  7.     set gnPoster to 1
  8.   end if
  9.   DisplayPoster(gnPoster, "Faces")
  10. end
  11.