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


HSPTV!掲示板


未解決 解決 停止 削除要請

2009
0526
D.J.Sinカウント機のプログラムを作ったら・・・7解決


D.J.Sin

リンク

2009/5/26(Tue) 18:14:41|NO.25390

カウント機のプログラムを作ろうと思って下のようなスクリプトを書いたのですが、
width 320,240
dim count print count button gosub 増やす , *tas button gosub 減らす , *hik *tas dim count+ *hik dim count-
僕もHSPについてよくわからないのですが、多分「
dim count+
」でエラーが
あるようです。「
count+
」でもダメでした。どこをどう直せばいいですか?



この記事に返信する


inovia

リンク

2009/5/26(Tue) 18:26:09|NO.25391

直すとしたらこんな感じかな?

width 320,240 button "増やす" , *tas button "減らす" , *hik stop *tas count++ pos 0,50:color 255,255,255:boxf:color:mes count stop *hik count-- pos 0,50:color 255,255,255:boxf:color:mes count stop



hatter

リンク

2009/5/26(Tue) 18:34:11|NO.25392


count=0 mes count button gosub "増やす" , *tas button gosub "減らす" , *hik stop *tas count++ return *hik count-- return
以上に用に替えてみて下さい。
HSPでは変数の宣言はいりません。
print とより mes が推奨されます。
また、文字列は"で囲わなければなりません。
あと,stop命令を入れたのは念のためです。今回の場合入れなくても構いません。
ただ、一般的にあそこにstopを入れないと後ろのスクリプトが実行されてしまいます。
(今回の場合、++と--両方が実行されるため気にしなくて良い。)
あと、変数の中身が変わっても、表示が変わらないので、
return(2つ両方とも)の前に
mes count
を入れて下さい。
このままだと、文字があとにどんどん追加されていくので
本来以下のようであるべきでしょう

count=0 *start cls 0 mes count button "増やす" , *up button "減らす" , *down stop *up count++ goto *start *down count-- goto *start
ちなみにclsは画面をリセットする命令です。



D.J.Sin

リンク

2009/5/26(Tue) 19:24:28|NO.25393

うまくできました。hatterさんありがとうございます。
できたソフトはいつか公開するので、お楽しみに。



レノス

リンク

2009/5/26(Tue) 23:57:38|NO.25401

解決済みなのでただの補足ですが……。

> hatter さん
> (最後のスクリプト)
増減させるたびにボタンを作り直すのは無駄が多すぎです。
しかも、画面がちかちかしてしまいます。


count = 0 button gosub "増やす", *inc button gosub "減らす", *dec mes count stop // 画面を描き直すラベル *RedrawWindow redraw 2 // 描画する前に color 255, 255, 255 : boxf : color // 全体を白で塗りつぶす // 描画 pos 10, 50 : mes count redraw 1 // 描画した後に return // 増加 (increase の略) *inc count ++ gosub *RedrawWindow return // 減少 (decrease の略) *dec count -- gosub *RedrawWindow return



D.J.Sin

リンク

2009/5/27(Wed) 17:28:41|NO.25414

あ、言い忘れましたがリセット機能とかボタン名などをいじってます。



D.J.Sin

リンク

2009/5/31(Sun) 18:56:30|NO.25481

ソフトをまとめたzipファイルアップロード致しました。
http://www.mediafire.com/?sharekey=45144bf8c57de8aeb64026cfc0611236e04e75f6e8ebb871



D.J.Sin

リンク

2009/5/31(Sun) 19:22:57|NO.25483

追記ですが、カウント機のファイルはcount.zipに入っています。



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