先日のプログラムをいじくり
のようにしました。
gsel 0 sdim TOI,1000 notesel TOI noteload "800.txt" KAZU=noteinfo(0) KAI=0 objmode 2 onkey gosub *check m=0 *KURIKAESHI buffer 3,ginfo(20),ginfo(21) if m=0{ picload "1-4.jpg",0 ←背景画です gsel 0 gzoom ginfo(20),ginfo(21),3,0,0,341,160,1 } if m=1{ picload "2-2.jpg" ←背景画です gsel 0 gzoom ginfo(20),ginfo(21),3,0,0,413,160,1 } if m=2{ picload "3-2.jpg" ←背景画です gsel 0 gzoom ginfo(20),ginfo(21),3,0,0,341,160,1 } if m=3{ picload "4-2.jpg" ←背景画です gsel 0 gzoom ginfo(20),ginfo(21),3,0,0,338,160,1 } font "MS ゴシック",50 pos 50,50 notesel TOI noteget MONDAI,KAI*2 color 255,255,255 mes MONDAI redraw 0 pos 100,100 font "MS ゴシック",50,16 s="" input s,100,55 objsel stat redraw 1 stop *check if wparam=13{ if s != ""{ onkey 0 cls font "MS ゴシック",50 pos 100,50 noteget SEIKAI,KAI*2+1 if s=SEIKAI:mes"正解\n(次の画面)" : else : mes"失敗" KAI++ m++ wait 200 if (KAZU/2)=KAI :end cls 0 onkey 1 goto *KURIKAESHI } } stop
クイズ形式のプログラムのつもりですが、問題の文字が1・2・3・4文字でも
表示を真ん中(Xだけ)にしたいのですが、どのようにすればいいのですか?
あと
の背景の上に「キャラクター」をのせたいのですが、(輪郭より外側は白色)
if m=0{ picload "1-4.jpg",0 ←背景画です gsel 0 gzoom ginfo(20),ginfo(21),3,0,0,341,160,1 }
picload " ",1
でやると、いらないところまではいってしまいます。
gmodeなどでがんばってみたものの、うまくできませんでした・・
どのようにすればいいですか?
////////////////txtの内容/////////////////////
お茶
tea
月
moon
毒
poison
米
rice
このような感じです・・・