Skip to content

Instantly share code, notes, and snippets.

View aya-eiya's full-sized avatar

ayabe hidetoshi aya-eiya

View GitHub Profile
@aya-eiya
aya-eiya / ListingMap2xml.scala
Created March 19, 2011 16:56
Converting Map objects in List to XML
package personal.ayaeiya.scala.sample
import scala.xml._
case class ListEndDummy{}
case class MapEndDummy{}
object Main{
def main(args:Array[String]) = {
def toXml(list:List[Any]):Elem = {
@aya-eiya
aya-eiya / KeyValue.html
Created March 21, 2011 12:19
JavaScript版KeyValueのアレ
<html>
<head>
<script>
WithAttributre = true;
//==================================
// Here is for non attributes xml =
//==================================
show = function (v){alert(v);return v;}
@aya-eiya
aya-eiya / LabyrinthMaker.scala
Created March 29, 2011 16:52
LabyrinthMaker
package personal.ayaeiya.minos
import scala.util.Random
import scala.xml._
import scala.collection.mutable.ListMap
/*****************
* Setting Object *
******************/
object Setting{
@aya-eiya
aya-eiya / gist:1084542
Created July 15, 2011 11:46
GPARS Practice
/***************************
* GPARS Practice @aya_eiya *
****************************/
import static groovyx.gpars.actor.Actors.actor
def d1 = new Date()
def decryptor = actor {
loop {
react { message->
@aya-eiya
aya-eiya / maze.hs
Created November 21, 2011 15:19
4doors Cells Maze Generator
import Data.List
import System.Random
randomInitNo :: Int
randomInitNo = 1
data Cell = Cell {
position::(Int,Int),
east,west,south,north::Bool
} deriving Eq
instance Show (Cell) where
@aya-eiya
aya-eiya / YahooToeicTestSummarize.user.js
Created January 24, 2012 03:52
YahooのTOEICデイリーミニテスト(リーディング)から20問のランダム出題でテスト用紙を作成します。
// ==UserScript==
// @name YahooToeicTestSummarize
// @namespace jp.aya.eiya
// @description YahooのTOEICデイリーミニテスト(リーディング)から20問のランダム出題でテスト用紙を作成します。最初の問題を表示したときに、Summarizeするか聞かれます。OKすると、問題用紙を作成します。
// @include http://stepup.yahoo.co.jp/english/toeictest/question.html?c=5&c1=1
// ==/UserScript==
(function (){
Array.prototype.shuffle = function(){
var l = this.length;
var tmp = this.concat();
@aya-eiya
aya-eiya / 1_howToPutCharToCanvas.html
Created February 2, 2012 03:11
HTML5のCanvasの練習です。テキストエリアの文字をCanvasに表示します。
<!doctype html />
<html>
<head>
<title>1_howToPutCharToCanvas.html</title>
<style>
canvas#vwrMain{
border:1px solid black;
}
div#main{
margin:5px;
@aya-eiya
aya-eiya / getTerminals.hs
Created February 20, 2012 01:54
指定したディレクトリを再帰的に探索して末端のパスのリストを返します。#haskell
module Main where
import Directory
import Data.List
import System
main = do [ root ] <- getArgs
cnt <- getTerminals [] root
getTerminals root path
= do b <- doesDirectoryExist pth
@aya-eiya
aya-eiya / getAllUpperLowerPattern.hs
Created February 21, 2012 08:38
指定した文字列の大文字小文字の組み合わせ全パターンのリストを取得する #haskell
module Main where
import Data.List
import Data.Char
main
= print "ABCD"
getAllUpperLowerPattern str = f3
where
f1 = sequence $ replicate (length str) "01"
f2 = map (\(fs,str)->zip fs str) $ zip f1 (replicate (length f1) str)
@aya-eiya
aya-eiya / class diff with jad.sct
Created March 1, 2012 06:12
Winmerge用のプラグインです。ClassファイルをJadして比較します。
<scriptlet>
<!-- Diff Class files with jad plugin for WinMerge . (C) aya_eiya 2012 -->
<implements type="Automation" id="dispatcher">
<property name="PluginEvent">
<get/>
</property>
<property name="PluginDescription">
<get/>
</property>
<property name="PluginFileFilters">