アニメ、ドラマ、音楽、読書、プログラミングのメモ等 (随時加筆) Follow @fulcanelli448
(本ページはプロモーションが含まれています)
好きなアニメ: 響け!ユーフォニアム、ちはやふる
他
GREEN HARMONY 手記
訪問者数: 合計： 今日： 昨日：
2020年04月14日 smalltalkでプログラミング20200414 [長年日記]
☆ smalltalkプログラミング
Squeak Workspaceにて実行
| fm pen colorList |
colorList := #('#9370DB' 'red' 'orange'
'yellow' 'green' 'blue' '#000080'
'#800080' '#808000').
fm := Form extent: 200@200 depth: Display depth.
fm fillColor: Color white.
pen := Pen newOnForm: fm.
pen defaultNib: 4.
pen color: (Color fromString: (colorList at: 5)).
pen place: 100@50.
pen turn: -160; go: 100.
4 timesRepeat: [pen turn: -144; go: 100].
fm asMorph openInWorld
[ツッコミを入れる]
