FC2ブログ

Entries

スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。
この記事に対してトラックバックを送信する(FC2ブログユーザー)
http://sakemasu.blog101.fc2.com/tb.php/84-f71750df

-件のトラックバック

-件のコメント

コメントの投稿

投稿フォーム
投稿した内容は管理者にだけ閲覧出来ます

プチコンのプログラム3

みなさんこんにちは。
もう少し備品を整えれば物置で仕事再開できそうなサケマスです。

今朝ちこっとプチコンでゲームを作ったので、せっかくなので公開します。
当然ながらしょぼい内容ですけどね!

――――――――――――――――――――――――――――――――

CLS:CLEAR:DIM MAP$(23)
VISIBLE 1,1,0,0,0,0
LOCATE 12,11:PRINT "CAVE GAME"
@TITLE
BT=BUTTON()
IF BT<1 OR BT>128 THEN @TITLE
@START
FOR F=0 TO 22
MAP$(F)="■■■■■■■■■■"
MAP$(F)=MAP$(F)+" "
MAP$(F)=MAP$(F)+"■■■■■■■■■■"
NEXT F
X=15:SC=0:N=0:RW=10:RX=9
@MAIN1
IF SC>99999 THEN SC=99999
SC=SC+1:SC$=STR$(SC):SK=LEN(SC$)
FOR F=0 TO 5-SK
SC$="0"+SC$:NEXT F
IF SC/150>N+1 AND N<5 THEN N=N+1
MAP$(0)="":RX=RX+(RND(3)-1)
IF RX<0 THEN RX=RX+2
IF RX+RW>28 THEN RX=RX-2
FOR F=0 TO 29
IF F<=RX OR F>RX+RW-N THEN @MAIN2
MAP$(0)=MAP$(0)+" ":GOTO @MAIN3
@MAIN2
MAP$(0)=MAP$(0)+"■"
@MAIN3
NEXT F
BT=BUTTON()
X=X-(BT AND 4)/4+(BT AND 8)/8
FOR F=22 TO 1 STEP -1
MAP$(F)=MAP$(F-1)
LOCATE 1,F:PRINT MAP$(F)
NEXT F
LOCATE 10,0:PRINT "SCORE ";SC$
LOCATE X,21:PRINT "A"
VSYNC 2
AT$=MID$(MAP$(21),X-1,1)
IF AT$==" " THEN @MAIN1
LOCATE 12,11:PRINT "GAME OVER"
@WAIT
IF BUTTON()>15 THEN @START
GOTO @WAIT

――――――――――――――――――――――――――――――――

10行目のスペースは10個です。
37行目のPRINT文の"A"はお好みの宇宙船のグラフィックにしてください。

遊び方

謎の洞窟惑星に突入せよ!君はどこまで進むことが出来るか!?
壁にぶつからないように左右のパッドで宇宙船を操作してください。

先にも書きましたように、そろそろ仕事再開も考えないといけないので
とりあえずプチコンはしばらく休止になるかな。
でもちこっといじるだけで何か作れるので
ネタが浮かんだら気分転換で何か作るかも知れません。

ではでは、またです~。
スポンサーサイト
デリヘルもソープもイメクラも気に入った子がきっと見つかる
超大型リニューアル中の大好評風俗情報サイト!
[PR]

この記事に対してトラックバックを送信する(FC2ブログユーザー)
http://sakemasu.blog101.fc2.com/tb.php/84-f71750df

0件のトラックバック

0件のコメント

コメントの投稿

投稿フォーム
投稿した内容は管理者にだけ閲覧出来ます

Appendix

06 | 2017/07 | 08
- - - - - - 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 - - - - -

プロフィール

P.N.サケマス。基本ニートですが、えろり漫画やイラストの仕事もしています。現在COMIC Mateにて放射能グルメ日記を連載中。お問い合わせなどはメールフォームからお願いいたします。

ぱんつ大好き

妹ぱんつ

同人情報

サケマスの成年向け同人ソフトのダウンロード販売情報です。どうぞよろしくお願いいたします。

DARK BLADE -DoF-

[ぱんつ工房] の【DARK BLADE-DoF-】

しおりの排泄日記

[ぱんつ工房] の【しおりの排泄日記】

ウィザーロリィ

[ぱんつ工房] の【ウィザーロリィ 兄妹の試練場】

ぱんつ天国

[ぱんつ工房] の【ぱんつ天国】 DLsiteさん ギュッと!さん

各店舗さんのバナーをクリックすると、別ウィンドウで購入ページが開きます。

お知らせ

過去の画像をご覧になりたい方は旧サイト『ぱんつ工房』の駄文および画像倉庫をご覧くださいませ。下のバナーをクリックすると別ウィンドウが開きます。

ひゃあああ!

点取り占い

点取り占いブログパーツ

ゲームコーナー

ポリンスマッシュ

おしえて!アミストル

4種類のゲームが遊べるよ!

ブログランキング

『ぱんつ工房ぶろぐ』を気に入ってくださった方は、ぽちっとランキングに投票してくださると嬉しいです。お一人さまにつき一日一回投票できます。

FC2ブログランキング

QRコード

QRコード
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。