Mercurial > hg > ape
annotate listeningTest/multiComp/TpushKey.m @ 0:4fd284285159
Adding listening test plus some helpful functions and scripts.
| author | Brecht <b.deman@qmul.ac.uk> |
|---|---|
| date | Thu, 24 Apr 2014 23:53:31 +0100 |
| parents | |
| children |
| rev | line source |
|---|---|
| b@0 | 1 function TpushKey(hfig) |
| b@0 | 2 |
| b@0 | 3 dat=get(hfig,'userdata'); |
| b@0 | 4 |
| b@0 | 5 cobj=get(hfig,'currentObject'); |
| b@0 | 6 |
| b@0 | 7 ckey=get(hfig,'currentcharacter'); |
| b@0 | 8 |
| b@0 | 9 switch ckey |
| b@0 | 10 |
| b@0 | 11 case ' ' |
| b@0 | 12 set(dat.hIcon,'backgroundcolor',[.6 .9 .6]); |
| b@0 | 13 wavplay(0) |
| b@0 | 14 end |
| b@0 | 15 |