{ 【ソフト名】今月のカレンダー(HTML出力) (バージョン 0.2) 【作 成 者】moka (連絡先:moka21@ybb.ne.jp) http://www.geocities.jp/moka21/teatime/ 【種 別】フリーソフトウェア 【ひまわりのバージョン】ver.1.33 【転 載】可(転載条件:ご自由に) 【改変運用】可 【ひまわり本体への梱包】可 【実行時に利用作成するファイル】temp.html 【コメント】 今月のカレンダーをHTML表示します。 }
今月=LEFT(今日,8)&「01」 来月=日付加算(今月,「0/1/0」)。 日数=日数差(来月,今月)。
今月を、和暦に変換。「月」までを、切り取る。キャプション=それ&「月」 'キャプション=LEFT(今日,7)。'キャプションを西暦←か和暦↑か選択。
HTML=「<HTML>\n<HEAD><TITLE>今月のカレンダー</TITLE></HEAD>\n<BODY>\n」& 「<TABLE border=\"0\">\n\t<CAPTION>{キャプション}</CAPTION>\n」
HTML=HTML&「\t<TR align=\"center\">\n」 週=「日,月,火,水,木,金,土」 7回( 回数で、条件分岐。 1の時(文字色=赤色) 7の時(文字色=青色) その他の時(文字色=黒色) HTML=HTML&「\t\t<TD><FONT color=\"{文字色}\">{週#(回数-1)#0}</FONT></TD>\n」 ) HTML=HTML&「\t</TR>\n\t<TR align=\"center\">\n」 日数回( TODAY=日付加算(今月,「0/0/{回数-1}」)。 DAY=曜日を数値で得る(TODAY)。 もし、回数=1ならば、( (DAY-1)回( HTML=HTML&「\t\t<TD></TD>\n」 ) ) DAYで、条件分岐。 1の時(文字色=赤色) 7の時(文字色=青色) その他の時(文字色=黒色) TODAY=RIGHT(TODAY,2) もし、LEFT(TODAY,1)=0ならば、TODAY=RIGHT(TODAY,1) HTML=HTML&「\t\t<TD><FONT color=\"{文字色}\">{TODAY}</FONT></TD>\n」 もし、(DAY%7=0)&&(回数<日数)ならば、HTML=HTML&「\t</TR>\n\t<TR align=\"center\">\n」 ) HTML=HTML&「</TABLE>\n</BODY>\n</HTML>」 HTMLを、「temp.html」に、書く。
表示ブラウザを、ブラウザとして、作成。 その、サイズは、(0,0,(母艦の、幅),(母艦の、高さ)) その、URLは、作業フォルダ&「temp.html」 母艦は、「今月のカレンダー(HTML出力)」 その、変更した時は、表示ブラウザの、サイズは、(0,0,(母艦の、幅),(母艦の、高さ))
|