1 EXECUTE FUNCTION
2 admin
2 task
3 ( "onmode" , "c"  , 
4! "hard"
4?
4 "block"
4 "norm"
4 "unblock"
5 ) ;