#!/usr/bin/env ruby
#
# 表題: ape お絵描きサムネイル HTML 作成スクリプト
#
# 履歴: 2003/09/28 やまだ由 
#
# 注意: 本プログラムは, 
#       dcphoto.pl Ver 1.02 - 写真用 HTML作成スクリプト
#       Mitsuda Chihiro   <totera@ep.sci.hokudai.ac.jp>
#       を ruby で写経し, やまだ由用にカスタマイズしたものである 
#
#
#
#

END{

  $index = "T39L48_eml_radiation_3hour_control_sh"
  $figdir = "sh"
  $title  = "Aqua Planet: Single-Level 2-D Means from \'control\' Experiment" 
  $width  = "200";  $height = "150" ; $figtable_num = 4
  jikkou

  $index = "T39L48_eml_radiation_3hour_control_gt"
  $figdir = "gt"
  $title  = "Aqua Planet: Global Time-Series from \'control\' Experiment"
  $width  = "280" ; $height = "210" ; $figtable_num = 3
  jikkou

  $index = "T39L48_eml_radiation_3hour_control_ml"
  $figdir = "ml"
  $title  = "Aqua Planet: Multiple-Level 3-D Means from \'control\' Experiment"
  $width  = "280" ; $height = "210" ; $figtable_num = 3
  jikkou

  $index = "T39L48_eml_radiation_3hour_control_mf"
  $figdir = "mf"
  $title  = "Aqua Planet: Multiple-Level Zonal Mean Fluxes from \'control\' Experiment"
  $width  = "280" ; $height = "210" ; $figtable_num = 3
  jikkou

  $index = "T39L48_eml_radiation_3hour_control_tr"
  $figdir = "tr"
  $title  = "Aqua Planet: Transients from 'control' Experiment"
  $width  = "280" ; $height = "210" ; $figtable_num = 3
  jikkou



}


########################################################
##  ユーザ設定
########################################################

def jikkou

# インデックスファイル  $PWD/../html/${index}.html, $PWD/../html/table_${index}.rd
#$index = "T39L48_eml_radiation_3hour_control_sh"

# 情報ファイル, $PWD/${infofile}
$infofile = $index + ".txt"

# 拡張子
$base = ".gif"

# 接頭子
$head = "T39L48_eml_radiation_3hour_control_"

# 絵のあるディレクトリ名, $PWD/../${figdir}
#$figdir = "sh"

# 横にならべるファイル数
# $figtable_num = 3

#画像ファイルサイズ

# $width  = "160"
# $height = "120"

# $width  = "200";  $height = "150"

# $width  = "280" ; $height = "210"


# テーブル, フォントの色
$color_table   = "#ADD8E6" 
$color_font    = "#000080" 
$color_link    = "#269900" 
$color_visited = "#269900" 
$color_hover   = "#99FF33" 

# html ヘッダタイトル
#$title  = "time-mean calculated for APE SH standard output [control]"

# サムネイルタイトル
$header1 = $title 
$header2 = "<br>resolution: T39L48, cumulus parameterization: Emanuel scheme, radiation: every 3 hour, <br> Original data produced: 2003/10/4 on ES. <br> (PCMDI に提出したデータとは, パラメータと初期値が多少異なる, らしい)<br><br><hr>
T39L48_eml_radiation_3hour: 
[<a href =\"#{$head}gt.html\">GT_control</a>] 
[<a href =\"#{$head}sh.html\">SH_control</a>] 
[<a href =\"#{$head}tr.html\">TR_control</a>] 
[<a href =\"#{$head}ml.html\">ML_control</a>] 
[<a href =\"#{$head}mf.html\">MF_control</a>] 
"


# サムネイルフッタ ;
$footer = "Last update: #{Time.now} <br> 
           Copyright &copy\; AGU for APE 2004 (YAMADA Yukiko)"


# ファイル生成実行
print $title, "\n" ; apethum

end


########################################################
##  include ファイル
########################################################

require 'date'
require '/home/yukiko/lib/ape-thum.rb'
$KCODE = "e"