prevent too fast typing, how to?

[Kay C Lan]

Here's another option which doesn't worry about try to figure out what the
right time is. All it does it checks to see if you are trying to type 0 more
than once. In this case it will beep if you press the '000' key or press '0'
more than once.

-------
local lMyDuplicate

ON rawKeyDown theNumber
 SWITCH
  CASE ((theNumber = 90) AND (lMyDuplicate = 0))
   put 1 into lMyDuplicate
   pass rawKeydown
   break
  CASE ((theNumber = 90) AND (lMyDuplicate = 1))
   beep
   break
  CASE (theNumber <> 90)
   put 0 into lMyDuplicate
   pass rawKeydown
   break
 END SWITCH
END rawKeyDown

-------

HTH