Skip to content

Instantly share code, notes, and snippets.

View tak458's full-sized avatar

tak458

2 followers · 5 following
View GitHub Profile
@tak458
tak458 / UpdateSvnCommitDate.ps1
Created January 29, 2016 06:12
SVNコミット時刻修正スクリプト
# コミット後にコミット時刻をファイルの更新時刻に変更するバッチ
# リリース物件など、ファイルの更新日時が重要な時は便利。
# ただし、時間を変更するのは何が起きるか分からないので十分注意すること。
# 必ず事前に、pre-revision property change hookに「exit 0」のみを記載しておくこと。
# チェックアウト先ディレクトリ
$srcDir = "C:\Checkouts\repos"
# リポジトリURL
@tak458
tak458 / BNFParser.cs
Created February 8, 2016 07:17
BNF記法で書かれたソースコード読み込むプログラムを作るパーサー。
using System;
using System.Text;
using System.Text.RegularExpressions;
using System.Linq;
using System.IO;
using System.Diagnostics;
using System.Collections.Generic;
namespace BNFCoder
{
@tak458
tak458 / CommonUtil.ps1
Created February 8, 2016 07:56
Microsoft Project ファイルから期限を迎えたレコードを抽出し、Outlook用のメールを生成するスクリプト。
$objMissingValue = [System.Reflection.Missing]::Value
[void] [Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms");
# 指定した日付が平日かどうかを表す論理値を返す
function IsWeekday($date)
{
$result = $true
switch((Get-Date $date).DayOfWeek)
{
@tak458
tak458 / ssh2login.ttl
Created May 27, 2016 03:35
Tera TermにてSSHログインするマクロ。ログも取得する。
; SSH Login
username = 'username'
hostname = 'IP-Address'
pswdfile = 'passkey.dat'
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
msg = 'Enter password for user '
strconcat msg username
@tak458
tak458 / IgnoreCobolLineNo.sct
Last active May 3, 2019 05:25
WinMergeプラグイン（COBOL行頭番号無視） ref: https://qiita.com/tak458/items/bac4c1775be980060672
<scriptlet>
<implements type="Automation" id="dispatcher">
<property name="PluginEvent">
<get/>
</property>
<property name="PluginDescription">
<get/>
</property>
<property name="PluginFileFilters">
@tak458
tak458 / ExtractExcelMacro.js
Last active August 20, 2016 06:35
Excelマクロ抽出スクリプト ref: http://qiita.com/tak458/items/fd1d9016f0e391ea6a53
/* -------------------------------- 設定 -------------------------------- */
// 抽出元ディレクトリ(エスケープシーケンスに注意。例)「\」⇒「\\」）
var src_dir = "C:\\ExcelMacro";
// 抽出先ディレクトリ
var ext_dir = WScript.CreateObject("WScript.Shell").SpecialFolders("Desktop");
// Excelファイルのパスワードを，SendKeys用の記法で記述
@tak458
tak458 / index.html
Created October 8, 2016 10:15
Pinterest APIで画像を取得する ref: http://qiita.com/tak458/items/dde44df16119cea49f15
<!DOCTYPE html>
<html>
<head>
<meta charset="UTF-8" />
<script src=".\node_modules\jquery\dist\jquery.min.js"></script>
<script src=".\src\index.js"></script>
</head>
<body>
@tak458
tak458 / Remove-BrokenImage.ps1
Last active November 21, 2017 03:29
画像の更新日時とExif撮影日時を同期させるスクリプト
[void][Reflection.Assembly]::LoadWithPartialName("System.Drawing")
ls -Recurse|?{$_.Extension -eq ".jpg"}|%{
$readable = $FALSE
[void]$image
try{
$image = New-Object System.Drawing.Bitmap($_.FullName)
$readable = $TRUE
@tak458
tak458 / pick.ts
Created May 2, 2020 14:14
function pick<T, K extends keyof T>(array: T[], allowed: K[]): Pick<T, K>[] {
return array.map(raw =>
(Object.keys(raw) as (keyof T)[])
.filter(key => allowed.indexOf(key as any) >= 0)
.reduce((pre, key) => ({ ...pre, [key]: raw[key] }), {} as Pick<T, K>)
);
}
@tak458
tak458 / Change-Timestamp.ps1
Created July 18, 2020 12:48
Go Pro タイムスタンプ修正
# mp4のある場所まで移動してから実行
# exiftool.exe へのパスは通しておく
get-childitem -recurse -File "*.MP4" | ForEach-Object{
#exiftool '-time:all+=9:00:00' $_
exiftool '-FileCreateDate<${CreateDate}+0:00' '-FileModifyDate<${CreateDate}+0:00' $_
# 結果確認
$_.FullName
exiftool -time:all -G0:1 -s $_
}