アニメ、ドラマ、音楽、読書、プログラミングのメモ等
(随時加筆)
(本ページはプロモーションが含まれています)
好きなアニメ: 響け!ユーフォニアム、ちはやふる
他
音楽:吉田拓郎、浅川マキ 他
読書
アリストテレス ニコマコス倫理学 上 (岩波文庫),
平家物語(古川日出男 訳),
老子(岩波文庫),
荘子 全現代語訳 上下巻合本版(講談社学術文庫),
天界と地獄(講談社文芸文庫)(鈴木大拙 訳)
訪問者数
合計： 今日： 昨日：
2020年04月06日 smalltalkでプログラミング20200406 [長年日記]
☆ smalltalkプログラミング
Squeak Workspaceにて実行
| fm pen rx ry w x y angle | rx := 100. ry := 100. w := 50. angle := -90. fm := Form extent: 200@200 depth: Display depth. fm fillColor: Color white. pen := Pen newOnForm: fm. pen defaultNib: 2. pen color: Color blue. 2 to: 7 do: [:i | pen goto: rx@ry. x := w * ((angle * (Float pi/180)) cos) + rx. y := w * ((angle * (Float pi/180)) sin) + ry. pen goto: x@y. angle := angle - 60. x := w * ((angle * (Float pi/180)) cos) + rx. y := w * ((angle * (Float pi/180)) sin) + ry. pen goto: x@y. ]. fm asMorph openInWorld
[ツッコミを入れる]
