$Header: /home/radek/cvs/forth-book/dictionary/qf/dict/event,v 1.1 2003/12/28 18:21:58 radek Exp $
event — adresa „event struktury“ obsahující poslední událost obdrženou od PalmOSu
event ( → addr )
Příklad 96. Kód slova event *:[90]
...
; 01FE= 8200: 818E DW $818E ; link to window-bounds 0200= 8202: 8565 7665 6E74 DB $80+5, "event" 0206= 8208: 3907 event: MOVE.W TOS, -(SP) ;= 280 0208= 820A: 3E3C 0118 MOVE.W #280, TOS ;+ 020C= 820E: 4E75 RTS ;= EXIT