//press a
let>event_char_test=a
let>teller=0
let>testflag=false

OnEvent>KEY_DOWN,%event_char_test%,0,testing

SRT>testing
  let>teller=0
  MessageModal>ok!!
  let>testflag=true
END>testing

label>loop

if>testflag=true
    //Disable old OnEvent by leaving out Subroutine
    OnEvent>KEY_DOWN,%event_char_test%,0,
    //press t ...
    let>event_char_test=t
    //Reset it with new event
    OnEvent>KEY_DOWN,%event_char_test%,0,testing
    let>testflag=false
endif

if>teller=0
  Message>Press %event_char_test%
endif

let>teller=teller+1
wait>0.01

goto>loop