HSPTV!掲示板

僕のサイトで、HSPMakeというサイトやっているんですが、
まだまだ情報量めちゃくちゃ少ないので、皆さんの作ったソフトを募集します。

メールアドレス：nozomuh@cd6.so-net.ne.jp

ホーム：

http://www009.upp.so-net.ne.jp/nonjoe/hspmake/

・・・うわぁ

昨日今日の流れで、こう来られると、逆に大物臭を感じてしまうな。

っつか何の前置きもなしに、何故いきなり計算の仕方をｗ
もっと計画的にやったほうがいいかと思われ。

・・・しかしスゲェ方ですね。
これからも色々な意味で頑張って欲しい。

MX=220
MY=10
hp=2000    
ki=3
kkk=rnd(20)
tasei=0

screen 0,240,220
*kjkjk
color 254, 254, 254 : boxf : color : pos 0, 0
randomize
mes mk
kkk=rnd(66)

mes "体力"+hp
mes ki
if mk>2000{
	my+19
	mes"強風"}
	if mk>5000{
	mx+30
	mes"大雨"}




pos mx,px
  color 255,0,255
mes"★"
pos 11,px
  color 255,0,255
mes"★"

pos 137,px
  color 255,0,255

mes"★"
pos 12,px
  color 255,0,255
mes"★"
pos 222,px
  color 255,0,255
mes"★"
  color 255,0,255
pos 125,px
mes"★"

 color 0,0,0
	pos MX,MY				;自キャラ表示
mes"A"




	stick KY,31
	if (KY&1)=1 :MX=MX-kkk :if MX<0 :MX=0		;左移動
	if (KY&4)=4 :MX=MX+kkk :if MX>448 :MX=448	;右移動
	if (KY&2)=2 :MY=MY-kkk :if MY<0 :MY=0		;上移動
	if (KY&8)=8 :MY=MY+kkk :if MY>288 :MY=288	;下移動

   	await 30
mk+5
	po+8
	pk+3
if	ki=0{
goto*geemuobo
}
pget mx,my
if ginfo_r=255 {hpp-1000
my+58}
	px+7

if po>300{
	po-300}
if px>300{
	px-300}

	if hpp<0 {ki-1
hpp+5000
}

goto *kjkjk




*geemuobo
cls 0
mes"ヤラレチャッタ"
pos 20,60
button"戻る",*kjkjk
stop

これでもいいなら
僕のHOMEの事も書いてください