リサジュー図形の描画
GoGo言語(Golang)のバイブル「プログラミング言語Go」の「1.4 GIFアニメーション」の練習問題1.6 にある、リサジュー図形 をカラフルに生成するプログラムを作成しました。結構シンプルに作成することができます。
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 |
// Copyright © 2016 Alan A. A. Donovan & Brian W. Kernighan. // License: https://creativecommons.org/licenses/by-nc-sa/4.0/ // このプログラムは Alan A. A. Donovan & Brian W. Kernighan による gopl.io/ch1/lissajous を // 改変したものです。 package main import ( "image" "image/color" "image/gif" "io" "math" "math/rand" "os" ) import ( "log" "net/http" "time" ) var palette = []color.Color{color.White, color.Black, color.RGBA{0xff, 0x0, 0x0, 0xff}, color.RGBA{0x0, 0xff, 0x0, 0xff}, color.RGBA{0x0, 0x0, 0xff, 0xff}, color.RGBA{0xff, 0xff, 0x0, 0xff}} const ( whiteIndex = 0 // first color in palette blackIndex = 1 // next color in palette redIndex = 2 // 3rd color in palette greenIndex = 3 // 4th color in palette blueIndex = 4 // 5th color in palette yellowIndex = 5 // 6th color in palette ) func main() { rand.Seed(time.Now().UTC().UnixNano()) if len(os.Args) > 1 && os.Args[1] == "web" { handler := func(w http.ResponseWriter, r *http.Request) { lissajous(w) } http.HandleFunc("/", handler) log.Fatal(http.ListenAndServe("localhost:8000", nil)) return } lissajous(os.Stdout) } func lissajous(out io.Writer) { const ( cycles = 5 // number of complete x oscillator revolutions res = 0.001 // angular resolution size = 100 // image canvas covers [-size..+size] nframes = 64 // number of animation frames delay = 8 // delay between frames in 10ms units ) freq := rand.Float64() * 3.0 // relative frequency of y oscillator anim := gif.GIF{LoopCount: nframes} phase := 0.0 // phase difference var nowColorIndex uint8 for i := 0; i < nframes; i++ { rect := image.Rect(0, 0, 2*size+1, 2*size+1) img := image.NewPaletted(rect, palette) preX, preY := 0.0, 0.0 for t := 0.0; t < cycles*2*math.Pi; t += res { x := math.Sin(t) y := math.Sin(t*freq + phase) if preX <= x { if preY <= y { nowColorIndex = redIndex } else { nowColorIndex = greenIndex } } else { if preY <= y { nowColorIndex = blueIndex } else { nowColorIndex = yellowIndex } } preX, preY = x, y img.SetColorIndex(size+int(x*size+0.5), size+int(y*size+0.5), nowColorIndex) } phase += 0.1 anim.Delay = append(anim.Delay, delay) anim.Image = append(anim.Image, img) } gif.EncodeAll(out, &anim) // NOTE: ignoring encoding errors } |
このプログラムを「main.go」という名前で保存して、以下のコマンドを実行することで、リサジュー図形の画像を生成することができます。
1 |
$ go run main.go > out.gif |
参考文献
- 「プログラミング言語Go」 Alan A.A. Donovan (著), Brian W. Kernighan (著), 柴田 芳樹 (翻訳)