import iTasks._Framework.Serialization
-derive class iTask MTaskTask, Main, ByteCode, Stmt, Expr, BC, BCState
+derive class iTask MTaskTask, MTaskInterval, Main, ByteCode, Stmt, Expr, BC, BCState, UserLED
makeTask :: String Int -> Task MTaskTask
makeTask name ident = get currentDateTime