home *** CD-ROM | disk | FTP | other *** search
/ PC-Online 1996 June / PCOnline_06_1996.iso / mrmore / mrmore.dir / 00131_Script_131 < prev    next >
Text File  |  1996-04-11  |  434b  |  16 lines
  1. -- runterscrollen ohne balken
  2.  
  3. on mouseDown
  4.   global gnFirstSprite
  5.   
  6.   ClickButton(the clickOn)
  7.   cursor 0
  8.   
  9.   if the locV of sprite (gnFirstSprite+1) < 136 then
  10.     set nTextHeight = the textHeight of cast (the castNum of sprite gnFirstSprite+1)
  11.     set the puppet of sprite (gnFirstSprite+1)  = true
  12.     set the locV of sprite (gnFirstSprite+1)  = the locV of sprite (gnFirstSprite+1) + nTextHeight
  13.   end if
  14.   
  15. end
  16.