Tan's monologue https://ameblo.jp/tanchan1910/ 日常の出来事とか独り言をならべています。でも食事のことが多くなるのは表現力が不足してるからなのだろうなぁ。コメントをいただけると幸いです。 ja とあるスクリプト

<html>
<head>
<title>Unicode Decoder</title>
<script language="JScript">
////////////////////////////////////////////////////////////////
// Unicode Decoder
//
////////////////////////////////////////////////////////////////
//====================================
// 処理メイン
//====================================
function ScriptMain() {

    var arrayLines = window.form1.targetList.value.split(/\n/);

    // 結果リストボックス用領域を準備。
    var resultList    = "";

    // 改行コードを削除する。
    for (var i=0; i<arrayLines.length; i++) {
        strLine = arrayLines[i].replace(/[\n\r]/g, "");    // 改行コードを削除する。
        strWords    = strLine.replace(/(\\u.{4})+/ig, '__%%%__');
        arrayUcodes = strLine.match(/(\\u.{4})+/ig);
        for (var j=0; j<arrayUcodes.length; j++) {
            strWords = strWords.replace(/__%%%__/, unicodeUnescape(arrayUcodes[j]));
        }
        resultList = resultList + strWords + "\n";
    }

    // 結果リストボックスの内容を更新する。
    window.form1.resultList.value = resultList;

}

//==================================
// Unicode Unescape
//==================================
var unicodeUnescape = function(str) {
    var result = '', strs = str.match(/\\u.{4}/ig);
    if (!strs) return '';
    for (var i = 0, len = strs.length; i < len; i++) {
        result += String.fromCharCode(strs[i].replace('\\u', '0x'));
    }
    return result;
};

//==================================
// Window OnLoad イベントプロシジャ
//==================================
window.onload = function() {

    // Windowサイズを調整する。
    window.resizeTo(790,460)

};


</script>
</head>
  <hta:application
     id="HTA"
     icon=""
     applicationname=""
     border="thick"
     borderstyle="normal" 
     caption="yes" 
     innerborder="yes" 
     maximizebutton="yes" 
     minimizebutton="yes" 
     showintaskbar="yes" 
     singleinstance="no" 
     sysmenu="yes" 
     version="" 
     windowstate="nomal" 
     scroll="yes" 
     scrollflat="yes" 
     selection="yes" 
     contextmenu="yes" 
     navigable="yes" />
<body>
<form name="form1">
    <table>
    <tr valign="middle">
        <td><textarea name="targetList" cols="30" rows="20" wrap="off"></textarea></td>
        <td><input type="button" value=" ⇒ " onClick="ScriptMain()" /></td>
        <td><textarea name="resultList" cols="60" rows="20" wrap="off"></textarea></td>
    </tr>
    </table>
</form>
</body>
</html>
 

]]> https://ameblo.jp/tanchan1910/entry-12531964427.html Wed, 02 Oct 2019 22:21:38 +0900 とあるスクリプト

# -*- coding: utf8 -*-

import sys

from tkinter import Tk, ttk, StringVar

 

# configファイル名

config_file = 'config.py'

 

# 送信先dict

ip_lists = [{'ip1' : '192.168.1.1', 'ip2' : '192.168.2.1', 'name' : 'A君'},

{'ip1' : '192.168.1.2', 'ip2' : '192.168.2.2', 'name' : 'B君'},

{'ip1' : '192.168.1.3', 'ip2' : '192.168.2.3', 'name' : 'C君'},

{'ip1' : '192.168.1.4', 'ip2' : '192.168.2.4', 'name' : 'D君'},

{'ip1' : '192.168.1.4', 'ip2' : '192.168.2.4', 'name' : 'E君'},

{'ip1' : '192.168.1.5', 'ip2' : '192.168.2.5', 'name' : 'F君'} ]

 

##########

def cancel_btn_event (ev):

"""

cancelボタン押下イベントプロシジャ

"""

global win

win.quit()

 

##########

def getValue(strTargetKey, strTargetString):

"""

文字列中のkeyからvalueを返す。

Parameters

----------

strTargetKey : string

探し出すkey

strTargetString : string

key=valueを含む検索対象文字列

 

Returns

-------

value : int

keyに対応するvalueを返す。

"""

# '=' で区切って key-value に分割する

strKey, strValue = strTargetString.split('=', 1) # 1回目を区切って、2個目以降は区切らない

strValue = strValue.strip()

return strValue.strip('\'\"')

 

##########

def find_line(strTargetKey, listData):

"""

configを読み込んだリストから特定 key を含む行番号を返す。

Parameters

----------

strTargetKey : string

探し出すkey

listData : list

configを読み込んだリスト

 

Returns

-------

行番号 : int

先頭の場合は1を返し、なければ0を返す。

"""

 

bFindFlag = False

# list の全ての内容から、strTargetKey を探す

for i in range(len(listData)):

# 1行取り出しては # より右の文字列を削除する

strLine = listData[i].split('#', 1)

# = がなければ key-value ではない

if not '=' in strLine[0]:

continue

strLine = listData[i].split('#')

strKey, strValue = strLine[0].split('=', 1) # 1回目を区切って、2個目以降は区切らない

 

# Targetのkeyと同じkeyをconfigからみつけたら、その行番号を返す。先頭行なら「1」を返す

if strTargetKey.strip() == strKey.strip():

return i + 1

 

# key が見つからない場合は 0 を返す

if not bFindFlag:

return 0

 

##### main #####

if __name__ == '__main__':

### configを読み込む

with open(config_file, "r") as f:

config_lines = f.readlines()

 

### Tkinter を使ってWindowを用意する

win = Tk()

win.title(u"Config Changer")

win.geometry("400x300")

 

### 送信先ラジオボタンを表示する

lbl1 = ttk.Label(win, text='送信先: ')

lbl1.place(x=15, y=10)

 

ip_grp = StringVar()

ip_Radiobutton = []

 

# config内に'ip'の行があれば、その内容を取得する

intConfigIp = find_line('ip', config_lines)

if intConfigIp != 0:

strIpValue = getValue('ip', config_lines[intConfigIp-1])

else:

strIpValue = ''

 

# 送信先ラジオボタンを設定する

y_axis = 30

for i in range(len(ip_lists)):

Radio = ttk.Radiobutton(win, text=ip_lists[i]['name']+' ('+ip_lists[i]['ip1']+')', variable=ip_grp, value=(str(i)))

ip_Radiobutton.append(Radio)

ip_Radiobutton[i].place(x=40, y=y_axis)

y_axis = y_axis + 20

 

# config内に表示と同じ'ip'があれば、そのボタンをチェックする

if strIpValue == ip_lists[i]['ip1']:

ip_grp.set(str(i))

 

### ファイルタイプラジオボタンを表示する

lbl2 = ttk.Label(win, text='ファイルタイプ: ')

lbl2.place(x=15, y=160)

 

type_grp = StringVar()

#type_grp.set('csv')

type_csv = ttk.Radiobutton(win, text='csv', variable=type_grp, value='csv')

type_xml = ttk.Radiobutton(win, text='xml', variable=type_grp, value='xml')

type_csv.place(x=40, y=180)

type_xml.place(x=40, y=200)

 

lbl3 = ttk.Label(win, text='送信モード: ')

lbl3.place(x=200, y=160)

 

mode_grp = StringVar()

mode_grp.set('normal')

mode_csv = ttk.Radiobutton(win, text='Normal', variable=mode_grp, value='normal')

mode_xml = ttk.Radiobutton(win, text='Hi speed', variable=mode_grp, value='speed')

mode_csv.place(x=240, y=180)

mode_xml.place(x=240, y=200)

 

ok_btn = ttk.Button(text='保存')

cancel_btn = ttk.Button(text='キャンセル')

ok_btn.place(x=200, y=250)

cancel_btn.place(x=300, y=250)

ok_btn.bind( '<Button-1>', cancel_btn_event )

cancel_btn.bind( '<Button-1>', cancel_btn_event )

 

find_line('ip', config_lines)

 

win.mainloop()

]]> https://ameblo.jp/tanchan1910/entry-12526719442.html Tue, 17 Sep 2019 23:14:14 +0900 つづき /////////////////////////////
// 日付のフォーマッティング
// formatDate(Date [, type])
/////////////////////////////
function formatDate() {
    if (arguments.length == 0) return "";

    var targetDate = new Date();
    targetDate.setTime( arguments[0].getTime() );

    var yy = targetDate.getYear();
    var mm = targetDate.getMonth() + 1;
    var dd = targetDate.getDate();
    if (yy < 2000) { yy += 1900; }
    if (mm < 10) { mm = "0" + mm; }
    if (dd < 10) { dd = "0" + dd; }

    var charSeparator1 = "";
    var charSeparator2 = "";
    var charSeparator3 = "";
    if (arguments.length > 1) {
        switch (arguments[1]) {
            case 1:
                charSeparator1 = "/";
                charSeparator2 = "/";
                break;

            case 2:
                charSeparator1 = "-";
                charSeparator2 = "-";
                break;

            case 3:
                charSeparator1 = "年";
                charSeparator2 = "月";
                charSeparator3 = "日";
                break;

            default:
                charSeparator1 = "";
                charSeparator2 = "";
        }
    }

    return (yy + charSeparator1 + mm + charSeparator2 + dd + charSeparator3);

}

/////////////////////////////
// 本日日付取得
/////////////////////////////
function getToday(type) {
    var todayDate = new Date();
    return (formatDate(todayDate, type));
}


//////////////////////////////////
// 休日リスト(画面)をファイル保存
//////////////////////////////////
function saveHolidays() {

    var objOutputResult    = objFSO.OpenTextFile(pathName + holidayListName, 2, true, -2);
    objOutputResult.WriteLine(document.form1.holidayList.value);
    objOutputResult.close();

}

</script>
</head>
  <hta:application
     id="HTA"
     icon=""
     applicationname=""
     border="thick"
     borderstyle="normal"
     caption="yes"
     innerborder="yes"
     maximizebutton="yes"
     minimizebutton="yes"
     showintaskbar="yes"
     singleinstance="no"
     sysmenu="yes"
     version=""
     windowstate="nomal"
     scroll="yes"
     scrollflat="yes"
     selection="yes"
     contextmenu="yes"
     navigable="yes" />
<body>
<p>
日報の当日分を作成する。
</p>
<form name="form1">
    <p>日付
    <input type="text" name="date" class="datepicker" id= "datepicker1" style="width:8em;" />&nbsp;
    </p>
    <p>
    <input type="button" value=" 実行 " onClick="ScriptMain()" /> (処理にちょっと時間がかかります)<br />
    Excelに「読み取り専用で開きますか?」と聞かれたら、「いいえ(<u>N</u>)」を選択してください。<br />
    </p>
    <p>
        休日一覧<br />
        <textarea name="holidayList" cols="20" rows="15"></textarea><br />
        <input type="button" value=" 保存 " onClick="saveHolidays()" /> (休日一覧を変更したとき用)
    </p>
</form>
</body>
</html>

 

]]> https://ameblo.jp/tanchan1910/entry-12331953608.html Tue, 28 Nov 2017 06:53:56 +0900 いろいろなスクリプト7 <html>
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8">
<title>オペレーション日報作成</title>
<link rel="stylesheet" type="text/css" href="http://ajax.googleapis.com/ajax/libs/jqueryui/1/themes/redmond/jquery-ui.css">
<script type="text/javascript" src="http://ajax.googleapis.com/ajax/libs/jquery/1/jquery.min.js"></script>
<script type="text/javascript" src="http://ajax.googleapis.com/ajax/libs/jqueryui/1/jquery-ui.min.js"></script>
<script type="text/javascript" src="http://ajax.googleapis.com/ajax/libs/jqueryui/1/i18n/jquery-ui-i18n.min.js"></script>
<style type="text/css">body, input, textarea {font-family: "ＭＳ Ｐゴシック",sans-serif;}</style>
<script type="text/javascript">
/////////////////////////////
// Window OnLoad イベントプロシジャ
/////////////////////////////
$(function() {
    $.datepicker.setDefaults($.datepicker.regional['ja']);
        $(".datepicker").datepicker({
        dateFormat: 'yy/mm/dd',
        autoSize: true
    });

    // 日付欄に初期値として本日日付を表示
    document.form1.date.value = getToday(1);

    // 休日ファイルを読込んで、表示する
    if(objFSO.FileExists(pathName + holidayListName)) {
        var objInputFile = objFSO.OpenTextFile(pathName + holidayListName, 1, false, -2);
        var listItems = "";
        while (!objInputFile.AtEndOfStream) {
            var LineVal = objInputFile.ReadLine();
            listItems += LineVal + "\n";
        }
        objInputFile.close();
        document.form1.holidayList.value = listItems;
    }

    window.resizeTo(640,500);

});
</script>

<script language="JScript">
//====================================
//====================================
var pathName        =    "C:\\Users\\マスタ\\";
//var pathName        =    "\\\\日報\\マスタ\\";
var orgFileName        =    "___マスタ.xls";        // 雛形のファイル名
var fileName        =    "日報_%%TODAY%%.xls";        // 結果用ファイル名
var holidayListName    =    "__HolidayList.txt";                    // 休日ファイル名

var constWeekdays    = ["日", "月", "火", "水", "木", "金", "土"];

var constNumOfWeeks    = [1, 8, 15, 22, 29];                                    // 第x週の初めの「日」
var constMonthDays    = [31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];        // 月別の満日数 (後述のisIntercalaryMonth()と一緒に用いると、閏月まで対応できる)

var idTimer;

var    arrHolidays    = new Array();                                    // 休日ファイルの内容をDate型にして収めたArray
var objShell    = new ActiveXObject("WScript.Shell");
var objFSO        = new ActiveXObject("Scripting.FileSystemObject");

//Excel のアプリケーションオブジェクトを生成
var objXL        = new ActiveXObject("Excel.Application");

function ScriptMain() {

    // 日付の設定
    var todayDate    = new Date(document.form1.date.value);    // 当日日付
    var targetDate    = new Date();

    var yesterdayDate = new Date();
    yesterdayDate.setTime( todayDate.getTime() - 86400000);

    var today        = formatDate(todayDate);
    var yesterday    = formatDate(yesterdayDate);

    // 当日分ファイルのファイル名を作成する。
    var resultOrgName    = pathName + orgFileName;
    var resultFileName    = pathName + fileName;
    resultFileName    = resultFileName.replace("%%TODAY%%",    today);
    resultFileName    = resultFileName.replace("%%YESTERDAY%%",yesterday);

    // 休日ファイルの読込み処理をCall
    getHolidayList( arrHolidays );

    // マスターファイルを、当日分のファイルとしてコピーする
    objFSO.CopyFile(resultOrgName, resultFileName);

    ExecuteExcel(resultFileName, todayDate);

}

function ExecuteExcel(resultFileName, todayDate) {

    var targetDate            = new Date();

    idTimer = window.setTimeout(function () {

    objXL.Visible    = true;
    objXL.WorkBooks.Open(resultFileName);

    // 当日日付
    objXL.Cells.Range("AB5").Value    =  todayDate.getFullYear();
    objXL.Cells.Range("AE5").Value    =  todayDate.getMonth() + 1;
    objXL.Cells.Range("AH5").Value    =  todayDate.getDate();
    objXL.Cells.Range("AL5").Value    =  constWeekdays[todayDate.getDay()];

    targetDate    = getNextWeekDay( todayDate, 1, true, arrHolidays, true );
    objXL.Cells.Range("AI48").Value    =  "'" + formatDate( targetDate, 1 );

    // フルバックアップ終了確認 (毎月曜日)
    objXL.Cells.Range("AI50").Value    =  "'" + formatDate( targetDate, 1 );

    // 当日の曜日が指定曜日とは異なる場合、未実施を塗りつぶす
    if ( !getNextWeekDay( todayDate, 1, true, arrHolidays, false )) {
        // 送付 (毎月曜日)
        objXL.Cells.Range("W48").Interior.ColorIndex    = 0;
        objXL.Cells.Range("W48").Interior.Pattern        = 1;
        objXL.Cells.Range("Z48").Interior.ColorIndex    = 1;
        objXL.Cells.Range("Z48").Interior.Pattern        = 1;

        // バックアップ終了確認 (毎月曜日)
        objXL.Cells.Range("W50").Interior.ColorIndex    = 0;
        objXL.Cells.Range("W50").Interior.Pattern        = 1;
        objXL.Cells.Range("Z50").Interior.ColorIndex    = 1;
        objXL.Cells.Range("Z50").Interior.Pattern        = 1;
    }

    // 在庫データ送信 (月初実施)
    targetDate    = getNextMonthFirstDay( todayDate, true, true, true );
    objXL.Cells.Range("AI54").Value    =  "'" + formatDate(targetDate, 1);
    // 当日の日付が指定日付とは異なる場合、未実施を塗りつぶす
    if ( !getNextMonthFirstDay( todayDate, false, true, false )) {
        // JDS在庫データ送信
        objXL.Cells.Range("W54").Interior.ColorIndex    = 0;
        objXL.Cells.Range("W54").Interior.Pattern        = 1;
        objXL.Cells.Range("Z54").Interior.ColorIndex    = 1;
        objXL.Cells.Range("Z54").Interior.Pattern        = 1;
    }

    // 月次締め処理 (月末実施)
    if (getNextMonthLastDay( todayDate,  false, false, false ) == false )    targetDate    = getNextMonthLastDay( todayDate, false, false, true );    // 未経過
    else                                                                    targetDate    = getNextMonthLastDay( todayDate,  true, false, true );    // 当日または既に経過
    objXL.Cells.Range("AI56").Value    =  "'" + formatDate(targetDate, 1);

    // 当日の日付が指定日付とは異なる場合、未実施を塗りつぶす
    if ( !getNextMonthLastDay( todayDate, false, true, false )) {
        // 在庫データ送信
        objXL.Cells.Range("W56").Interior.ColorIndex    = 0;
        objXL.Cells.Range("W56").Interior.Pattern        = 1;
        objXL.Cells.Range("Z56").Interior.ColorIndex    = 1;
        objXL.Cells.Range("Z56").Interior.Pattern        = 1;
    }

    // サーバー再起動(第一水曜日)
    // 次回実施日の算出
    if (getHizukeInMonth( todayDate, 0, 3, true, false, arrHolidays, false ) == -1 ) targetDate  = getHizukeInMonth( todayDate, 0, 3, true, false, arrHolidays, true );    // 未経過
    else                                                                             targetDate  = getHizukeInMonth( todayDate, 0, 3, true, true, arrHolidays, true );    // 当日または既に経過
    objXL.Cells.Range("AI58").Value    =  "'" + formatDate( targetDate, 1 );

    // 当日じゃなかったら、未実施を塗りつぶす
    if (getHizukeInMonth( todayDate, 0, 3, true, false, arrHolidays, false ) != 0 ) {            // 当日以外
        objXL.Cells.Range("W58").Interior.ColorIndex    = 0;
        objXL.Cells.Range("W58").Interior.Pattern        = 1;
        objXL.Cells.Range("Z58").Interior.ColorIndex    = 1;
        objXL.Cells.Range("Z58").Interior.Pattern        = 1;
    }

    // Eサーバー再起動(第三水曜日)
    if (getHizukeInMonth( todayDate, 2, 3, true, false, arrHolidays, false ) == -1 ) targetDate  = getHizukeInMonth( todayDate, 2, 3, true, false, arrHolidays, true );    // 未経過
    else                                                                             targetDate  = getHizukeInMonth( todayDate, 2, 3, true, true, arrHolidays, true );    // 当日または既に経過
    objXL.Cells.Range("AI60").Value    =  "'" + formatDate( targetDate, 1 );

    // 当日じゃなかったら、未実施を塗りつぶす
    if (getHizukeInMonth( todayDate, 2, 3, true, false, arrHolidays, false ) != 0 ) {            // 当日以外
        objXL.Cells.Range("W60").Interior.ColorIndex    = 0;
        objXL.Cells.Range("W60").Interior.Pattern        = 1;
        objXL.Cells.Range("Z60").Interior.ColorIndex    = 1;
        objXL.Cells.Range("Z60").Interior.Pattern        = 1;
    }

    // 処理終了メッセージを表示
    alert("処理が終了しました。\n\n作成したファイル:\n" + resultFileName + "\n\nExcelを保存・終了して、ファイルを\n親ディレクトリへ移動してください。\n\n");

        window.clearTimeout(idTimer);

                    }, 2000);
}

//=================================================================================================
//次曜日日付を取得
//
//getNextWeekDay(    todayDate,            // 調査開始日 (Date型)
//                    targetWeekDay,        // 曜日 (0:日曜日～6:土曜日)
//                    directionFlg,        // 非営業日の場合、次日付で探すか、前日付で探すか (true:次日付)
//                    arrHolidays,        // 休日一覧(Date型Array)。事前にgetHolidayList()をコールして初期化しておく。
//                    opeMode    )            // 操作モード (true: 日付を返す。false: 調査開始日と算出した日付の同異を返す。
//                                        // (同じな場合はtrue, 同じではない場合はfalseを返す))
//
//=================================================================================================
function getNextWeekDay( todayDate, targetWeekDay, directionFlg, arrHolidays, opeMode ) {

    // 作業用日付を調査開始日で初期化する
    var targetDate    = new Date();
    targetDate.setTime(todayDate.getTime());

    // 調査開始日の曜日を保存しておく
    var    todayDay    = todayDate.getDay();

    // 引数で指定された曜日の日付を、一日づつ移動しながら調べる。
    for (i=0; i<7; i++) {
        targetDate.setTime(targetDate.getTime() + 86400000);
        if (targetDate.getDay() == targetWeekDay) break;
    };

    // 休日処理(一ヵ月分ループする)
    // 次の日(引数のdirectionFlg次第で翌日または前日)へDateを移動するために、1日分のミリ秒をセットする。
    var    iDirection = 86400000;                            // 翌日
    if(directionFlg == false) iDirection = -86400000;    // 前日
    for (i=0; i<constMonthDays[todayDate.getMonth()] + isIntercalaryMonth( todayDate ); i++) {
        // 休日チェックをCallし、当日が休日かを調べ、休日ではない場合はループを終了する。
        if ( !(isHoliday( targetDate, arrHolidays)) ) break;
        // 休日だった場合、1日のミリ秒分移動する。
        targetDate.setTime(targetDate.getTime() + iDirection);
    }

    // 操作モードがtrueの場合、算出した日付を返す。
    if (opeMode) return targetDate;
    else {
        // 当日の曜日が指定曜日だった場合はtrue, 異なる場合はfalseを返す
        if (targetWeekDay == todayDay) return  true;
        return false;
    }
}

//=================================================================================================
//翌月初検索処理
//
//getNextMonthFirstDay(    todayDate,            // 調査開始日 (Date型)
//                        nextMonthFlg.        // 翌月フラグ (true: 翌月の指定曜日。false: 当月の指定曜日)
//                        directionFlg,        // 非営業日の場合、次日付で探すか、前日付で探すか (true:次日付)
//                        opeMode    )            // 操作モード (true: 日付を返す。false: 調査開始日と算出した日付の同異を返す。
//                                            // (同じな場合はtrue, 同じではない場合はfalseを返す))
//
//=================================================================================================
function getNextMonthFirstDay( todayDate, nextMonthFlg, directionFlg, opeMode ) {

    // 引数の日付から「年」と「月」を抽出し、その月の初めの「日」で初期化した、Date型変数をnewする。
    if (nextMonthFlg)    var    monthOffset    = 1;
    else                 var    monthOffset    = 0;
    var targetDate    = new Date(todayDate.getYear(), todayDate.getMonth()+monthOffset, 1);

    // 休日処理(一ヵ月分ループする)
    // 次の日(引数のdirectionFlg次第で翌日または前日)へDateを移動するために、1日分のミリ秒をセットする。
    var    iDirection = 86400000;                            // 翌日
    if(directionFlg == false) iDirection = -86400000;    // 前日
    for (i=0; i<constMonthDays[todayDate.getMonth()] + isIntercalaryMonth( todayDate ); i++) {
        // 休日チェックをCallし、当日が休日かを調べ、休日ではない場合はループを終了する。
        if ( !(isHoliday( targetDate, arrHolidays)) ) break;
        // 休日だった場合、1日のミリ秒分移動する。
        targetDate.setTime(targetDate.getTime() + iDirection);
    }

    // 操作モードがtrueの場合、算出した日付を返す。
    if (opeMode) return targetDate;
    else {
        // 当日の日付が指定曜日だった場合はtrue, 異なる場合はfalseを返す
        if (todayDate.getTime() == targetDate.getTime()) return  true;
        return false;
    }

}

//=================================================================================================
//翌月末検索処理
//
//getNextMonthLastDay(    todayDate,            // 調査開始日 (Date型)
//                        nextMonthFlg.        // 翌月フラグ (true: 翌月の指定日。false: 当月の指定日)
//                        directionFlg,        // 非営業日の場合、次日付で探すか、前日付で探すか (true:次日付)
//                        opeMode    )            // 操作モード (true: 日付を返す。false: 調査開始日と算出した日付の同異を返す。
//                                            // (同じな場合はtrue, 同じではない場合はfalseを返す))
//
//=================================================================================================
function getNextMonthLastDay( todayDate, nextMonthFlg, directionFlg, opeMode ) {

    // 引数の日付から「年」と「月」を抽出し、その月の初めの「日」で初期化した、Date型変数をnewする。
    if (nextMonthFlg)    var    monthOffset    = 1;
    else                 var    monthOffset    = 0;
    var workDate = new Date(todayDate.getYear(), todayDate.getMonth()+monthOffset, 1);

    // その月の最終日を設定する
    var    monthLastDay    = constMonthDays[workDate.getMonth()] + isIntercalaryMonth( workDate );
    var targetDate    = new Date(workDate.getYear(), workDate.getMonth(), monthLastDay);

    // 休日処理(一ヵ月分ループする)
    // 次の日(引数のdirectionFlg次第で翌日または前日)へDateを移動するために、1日分のミリ秒をセットする。
    var    iDirection = 86400000;                            // 翌日
    if(directionFlg == false) iDirection = -86400000;    // 前日
    for (i=0; i<constMonthDays[todayDate.getMonth()] + isIntercalaryMonth( todayDate ); i++) {
        // 休日チェックをCallし、当日が休日かを調べ、休日ではない場合はループを終了する。
        if ( !(isHoliday( targetDate, arrHolidays)) ) break;
        // 休日だった場合、1日のミリ秒分移動する。
        targetDate.setTime(targetDate.getTime() + iDirection);
    }

    // 操作モードがtrueの場合、算出した日付を返す。
    if (opeMode) return targetDate;
    else {
        // 当日の日付が指定曜日だった場合はtrue, 異なる場合はfalseを返す
        if (todayDate.getTime() == targetDate.getTime()) return  true;
        return false;
    }

}

/////////////////////////////
// 次月末検索処理
// mode: true  = 次月
//       false = 本月
/////////////////////////////
function nextMonthLastDay(fromDate, mode) {
    var workDate   = new Date();
    var targetDate = new Date();
    workDate = fromDate;

//    if (mode == false) workDate.setDate(1);
//    if (mode == true)  workDate.setDate(28);
    workDate.setDate(1);
    workDate.setTime( workDate.getTime() + (86400000 * 50));
    workDate.setDate(1);

    for (var i=1; i<1800; i++) {
        targetDate.setTime( workDate.getTime() - (86400000 * i));
        if (decideHolidat( targetDate )) continue;
        break;
    }
    return targetDate;
}

//=================================================================================================
//月内の第x週の指定曜日日付を取得
//
//getHizukeInMonth(    todayDate,            // 調査開始日 (Date型)
//                    numWeek,            // 第x週の指定 (0スタート)
//                    targetWeekDay,        // 曜日 (0:日曜日～6:土曜日)
//                    directionFlg,        // 非営業日の場合、次日付で探すか、前日付で探すか (true:次日付)
//                    nextMonthFlg.        // 翌月フラグ (true: 翌月の指定曜日。false: 当月の指定曜日)
//                    arrHolidays,        // 休日一覧(Date型Array)。事前にgetHolidayList()をコールして初期化しておく。
//                    opeMode    )            // 操作モード (true: 日付を返す。false: 調査開始日と算出した日付の同異を返す。
//                                        // (同じな場合は0, 経過済みなら1, 未経過なら-1を返す))
//
//=================================================================================================
function getHizukeInMonth( todayDate, numWeek, targetWeekDay, directionFlg, nextMonthFlg, arrHolidays, opeMode ) {

    // 引数の日付から「年」と「月」を抽出し、その月の第x週の初めの「日」で初期化した、Date型変数をnewする。
    var targetDate = new Date(todayDate.getYear(), todayDate.getMonth(), constNumOfWeeks[numWeek]);

    // 翌月フラグがtrueの場合、1ヵ月分時間を進ませる
    if (nextMonthFlg) targetDate.setTime(targetDate.getTime() + (constMonthDays[targetDate.getMonth()] * 86400000) + (isIntercalaryMonth( targetDate ) * 86400000));

    // 引数で指定された曜日の日付を、一日づつ移動しながら調べる。
    for (i=0; i<7; i++) {
        if (targetDate.getDay() == targetWeekDay) break;
        targetDate.setTime(targetDate.getTime() + 86400000);
    };

    // 次の日(引数のdirectionFlg次第で翌日または前日)へDateを移動するために、1日分のミリ秒をセットする。
    var    iDirection = 86400000;                            // 翌日
    if(directionFlg == false) iDirection = -86400000;    // 前日

    // 休日処理(一ヵ月分ループする)
    for (i=0; i<constMonthDays[todayDate.getMonth()] + isIntercalaryMonth( todayDate ); i++) {
        // 休日チェックをCallし、当日が休日かを調べ、休日ではない場合はループを終了する。
        if ( !(isHoliday( targetDate, arrHolidays)) ) break;
        // 休日だった場合、1日のミリ秒分移動する。
        targetDate.setTime(targetDate.getTime() + iDirection);
    }

    // 操作モードがtrueの場合、算出した日付を返す。
    if (opeMode) return targetDate;
    else {
        // 算出した日付と調査開始日が同じ場合は0, 経過済みなら1, 未経過なら-1を返す
        if (targetDate.getTime() == todayDate.getTime()) return  0;
        if (targetDate.getTime()  < todayDate.getTime()) return  1;
        return -1;
    }

}

//=================================================================================================
//休日ファイルの読込み処理
//
//getHolidayList(    arrHolidays )    // 休日ファイルの内容を保持する、Date型Array
//
//=================================================================================================
function getHolidayList( arrHolidays ) {
    var holidayListName    =    "\\\\Kin-storagesrv2\\info-sys\\Private\\SIS\\ksystem\\運用保守\\010_オペレーション日報\\オペレーション日報マスタ\\__HolidayList.txt";

    // 休日ファイルを読込み、Date型Arrayに保持する。
    if(objFSO.FileExists(holidayListName)) {
        // 休日ファイルをオープンする。
        var objInputFile = objFSO.OpenTextFile(holidayListName, 1, false, -2);

        // 休日ファイルがEOFになるまで、処理を繰返す。
        while (!objInputFile.AtEndOfStream) {
            // 休日ファイルから1レコード読込む
            var LineVal = objInputFile.ReadLine();

            // Date型Arrayに保持する。
            var holiday = new Date(LineVal);
            arrHolidays.push(holiday);
        }
    }
}

/////////////////////////////
// 休日チェック
// return: true  = 休日
//         false = 平日
/////////////////////////////
function decideHolidat( targetDate ) {

    if (targetDate.getDay() == 0 || targetDate.getDay() == 6) return true;
    for (var i=0; i<arrHolidays.length; i++) {
        if(arrHolidays[i].getTime() == targetDate.getTime()) return true;
    }
    return false;
}

function PausedSection() {
        alert("waite後");
        window.clearTimeout(idTimer);
}

//==================================================================
// 休日チェック
// isHoliday(    targetDate,                // 調査日付 (Date型)
//                    arrHolidays )        // 休日リスト (Date型Array)
//
// return: true  = 休日
//         false = 平日
//==================================================================
function isHoliday( targetDate, arrHolidays) {

    // 曜日が土日の場合、「休日」を返す。
    if (targetDate.getDay() == 0 || targetDate.getDay() == 6) return true;

    // 休日リストを検索し、同じ日付があれば「休日」を返す。
    for (var i=0; i<arrHolidays.length; i++) {
        if(arrHolidays[i].getTime() == targetDate.getTime()) return true;
    }

    // 平日を返す。
    return false;
}

//==================================================================
// 閏月チェック
//
// constMonthDaysで月別の満日数を定義しているが、このままでは閏月が
// 考慮されていないため、このfunctionを共有することで閏月に対応する。
//
// isIntercalaryMonth(    targetDate )        // 調査日付 (Date型)
//
// return: 1 = 閏月
//         0 = 普通の月
//==================================================================
function isIntercalaryMonth( targetDate ) {

    if ( (targetDate.getYear() % 4) == 0 && targetDate.getMonth() == 1)    return 1;
    else                                                                return 0;

}

 

]]> https://ameblo.jp/tanchan1910/entry-12331953561.html Tue, 28 Nov 2017 06:53:26 +0900 新宿末廣亭で真打昇進口上を観た

新宿末廣亭 新宿末廣亭
新宿末廣亭



新真打となった中で、林家たけ平って人が今日のトリを勤める。九代目林家正蔵師匠の一番弟子だそうだ。

末廣亭は昼夜の入替えがないので、直ぐ近所にある伊勢丹の開店時間の10:30に到着するように家を出る。伊勢丹のデパ地下で弁当を2食分買って行列に並ぶ。寄席の中で飲食ができるし(飲酒は禁止)持込みも可なので、近所のスーパーで買ったペットボトルのお茶2本とこの弁当でしのぎならが、12時前の前座さんから21時過ぎの夜席のトリまで、木戸銭￥3,000-でたっぷり楽しめるのだ。

2年ぶりの真打昇進披露口上だったけど、何度観ても縁起物って感じで楽しいのだ。また来年も来たいなぁ。


寄席： 新宿末廣亭
住所： 東京都新宿区新宿3－6－12 地図
]]> https://ameblo.jp/tanchan1910/entry-12148846749.html Sat, 09 Apr 2016 23:55:30 +0900 元住吉「豚星。」の豚坦麺

豚星。
こんなお店


3月末までの限定メニューってことで、最終日に行ってみたのだった。

豚坦麺
豚坦麺


坦々麺としてなかなか旨い。辛過ぎないでゴマの風味となにかのナッツがしっかり利いてて、好きなタイプだ。期間限定なのが残念。とはいえ、何ヵ月かすればまた再開するだろうから、それを楽しみにしよう。

4月の限定も食べたいなぁ。


お店： 豚星。
住所： 神奈川県川崎市中原区木月4-5-20 地図
]]> https://ameblo.jp/tanchan1910/entry-12148824574.html Thu, 31 Mar 2016 23:41:46 +0900 勝どき「RED STRING」でランチ


こんなお店(昼バージョン)


昔、この地で居酒屋を営んでいたお店がこの「勝どきビュータワー」の建設のために月島駅前の仮店舗で営業。ビルが出来上がったのでこの地に戻ってきたのだが、現在は娘さんが経営していて前のママさんは昼間だけ喫茶店として営業しているのだ。

月島駅前の頃には、週に8回通った記録がある。ランチに5回と夜に飲みに3回だ。でも今の職場からはなかなか行く機会がない。

釜揚げしらす丼と鰆の西京焼
釜揚げしらす丼と鰆の西京焼


今日は安生さんもいて二人で営業してた。でもって解禁になったばかりの相模湾の釜揚げしらすがあるよってことで、釜揚げしらす丼と鰆の西京焼き定食(￥1,100-)に決定。しらす丼がメチャ旨かったぁ。鰆もちょうどいい塩梅の焼き具合でこれまた絶品。

玉子かけご飯
玉子かけご飯


「ご飯おかわりしてね」ってことだったのでお願いしたら、丼だったから玉子をサービスしてくれた。そういえばTKGってしばらく食べてなかったなぁ。目玉焼き丼にすることは多いんだけど。

アイスコーヒーを楽しみながら昔話に花を咲かせる。新規の5人組のお客さんが来たから、そろそろ月島駅まで歩こう。

最近、日曜日だけ夜も昔の形で営業しているみたいなので、近いうちにまた来よう。


お店： Cafe & Bar RED STRING (レッドストリング)
住所： 東京都中央区勝どき1-8-1 211a 地図
]]> https://ameblo.jp/tanchan1910/entry-12143760217.html Sat, 26 Mar 2016 23:36:15 +0900 元住吉「丸はし」でチョコフォンデュ！？


こんなお店


オレはいつものように焼肉丼のオレ仕様ちょっとスペシャルバージョンっを食べていたのだが、ひととおり食事も終わった感じの女子達の下へデザートが運ばれた様子。見たらチョコフォンデュだったのだ。

チョコフォンデュパーティー
チョコフォンデュパーティー


蕎麦屋の大将(「おじちゃん」と呼ばれている)の粋な計らいってヤツだ。その女子達がオレの分も作ってくれたので、お相伴にあずかる。焼肉丼で満腹だったけど、旨かった。別腹ってヤツか?


お店： 生そば 丸はし 矢上川店
住所： 神奈川県川崎市中原区井田2-9-1 地図

]]> https://ameblo.jp/tanchan1910/entry-12140884997.html Tue, 22 Mar 2016 21:42:29 +0900 元住吉「豚星。」で二郎インスパイアなラーメン

豚星。
こんなお店


ここん家は二郎インスパイアなラーメン。だから量が多いのだ。以前は「麺少な目」とかでオーダーすることもあったけど、引っ越してきてからは「ミニラーメン」もできたので、今日はそのミニラーメンを券売機で購入、￥650-。

以前より席数が増えたカウンターのみの店内は満員で、18:30頃の時点で順番待ちのお客さんが十数人いた。その後もどんどん増えていく。相変わらずの人気店だ。

15分程で空席ができたので着席、それからまた15分程でコール、「野菜マシ＋ニンニク」をお願いした。

ミニラーメン
ミニラーメン ￥650-


まずは大量のモヤシとキャベツを、スープと絡めながらワシワシッと食う。今日は「濃厚乳化スープ」だという予告が twitter のこのお店のアカウントでアナウンスされていたから行ったのだが、この濃厚乳化スープが野菜によく絡んでなかなかGOOD!だ。


チャーシュー
チャーシュー


麺は太目のしっかり麺で旨い。こういう麺をたまに食べたくなるんだよなぁ。スープは前述のとおり濃厚乳化スープでこれまたたまに食べたくなるもの。ただ二郎インスパイアなラーメンだから高が知れてるけど。

食べ進めたところでチャーシューが2枚"コンニチワ"。相変わらずの分厚いチャーシューは適度な脂の量で肉の存在感がしっかり感じられるもので旨い。

ミニラーメンだったけど満腹だぁ。

二郎系はそれほど好きなわけではないのだが、たまに食べたくなるんだよなぁ。濃厚乳化スープの時を狙ってまた来よう。


お店： 豚星。
住所： 神奈川県川崎市中原区木月4-5-20 地図
]]> https://ameblo.jp/tanchan1910/entry-12140877445.html Fri, 18 Mar 2016 23:05:05 +0900 2016年の初詣と初日の出は高尾山と小仏城山で

高尾山ケーブルカー山麓駅
高尾山ケーブルカー山麓駅


まだ紅白も終わらないうちに(って、観てないけど)家を出て、高尾山口駅へ向かう。電車内はガラガラで座って行けた。JR高尾駅から乗換えのお客さんで若干混雑した程度だった。まずはケーブルカーの駅を目指す。

一号路を登る
一号路を登る


ケーブルカーに乗るつもりはなく、一号路を登る。高尾山口駅に着いた時点で0時を回っていてかなり寒かったけど、坂道を歩き始めると直ぐに体温が上昇するね。ハードシェルの前をはだけて調節しながら歩く。

一号路は全線街灯があるので、安全に登れる。

ケーブルカーの山頂側に到着。お茶したり団子を食べたりしている人たちでごった返していた。それを横目に薬王院を目指す。

ケーブルカー高尾山駅と展望台
ケーブルカー高尾山駅と展望台

展望台付近から下界を望む
望台付近から下界を望む

参道
参道

ひっぱりだこ
ひっぱりだこ


男坂を登れば、いよいよ薬王院だ(薬王院の写真はないけど)。

男坂
男坂

願叶輪潜
願叶輪潜


薬王院で初詣を済ませ愛染堂をお参りしたら、次は高尾山山頂を目指す。

山頂付近から下界を見下ろす
山頂付近から下界を見下ろす

高尾山山頂
高尾山山頂


高尾山山頂は、既に初日の出を待つ人たちでいっぱいだ!! そこを通り過ぎてもっと先に進む。ここから先に街灯はないので、ヘッドライトを装備して進む。

ヘッデン着けて先に進む
ヘッデン着けて先に進む

小仏城山への道
小仏城山への道


一時間程歩いて、今回の目的地の小仏城山に到着だ。歩いている間は暑いけど、止まるととたんに体が冷えてくる。実は夕食を食べていなかったので、持参した自作のアルコールストーブで早速お湯を沸かして食事にする。

小仏城山から下界を望む
小仏城山から下界を望む

お湯を沸かして食事とコーヒー
お湯を沸かして食事とコーヒー


カップ麺の天ぷらそばとコンビニおむすびで遅い夕食をとり、コーヒーを飲み kindle に入れたコミックを読みながら日の出を待つ。

思っていたことだけど、めちゃ寒い。カイロを忘れたのが痛恨。陣取った場所とは反対側で、城山茶屋の人(だったと思う)が焚き火をしてたのでちょっとあたらせてもらう。暖かくて生き返る。

3時間位待つことは想定していたので、木製のベンチに座るのはしんどいから Helinox チェアワンを持ってきた(写真は撮り忘れた)。1kgを切る軽量な折畳のイスだけど、座り心地がメチャいいのだ。

東の空が白み始める
東の空が白み始める

夜明け前
夜明け前

太陽が顔を覗かせた
太陽が顔を覗かせた


5:50頃になって、ようやく東の空が明るくなり始めた。6:50頃に太陽が顔をのぞかせる。そしてその5分後、いよいよ初日の出だ!!

初日の出
初日の出


反対側に行くと、富士山が綺麗だ。本当は日の出前に見ると、高さがある分先に日が当たって、今日みたいに条件がいい日は赤富士状態になってとっても綺麗らしいのだが、日の出の撮影ポイントキープのために動けなかった。ちょっと残念。

富士山
富士山


そろそろ下山しよう。景信山や陣馬山方面に歩こうかとも思ったのだが、疲れてたので東海自然歩道を通って小原宿に出てから、相模湖駅から帰路につくことにした。


東海自然歩道
東海自然歩道

相模湖
東海自然歩道からの相模湖


山を降り登山道入口にたどり着いたら、まるで罠を張ったかのように道端で茶屋が開かれていた。草餅をメチャ押してきたが、体を動かして暑かったのでアイスコーヒーをオーダー、￥400-。

登山道入口で一服
登山道入口で一服


ここからほんの数分でバス停に到着。でも時間が半端だったので(アイスコーヒーを飲まなければ間に合った)、「日帰り入浴」の文字に誘われて「天下茶屋」さんへ向かう。


日帰入浴できる天下茶屋
日帰入浴できる「弁天島温泉 天下茶屋」

天下茶屋は谷底にあった
天下茶屋は谷底にあった


看板の近くだろうと思っていたら、谷底目指してひたすら降りなければならない。でも温泉の誘惑には勝てずに降りて行く。入浴料￥1,080-を支払い一時間ほどのんびりと入浴。疲れがお湯に溶け出していく気がする。きもちいいい。

結局バスのタイミングをまちがえちゃったので、しかたなく相模湖駅まで約3km程の道のりを歩くことにした。

疲れたし寒かったけど、この年始はちょっと好きなパターンになるかも。

]]> https://ameblo.jp/tanchan1910/entry-12113832775.html Fri, 01 Jan 2016 23:33:45 +0900