/*
* StartApplication -- アプリケーションの初期化を行なう
*
* MainForm を開く
*/
static Err StartApplication(void)
{
　　FrmGotoForm(MainForm); // MainForm を開く
　　return errNone;
}

/*
* MainFormHandleEvent -- MainForm に関わるイベントを処理する
*
* MainForm の初期化に関するイベントを処理する
*/
static Boolean MainFormHandleEvent(EventPtr event)
{
　　Boolean handled = false;

　　switch (event->eType) {
　　case frmOpenEvent: // MainForm が開かれた
　　　　FrmDrawForm(FrmGetActiveForm()); // MainForm を表示する
　　　　handled = true;
　　　　break;
　　}

　　return handled;
}

/*
* ApplicationHandleEvent -- アプリケーション全体に関わるイベントを処理する
*
* 開かれたフォームをアクティブにしイベントハンドラを設定する
*/
static Boolean ApplicationHandleEvent(EventPtr event)
{
　　Boolean handled = false;

　　if (event->eType == frmLoadEvent) { // フォームをロードする
　　　　UInt16 formId = event->data.frmLoad.formID; // ロードするフォームの ID
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// を取得 (この例では常に
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// MainForm)
　　　　FormPtr form = FrmInitForm(formId); // フォームをロードして初期化する

　　　　FrmSetActiveForm(form); // ロードしたフォームをアクティブにする

　　　　switch (formId) {
　　　　case MainForm:
　　　　　　// このフォームに対するイベントを MainFormHandleEvent で
　　　　　　// 処理するように設定する
　　　　　　FrmSetEventHandler(form, MainFormHandleEvent);
　　　　　　break;
　　　　}
　　　　handled = true;
　　}

　　return handled;
}

/*
* EventLoop -- イベントを取り込み必要な処理を行なう
*
* イベントを処理する API, 関数を適宜呼び出す
*/
static void EventLoop(void)
{
　　EventType event;

　　do {
　　　　EvtGetEvent(&event, evtWaitForever); // 次のイベントを取得する
　　　　if (!SysHandleEvent(&event)) { // システム関連のイベントを処理する
　　　　　　Err error;
　　　　　　if (!MenuHandleEvent(NULL, &event, &error)) { // メニュー関連のイ
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// ベントを処理する
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// (この例では処理す
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// べきイベントはな
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　// い)
　　　　　　　　if (!ApplicationHandleEvent(&event)) {
　　　　　　　　　　// 現在のフォームでイベントハンドラとして設定されている関数
　　　　　　　　　　// を呼び出す (この例では MainFormHandleEvent が呼ばれる)
　　　　　　　　　　FrmDispatchEvent(&event);
　　　　　　　　}
　　　　　　}
　　　　}
　　} while (event.eType != appStopEvent); // 終了のイベントが来るまで繰り返す
}

/*
* StopApplication -- アプリケーションの終了時の処理を行なう
*
* 開いているフォームに frmSave を送り, それらのフォームを閉じる
*/
static void StopApplication(void)
{
　　FrmSaveAllForms();
　　FrmCloseAllForms();
}

/*
* PilotMain -- このアプリケーションのメイン関数である
*
* このサンプルでは通常の起動方法 (sysAppLaunchCmdNormalLaunch) でのみ動作する
*/
UInt32 PilotMain(UInt16 cmd, MemPtr cmdPBP, UInt16 launchFlags)
{
　　Err error = errNone;

　　switch (cmd) {
　　case sysAppLaunchCmdNormalLaunch:
　　　　error = StartApplication();
　　　　EventLoop();
　　　　StopApplication();
　　　　break;
　　}

　　return error;
}

#include "ResourceHelloWorldRsc.h"

// ラウンチャに表示されるアプリケーションの名前
APPLICATIONICONNAME ID 1000 "Hello World"

// アプリケーションのバージョン
VERSION "1.0"

// Hello World を表示するためのフォーム
FORM MainForm AT (0 0 160 160) /* 全画面 (160x160). ID は MainForm */
BEGIN
TITLE "Hello..." /* フォームのタイトル */
LABEL "Hello World" AUTOID AT (CENTER CENTER) /* フォームの中央に表示する */
END