Skip to content

Instantly share code, notes, and snippets.

@ser1zw
ser1zw / exec-sqlplus.l
Created June 7, 2012 15:51
カレントバッファの内容をSQL*Plusで実行するxyzzy lisp
;; カレントバッファの内容をSQL*Plusで実行
(defun exec-sqlplus ()
(interactive)
(let ((user "SCOTT")
(passwd "TIGER")
(host "localhost")
(port 1521)
(service-name "XE")
(filename (make-temp-file-name))
command
@ser1zw
ser1zw / win32screenshot2ruby-opencv.rb
Created April 26, 2012 15:28
win32screenshotで撮ったスクリーンショットをruby-opencvのCvMatに読み込むサンプル
# win32screenshotで撮ったスクリーンショットをruby-opencvのCvMatに読み込むサンプル
require 'opencv'
require 'win32/screenshot'
require 'tempfile'
include OpenCV
# (1) スクリーンショットを撮る
screenshot = Win32::Screenshot::Take.of(:desktop)
# (2) スクリーンショットの画像データを一時ファイルに書き込んでからCvMat.loadで読み込む
@ser1zw
ser1zw / benchmark.rb
Created April 26, 2012 15:27
win32screenshotで撮ったスクリーンショットをruby-opencvのCvMatに読み込む方法のベンチマーク
# win32screenshotで撮ったスクリーンショットをruby-opencvのCvMatに読み込む方法のベンチマーク
#
# 環境: Windows 7, Core i5 2.4GHz, メモリ 4.0GB, ディスプレイ解像度 1280x800px
# ruby 1.9.3p125 (2012-02-16) [i386-mingw32], OpenCV 2.3.1
#
# > ruby benchmark.rb
# (1) Bitmapデータを配列にしてset_dataで読み込む版
# user system total real
# 1.934000 0.062000 1.996000 ( 2.061118)
#
@ser1zw
ser1zw / match_template_sample.rb
Created April 20, 2012 15:12
ruby-opencvのテンプレートマッチングのサンプル
# ruby-opencvのテンプレートマッチングのサンプル
# https://github.com/ruby-opencv/ruby-opencv
require 'opencv'
include OpenCV
# (1) 画像を読み込み
image = CvMat.load('image.jpg') # テンプレートと比較する画像
template = CvMat.load('template.jpg') # テンプレート画像
@ser1zw
ser1zw / _tmuxinator
Created March 29, 2012 19:43
zsh completion for tmuxinator
#compdef tmuxinator mux
# zsh completion for tmuxinator
# Install:
# $ mkdir -p ~/.tmuxinator/completion
# $ cp _tmuxinator ~/.tmuxinator/completion
# $ vi ~/.zshrc # add the following codes
# fpath=($HOME/.tmuxinator/completion ${fpath})
# autoload -U compinit
@ser1zw
ser1zw / dragdrop.ps1
Created March 22, 2012 17:48
PowerShell Drag & Drop sample
# PowerShell Drag & Drop sample
# Usage:
# powershell -sta -file dragdrop.ps1
# (-sta flag is required)
#
Function DragDropSample() {
[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
$form = New-Object Windows.Forms.Form
$form.text = "Drag&Drop sample"
$listBox = New-Object Windows.Forms.ListBox
@ser1zw
ser1zw / Emacs.ahk
Last active November 16, 2021 09:37
AutoHotKey Emacs keybind script
;; AutoHotKey_LでEmacsキーバインドにするスクリプト
;;
;; 使い方
;; ・AutoHotKey_L(http://l.autohotkey.net/)をインストール
;; ・Emacs.ahkをAutoHotkeyをインストールしたフォルダ(デフォルトならC:\Program Files\AutoHotkey)に保存
;; ・タスクバーにあるAutoHotkeyのアイコン([H])を右クリックし、"Edit This Script"を選択
;; ・メモ帳でAutoHotkey.ahkが開くので、最後に以下の行を追加
;; #include Emacs.ahk
;; ・AutoHotkeyアイコンを右クリックして"Reload This Script"を選択してリロード
;;
#!/usr/bin/env ruby
# -*- mode: ruby; coding: utf-8-unix -*-
# Sudoku solver for Dropquest
# https://www.dropbox.com/dropquest2011/
require 'pp'
CANDIDATES = 'AFERDOWSI'.split(//)
@ser1zw
ser1zw / merge_sort.c
Created November 14, 2010 13:58
マージソートの練習
#include <stdio.h>
#include <stdlib.h>
void merge_sort(int* data, int size);
void merge(int* data1, int size1, int* data2, int size2, int* result);
void merge_sort(int* data, int size)
{
int size1, size2;
@ser1zw
ser1zw / levelset_method.c
Created November 5, 2010 18:53
レベルセット法の練習
/* -*- mode: c; coding: utf-8-unix -*- */
/*
Level set method
Build:
gcc `pkg-config --libs --cflags opencv` -pg levelset_method.c -o levelset_method
Usage:
./levelset_method imagefile
TODO:
・高速化