compass Timer{ モード プログラム 表示位置 右下 常に手前に表示 ○ サイズ設定 500, 300 } 変数 $s = 0 変数 $m = 0 変数 $h = 0 変数 $wait = 1000 変数 $repeat = 10000 exe タイマーを0から開始{ 計算 $s = 0 計算 $m = 0 計算 $h = 0 ステータスバーに表示 $h & "時間 " & $m & "分 " & $s & "秒" 待機 1000 ■繰り返し カウント, $wait, $repeat } exe タイマーを再開{ 待機 1000 ■繰り返し カウント, $wait, $repeat } sub カウント{ 計算 $s = $s + 1 ■条件付き呼び出し sub1, $s mod 60 = 0 ステータスバーに表示 $h & "時間 " & $m & "分 " & $s & "秒" } sub sub1{ 計算 $s = 0 計算 $m = $m + 1 ■条件付き呼び出し sub2, $m mod 60 = 0 } sub sub2{ 計算 $m = 0 計算 $h = $h + 1 }