Button.st
changeset 5601 69fd040a0c6f
parent 5583 a194e94b569d
child 5635 b263323db942
equal deleted inserted replaced
5599:b90b1e164873 5601:69fd040a0c6f
  2053 !
  2053 !
  2054 
  2054 
  2055 isOn
  2055 isOn
  2056     "return true, if this button is currently pressed"
  2056     "return true, if this button is currently pressed"
  2057 
  2057 
  2058     ^ controller pressed
  2058     ^ controller notNil and:[controller pressed]
  2059 !
  2059 !
  2060 
  2060 
  2061 isReturnButton
  2061 isReturnButton
  2062     "return true, if this is a return button"
  2062     "return true, if this is a return button"
  2063 
  2063 
  2064     ^ isReturnButton
  2064     ^ isReturnButton
  2065 !
  2065 !
  2066 
  2066 
  2067 isTriggerOnDown
  2067 isTriggerOnDown
  2068     "return true, if I fire on press (instead of fire-on-release)"
  2068     "return true, if I fire on press (instead of fire-on-release)"
  2069 
  2069         
  2070     ^ controller isTriggerOnDown
  2070     ^ controller notNil and:[controller isTriggerOnDown]
  2071 
  2071 
  2072     "Created: / 31.10.1997 / 19:33:56 / cg"
  2072     "Created: / 31.10.1997 / 19:33:56 / cg"
  2073     "Modified: / 31.10.1997 / 19:34:34 / cg"
  2073     "Modified: / 31.10.1997 / 19:34:34 / cg"
  2074 !
  2074 !
  2075 
  2075