HSPTV!掲示板

はじめまして。

HSPは全くの初めてなのですが、ネット検索では
HSP3のサンプルスクリプトが無く、判らなかったので
失礼を承知で質問させて頂きます。

ボタンなどのオブジェクトをウィンドウ内に
複数を表示したいとき、たとえばボタンのみ
縦に５個、横に２個、計１０個表示したい場合など
どういうスクリプトを書けば良いのか判りません。
縦に並べることは出来るのですが・・・・。

出来ればサンプルスクリプトを
返信で書き込んで頂けると幸せです。

もしダメだとしても、関連書籍などで
応用できるスクリプトが紹介されていましたら

書籍名と該当のページをお知らせ下さい。
お手数をかけますが、どうかお願い致します。

こういうことですか？

	objsize 50,20
	repeat 2
	c=cnt
	repeat 5
	pos c*50,cnt*20
	input a
	loop
	loop

返信どうもありがとうございます。

あの、このスクリプトの場合、文字を書き込んだ
オブジェクトを表示させるにはどう書けばよいですか？

言葉足らずで申し訳在りません。
実際の表記はこんな感じで良いでしょうか？

なんども申し訳在りませんが
ぜひ教えてください。

cls 1
mes "効果音再生スクリプト"
mes "注:音は重ねられません"
button "効果音　1",*flag1
button "効果音　2",*flag2

-------省略-------

button "終了",*flag11

objsize 50,20
repeat 2
c=cnt
repeat 5
pos c*50,cnt*20
input a
loop
loop

*flag1
mmload "GongB@08.wav",0,2
mmplay 0
stop

*flag2
mmload "Jtomo01@08.wav",1,2
mmplay 1
stop

-------省略-------

*flag11
end

これで文字列が表示できます。

	objsize 50,20
	repeat 5
	c=cnt
	repeat 2
	a(cnt+c*2)="HSP ("+(cnt+c*2)+")"
	pos c*50,cnt*20
	input a(cnt+c*2)
	loop
	loop

ばるーるさん、私が書いたもの写してますね。
>・まず、ボタンとボックスが重なるのがおかしい。
>・変数が変更されてない。（まあ、別に変更されてなくてもいいが、aはまずない）
自分で応用したほうが良いですよ。
（例えば、座標や分かりやすい変数に変更したほうがいいかと思いますが。）

あと、HSPのソースは<PRE>～</PRE>（小文字）で囲みましょう。（分かりにくいため）

お返事が遅れてすみません。

ご丁寧に書いて頂きありがとうございます。
このスクリプトのobjsizeで指定しているのは
ボタンの大きさではなかったんですね。

一応書いておきますが、文字の表示された
ボタンをクリックすると指定した効果音の鳴る
スクリプトを作りたいのですけど。

ボックスはいくつか種類があるようですが
自分が考えているようにボタンの代用としても
使えるのでしょうか。申し訳ないです、
ボックスについてよく解らないもので・・・。

スクリプトの応用の件ですが
まどろこしいかも知れませんが、
今書き込みをしているパソコンでは
なぜかファイルのDLが出来ず、

HSPは昼間勤め先へ行かないとスクリプトの
動作確認ができないため、確かめるのに
時間がかかるんです・・・。

たぶん自分で確かめろとお叱りを
受けるとは思いますが、今の段階では
変数が解らないのもあって
すぐに応用するのは難しいですね・・・。
関係のない話ですみません。

あ、そういうことでしたか。
だから、そのままコピーしたんですね。
objsizeとは.。
オブジェクトの大きさを指定します。

>縦に並べることは出来るのですが・・・・。
pos命令(カレントポジション設定)の後でオブジェクトを作成すれば自由に配置できます。
オブジェクトを作成すると、カレントポジションが作成後に改行した様に移動します。
（これが連続で作成した時に縦並びになる理由）

>ボタンの大きさではなかったんですね。
objsize命令の後に配置されるオブジェクトのサイズを変える命令です。
当然ボタンを配置する前に使えばボタンのサイズも変わります。

>自分が考えているようにボタンの代用としても
これの意味が良く分からないんですが・・・
ボタンでは出来ない事をしようとしてるのか
ボタンでは出来ないと思って他の方法を探してるのか・・・

>なぜかファイルのDLが出来ず、
IEのインターネットオプション＞セキュリティでファイルのダウンロードを無効にしてるとか・・・

>HSPは昼間勤め先へ行かないとスクリプトの
実際に動かしながらやらないと理解するのは難しいと思う・・・

今の段階では分からないかもしれないけど、一応サンプル

cls 1
mes "効果音再生スクリプト"
mes "注:音は重ねられません"
objsize 100,20,24	;幅100,高さ20,配置後に縦に移動する最低サイズ24
repeat 2
	pos 32+cnt*108,64	;一番上に置きたいボタンだけ座標を指定（他は自動で縦に並ぶのを利用）
	repeat 5
		button "効果音　"+(semax+1),*seplay	
		button_id(semax)=stat	;buttonのID(ボタンを作ったらstatに入ってる)を効果音のナンバー順に保存
		semax++	;"効果音"buttonの数
	loop
loop
pos 82,200
button "終了",*flag11
sdim sefname,64,semax	;"効果音"buttonの数だけファイルネーム用の文字列型の配列変数を確保
sefname="GongB@08.wav","Jtomo01@08.wav"	;sefname(0)に"GongB@08.wav"が sefname(1)に"Jtomo01@08.wav"が代入される
stop

*seplay
	id=stat	;buttonが押されてラベルにジャンプしてくるとstatにボタンのIDが入ってる
	repeat semax	;"効果音"buttonの個数分だけループ
		if button_id(cnt)=id {;保存しといたIDと同じのが見つかった
			if sefname(cnt)="" {title "効果音が設定されてません" :break} else {title sefname(cnt)+" を再生します"}
			mmload sefname(cnt),0,2
			mmplay 0
			break
		}
	loop
stop

*flag11
end

このまま実行してみて、やりたい事と違う部分があって
解決策が分からなかったら又質問してみてください

お二方ともどうもありがとうございます。

朝出勤しましたら、仕事場で早速試してみます。

それでは、失礼致します。

>なぜかファイルのDLが出来ず、

　これの解決が一番大事だと思います。
ブラウザやウイルス対策ソフトの設定の確認。あるいは、他に特殊な制限をかけるような
ソフトを入れていないかチェック。入れていたら設定を確認。
　DL出来ないと思っているだけで、実はDL出来ていたとかいう可能性もあります。
ダウンロードしたときの保存先を勘違いしていた場合がそれです。

　いずれにせよ何かをDL仕様としたときに出てきたエラーメッセージなどをよく確認する
必要があります。

ご心配どうもありがとうございます。

すぐにインターネットオプションを
確認しましたが、チェックボックスは
ダウンロード有効になっていました。

セキュリティソフトの方かと思いましたが
こちらには設定にダウンロードファイルの
項目自体がありませんでした。

あとは普通に考えてもウィンドウズ側に
問題があるとしか思えないのですけど。

一応症状としてはダウンロードの時、
ツールバーをクリックするようメッセージが
出ますが、押しても何も起きず、そのまま
フリーズしてしまうんです。

エラーメッセージも表示されませんし、
復旧は電源ボタンを長く押す以外は
何も出来ません。

関係ないかもしれませんが、先日画面が
黒くなってビープ音が鳴り続けたので

PCショップで調べてもらったらメモリーか
マザーとメモリーをつなぐ機械が壊れている
可能性があるとのお話でした。

もっとも、メーカー製ではなく、３～４年前にショップで
オーダーしたものなうえ、マザーは限定版の特殊なもので、
メモリーも形が旧いのか、中古くらいでしか手に入らないと
言われましたので、問題が起き続けるなら新しく造るしか
ないようです。

あとドライブの書き込み機能も、新しく買ったばかりの
外付けドライブまでフリーズするため使えなくなっています。
メモリーの容量は512MBあるのですけど、
どうなったらこんなことになるのか・・・。
何が起きているのか皆目見当が付きません。

とりあえず手間はかかりますが
HSPは仕事場のPCで使うことになりそうです。

それから、書いて頂いたスクリプトを実行させて頂いて
もう１つやりたい事が出来ましたので、
新しくスレッドを立てさせて頂きますね。

> エラーメッセージも表示されませんし、復旧は電源ボタンを長く押す以外は
> 何も出来ません。

> 関係ないかもしれませんが、先日画面が黒くなってビープ音が鳴り続けたので
> PCショップで調べてもらったらメモリーかマザーとメモリーをつなぐ機械が壊れている
> 可能性があるとのお話でした。

　うお…これは…。重症っぽいですね。
PCの中のほこりを掃除して、OS再インストールしたほうがいいかも。
それでもダメなら買い替えor修理をお勧めします。

買い換えられると一番良いのですがね・・・。
質問も解決しましたしこのあたりで
失礼させて頂きます。

ご返答して下さった皆さん
本当にありがとうございました。