Autch autch

## bookmarklet.js
javascript:(function(w){var i=$('#dig_area .ice_ax');w.t=w.setInterval(function(){i.click()},120)})(window)

## daiseikyo.mml
#title "メロディーチャイムNO.1　ニ長調　作品17「大盛況」"
#copyright "作曲：稲田康, データ：Autch"
#timebase 24

A t90 BT2,4
A EExff,x59,x02,x02,x00                       ; key metaevent, D major
A EX x7e,x7f,x09,x01,xf7                      ; GM SYSTEM ON
A r4

A @0 v120

## gist:868189
#!/usr/bin/ruby1.8

# create table rt (
#        id integer unsigned not null auto_increment primary key,
#        pref char(32) not null,
#        city char(32) not null,
#        addr char(32) not null,
#        rt_group integer not null,
#
#        index(pref,city,addr,rt_group)

## do_vlc_live.sh
#!/bin/sh

if [ "x$1" = "x" -o "x$2" = "x" ]; then
  echo "Usage: $0 inport outport"
  exit 1
fi

if [ "x$3" = "x" ]; then
  BITRATE=128
else

## vlcserv.php
<?php // bogus reverse-proxy for VLC http streaming output

ini_set("display_errors", 0);
ini_set("log_errors", 1);

if(isset($_REQUEST['port']))
  $port = intval($_REQUEST['port']);
else
  $port = 12234;

## check_fof.rb
#!/usr/bin/ruby
#
# gem install grackle
#
# ./check_fof.rb <your_twitter_screen_name>
#

$KCODE = 'u'

require 'rubygems'

## shukan.html
<!DOCTYPE html>
<html>
<head>
    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
    <script type="text/javascript" src="http://code.jquery.com/jquery-1.6.2.min.js"></script>
    <title>習慣^H^H週刊韓国経済をヲンで買う</title>
    <style type="text/css">
    input { text-align: right; }
</style>
<script type="text/javascript">

## vcgi.rb
#!/usr/bin/ruby

ORG_ARGV = ARGV.dup

require 'optparse'
require 'socket'

BasicSocket.do_not_reverse_lookup = true

require 'webrick'

## .emacs
(auto-compression-mode t)
(if (file-exists-p "/usr/bin/lgrep")
    (setq grep-command "lgrep -n ")
)

(require 'font-lock)
(global-font-lock-mode t)
(global-set-key [delete] 'delete-char)
(global-set-key "\C-h" 'backward-delete-char)

## rtx1000.rb
#!/usr/bin/ruby1.9.1
# -*- coding: euc-jp -*-

require 'net/telnet'

RT_HOST = 'YOUR_RTX1000_ADDR'
RT_PW = 'YOUR_RTX1000_PASSWORD'

telnet = Net::Telnet.new("Host" => RT_HOST,
                         "Waittime" => 1,
	#title "メロディーチャイムNO.1　ニ長調　作品17「大盛況」"
	#copyright "作曲：稲田康, データ：Autch"
	#timebase 24

	A t90 BT2,4
	A EExff,x59,x02,x02,x00 ; key metaevent, D major
	A EX x7e,x7f,x09,x01,xf7 ; GM SYSTEM ON
	A r4

	A @0 v120
	#!/usr/bin/ruby1.8

	# create table rt (
	# id integer unsigned not null auto_increment primary key,
	# pref char(32) not null,
	# city char(32) not null,
	# addr char(32) not null,
	# rt_group integer not null,
	#
	# index(pref,city,addr,rt_group)
	#!/bin/sh

	if [ "x$1" = "x" -o "x$2" = "x" ]; then
	echo "Usage: $0 inport outport"
	exit 1
	fi

	if [ "x$3" = "x" ]; then
	BITRATE=128
	else
	<?php // bogus reverse-proxy for VLC http streaming output

	ini_set("display_errors", 0);
	ini_set("log_errors", 1);

	if(isset($_REQUEST['port']))
	$port = intval($_REQUEST['port']);
	else
	$port = 12234;
	#!/usr/bin/ruby
	#
	# gem install grackle
	#
	# ./check_fof.rb <your_twitter_screen_name>
	#

	$KCODE = 'u'

	require 'rubygems'
	<!DOCTYPE html>
	<html>
	<head>
	<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
	<script type="text/javascript" src="http://code.jquery.com/jquery-1.6.2.min.js"></script>
	<title>習慣^H^H週刊韓国経済をヲンで買う</title>
	<style type="text/css">
	input { text-align: right; }
	</style>
	<script type="text/javascript">
	#!/usr/bin/ruby

	ORG_ARGV = ARGV.dup

	require 'optparse'
	require 'socket'

	BasicSocket.do_not_reverse_lookup = true

	require 'webrick'
	(auto-compression-mode t)
	(if (file-exists-p "/usr/bin/lgrep")
	(setq grep-command "lgrep -n ")
	)

	(require 'font-lock)
	(global-font-lock-mode t)
	(global-set-key [delete] 'delete-char)
	(global-set-key "\C-h" 'backward-delete-char)
	#!/usr/bin/ruby1.9.1
	# -- coding: euc-jp --

	require 'net/telnet'

	RT_HOST = 'YOUR_RTX1000_ADDR'
	RT_PW = 'YOUR_RTX1000_PASSWORD'

	telnet = Net::Telnet.new("Host" => RT_HOST,
	"Waittime" => 1,