PIL(Python Imaging Library)を使う

(1)PILのインストール (2)コーディング以下は、文字を書いてbmpに保存するだけ。 import Image import ImageDraw import ImageFont im = Image.new("RGB", (320, 200)) draw = ImageDraw.Draw(im) font = ImageFont.truetype("Vera.ttf", 10) draw.setfont(f…

Python一行勉強リスト

検索処理 result = re.match(pat, str)パース re.split(",", "a,b,c,d,r,e,d")置換 re.sub(",", " ", "a,b,c,d,e")型変換 int("123") + 1 str(1234)大文字小文字 "hello world".upper() 先頭と末尾の文字を取り除く ", 123 ".strip(", ") For文 for i in ran…

JAVAで高精度タイマを使う

public static void main(String[] args) { long before = System.nanoTime(); long now; for (int i = 0; i < 10; i++) { try { Thread.sleep(100); } catch (Exception e) { e.printStackTrace(); } now = System.nanoTime(); System.out.println("" + (no…

記事をココログから少しコピー

メインのココログはもちろん使い続けるつもりだけれども、 はてなダイアリーをちょっと使ってみようかなと思ってます。これからここにこういうのをかこう、って感じの記事を いくつかココログから持ってきました。こちらにコードとか、面倒くさいこととか、…

HGIMG3の仕様について

３Ｄゲームが簡単に作れる（らしい）HSP標準プラグインのHGIMG3について。 SOUP製作中に分かったこととかをちょっとメモ。 SOUP自体のソースはsrc\sourceフォルダ内にあります。 ごちゃごちゃで使えないと思いますけども修正BSD。＜HGIMG3の用途＞ ・とにか…

xyzzyの初期設定

Emacs的な思想をもつエディタ。 結局私は慣れることができず、今メイン秀丸です。 xyzzyは電卓専用機になっています。慣れに勝てなくなってきた。以下導入の流れを覚え書き。導入について、詳しくはQuicktourを参照のこと。 http://xyzzy.s53.xrea.com/wiki/…

Rubyで簡単なフォームを作る最小限のサンプル

勉強中ActiveScriptRubyとかを入れて以下のコードを実行 require 'vr/vruby' require "vr/vrcontrol" frm=VRLocalScreen.newform def frm.construct move 100, 100, 300, 300 addControl VRButton, "btn1", "ボタンだよ", 10, 220, 200, 40 addControl VRTex…

Mercurialで簡単バージョン管理

まーきゅりあると読む。・お手軽バージョン管理 SVNよりか楽だと思った。 ・hg serveでサーバになってくれる。http://localhost:8000/で差分の参照ができる。 ・リポジトリは管理するフォルダのルートに作成される。考える必要なし ・マージはまだしたことな…

WindowsME+Opera+FlashPlayer9で落ちる

今日、古いPCにOpera入れて遊んでいたら、 タイトルの不具合に遭遇。http://okwave.jp/qa3421405.html 同様のトラブルにあっている例も散見される。 Meを使い続ける以上、しょうがないのだが。 Firefoxでも落ちるらしいのだが、未検証。対策としては、FlashP…

エンディング曲

t80o5l8 /:2 e4.>bar <cd :/ e4.de4.fg4.ggffe; t80o3l4 cc>ff<cc>ff<cc>aa ff gd</cc></cc></cd>

タイトル曲

l16 o3 t150/:2 a8ar<c8>a<drd8de-8dr> g8grb8g<drd8dc8>br f8fra8f<crc8ce8cr> ggg8b8g<ere8ea-8e8> :/; t150 o6 l16 a8e8r2 r8ded8>g8 r2< r8 cde8>a8<a8r2 gag4.f8e8.a-8.b8 l16 a8e8r2 r8ded8>g8 r2< r8 cde8>a8<a8r2 b<cd4.efedc>b<dc>ba-</dc></a8r2></a8r2></ere8ea-8e8></crc8ce8cr></drd8dc8></drd8de-8dr></c8>

八本目　さいころ

p rand(6)+1

七本目　appleにはマッチするけどgreen appleにはマッチしない置換（失敗）

str =####ここから %Q{this green apple is an apple but is not an green apple }###ここまで matchword = "apple" notmatchword = "green apple" str.each do |line| word = line while /apple/ =~ word do if word.index(/#{notmatchword}/) + notmatchwo…

六本目 CSV分解

str =####ここから %Q{one, two, three, four }###ここまで str.each do |line| ary = line.split(",") ary.each do |word| print word.strip print "\n" end end

五本目　四本目の逆

str =####ここから %Q{HELLO_WORLD THIS_IS_TEST_PATTERN TEST_METHOD }###ここまで str.each do |line| word = line while /[A-Z]*_/ =~ word do print $&.capitalize.chop word = $' end print word.capitalize.chomp print "\n" end

四本目　HelloHellWorld→HELLO_HELL_WORLD

str =####ここから %Q{HelloWorld ThisIsTestPattern TestMethod }###ここまで str.each do |line| word = line /[A-Z][a-z]*/ =~ word while /[A-Z][a-z]*/ =~ word do print $&.upcase! if $'.chomp.length > 0 then print '_' end word = $' end print "\…

三本目　ダブルクオートで囲まれた数字に+1

str =####ここから %Q{HashMap map = new HashMap(); map.put("0", "zero"); map.put("1", "one"); map.put("2", "two"); map.put("3", "three"); map.put("10", "ten"); }###ここまで str.each do |line| if /"[0-9]*"/ =~ line then print $` num = $&[1..…

二本目　メソッド生成

str = ####ここから "getParentWindow getParentFrame init " ###ここまで str.each do |line| print "public void "+line.chomp+"(){ //TODO } " end

一本目　ひながた（貼り付けたテキストをそのまま表示）

str = #↓↓↓↓ここから " getParentWindow getParentFrame init testPattern1 testPattern2 " #↑↑↑↑ここまで str.each do |line| print line end

十本目　あいさつ

print "Hello, warld"

九本目　さいころ一万回ふる

a = Array.new(10000) normdist = 0.0 max = 0.0 include Math for i in 1..10000 a[i] = rand(6)+1 max += a[i] end ave = max / 10000 print "平均："+ ave.to_s for i in 1..10000 normdist += (a[i] - ave) * (a[i] - ave) end normdist = sqrt(normdist…

Ruby１０本ノック

仕事に反復作業が多くてとても悲しい ので、モチベ維持＆効率化のためにRubyを少しずつ勉強中 でもすぐ忘れる１００本ノックにしたいとこだが、どうせ続かないので１０本くらい目標。

TSSCPとの違い

はてなMMLではループを抜けた時、オクターブが戻らないので、 TSSCPで作るときは[]で繰り返した方がいいかも

long goodbye作業用長いバージョン

$Melo = @E1,30,80,20,0/:2o6 a-4>b<g-e-4r>bb-4ba-b-b<d-/ee-4re-d-c>a-e-:/>b-a-4a-<e-d-c>a-e-; $Arp = o3 eb<eg-a-rrr> eb<e>eg-<d-g->g- a-<e-b-<ce->a->a-</e-b-<ce-></d-g-></e></eg-a-rrr></e-d-c></d-/ee-4re-d-c></g-e-4r>

聖剣伝説　long goodbye

$Melo = @E1,30,80,20,0/:2o6 a-4>b<g-e-4r>bb-4ba-b-b<d-/ee-4re-d-c>a-e-:/>b-a-4a-<e-d-c>a-e-; $Arp = o3 eb<eg-a-rrr> eb<e>eg-<d-g->g- a-<e-b-<ce->a->a-</e-b-<ce-></d-g-></e></eg-a-rrr></e-d-c></d-/ee-4re-d-c></g-e-4r>

こうですか

リズムのみ $BD=@0@e1,0,35,0,0 v15o2; $BA=@0@e1,0,4,0,0 v15o3; $SD=@4@e1,0,30,0,0@n110v10; $SA=@2@e1,0,15,0,0 v15o3; $HH=@4@e1,0,13,0,0@n20v10; t130 /:4 $SDrcrcrcrc8r12c24 :/; t130 /:8 $SArcrc :/; t130 /:8 $BDo2gr8g8gg :/; t130 /:8 $BDo2gr8…