2012年10月20日投稿 / 投稿者 : ルート / タグ : 投稿プログラム ゲーム QRコード mkII専用
はじめまして、「ルート」です。
まだ分からないことが多いですが、よろしくお願いします。
右からやってくる奴を斬るゲームです。
自分の真横に来た瞬間にAボタンで「ズバッ」とやります。
「ズバッ」とやると、新しいのが右からやってきて、どんどん速くなります。
逃がしてしまうと1ミス、3ミスでゲームオーバーです。
一応ハイスコア機能がついてます。
プチコンmkII 向けの QR コードです。
- @S0
- ACLS:CLEAR:SPSET 3,81,2,0,0,0
- SPOFS 3,20,100:SPSCALE 3,200
- GLINE 0,120,255,120,2
- SPSET 4,132,3,0,0,0
- SPOFS 4,70,100:SPSCALE 4,200
- ?”─┬─┘───┐─┬─┘ │ │ │ │
- WAIT 20
- ?” │ │ │ ─┼┼┼│ │ │
- WAIT 20
- ?” │ │ ┘ │ ─┼─ │
- WAIT 20
- ?” │ │ │ │ ─┘ ●
- ?
- WAIT 20
- ?”(C) 2012 ROOT”:?:?:?
- ?”HIT ANY BUTTON!
- LOAD ”MEM:ROIAI”,FALSE
- H=VAL(MEM$):BGMPLAY 13
- LOCATE 11,21?”ハイスコア ”;H
- @S1
- B=BUTTON()
- IF B==0 GOTO @S1
- ACLS:SPSET 0,64,2,0,0,0
- X=250:GLINE 0,160,255,160,8
- SPSET 1,132,3,0,0,0:V=1:L=3
- SPOFS 0,120,144:SYSBEEP=0
- @L
- SPCHR 0,64
- LOCATE 15,17?C
- LOCATE 17,17?”コンホ゛!
- LOCATE 4,2?”ライフ”;L
- LOCATE 12,2?”サイタ゛イ”;M
- LOCATE 21,2?”タオシタ”;S
- LOCATE 11,21?”ハイスコア ”;H
- X=X−V:SPOFS 1,X,144
- K=SPHIT(0,1):B=BUTTON(2)
- IF (K) AND B==16THEN C=C+1:X=255:V=V+.5:BEEP 11:SPCHR 0,81:WAIT 3
- WAIT 1
- IF X>0GOTO @L
- IF C>M THEN M=C
- L=L−1:X=255:V=1:S=S+C:C=0:CLS
- BEEP 13:LOCATE 11,21?”ハイスコア ”;H
- IF L>0GOTO @L
- LOCATE 12,2?”サイタ゛イ”;M
- LOCATE 21,2?”タオシタ”;S
- LOCATE 12,12?”シュウリョウ!
- BGMSTOP:BEEP 64:WAIT 60
- LOCATE 10,10?”ケッカハッヒ゜ョウ
- LOCATE 10,12?”タオシタカス゛ ”;S
- LOCATE 10,13?”サイタ゛イコンホ゛ ”;M
- S=M+S:COLOR 3
- LOCATE 10,14?”スコア ”;S
- @B
- B=BUTTON()
- IF B==0 GOTO @B
- IF H<S THEN ?” NEW RECORD!!” ELSE GOTO @S0
- MEM$=STR$(S):SAVE ”MEM:ROIAI
- GOTO @S0
このプログラムへの投票です。
この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は掲示板へ)
表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.126 秒 | このページの最終更新 : 2022/09/20 (火) 12:43:54 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30