PROGRAM MRecipes; USES {$U UObject } UObject, {$U QuickDraw } QuickDraw, {$U UDraw } UDraw, {$U UABC } UABC, {$U UUnivText } UTKUniversalText, {$U UText } UText, {$U UFixUText } UFixUText, {$U UDialog } UDialog, {$U URecipes } URecipes; CONST phraseVersion = 1; BEGIN process := TMyProcess.CREATE; process.Commence(phraseVersion); process.Run; process.Complete(TRUE); END.