« HSPTV!メルマガ 第39号 | メイン | 【講座】「教えて!おにたま!!」 »

2007年05月15日

【講座】HSPよく使うフレーズ 第30回 ペイントソフト(2)

今回は、HSPセンターの掲示板にあった質問をきっかけに
ズームを使ってみたくなった。

ちなみにHSPセンターはこちら。
http://hspcenter.com/

それで「第12回 ペイントソフトっぽいもの」で作った
簡易ペイントソフトを改造して、リアルタイムで
拡大してくれるものを作ったよ。

実行すると拡大画面が隠れちゃうかもしれないけど、
ウィンドウをずらして確認してみてね。

なんだか拡大してドットがすごいハッキリしてるのがいいなぁ。

1つ基本的なソフトをつくったら、新しい機能を付けたり
できるのもHSPの楽しいところ。

マウスで操作、右のボタンで置くキャラクタを変更できて、
左ボタンでそのキャラを置けます。

欠点としては画面の端では動きがおかしくなる点。
いろいろ方法はあるんだけど、今回はこの辺で。

//zoom editor zoom.hsp
screen 1,300,300
screen 0,640,480
dim paint_char,10,10
paint_char(0)="●"
paint_char(1)="・"
paint_char(2)="★"
paint_char(3)="■"
*top
title ">"+paint_char(n)
x=mousex:y=mousey
stick key,256
if (key & 256):pos x-10,y-10:color 0,0,0:mes paint_char(n)
if (key & 512):n=(n+1) & 3
gsel 1
xofset=x-30:xofset=limit(xofset,0,640)
yofset=y-30:yofset=limit(yofset,0,480)
gzoom 300,300,0,xofset,yofset,60,60
color 255,0,0:boxf 136,136,148,148
gsel 0
await 1
goto *top

[zoom.hsp / hsp3用]

(うすあじ)

投稿者 usuaji : 2007年05月15日 01:03

口臭チェッカー市場