【コンテスト開始】HSP初質P48【小学生賞の謎】
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
2005/08/03(水) 20:39:31http://www.geocities.jp/hsp_summary/law.html
■ 前スレ
【47氏の】HSP初質Part47【パクリ】
http://pc8.2ch.net/test/read.cgi/tech/1115830336/l50
■HSPの入手はここから(HSP2.61、HSP3.0β4公開中。)
□Hot Soup Processor Page
http://www.onionsoft.net/hsp/
■HSPの各種情報
□HSP Wiki
http://quasiquote.org/hspwiki/
http://quasiquote.org/hspwiki/2%a4%c1%a4%e3%a4%f3%a4%cd%a4%eb%a4%ce%a5%b9%a5%ec%a5%c3%a5%c9
■HSPLetの入手はここから(ブラウザ上でHSPを動かす)
□HSP BIGINNER'S CLUB
http://www.rinku.zaq.ne.jp/ultimate/
■HSPスレまとめページ
□Hot Soup Processor@2ch
http://hsp2ch.hp.infoseek.co.jp/
http://www.geocities.jp/hsp_summary/
0002デフォルトの名無しさん
2005/08/03(水) 20:42:340003デフォルトの名無しさん
2005/08/03(水) 20:50:42うげっ
俺んちの近くだ。
0004ホスプロ ◆HOTsoUpxjY
2005/08/03(水) 20:50:530005デフォルトの名無しさん
2005/08/04(木) 00:08:51立て直せ
0006デフォルトの名無しさん
2005/08/04(木) 00:12:22バーカ、バーカ。
やーい、イマイチーw
0007デフォルトの名無しさん
2005/08/04(木) 02:25:19screen 0,,,1:lo=2:mo=1:mes "味方の数":input mo,,,2
mes "敵の数":input lo,,,2:button "スタート",*st:stop
*st
cls:x=0:y=240:dim zx,100:dim zy,100:dim nx,100:dim ny,100:
dim xx,100:dim yy,100:dim mx,100:dim my,100:buffer 2,,,1:buffer 3,,,1:boxf:randomize
chr=" n\n (凸)\n@[ Y]−\n / >" :mchr="(゚Д゚)\n -( )@\n < \"
font "MS Pゴシック",18:pos x,y :repeat:await 5:redraw 0
stick a,15:if a&16:gsel 2:color ,,128:boxf x+45,y+38,x+85,y+43
x-a&1!0*3:y-a&2!0*3:x+a&4!0*3:y+a&8!0*3
gsel 2:pos 0,0 : gcopy 2,-5,0,winx+1,winy
gsel 3:pos -5,0 : gcopy 3,0,0,winx+1,winy:color : boxf winx-6,0,winx,winy: gsel 0
pos 0,0 :gcopy 2,0,0,winx,winy : gmode 2 :gcopy 3,0,0,winx,winy
color:pget x+55,y+40:if rval=128:dialog "あぼーん":end
repeat lo:if cn\60=0 : rnd mx.cnt,180,rnd my.cnt,440:mx.cnt=mx.cnt+350
rnd sh,25 : if sh=0 : gsel 3 : color 128:boxf xx.cnt,yy.cnt+35,xx.cnt-30,yy.cnt+43 : gsel 0
xx.cnt=(xx.cnt*19)+(mx.cnt)/20 : yy.cnt=(yy.cnt*29)+(my.cnt)/30 : loop
repeat mo:if cn\60=0 : rnd nx.cnt,140,rnd ny.cnt,440
rnd sh,25 : if sh=0 : gsel 2:color ,128,128:boxf zx.cnt+45,zy.cnt+38,zx.cnt+85,zy.cnt+43 :gsel 0
zx.cnt=(zx.cnt*19)+(nx.cnt)/20 : zy.cnt=(zy.cnt*29)+(ny.cnt)/30 : loop
repeat lo:pget xx.cnt+55,yy.cnt+25:if bval!128:pos xx.cnt,yy.cnt:mes mchr : else:rnd xx.cnt,180,rnd yy.cnt,440:xx.cnt+400:p+1:title "得点:"+p
loop:repeat mo:pget zx.cnt+55,zy.cnt+25:if rval!128:pos zx.cnt,zy.cnt:mes chr : else:rnd zx.cnt,180,rnd zy.cnt,440:p-1:title "得点:"+p
loop:cn++:color 255:pos x,y:mes chr:redraw 1:loop
0008デフォルトの名無しさん
2005/08/04(木) 02:27:31邪魔。
0009デフォルトの名無しさん
2005/08/04(木) 02:34:360011デフォルトの名無しさん
2005/08/04(木) 08:35:15懐かしい...
0012デフォルトの名無しさん
2005/08/04(木) 12:35:480013デフォルトの名無しさん
2005/08/04(木) 12:38:1434 34
35 35
偶然か?
0014デフォルトの名無しさん
2005/08/04(木) 15:59:12テンプレ書き直せよ。
てかとりあえずこれを嫁って読んだからなんだ?って内容だな。
ここのスレはver3以上専用?
それともver2までも混合?
0015デフォルトの名無しさん
2005/08/04(木) 18:15:54以下のソースはコマンドラインからの入力の合計になっていますが、これを除算とした場合、どうすればいいのでしょうか?
↓コマンドライン入力
c:\ java ArrayCount 100 50 10 2 …任意の数を入力
(1)100/50= 20
(2)20/10 = 2
(3)2/2 = 1 …除算の結果をまた除算というようにしたいのですが。
public class ArrayCount {
public int result(int[] x){
int r = 0;
for(int i = 0; i < x.length;){
r += x[i++];
}
return r;
}
public static void main(String args[]){
ArrayCount ac = new ArrayCount();
int[] x = new int[args.length];
for(int i = 0; i < args.length; i++){
x[i] = Integer.parseInt(args[i]) ;
}
System.out.println(ac.result(x));
}
}
0016デフォルトの名無しさん
2005/08/04(木) 18:33:12int r = x[0];
for(int i = 1; i < x.length-1;){
r /= x[i++];
}
かな。つーか宿題は自分でやるもんだろ。
友人ならまだしも、不特定多数の人間に聞くなよ…。
0017デフォルトの名無しさん
2005/08/04(木) 19:29:280018デフォルトの名無しさん
2005/08/04(木) 19:42:010019デフォルトの名無しさん
2005/08/04(木) 23:22:25いいですよ。
ドンと来いってんだ!
0020デフォルトの名無しさん
2005/08/04(木) 23:26:210021デフォルトの名無しさん
2005/08/04(木) 23:38:28おまんこから、ドバッ!と出てくるの。
ハイ、次!
0022デフォルトの名無しさん
2005/08/04(木) 23:39:382chでは、松崎しげる「愛のメモリー」1位にするべく、板の垣根を越えて、
活動を行っております。
iTunesってなに?という方はこちら。
ttp://headlines.yahoo.co.jp/hl?a=20050804-00000012-imp-sci
ttp://www.apple.com/jp/
名曲愛のメモリーを150円で購入してね。
0023デフォルトの名無しさん
2005/08/05(金) 01:43:03金儲けに走るとこんなもんか?おにーたまwww
0024デフォルトの名無しさん
2005/08/05(金) 03:27:030025デフォルトの名無しさん
2005/08/05(金) 08:47:06なんかスッキリしたぞ。
エロゲ出身だしな。
0026デフォルトの名無しさん
2005/08/05(金) 14:06:27sdim playereqipID,50,8,8
sdim playereqipname,1024,8,8
sdim playereqipdum,1024,8,8
sdim playereqipLv,1024,8,8
sdim playereqipatt,1024,8,8
sdim playereqiphit,1024,8,8
sdim playereqipdef,1024,8,8
repeat 6
mes ""+cnt
repeat 8
mes ""+cnt
playereqipname.Player.cnt="テスト武器"
playereqipdum.Player.cnt=99
playereqipdef.Player.cnt=99
playereqiphit.Player.cnt=99
playereqipLv.Player.cnt=-1
playereqipatt.Player.cnt=1
loop
Player+=1
loop
なんか変数配列1,1以降がないらしくエラー吐かれる
なんで?
0027デフォルトの名無しさん
2005/08/05(金) 14:48:14文字列型に数値を代入してるから
0028デフォルトの名無しさん
2005/08/05(金) 18:06:21( ゚,_ゝ゚)バカジャネーノ。
0029デフォルトの名無しさん
2005/08/05(金) 22:40:490030デフォルトの名無しさん
2005/08/05(金) 22:59:25スタティックテキストだった
何でこんな間違いを・・・
誰も使わないからか
0031デフォルトの名無しさん
2005/08/05(金) 23:07:09長いメッセージとか画面内に収めたい時とか。
勝手に折り返してくれるし。
0032デフォルトの名無しさん
2005/08/06(土) 00:04:250033だる
2005/08/06(土) 01:57:090034ホスプロ ◆HOTsoUpxjY
2005/08/06(土) 04:11:43やってみるとどれもありがちなんだけど、やらないと気になるし
あと、コメント欄が変わっちゃった。ゲーム君とかで荒らされたからか?
0035デフォルトの名無しさん
2005/08/06(土) 05:26:54↑があんまり守られていない件
0036デフォルトの名無しさん
2005/08/06(土) 07:51:37おれも使ってた。変更理解できん。
0037デフォルトの名無しさん
2005/08/06(土) 11:00:480038デフォルトの名無しさん
2005/08/06(土) 11:59:570039デフォルトの名無しさん
2005/08/06(土) 12:49:200040デフォルトの名無しさん
2005/08/06(土) 14:09:27ひきたまのサイトってどこよ?
0041デフォルトの名無しさん
2005/08/06(土) 17:41:45過去ログ漁っても出てくる
0042デフォルトの名無しさん
2005/08/06(土) 18:34:29俺はもうHSPは使わんからどうでもいい。
0043デフォルトの名無しさん
2005/08/06(土) 18:54:550044ホスプロ ◆HOTsoUpxjY
2005/08/06(土) 19:03:470045デフォルトの名無しさん
2005/08/07(日) 00:43:400046スペルマハンター[春名まなみ]
2005/08/07(日) 00:55:410047デフォルトの名無しさん
2005/08/07(日) 01:04:020048ザーメン学園
2005/08/07(日) 02:36:130049デフォルトの名無しさん
2005/08/07(日) 03:14:410050デフォルトの名無しさん
2005/08/07(日) 12:57:24コンテスト作品、操作方法が書いてねーじゃん。
0051デフォルトの名無しさん
2005/08/07(日) 13:53:51ィニ三≡ヽ /  ̄  ̄ \
/jj7 \ミt /、 ヽ はぁ?黙ってろデブ
彡jj_r==i_r=tiミ |・ |―-、 |
彡l.  ̄・・ ̄ ミ q -´ 二 ヽ |
_lt '=t /__ ノ_ ー | |
_, -t"lt__ j l ^゙''ー 、 \. ̄` | /
/ ヽ ̄ 丿7 \ O===== |
/ `-‐''゙ ヽ / |
0052ホスプロ ◆HOTsoUpxjY
2005/08/07(日) 15:22:22たしかに。何で操作方法書けって登録時に念を押さないんだろ
あと今HSPTVブラウザ開いてやってみたら、ハイスコアが残ってる
キャッシュをクリアしますかってそういうことだったのか…
0053デフォルトの名無しさん
2005/08/07(日) 20:46:18こうしてもa(0)〜a(3)まで確保されちゃうな
0054デフォルトの名無しさん
2005/08/07(日) 21:03:14HSPの配列の最小単位は4だっけ?
それはsdimの時だけだっけ?
0055デフォルトの名無しさん
2005/08/07(日) 21:09:04文字列は宣言しない限り1つ
宣言せずに
a(1) = "a"
ってやるとエラーでる
0056デフォルトの名無しさん
2005/08/07(日) 21:36:22オニオンソフトの新作を買えよ
http://onitama.tv/top2.html
少しくらいHSP開発費の捻出に貢献しろ
0057デフォルトの名無しさん
2005/08/07(日) 22:06:320058デフォルトの名無しさん
2005/08/07(日) 22:26:090059デフォルトの名無しさん
2005/08/07(日) 22:31:040061デフォルトの名無しさん
2005/08/07(日) 23:21:35ボクと魔王2作れよ。
0062デフォルトの名無しさん
2005/08/08(月) 00:01:05よく認定したよなw。hsptvのサイトからしっかりonionsoftにリンクもあるし。
0063デフォルトの名無しさん
2005/08/08(月) 00:16:590064デフォルトの名無しさん
2005/08/08(月) 00:26:23でも使用したのかなんてわからないよな
使用した時点でaxのサイズ超えそうだが
0065デフォルトの名無しさん
2005/08/08(月) 00:38:000066エラーナンバーのリファレンスとかありませんか?
2005/08/08(月) 01:12:360067デフォルトの名無しさん
2005/08/08(月) 03:43:480068デフォルトの名無しさん
2005/08/08(月) 04:15:120069デフォルトの名無しさん
2005/08/08(月) 11:07:040070デフォルトの名無しさん
2005/08/08(月) 11:46:29本家の低能君ども
0071デフォルトの名無しさん
2005/08/08(月) 11:54:01おお、言葉の意味はよくわからんがとにかくすごい自信だ
0072デフォルトの名無しさん
2005/08/08(月) 13:31:02去年はHSPコンテストだったのに。
0073初心
2005/08/08(月) 14:10:480074デフォルトの名無しさん
2005/08/08(月) 14:27:43どうせメール受信とかその程度だろ。
ネットワークプログラミング相談室 Port14
http://pc8.2ch.net/test/read.cgi/tech/1118469143/
↑で聞けるが、Win32APIとWinSockをある程度理解して無いと挫折して終わり。
はいサヨナラ〜。
0075デフォルトの名無しさん
2005/08/08(月) 14:53:43サンプルスクリプトをください。(画像不要のを希望)
0076デフォルトの名無しさん
2005/08/08(月) 15:06:08repeat
wait 1
redraw 0
redraw 1
cls
repeat rnd(300)
pos rnd(640),rnd(480)
mes "."
loop
loop
0077デフォルトの名無しさん
2005/08/08(月) 15:51:330078デフォルトの名無しさん
2005/08/08(月) 17:23:40buffer 2,600,400
gosub*create_pset
buffer 3,600,400
gosub*create_pset
screen 0,600,400
color 255,255,255
repeat
tmp=(cnt\2)+2
redraw 2
boxf
gcopy tmp,0,0,600,400
redraw 1
await
loop
*create_pset
x=0:y=0
repeat 400
x=0
repeat 600
if rnd(2)==0{pset x,y}
x++
loop
y++
loop
return
超リアル??
何点くらい?
0079デフォルトの名無しさん
2005/08/08(月) 17:39:22そこらへんは改変してくれ。
と、思ったけど、640*480だとなぜかノイズが入る。何故だ!
HSP2.61でも同じく入る。
誰か教えてくれ。
0080デフォルトの名無しさん
2005/08/08(月) 17:47:470081ホスプロ ◆HOTsoUpxjY
2005/08/08(月) 18:13:57#define winY 480
#define page 20
randomize
repeat page
buffer cnt+2,winX,winY
gosub*create_dot
loop
screen 0,winX,winY
repeat
i=int((cnt+2)\page)
tmp=limit(i,2,page+2)
redraw 2
gcopy tmp,0,0,winX,winY
redraw 1
await 20
loop
*create_dot
repeat winY
y=cnt
repeat winX
if rnd(3) : pset cnt,y
loop
loop
return
0083デフォルトの名無しさん
2005/08/08(月) 19:32:18>>82
>>82
0084ホスプロ ◆HOTsoUpxjY
2005/08/08(月) 19:54:180085デフォルトの名無しさん
2005/08/08(月) 20:00:08素直に
tmp=(cnt\page)+2
でいいじゃねーか?
limitなんて初めて見たぜ。
>>80
rnd(3)なら問題ないね。
乱数精度の問題だろうか。
詳しい人教えて下さい。
0087ホスプロ ◆HOTsoUpxjY
2005/08/08(月) 20:26:30#define winX 640
#define winY 480
#define page 20
randomize
repeat page
buffer cnt+2,winX,winY
gosub*create_dot
loop
screen 0,winX,winY
repeat
tmp=(cnt\page)+2
redraw 2
gcopy tmp,0,0,winX,winY
redraw 1
await 20
loop
*create_dot
repeat winY
y=cnt
repeat winX
if rnd(3) : pset cnt,y
loop
loop
return
0088デフォルトの名無しさん
2005/08/08(月) 21:17:20limitって何かわけ分からん関数だよな。
そんなもんよりもっと増やすべき関数あるだろと思うな
べき乗の関数とかさ。
0089デフォルトの名無しさん
2005/08/08(月) 21:25:45べき乗だけに増やすべき
0090デフォルトの名無しさん
2005/08/08(月) 23:40:13ショートコンテストとかにパクられるだけじゃねーの
0091ここは2.61以前用です。
2005/08/09(火) 00:51:270092デフォルトの名無しさん
2005/08/09(火) 00:53:033はどこ?
やっぱり分けた方がいいよね
0093デフォルトの名無しさん
2005/08/09(火) 00:57:41【夢見てた】HSPヨ専用【時代】
http://pc8.2ch.net/test/read.cgi/tech/1115484838/
0095ホスプロ ◆HOTsoUpxjY
2005/08/09(火) 01:01:300096デフォルトの名無しさん
2005/08/09(火) 01:37:11時が止まってます。
0097おまんこ刑事(デカ)
2005/08/09(火) 02:32:110098デフォルトの名無しさん
2005/08/09(火) 02:35:26あんなもんは値を丸めるのには適さん。
まだfloorとかを実装してくれた方がありがたい。
0099デフォルトの名無しさん
2005/08/09(火) 02:50:20>>87のサンプルは、凄いですね!ありがとうございました。
0100デフォルトの名無しさん
2005/08/09(火) 02:56:290101デフォルトの名無しさん
2005/08/09(火) 02:57:55おいこら!
凄くなくても俺にも感謝しろ屋!>>78
■ このスレッドは過去ログ倉庫に格納されています