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修理をお勧めします。

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

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