Skip to content

Instantly share code, notes, and snippets.

@sugyan
sugyan / fizzbuzz.pl
Last active September 21, 2023 08:49
"^ "
=~ (
("(").("~"^"."^"^"^(""=="")."").("^"
^"="^(""=="").""^")").("^"^".").("="
^"~"^(""=="")."").("("^(""=="^").""^
"."^"^").("("^(""=="").""^"^"^")").(
(" ^( "
== "
") .
"" ^
@futoase
futoase / gist:1445757
Created December 8, 2011 02:00
skyrim 英語版実行ファイルで日本語字幕・日本語音声で遊ぶ方法
http://www.dotup.org/uploda/www.dotup.org2357777.txt から入手。
入手のきっかけは2ch PCゲーム板のSKYRIMスレより
(http://yuzuru.2ch.net/test/read.cgi/game/1323307978/4)
//-----------------------------------------------------------------------------
Skyrim英語ver1.3のexeで日本語字幕・日本語音声にする方法
(日本語版exeと一部ファイルががクソで致命的バグが発声するため)
2011/12/8 公式(ゼニアジ)日本語ファイル使用 版
@matsumotius
matsumotius / 8queen.rb
Created January 8, 2012 05:07
8queen
def eight_queen(n = 8, m = 8)
run(n, m, [])
end
def run(kinds, len, a)
return unless can_set_queen?(a)
if len == 0 then
puts a.join(',')
else
kinds.times { |i|
@VoQn
VoQn / parser_example.hs
Created January 13, 2012 04:41
Applicative Style Parsec
import Control.Applicative hiding ( (<|>) )
import Text.Parsec
-- parse like ruby's String.strip
escSpace parser = spaces *> parser <* spaces
-- parse like "between" in Text.Parsec
close opener parser closer = char opener *> escSpace parser <* char closer
-- Example
@notogawa
notogawa / InverseFizzBuzz.hs
Created May 16, 2012 13:53
Inverse Fizzbuzz
module Main where
import Data.List(sortBy)
import Data.Ord(comparing)
main :: IO ()
main = interact $ unlines . take 1 . map (show . uncurry enumFromTo) . zzubzzif . lines
zzubzzif :: [String] -> [(Int,Int)]
zzubzzif [] = []