HSP - Hot Soup Processor [8]

**名前は開発中のものです。** · 04/08/05 17:33

関連サイト
　　ONION software　（本家）
　　　http://www.onionsoft.net/
　　HSP CENTER
　　　http://hspcenter.com/
　　HSP ML
　　　http://garde.esprix.net/hsp-ml/

誰かDtHSPpOH ◆kxrJVlZ8OEに答えてやれよ。
誰かが答えないと永遠に質問繰り返しそうだぞ。
それにマルチで他のスレにも迷惑がかかる。

**名前は開発中のものです。** · 04/09/29 01:22:01

今、時間がどんどん減っていって0になったら終わるものを作っているのですが
こんな感じで
screen ,100,100
gettime a,6 : a_a = a : a = 0 : a_c = 10
repeat
redraw 0 : color 255,255,255 : boxf 0,0,100,100 : color ,,
gettime a,6 : a = a - a_a : a_b = a_c - a : pos 50,50 : mes ""+a_b+""
redraw 1
if a_b <= 0 : break
await 1
loop
cls : pos 0,0 : mes "あぼーん" : wait 100
でもこれだと秒が60から1になるときに機能しなくなってしまうんですが、どうしたらいいでしょうか？

**名前は開発中のものです。** · 04/09/29 02:01:31

ちょ、ちょっとまった。

gettimeの必要あるのかと。
Inputでもつかって掛かる時間を入手、time--、if time==0:mes　"あぼ～ん"
でいいんじゃないか？

**名前は開発中のものです。** · 04/09/29 18:53:19

この命令あげるからあとは自分で何とかしろ。

; 特定の地点からの経過時間をミリ秒で計測します。
; timer p1,p2,p3
; p1 = 経過時間を代入する変数です。60秒までしか計測できません。
; p2 = ID(0～15)を入力します。IDによってタイマーを使い分けることが出来ます。
; p3 = これが1の時にはリセットモードとなり、指定したIDのタイマーを0に戻します。

#deffunc timer val, int, int
mref timer_return, 16 : mref timer_id, 1 : mref timer_mode, 2
if timer_flag = 0 {
timer_flag = 1 : dim timer_default, 16, 16 : dim timer_gettime, 16, 16
}
if timer_mode = 1 {
repeat 3, 5
gettime timer_default.timer_id.cnt, cnt
loop
timer_return = 0
}
if timer_mode = 0 {
repeat 3, 5
gettime timer_gettime.timer_id.cnt, cnt
loop
repeat 3, 5
timer_calc.cnt = timer_gettime.timer_id.cnt - timer_default.timer_id.cnt
loop
if timer_calc.MINUTE < 0 {
timer_calc.MINUTE += 60
}
timer_return = (timer_calc.MINUTE * 60 * 1000) + (timer_calc.SECOND * 1000) + timer_calc.MILLSECONDS
}
return

**名前は開発中のものです。** · 04/09/29 18:55:05

定義するの忘れてた。
#const MINUTE 5
#const SECOND 6
#const MILLSECONDS 7
まあ古臭いasファイルから取ってきたものだから
改良するなりして自分で使ってくれ。

**名前は開発中のものです。** · 04/09/29 19:23:28

; ----- ここから -----
#module
; 初期化(1回呼び出されるだけでOK)
#deffunc timer_init
ll_libload hDll, "kernel32.dll"
ll_getproc pFunc, "GetTickCount", hDll
return

; タイマーをセットする
; set_timer p1(タイマーID(0～15))
#deffunc set_timer int
mref id, 0

ll_callfnv pFunc
ll_ret last.id
return

; set_timerからの経過時間(単位：ミリ秒)を取得する(何回呼び出してもOK)
; get_timer p1(経過時間を返す変数), p2(set_timerのIDと対応)
#deffunc get_timer val, int
mref ret, 16
mref id, 1

ll_callfnv pFunc
ll_ret ret
ret -= last.id
return

#global
timer_init
; ----- ここまで -----

**名前は開発中のものです。** · 04/09/29 19:30:09

243を書き直したのやるから元気出せ

; 特定の地点からの経過時間をミリ秒で計測します。
; timer p1,p2,p3
; p1 = 経過時間を代入する変数です。
; p2 = ID(0～15)を入力します。IDによってタイマーを使い分けることが出来ます。
; p3 = これが1の時にはリセットモードとなり、指定したIDのタイマーを0に戻します。

#deffunc timer val, int, int
mref timer_return, 16
mref timer_id, 1
mref timer_mode, 2
ll_dll "winmm":ll_func "timeGetTime":ll_call:ll_ret timer_return
if timer_mode = 1 : ot.timer_id=timer_return
timer_return-=ot.timer_id
return

**名前は開発中のものです。** · 04/09/29 19:32:17

あDLLの開放忘れた

**名前は開発中のものです。** · 04/09/29 20:34:08

コンテストのショートって画像使っても大丈夫なのか?
いろんなので使われてるんだけど…

**名前は開発中のものです。** · 04/09/29 21:36:04

>>248
画像は駄目に決まってる。
画像に見えるのは、全部HSPのasファイル内で描画しているものだけ。
psetとcolorの連続だけじゃなくて、簡単な円や図形なら数行～十数行で収まる。

**名前は開発中のものです。** · 04/09/29 21:51:51

>>248
そうだったのか…ｻﾝｸｽ

**名前は開発中のものです。** · 04/09/29 22:52:12

連レス+再び質問で悪いのだが、

EXEファイルが「HSPERUN」使わないと作れないんだが…。
なんかエラーはhsprtってのがないって出てるっぽいんだけど…

**名前は開発中のものです。** · 04/09/30 00:31:39

入れ直したら？

**名前は開発中のものです。** · 04/09/30 10:38:59

HSP3.0ってどう思う？

**名前は開発中のものです。** · 04/09/30 13:23:35

どうなるんだ？

**名前は開発中のものです。** · 04/09/30 16:44:57

構造体ぐらいは使えるようになった？
関数定義もmrefなんか使わなくても済むようになった？
関数の返り値を直接、式に利用できるようになった？

**名前は開発中のものです。** · 04/09/30 18:09:28

>>255
？
？
○

**名前は開発中のものです。** · 04/10/01 12:58:26

３．０はまだ出ていない

**名前は開発中のものです。** · 04/10/01 19:12:23

もう出ている、プロトタイプと一部の仕様書が。

**名前は開発中のものです。** · 04/10/02 01:06:16

いや～それにしても相変わらずＨＳＰの話題がありませんね(笑

**名前は開発中のものです。** · 04/10/02 03:00:50

は？

**名前は開発中のものです。** · 04/10/02 20:05:47

ネタが無いってことじゃない？

HSP3.0は期待してるけど、一部のユーザにしかテスト版を公開しないのはどうかと思った

**名前は開発中のものです。** · 04/10/02 20:30:22

まだ一般公開テスト段階じゃないってことだろ。
ただでさえHSPは厨房ユーザーが多いんだしさ。

**名前は開発中のものです。** · 04/10/03 00:40:17

>>259はム板のsage厨だろ。なんでこんなとこまで来てんだw

**名前は開発中のものです。** · 04/10/03 00:44:59

感動した！
今日からがんばろう

**名前は開発中のものです。** · 04/10/03 01:12:21

今年のコンテストはもう無理だ。
来年までに完成させて次の開催を待つか。

**名前は開発中のものです。** · 04/10/03 12:33:55

コンテストなんか開催してたんかー

**名前は開発中のものです。** · 04/10/03 17:21:44

>>266
気付くの遅杉

**名前は開発中のものです。** · 04/10/03 21:24:52

うわーん！

◆HOTsoUpxjY · 04/10/03 21:33:08

一ヶ月もあれば何か作れるでしょ

**名前は開発中のものです。** · 04/10/03 21:42:47

作るだけなら7日で出来ても、磨くのに90日かかる。

**名前は開発中のものです。** · 04/10/03 23:54:04

やっつけで作ったのなんか出してもコメントでボロクソ言われて気分悪いだけだ。
手間暇掛けて作った物がボロクソ言われたらもっと鬱になるが・・・＿|￣|○

◆HOTsoUpxjY · 04/10/03 23:59:35

長くて一ヶ月位が妥当な線だと思うけど
もし例えば一年とか掛けるなら構造化言語で組んだ方がいいじゃん

**名前は開発中のものです。** · 04/10/04 00:17:39

ミニツール類ならね。
あと、言語は個人の能力を超えられないよ。HSPで糞コードを書くやつは、
どんな言語使ってもやっぱし糞コード書くだけだよ。

**名前は開発中のものです。** · 04/10/04 00:26:00

>>273
そんな手厳しいこといったるなよ・・・
長い目で見てやろうぜ

◆HOTsoUpxjY · 04/10/04 00:34:51

>言語は個人の能力を超えられない
そうだけどちょっと違う話になってるな、大規模なプログラムの制作が難しいという話で良し悪しとは別

**名前は開発中のものです。** · 04/10/04 01:21:47

この流れなら聞けそうな気がするんですが、
皆さんは標準のスクリプトエディタ使ってるんでしょうか・・・
おすすめとかってありますか？

**名前は開発中のものです。** · 04/10/04 01:51:50

>>276
Peggy。HSPじゃ、余り意味無いけどプロジェクト単位で開ける。
基本機能も充実してるし、HSPにも対応してるから色分け表示もできる。

**名前は開発中のものです。** · 04/10/04 01:53:54

hsp-devで流れてる新HSPスクリプトエディタを
デバッグ兼ねて使わしてもらっとります

**名前は開発中のものです。** · 04/10/04 01:59:30

terapadとか

**名前は開発中のものです。** · 04/10/04 16:23:29

普段はterapadで、start.axの容量調べる時かexeファイル作るときだけ標準のエディタ使ってる。

**276** · 04/10/04 19:52:22

ありがとうございます。　HSPならコレ、というような定番はないみたいですね
自分に合ったモノを使うというか。
教えてもらったエディタ、全部試してみます。どうもでした

**名前は開発中のものです。** · 04/10/04 21:55:09

やっつけで作って応募したがどうなることやら。
今のところBが3つ。

**名前は開発中のものです。** · 04/10/05 16:25:12

どれ？

**名前は開発中のものです。** · 04/10/05 17:06:30

蛾の奴?

**名前は開発中のものです。** · 04/10/06 19:42:13

ttp://www.kohgakusha.co.jp/books/detail/4-7775-1061-1
これ買ったやついる？
レポきぼん

◆HOTsoUpxjY · 04/10/07 00:40:32

『HSPでつくる簡単3Dゲーム』のレポート

「プログラム初心者でも3Dゲームは作れる」というコンセプトなので
１～３章でHSPそのものの基本操作を要約して述べてある
これが全体の六分の一位の量で巻末の命令一覧は三分の一位
肝心の3Dだけど、3Dモデルの表示・3DACE・サイバデリア・
3D避けゲー・3Dレース・自分視点のガンシューティング・ロボットのACTで
いずれも骨組みで出来た簡素なゲームといった印象だが基本は押さえてる
付録CDには本文のゲームのソースコードとツールが収録されてる
ツールはネットで少し調べれば手に入ると思われる
イラストが少しクドめでコラムが割りとつまらないが分量的に問題なし
3DACEでUVマップはどうすんの？とかサイバデリアでボーンは？とか
DirectX使用時の描画性能は？FPS固定は？とか
そういう情報はなくて、ひたすらコードを数行ずつ解説していくスタイル
とにかく初心者が3Dで動くプログラムを作ろうという内容
クックブックのサンプルソースだけじゃよく分かんないよというような人にお勧めかも

**名前は開発中のものです。** · 04/10/07 00:47:55

>>286
乙！

**285** · 04/10/07 01:09:23

>>286
レポサンクス！
使用プラグインはやはりHGIMG？
それなりにはできるつもりだから中見てからだなあ…。

◆HOTsoUpxjY · 04/10/07 01:15:45

>>287
ども
>>288
hgimgオンリー。ZGPとかは出てこないよ

**名前は開発中のものです。** · 04/10/07 01:30:25

HGIMGかあ
HSPで浮動少数つかうってめんどくさいからHGIMGはあんま使いたく
ないんだよなーｗ

**名前は開発中のものです。** · 04/10/07 03:40:15

HSP3になればfloatも使えるはず。
待ってよっと。

**名前は開発中のものです。** · 04/10/07 17:00:00

3.0のテスト版の最初のバージョンの時点で
浮動小数点(double)は実装されてます。

**名前は開発中のものです。** · 04/10/08 16:12:32

あー今回もコンテスト送れなかったか。
冬コミ前じゃどうしようもないんだよなー。
来年あったとしてもまた無理かなあ…。

**名前は開発中のものです。** · 04/10/08 19:04:09

今年のコンテストは去年みたいに飛び抜けて凄いってのは無いからどれが優勝するか分からんな。
駆け込みでスゲーの来るかも分からんが。

**名前は開発中のものです。** · 04/10/09 02:14:30

毎日勉強っす・・・

**名前は開発中のものです。** · 04/10/09 12:31:52

毎年開催したら、年々レベル下がりそうだよな

**名前は開発中のものです。** · 04/10/09 13:17:07

いや何回か続けりゃコンテスト狙いで大分前から準備し始める奴が出てきて
段々良くなってくるかも。常連みたいなのも出てきたりして。
今は見るに堪えん様な物がほとんどで辛い状況だが頑張って来年も開催してくれ！

**名前は開発中のものです。** · 04/10/09 15:17:38

だね
終了しちゃうのが一番悲しい

**名前は開発中のものです。** · 04/10/09 15:44:08

宣伝効果もあるし応募数も多いので来年もあると思いたい

**名前は開発中のものです。** · 04/10/09 16:52:45

あそう、結構好評なのね。なんか逆宣伝な気もするが。。

**名前は開発中のものです。** · 04/10/14 22:44:04

もうだめじゃー｡･ﾟ･(ﾉД`)･ﾟ･｡

**名前は開発中のものです。** · 04/10/14 23:08:58

>>301
何が？

**名前は開発中のものです。** · 04/10/15 07:17:50

賞品がしょぼい

**名前は開発中のものです。** · 04/10/15 07:18:44

ゴミソフトばっか

**名前は開発中のものです。** · 04/10/15 14:34:02

ｋ

**名前は開発中のものです。** · 04/10/15 17:54:08

>>303
新たな風を巻き起こせ

**名前は開発中のものです。** · 04/10/15 17:57:31

まあ、作品はともかくコメントが寂れているのは確かだな＞コンテスト

**名前は開発中のものです。** · 04/10/15 18:02:43

俺たちでコンテストを盛り上げよう、
そういう一人一人の心がけが大切だ

**名前は開発中のものです。** · 04/10/15 18:06:34

>>308がいいこといった。
良作見つけて盛り上がろうぜ。
四字熟語シューティングは俺的神

**名前は開発中のものです。** · 04/10/15 18:22:47

優柔不断と唯我独尊が混ざっているミスを発見しました。

四字熟語シューティングにこの評価を入れてくれ。たのんだ。ぐはっ

**名前は開発中のものです。** · 04/10/15 19:25:01

何かリプレー機能付いたペイントソフト。
絵を描くのにはレイヤーも無しで使えないがリプレー機能のみは楽しめる。

**名前は開発中のものです。** · 04/10/15 23:45:01

とっつきやすさナンバーワン

**名前は開発中のものです。** · 04/10/16 00:04:02

ショート部門というか手抜き部門じゃねぇかよ

**名前は開発中のものです。** · 04/10/16 01:04:20

>>313
残念ながら、ショートのアイデアは去年で出尽くされますた

**名前は開発中のものです。** · 04/10/16 02:08:02

制限ありは何回か続けりゃ絶対に限界来るからな。

**名前は開発中のものです。** · 04/10/16 10:00:54

ショートは手軽に作りやすいが小物になりがちなのが難点だな

**名前は開発中のものです。** · 04/10/16 10:22:09

俺はAngriff_z(ツェット)がいいとおもた

**名前は開発中のものです。** · 04/10/16 13:33:55

ショートのNo.194 Speed Memory Aが1300以上

**名前は開発中のものです。** · 04/10/16 18:54:09

制限の中でどう工夫して面白いものを作るかって部門のはずだと思うんだが
思いつきで作ったてきとうな小物を出すだけの部門になっとる。

**名前は開発中のものです。** · 04/10/16 18:59:50

それはどうかな

**名前は開発中のものです。** · 04/10/16 19:05:10

何ｨ！

**名前は開発中のものです。** · 04/10/16 21:31:09

axサイズ2500bytes以下という制限だけでなく、2000bytes以上という制限も加えたほうが良いな。
まあ、主催者が学習能力無いから、来年開催するときもまったく同じルールだろうけどね。

**名前は開発中のものです。** · 04/10/16 21:45:01

> 技術の優劣を競うのが目的ではなく、プログラミングの楽しさを広く知ってもらうとともに、発表の機会を提供したいと
> 考えています。上級者はもちろん、初めてＨＳＰをお使いになる方まで、誰でも応募することができます。
(HSPコンテスト2004 トップページより)

こうである以上、下限を設けるのはどうかと思う

**名前は開発中のものです。** · 04/10/16 21:53:49

>>322
それで必ずよくなる保証があるわけでもないのに、学習も糞もないでしょ。
面白いアイデアってのはaxのサイズが2000Byteより小さいと絶対実現できないのか？
お前が採点するわけじゃあるまいし、ほっとけ。

**名前は開発中のものです。** · 04/10/16 22:34:25

ショート部門は、容量別に部門を細かく分けたら面白いだろうなあ

**名前は開発中のものです。** · 04/10/16 22:36:08

いろんな人が作るわけだからとやかくいうことじゃないっしょ

**名前は開発中のものです。** · 04/10/16 22:45:18

特定のメモ帳に指定した文章を写したいのですがどうしたらいいでしょうか

**名前は開発中のものです。** · 04/10/16 22:49:16

作品のstart.axの容量はデフォルトで表示してもいいと思ったが、どうだろうか。

**名前は開発中のものです。** · 04/10/17 16:50:41

保守ついでに、ここで問題を出してみる。お題は麻雀。

pai という数値型配列を作る。
中に入る数値は
1～9 : ソーズの1～9
10～19 : ピンズの1～9
20～29 : マンズの1～9
30,31,32,33 : 東, 南, 西, 北
34,35,36 : 白, 發, 中
とする。

同じ数からなる長さ 2 のリスト[N,N]をトイツと呼ぶ。1 <= N <= 36
同じ数からなる長さ 3 のリスト[N,N,N]をコーツと呼ぶ。1 <= N <= 36
公差1の長さ 3 のリスト[N,N+1,N+2]をシュンツと呼ぶ。1 <= N <= 7 | 11 <= N <= 17 | 21 <= N <= 27

長さ14 の pai が 1つのトイツと 4つのコーツとシュンツで構成されていた場合、アガリとする。

また、長さ13 の pai に、数 N を付け足すとアガリになるとき、N を待ちと呼ぶ。

問題１：長さ14 の pai を与えると、アガリの時 1 を、それ以外は 0 をstatに返す関数を
　　　　 #deffunc agari val
　　　　を使って書きなさい。

問題２：長さ13 の pai と長さ 10 の数値配列 machi を与えると、その待ちを machi の中に
　　　　　リストアップする関数を
　　　　　#deffunc tenpai val, val
　　　　　を使って書きなさい。（待ちがNとMだったなら、machi.0 = N, machi.1 = M, machi.2～ = 0）

一番簡潔に書けた人が勝ち。問題２はやらなくてもいいかも。

**名前は開発中のものです。** · 04/10/17 17:00:01

お前はただ麻雀ゲーが作りたいだけなんじゃないかと作れない俺がマジ切れ

**329** · 04/10/17 17:28:02

間違えた。
1～9 : ソーズの1～9
11～19 : ピンズの1～9
21～29 : マンズの1～9
に変更。

>>330
アルゴリズムを考える練習みたいなものです。
自力でやる事に価値がある。

**名前は開発中のものです。** · 04/10/17 17:28:04

古きよき時代のアメリカに伝わる、チョコチップの香り豊かなカントリー風ソフトクッキー。

白ねりあんが入ってます。

**名前は開発中のものです。** · 04/10/17 17:29:40

・・・ミスったorz

**名前は開発中のものです。** · 04/10/17 17:34:50

やっぱり
1～9：ソーズ1～9
10～18：ピンズ1～9
19～27：マンズ1～9
28,29,30,31：東南西北
32,33,34：白發中
って分けたほうがわかりやすそう。
トイツ：1<=N<=34
コーツ：1<=N<=34
シュンツ：1<=N<=7 | 10<=N<=16 | 19<=N<=25
で。

**名前は開発中のものです。** · 04/10/17 17:53:59

公式ドキュメントに麻雀関係のあったよな

**名前は開発中のものです。** · 04/10/17 21:26:24

問題出るとやりたくなるが、麻雀のことはさっぱりだ

**名前は開発中のものです。** · 04/10/17 21:45:15

問題２）

待ち配列の添字が１０ってことは、
国士無双十三面待ちを判定するとエラーですか？

**名前は開発中のものです。** · 04/10/17 22:31:11

カンツとか七対子とかは判定の対象に入らない？

**名前は開発中のものです。** · 04/10/17 22:36:16

>>337
ボケてますた。13に修正で。
でも、アガリの定義が本当の麻雀と違います。役を考えずに面子が揃えばいいです。
役を求めるのは問題３辺りでいいんではないでしょうか。

>>338
カンツは入れると結構難易度あがりそうですね。
やる気があるならば挑戦してみてもいいかも。

**名前は開発中のものです。** · 04/10/18 00:49:13

麻雀の役判定は結構奥深くて面白いよな

**名前は開発中のものです。** · 04/10/18 02:29:57

>>340
優先順位とかしっかりしないといけないし、点数計算まで入れるとかなり面倒。
でも、一度作ったら再利用可能だし。
まあ、ローカル（東北新幹線とか）ルールまで入れるのもあり。