ＨＳＰでＲＰＧ作ろうぜ

**名無し** · 2006/07/16(日) 04:56:08

とりあえず素材とかは自作とhttp://www.geocities.jp/naoruyo1937/ここにある素材で。

**159** · 2007/12/04(火) 02:30:30

HSP2,6
だから、上手くいくかわからないけど……

*topの前に
screen 0,192,134
を追加。

*start gosub *clear
mes"じゃんけんだよ！"
button"ぐー",*gu
button"チョキ",*choki
button"パー",*pa
stop

*start
gosub *clear
mes"じゃんけんだよ！"

pos 0,110
button"ぐー",*gu

pos 64,110
button"チョキ",*choki

pos 128,110
button"パー",*pa
stop
に変更。

**159** · 2007/12/04(火) 02:31:52

サブルーチンとして以下二つの追加。

*teki
if a=1{ mes "相手"
wait 60:pos 32,16:mes "チョキ"
wait 60:pos 0,32:mes "貴方"
wait 60:pos 32,48
gosub *me
}
if a=2{ mes "相手"
wait 60:pos 32,16:mes "ぐー"
wait 60:pos 0,32:mes "貴方"
wait 60:pos 32,48
gosub *me
}

if a=3{ mes "相手"
wait 60:pos 32,16:mes "パー"
wait 60:pos 0,32:mes "貴方"
wait 60:pos 32,48
gosub *me
}
wait 80
pos 0,80
return
*me
if b=1:mes "ぐー"
if b=2:mes "チョキ"
if b=3:mes "パー"
return

**159** · 2007/12/04(火) 02:35:49

*gu
*choki
*pa
の行の下に
b=1
b=2
b=3
を追加。

すべての「gosub *clear」の下に
「gosub *teki」の命令を追加。

……主が言いたいのはこんなところなのかな？
勝手に書いちゃったけど……動作しなかったらごめん。
あと、わかりにくかったらすまん。