: +wdie %01000000 WDTCSR bis! ;
: -wdie %01000000 WDTCSR bic! ;
: -wdif %10000000 WDTCSR bis! ;
: wdif? %10000000 WDTCSR bit@ ;
: wdt/1s %01000110 WDT! ;
: wdt/250ms %01000100 WDT! ;
: wdt>timeout wdt/1s sei ;