HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2015
1031
Mitukibgscrのwindowをwidthで動かしたい3解決


Mituki

リンク

2015/10/31(Sat) 15:11:24|NO.72654

タイトルどおり・・・
<ソースコード_ON>

bgscr 0,600,500,0,, repeat redraw 0 color 128,128,128:boxf 0,0,600,20 color 255,255,255 getkey pleasewid1,77 getkey pleasewid1,38 getkey pleasewid2,77 getkey pleasewid2,40 getkey pleasewid3,77 getkey pleasewid3,39 getkey pleasewid4,77 getkey pleasewid4,37 font "",23 pos -2,-2 mes "Test" if pleasewid1=2 :width 600,500,xores,yores-2 if pleasewid2=2 :width 600,500,xores,yores+2 if pleasewid3=2 :width 600,500,xores-2,yores if pleasewid4=2 :width 600,500,xores+2,yores xores=ginfo(4) yores=ginfo(5) wait 1 redraw 1 loop
<ソースコード_OFF>



この記事に返信する


チャーくん

リンク

2015/10/31(Sat) 15:41:48|NO.72657

カーソルキーでウィンドウを移動させる…であってますよね?

getkeyはキーが押されているときに1を変数に代入するので、if 〜 =1(または=2を省略)すると
ウィンドウが動きます。

あと、もしわざとなら申し訳ないですが、pleasewid3とpleasewid4のキーコードが
逆になってて、カーソルキーの矢印と左右の移動方向が逆の動きになってます。



Mituki

リンク

2015/10/31(Sat) 16:52:55|NO.72660

ありがとうございます!



Mituki

リンク

2015/10/31(Sat) 16:53:22|NO.72661

解決チェック!!



ONION software Copyright 1997-2021(c) All rights reserved.