home *** CD-ROM | disk | FTP | other *** search
/ Boot Disc 5 / boot-disc-1997-01.iso / media / utility.cst / 00023_Script_23 < prev    next >
Text File  |  1996-11-05  |  549b  |  19 lines
  1. on mouseDown
  2.   puppetsound 2,0
  3.   puppetsound 2,"blooip"
  4.   global cards,dbase
  5.   set reverseflag=the rightmousedown
  6.   set imagename=flip(cards,true,reverseflag)
  7.   set rec=getrecordfromprop(dbase,#image,imagename)
  8.   set the text of member "name"=the name of rec
  9. end
  10.  
  11. on rightmouseDown
  12.   puppetsound 2,0
  13.   puppetsound 2,"pioolb"
  14.   global cards,dbase
  15.   set reverseflag=the rightmousedown
  16.   set imagename=flip(cards,true,reverseflag)
  17.   set rec=getrecordfromprop(dbase,#image,imagename)
  18.   set the text of member "name"=the name of rec
  19. end