#┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
#┃■(ＳＳ)Ｃ−ＢＯＡＲＤテンプレート
#┠──────────────────────────────────────
#┃携帯用各画面共通の設定ファイルです。
#┃通常のＨＴＭＬと同じ感覚で編集することが出来ます。
#┃なお、途中にある「$〜」はそれぞれプログラムによって任意の文字列に
#┃置き換えられます。
#┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
package DESIGN;
#┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
#┃ 共通部分
#┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
sub init {
print <<"<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>";
@{[$::FLAG{'mobile'}{'jsky'} ? '' : $CNF::mobile{'title'}]}
<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>
}
#────ここまで───────────────────────────────
#┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
#┃ ヘッダー
#┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
sub head {
print <<"<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>";
$CNF::mobile{'header'}
${&line}
<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>
}
#────ここまで───────────────────────────────
#┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
#┃ フッター
#┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
sub foot {
print <<"<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>";
$CNF::mobile{'footer'}
<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>
}
#────ここまで───────────────────────────────
#┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
#┃ メニュー
#┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
sub menu {
print <<"<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>";
@{[(($::FLAG{'mobile'}{'imode'})||($::FLAG{'mobile'}{'wap20'})||($::FLAG{'mobile'}{'willcom'}))
? '' : ($::FLAG{'mobile'}{'jsky'}
? "\x1b\x24\x46\x3c\x0f" : '[1]')]}
記事表\示
@{[(($::FLAG{'mobile'}{'imode'})||($::FLAG{'mobile'}{'wap20'})||($::FLAG{'mobile'}{'willcom'}))
? '' : ($::FLAG{'mobile'}{'jsky'}
? "\x1b\x24\x46\x3d\x0f" : '[2]')]}
トピックス
@{[(($::FLAG{'mobile'}{'imode'})||($::FLAG{'mobile'}{'wap20'})||($::FLAG{'mobile'}{'willcom'}))
? '' : ($::FLAG{'mobile'}{'jsky'}
? "\x1b\x24\x46\x3e\x0f" : '[3]')]}
投稿
@{[(($::FLAG{'mobile'}{'imode'})||($::FLAG{'mobile'}{'wap20'})||($::FLAG{'mobile'}{'willcom'}))
? '' : ($::FLAG{'mobile'}{'jsky'}
? "\x1b\x24\x46\x3f\x0f" : '[4]')]}
検索
@{[(($::FLAG{'mobile'}{'imode'})||($::FLAG{'mobile'}{'wap20'})||($::FLAG{'mobile'}{'willcom'}))
? '' : ($::FLAG{'mobile'}{'jsky'}
? "\x1b\x24\x46\x40\x0f" : '[5]')]}
ホーム
<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>
}
#────ここまで───────────────────────────────
#┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
#┃ 区切り線
#┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
sub line {
return(\<<"<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>");
<<<<<<<<<<<<<<<<<<<<<< ＨＴＭＬです >>>>>>>>>>>>>>>>>>>>>>
}
#────ここまで───────────────────────────────
*head2 = *head; *foot2 = *foot;
1;
# $Id: bse.txt,v 2.1 2002/04/04 08:15:00 N.Hirai Exp $;