いわゆるスカッシュ
IchigoJam BASIC 版にもある いわゆるスカッシュ を
PanCake で作ってみました。
MSX 版 も存在し、この MSX 版に似せてあります。
実行すると PanCake 画面になりゲーム開始。
左右のカーソルキーで操作します。
IchigoJam 版と異なるのは、
押しっぱなしでも正常に動作する事です。
また、当てると通常は1点加わりますが、
これが複数点になる裏技があります。
落としてしまうとゲーム終了。
スコア表示のため、画面はそのままにしています。
スペースキーで IchigoJam 画面へ戻ります。
さすがに PanCake の通常コマンドでは
IchigoJam BASIC が容量不足になってしまうため、
バイナリーコマンドを使用しています。
10 'PanCake ｲﾜﾕﾙ ｽｶｯｼｭ
15 IF VER()>11000 UART 1
20 VIDEO 0:?CHR$(128,4,5,1)
30 ?CHR$(128,5,7,0,#A6)
40 ?CHR$(128,6,8,0,0,1)
50 ?CHR$(128,5,7,1,#A6)
60 ?CHR$(128,6,8,1,7,1)
70 ?CHR$(128,5,7,2,#A6)
80 ?CHR$(128,6,8,2,14,1)
90 ?CHR$(128,5,7,3,#59)
100 ?CHR$(128,5,7,4,#9B)
110 ?CHR$(128,4,6,#1B)
120 S=0:X=RND(72):Y=0:N=1:P=40
130 IF Y<40 M=1 ELSE M=-1
140 ?CHR$(128,6,8,3,X,Y)
150 ?CHR$(128,6,8,4,P,40)
160 WAIT 5
170 IF X+M<0 OR X+M>71 M=-M
180 IF Y+N<0 N=1
190 IF Y+N>44 GOTO 300
200 IF Y+N<35 OR Y+N>45 GOTO 260
210 IF X-P<-6 OR X-P>6 GOTO 260
220 S=S+1:N=-1
230 ?CHR$(128,5,7,0,#A6+S/100)
240 ?CHR$(128,5,7,1,#A6+S%100/10)
250 ?CHR$(128,5,7,2,#A6+S%10)
260 X=X+M:Y=Y+N
270 P=P-BTN(LEFT)*2+BTN(RIGHT)*2
280 P=(P+72)%72
290 GOTO 140
300 IF !BTN(SPACE) GOTO 300
310 ?CHR$(128,4,6,#FF)
320 ?CHR$(128,4,5,0):VIDEO 1MixJuice ダウンロード ?"MJ GET kidspod.club/mj/618
MicJack ダウンロード ?"MJ GKP 618
PanCakeプチコン３号Edition 版
一回り大きいため、難易度は通常版より優しくなっています。
10 'ﾌﾟﾁｺﾝ3ｺﾞｳ ｲﾜﾕﾙ ｽｶｯｼｭ
15 IF VER()>11000 UART 1
20 VIDEO 0:?CHR$(128,4,5,1)
30 ?CHR$(128,5,7,0,#A6)
40 ?CHR$(128,6,8,0,0,1)
50 ?CHR$(128,5,7,1,#A6)
60 ?CHR$(128,6,8,1,7,1)
70 ?CHR$(128,5,7,2,#A6)
80 ?CHR$(128,6,8,2,14,1)
90 ?CHR$(128,5,7,3,#37)
100 ?CHR$(128,5,7,4,#9B)
110 ?CHR$(128,4,6,#1B)
120 S=0:X=RND(72):Y=0:N=1:P=40
130 IF Y<40 M=1 ELSE M=-1
140 ?CHR$(128,6,8,3,X,Y)
150 ?CHR$(128,6,8,4,P,40)
160 WAIT 5
170 IF X+M<0 OR X+M>71 M=-M
180 IF Y+N<0 N=1
190 IF Y+N>45 GOTO 300
200 IF Y+N<35 OR Y+N>45 GOTO 260
210 IF X-P<-6 OR X-P>6 GOTO 260
220 S=S+1:N=-1
230 ?CHR$(128,5,7,0,#A6+S/100)
240 ?CHR$(128,5,7,1,#A6+S%100/10)
250 ?CHR$(128,5,7,2,#A6+S%10)
260 X=X+M:Y=Y+N
270 P=P-BTN(LEFT)*2+BTN(RIGHT)*2
280 P=(P+72)%72
290 GOTO 140
300 IF !BTN(SPACE) GOTO 300
310 ?CHR$(128,4,6,#FF)
320 ?CHR$(128,4,5,0):VIDEO 1MixJuice ダウンロード ?"MJ GET kidspod.club/mj/631
MicJack ダウンロード ?"MJ GKP 631
PanCakeプチコン３号Edition: ©PCN ©SmileBoom Co.Ltd.
SmileBoom、プチコン３号 は 株式会社スマイルブーム の登録商標です。
PanCake プチコン３号Edition に組み込まれている
「プチコン３号」の キャラクター および 背景画像 は
株式会社スマイルブーム と PCN との
ライセンス契約に基づいて提供されています。
イチゴジャム レシピ は 株式会社スマイルブーム からキャラクター等について、
掲載の確認・了承をいただいています。
CakeRes✕レトロゲームズ版
IchigoCake の拡張コマンドに変更しています。
オリジナルに合わせた大きさのボールにしていますが、
90 PC.SCREATE 3,#02 に変更してパックマンをボールにしても面白いです。(一回り大きくなります)
10 'ResXﾚﾄﾛ ｲﾜﾕﾙ ｽｶｯｼｭ
15 POKE #1E02,0:'1.3.2 bug
20 UART 1:VIDEO 0:PC.VIDEO 1
30 PC.SCREATE 0,#A6
40 PC.SMOVE 0,0,1
50 PC.SCREATE 1,#A6
60 PC.SMOVE 1,7,1
70 PC.SCREATE 2,#A6
80 PC.SMOVE 2,14,1
90 PC.SCREATE 3,#38
100 PC.SCREATE 4,#9B
110 PC.SSTART #1B
120 S=0:X=RND(72):Y=0:N=1:P=40
130 IF Y<40 M=1 ELSE M=-1
140 PC.SMOVE 3,X,Y
150 PC.SMOVE 4,P,40
160 WAIT 5
170 IF X+M<0 OR X+M>71 M=-M
180 IF Y+N<0 N=1
190 IF Y+N>45 GOTO 300
200 IF Y+N<35 OR Y+N>45 GOTO 260
210 IF X-P<-6 OR X-P>6 GOTO 260
220 S=S+1:N=-1
230 PC.SCREATE 0,#A6+S/100
240 PC.SCREATE 1,#A6+S%100/10
250 PC.SCREATE 2,#A6+S%10
260 X=X+M:Y=Y+N
270 P=P-BTN(28)*2+BTN(29)*2
280 P=(P+72)%72
290 GOTO 140
300 IF !BTN(32) CONT
310 PC.SSTART #FF
320 PC.VIDEO 0:VIDEO 1MixJuice ダウンロード ?"MJ GET kidspod.club/mj/819
MicJack ダウンロード ?"MJ GKP 819
イチゴジャム レシピ では jig.jp・B Inc.・na-s.jp (株式会社ナチュラルスタイル)
の確認・了承を得て商標・公式ロゴを使用しています。
IchigoLatte is a registered trademark in Japan
of the Natural Style Co,Ltd. (na-s.jp)
IchigoJam Recipe (イチゴジャム レシピ) has confirmation and approval
for the use of trademarks and official logos of jig.jp, B Inc. and na-s.jp.
SkyBerryJAM は 栃木県立栃木工業高等学校 が管理する登録商標であり、
SkyBerryJAM は 栃木県立栃木工業高等学校 の商標です。
managed by Tochigi Technical High School (Tochiko)
Raspberry Pi は
Raspberry Pi 財団 の登録商標です。
Raspberry Pi is a registered trademark or
trademark of
the Raspberry Pi Foundation.
"RISC-V" の商品名は RISC-Vインターナショナル が管理する登録商標です。
The “RISC-V” trade name is a registered trade mark of
RISC-V International.
イチゴジャム レシピ は jig.jp・B Inc.・na-s.jp・
IchigoJam Recipe (イチゴジャム レシピ) is NOT an official website
by jig.jp, B Inc., na-s.jp and PCN (Program Club Network).
クリエイティブ・コモンズ 表示 4.0 国際 ライセンス
(シェアボタン、PanCake 公式ロゴ、MSX フォント、
(Share button, PanCake Offical Logo, MSX font, Nyan Cat,
Denshi Kousaku Magazine & Micom BASIC Magazine Images,
Petit Computer Images, KDDI / Jimdo footer and
objects with the license specification are excluded)