HSPでお絵かき

HSPでお絵かきができるようなプログラムを書いてみました。
とっても簡単でした。できることは単に自由線をかけるだけなんですが
これを拡張していけばお絵かきソフトもできるかも。
無題
color:boxf
preX = -1
preY = -1
repeat
getkey LeftButton, 1
if (LeftButton) {
color $FF,$FF,$FF
if (preX == -1 and preY == -1) {
pset mousex,mousey
} else {
line preX, preY, mousex,mousey
}
preX = mousex
preY = mousey
} else {
preX = -1
preY = -1
}
await 1
loop

Post a comment or leave a trackback: Trackback URL.

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です