PK
本体ボタンが複数個ある IchigoJam 互換機が増えたため、
このボタンを使用したゲームを検討したところ、
ちょうど FIFA ワールドカップ が開催されたばかりで、
サッカーを作ろうとも考えていたので、
PK（ペナルティーキック）を作ってみました。
IchigoJam がゴールキーパーです。
ゴールの左右どちらかへ蹴り、ゴールして下さい。
キーボードの矢印 ← → で左右へ蹴ります。
また一部 IchigoJam 互換機ではボタンも使用可能です。
BTN が左、IN1 が右へ蹴ります。
- SkyBerryJAM - 手前ボタン BTN＝左 / TSW1＝右
- KumaJam - くまモンの頭を手前にして左右ボタン
ループになっているので、Esc キーで止めた後、
文字が大きいままなので、
VIDEO 1（F8 キー）で元の大きさへ戻して下さい。
SkyBerryJAM は BTN で左、TSW1・IN1 で右
KumaJam はくまモンの頭を手前にして左右ボタン
IchigoJam は通常 IN(1) で 1 を返しますが、IN 端子が存在しない IchigoJam web は IN(1) で 0 を返します。
そのままだと意図しない動作をします。次の行を変更し、キーボード操作のみにして下さい。
70 K=INKEY():L=(K=28)
80 R=(K=29)下のリンク「IchigoJam web で実行」ではこの行を変更済みです。
10 'PK
20 VIDEO 5:CLS:CLV:CLP
30 ?CHR$(0,#88,#8C,#8C,#8C,#84)
40 ?CHR$(0,#8A,3,#F9,3,#85)
50 LC 2,4:?CHR$(#E0,#6F,#E1)
60 C=RND(2)
70 K=INKEY():L=(K=28)+BTN()
80 R=(K=29)+(1-IN(1))
90 IF L+R<>1 GOTO 70
100 LC 2,4:?CHR$(0,0,0)
110 FOR Y=3 TO 2 STEP -1
120 IF Y=3 X=3 ELSE X=2+R*2
130 LC X,Y:?"o";:WAIT 5
140 ?CHR$(#1C,0):NEXT
150 LC 2,1:IF C=1 GOTO 170
160 ?CHR$(#FD,3,3):GOTO 180
170 ?CHR$(3,3,#FB)
180 G=0:IF C=1 AND L=1 G=1
190 IF C=0 AND R=1 G=1
200 LC 2+R*2,2-G:?"o"
210 IF G=0 GOTO 230
220 LC 1,3:?"GOAL!"
230 WAIT 180:GOTO 20
IchigoJam web でプログラムを実行します。
このQRコードはアクセス解析のためにCookieを使用しています。
アクセス解析は匿名で収集されており、個人を特定するものではありません。
この機能はCookieを無効にすることで収集を拒否することができますので、
お使いのデバイスのブラウザの設定をご確認ください。
MixJuice ダウンロード ?"MJ GET kidspod.club/mj/607
MicJack ダウンロード ?"MJ GKP 607
イチゴジャム レシピ では 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)