kazua’s gists

kazua / poker_handofcard.scala

Last active December 16, 2015 09:29

ポーカーの手役判定

	//write kazua

	object poker_handofcard {
	def pack[A](ls : List[A]) : List[List[A]] = {
	if (ls.isEmpty) List(Nil)
	else {
	val (hdele, elsele) = ls.span(_ == ls.head)
	if (elsele == Nil) List(hdele)
	else hdele :: pack(elsele)
	}

kazua / zipCreate.java

Last active December 16, 2015 14:59

圧縮用プログラム（階層対応）

	//write kazua

	import java.io.BufferedInputStream;
	import java.io.File;
	import java.io.FileInputStream;
	import java.io.FileOutputStream;
	import java.text.SimpleDateFormat;
	import java.util.Date;
	import org.apache.tools.zip.ZipEntry;
	import org.apache.tools.zip.ZipOutputStream;

kazua / unZipCreate.java

Last active December 16, 2015 18:20

解凍用プログラム（階層対応）

	//write kazua

	import java.io.File;
	import java.io.FileOutputStream;
	import java.io.InputStream;
	import java.util.Enumeration;
	import org.apache.tools.zip.ZipEntry;
	import org.apache.tools.zip.ZipFile;

	public class unZipCreate {

kazua / zipCreatePs.java

Created April 29, 2013 13:50

圧縮用プログラム（階層・パスワード付加対応）hishidamaさんユーティリティ使用

	//write kazua

	import java.io.BufferedInputStream;
	import java.io.File;
	import java.io.FileInputStream;
	import java.io.FileOutputStream;
	import java.text.SimpleDateFormat;
	import java.util.Date;
	import jp.hishidama.zip.ZipEntry;
	import jp.hishidama.zip.ZipOutputStream;

kazua / unZipCreatePs.java

Created April 29, 2013 13:52

解凍用プログラム（階層・パスワード付加対応）hishidamaさんユーティリティ使用

	//write kazua

	import java.io.File;
	import java.io.FileOutputStream;
	import java.io.InputStream;
	import java.util.Enumeration;
	import jp.hishidama.zip.ZipEntry;
	import jp.hishidama.zip.ZipFile;

	public class unZipCreatePs {

kazua / fileSearch.java

Last active December 17, 2015 03:59

ファイル検索

	//write kazua

	import java.io.File;
	import java.util.*;

	public class fileSearch {
	private List<String> getFiles(String path) {
	List<String> pl = new ArrayList<String>();
	File file = new File(path);
	if (!file.isDirectory()) file = file.getParentFile();

kazua / cardShuffle.scala

Created May 16, 2013 12:14

カードシャッフル

	//write kazua

	import scala.util.Random

	object cardShuffle {
	val rd = new Random
	val cdl = List(("クラブ", 1), ("クラブ", 2), ("クラブ", 3), ("クラブ", 4), ("クラブ", 5), ("クラブ", 6), ("クラブ", 7), ("クラブ", 8), ("クラブ", 9), ("クラブ", 10), ("クラブ", 11), ("クラブ", 12), ("クラブ", 13),
	("スペード", 1), ("スペード", 2), ("スペード", 3), ("スペード", 4), ("スペード", 5), ("スペード", 6), ("スペード", 7), ("スペード", 8), ("スペード", 9), ("スペード", 10), ("スペード", 11), ("スペード", 12), ("スペード", 13),
	("ハート", 1), ("ハート", 2), ("ハート", 3), ("ハート", 4), ("ハート", 5), ("ハート", 6), ("ハート", 7), ("ハート", 8), ("ハート", 9), ("ハート", 10), ("ハート", 11), ("ハート", 12), ("ハート", 13),
	("ダイヤ", 1), ("ダイヤ", 2), ("ダイヤ", 3), ("ダイヤ", 4), ("ダイヤ", 5), ("ダイヤ", 6), ("ダイヤ", 7), ("ダイヤ", 8), ("ダイヤ", 9), ("ダイヤ", 10), ("ダイヤ", 11), ("ダイヤ", 12), ("ダイヤ", 13))

kazua / convDate.java

Created May 17, 2013 16:20

和暦⇔西暦相互変換

	//write kazua

	import java.util.*;
	import java.text.*;

	public class convDate {
	private String convJtGDate(String src) throws ParseException {
	Integer gc = 0;
	String gg = src.substring(0, 2);
	Integer yy = Integer.parseInt(src.substring(2, src.indexOf("年")));

kazua / createPassword.scala

Last active December 17, 2015 12:59

パスワード生成

	//write kazua

	import scala.util.Random

	object createPassword {
	val rd = new Random()

	val ba = List("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z")
	val sa = List("a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z")
	val nm = List("1", "2", "3", "4", "5", "6", "7", "8", "9", "0")

kazua / porkerbattle.scala

Last active December 17, 2015 17:28

ポーカー勝負（手札交換なしの１回勝負版）

	//write kazua

	import scala.util.Random

	object porkerbattle {
	val rd = new Random
	val cdl = List(("クラブ", 1), ("クラブ", 2), ("クラブ", 3), ("クラブ", 4), ("クラブ", 5), ("クラブ", 6), ("クラブ", 7), ("クラブ", 8), ("クラブ", 9), ("クラブ", 10), ("クラブ", 11), ("クラブ", 12), ("クラブ", 13),
	("スペード", 1), ("スペード", 2), ("スペード", 3), ("スペード", 4), ("スペード", 5), ("スペード", 6), ("スペード", 7), ("スペード", 8), ("スペード", 9), ("スペード", 10), ("スペード", 11), ("スペード", 12), ("スペード", 13),
	("ハート", 1), ("ハート", 2), ("ハート", 3), ("ハート", 4), ("ハート", 5), ("ハート", 6), ("ハート", 7), ("ハート", 8), ("ハート", 9), ("ハート", 10), ("ハート", 11), ("ハート", 12), ("ハート", 13),
	("ダイヤ", 1), ("ダイヤ", 2), ("ダイヤ", 3), ("ダイヤ", 4), ("ダイヤ", 5), ("ダイヤ", 6), ("ダイヤ", 7), ("ダイヤ", 8), ("ダイヤ", 9), ("ダイヤ", 10), ("ダイヤ", 11), ("ダイヤ", 12), ("ダイヤ", 13))

kazua kazua