Object <- FixedList <- ObjectList <- LessonStepList |
|
|
GoTo HandleAbortedLesson |
|
Completed LessonScene |
| Field | Type | |
|---|---|---|
| LessonStepList: | lessonScene: | Scene |
| completed: | Boolean |
instance LessonStepList tag; lessonScene: nilObject; completed: false; end instance;
Define Class LessonStepList; inherits from ObjectList; inherits from HasGoTo; field lessonScene: Scene, getter, setter; // used by some lesson steps to return to field completed: Boolean, getter, setter; // true if this lesson has ever been completed attribute Completed: Boolean; attribute LessonScene: Scene; operation HandleAbortedLesson(); // allows lesson step lists to use scripts to override and clean up lesson cruft overrides GoTo; // called by ListView to go to this item end class;