HSPのプログラムを書け!

このエントリーをはてなブックマークに追加
1デフォルトの名無しさん:03/02/11 20:47
repeat 99999999999
mes "aho"
loop
stop
FILE *fp;
3デフォルトの名無しさん:03/02/11 20:49
mes ">>22を殺します"
stop
mes ">>1冬厨氏ね"
5デフォルトの名無しさん:03/02/11 21:12
mes ">>4生殺し厨氏ね"
  ∧_∧
 ( ´∀`)< ぬるぽ
名スレの予感

        ∧∧  ミ _ ドスッ
        (   ,,)┌─┴┴─┐
       /   つ.  終  了 │
     〜′ /´ └─┬┬─┘
      ∪ ∪      ││ _ε3
               ゛゛'゛'゛
8デフォルトの名無しさん:03/02/11 22:50
*main
goto *main
重複スレです。

HSPに憑いて…その4
http://pc2.2ch.net/test/read.cgi/tech/1041292379/
goto >>1
  ( ・∀・)   | | ガッ
 と    )    | |
   Y /ノ    人
    / )    <  >__Λ∩
  _/し' //. V`Д´)/
 (_フ彡        /  ←>>6
str a:memset a,'@',43
mes a:stop
13由美(ネカマ1号機):03/02/15 00:41
buffer 1,0,0,640,480:picload "haikei.jpg"
sndload "bgm.midi",1,1
gsel 0

kasoru=1
snd 1
at=0:df=0
*main
repeat
redraw 0,0,0,640,480
pos 0,0:gcopy 1,0,0,640,480
mes"どこへ逝きますか?"
pos 20,20:mes"あの娘の家を見に逝く"
pos 20,40:mes"コンビニへ逝く"
pos 20,60:mes"魔王を倒しに逝く"
if sentaku=1:pos 10,20:mes"●"
if sentaku=2:pos 10,40:mes"●"
if sentaku=3:pos 10,60:mes"●"
14由美(ネカマ1号機):03/02/15 00:42
getkey ue,38
getkey sita,40
getkey enta,13
if ue=1:sentaku=sentaku-1:if sentaku<1:sentaku=3
if sita=1:sentaku=sentaku+1:if sentaku>3:sentaku=1
if enta=1:break
await 1
redraw 1,0,0,640,480
loop

if kasoru=1:goto *ivesono1
if kasoru=2:goto *ivesono2
if kasoru=3:goto *ivesono3

;あとよろしく。
15由美(ネカマ1号機)
あ、
拡張子が「midi」になってる(+_+)