アマビエ
江戸時代の話。ところは肥後（現在の熊本県）
夜、海に光っているものを見つけ、役人が行ったところ、
そこには 妖怪アマビエ がいました。
「今後 6 年は豊作が続きます。
しかし疫病も流行するかもしれません。
その時は私の姿を描き写した絵を
人々へ早々に見せて下さい」
2020 年、新型コロナウイルスの世界的な流行と共に
日本では疫病退散にご利益がある
アマビエも各所で見られる状況になりました。
IchigoJam でもコロナの影響が見られますが、
IchigoJam らしくアマビエを出しておこうと
運営者は仮想グラフィックでアマビエを描いてみました。
IchigoJam でアマビエを表示させて疫病退散しましょう！
メモリマップよりプログラム領域が
IchigoJam BASIC と IchigoCake BASIC で異なるため、別々のプログラムで公開しています。
更に IchigoJam BASIC 1.0 以降・IJUtilities などのモニタに対応したバージョンと
IchigoJam BASIC 1.2 以降で COPY を用いて一瞬で表示するバージョンを用意しました。
IchigoJam BASIC 0.9.9-RC6～・モニタ対応
多くの IchigoJam で動作できるようにしたバージョンです。正式版 IchigoJam BASIC 1.0.0 以降で動作可能です。
IJUtilities などのモニタ表示にも対応しています。
POKE #E40,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E48,#20,#20,#20,#20,#20,#8C,#83,#89
POKE #E50,#86,#89,#84,#20,#20,#20,#20,#20
POKE #E58,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E60,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E68,#20,#20,#20,#20,#86,#88,#83,#89
POKE #E70,#86,#89,#86,#89,#20,#20,#20,#20
POKE #E78,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E80,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E88,#20,#20,#20,#8A,#88,#81,#8C,#83
POKE #E90,#83,#8C,#82,#84,#89,#20,#20,#20
POKE #E98,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EA0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EA8,#20,#20,#20,#85,#85,#86,#20,#20
POKE #EB0,#20,#20,#89,#82,#84,#85,#20,#20
POKE #EB8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EC0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EC8,#20,#20,#8A,#8E,#8C,#81,#86,#84
POKE #ED0,#20,#20,#86,#84,#85,#8A,#20,#20
POKE #ED8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EE0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EE8,#20,#20,#86,#89,#8C,#8D,#82,#20
POKE #EF0,#20,#88,#81,#85,#85,#8A,#20,#20
POKE #EF8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F00,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F08,#20,#20,#8A,#89,#8C,#81,#20,#20
POKE #F10,#20,#8A,#8A,#8A,#8A,#8A,#20,#20
POKE #F18,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F20,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F28,#20,#20,#8A,#8A,#8A,#89,#89,#89
POKE #F30,#89,#89,#89,#8B,#8A,#82,#84,#20
POKE #F38,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F40,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F48,#20,#20,#85,#8A,#89,#89,#89,#89
POKE #F50,#89,#89,#89,#89,#8B,#20,#85,#20
POKE #F58,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F60,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F68,#20,#20,#85,#8D,#89,#89,#89,#89
POKE #F70,#89,#89,#89,#89,#89,#85,#85,#20
POKE #F78,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F80,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F88,#20,#20,#85,#8D,#89,#89,#89,#89
POKE #F90,#89,#89,#89,#89,#89,#85,#85,#20
POKE #F98,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FA0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FA8,#20,#8A,#8A,#20,#85,#8A,#20,#85
POKE #FB0,#20,#85,#8A,#20,#85,#8A,#8A,#20
POKE #FB8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FC0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FC8,#20,#20,#81,#8B,#81,#8A,#88,#81
POKE #FD0,#84,#89,#8A,#20,#8B,#81,#81,#20
POKE #FD8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FE0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FE8,#20,#20,#20,#20,#83,#83,#81,#83
POKE #FF0,#83,#81,#83,#83,#81,#20,#20,#20
POKE #FF8,#20,#20,#20,#20,#20,#20,#20,#20
10 'ｱﾏﾋﾞｴ
20 CLS
30 LC0,5
40 FOR A=#E40 TO #FFF
50 ? CHR$(PEEK(A));
60 NEXT
70 IF !INKEY() GOTO 70
80 CLS
IchigoJam web でプログラムを実行します。
このQRコードはアクセス解析のためにCookieを使用しています。
アクセス解析は匿名で収集されており、個人を特定するものではありません。
この機能はCookieを無効にすることで収集を拒否することができますので、
お使いのデバイスのブラウザの設定をご確認ください。
MixJuice ダウンロード ?"MJ GET kidspod.club/mj/971
MicJack ダウンロード ？”MJ SPW 30 → ?"MJ GKP 971
IchigoJam BASIC 1.2.0～
IchigoJam BASIC 1.2 より採用されている COPY を用いてすぐ表示するようにしたバージョンです。
POKE #E40,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E48,#20,#20,#20,#20,#20,#8C,#83,#89
POKE #E50,#86,#89,#84,#20,#20,#20,#20,#20
POKE #E58,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E60,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E68,#20,#20,#20,#20,#86,#88,#83,#89
POKE #E70,#86,#89,#86,#89,#20,#20,#20,#20
POKE #E78,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E80,#20,#20,#20,#20,#20,#20,#20,#20
POKE #E88,#20,#20,#20,#8A,#88,#81,#8C,#83
POKE #E90,#83,#8C,#82,#84,#89,#20,#20,#20
POKE #E98,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EA0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EA8,#20,#20,#20,#85,#85,#86,#20,#20
POKE #EB0,#20,#20,#89,#82,#84,#85,#20,#20
POKE #EB8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EC0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EC8,#20,#20,#8A,#8E,#8C,#81,#86,#84
POKE #ED0,#20,#20,#86,#84,#85,#8A,#20,#20
POKE #ED8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EE0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #EE8,#20,#20,#86,#89,#8C,#8D,#82,#20
POKE #EF0,#20,#88,#81,#85,#85,#8A,#20,#20
POKE #EF8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F00,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F08,#20,#20,#8A,#89,#8C,#81,#20,#20
POKE #F10,#20,#8A,#8A,#8A,#8A,#8A,#20,#20
POKE #F18,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F20,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F28,#20,#20,#8A,#8A,#8A,#89,#89,#89
POKE #F30,#89,#89,#89,#8B,#8A,#82,#84,#20
POKE #F38,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F40,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F48,#20,#20,#85,#8A,#89,#89,#89,#89
POKE #F50,#89,#89,#89,#89,#8B,#20,#85,#20
POKE #F58,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F60,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F68,#20,#20,#85,#8D,#89,#89,#89,#89
POKE #F70,#89,#89,#89,#89,#89,#85,#85,#20
POKE #F78,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F80,#20,#20,#20,#20,#20,#20,#20,#20
POKE #F88,#20,#20,#85,#8D,#89,#89,#89,#89
POKE #F90,#89,#89,#89,#89,#89,#85,#85,#20
POKE #F98.#20,#20,#20,#20,#20,#20,#20,#20
POKE #FA0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FA8,#20,#8A,#8A,#20,#85,#8A,#20,#85
POKE #FB0,#20,#85,#8A,#20,#85,#8A,#8A,#20
POKE #FB8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FC0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FC8,#20,#20,#81,#8B,#81,#8A,#88,#81
POKE #FD0,#84,#89,#8A,#20,#8B,#81,#81,#20
POKE #FD8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FE0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #FE8,#20,#20,#20,#20,#83,#83,#81,#83
POKE #FF0,#83,#81,#83,#83,#81,#20,#20,#20
POKE #FF8,#20,#20,#20,#20,#20,#20,#20,#20
10 'ｱﾏﾋﾞｴ
20 CLS
30 COPY #9A0,#E40,448
40 IF !INKEY() CONT
50 CLS
IchigoJam web でプログラムを実行します。
このQRコードはアクセス解析のためにCookieを使用しています。
アクセス解析は匿名で収集されており、個人を特定するものではありません。
この機能はCookieを無効にすることで収集を拒否することができますので、
お使いのデバイスのブラウザの設定をご確認ください。
MixJuice ダウンロード ?"MJ GET kidspod.club/mj/969
MicJack ダウンロード ？”MJ SPW 30 → ?"MJ GKP 969
IchigoCake BASIC
IchigoCake BASIC はプログラム領域の番地が異なるので、別のプログラムにしました。
POKE #19A0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #19A8,#20,#20,#20,#20,#20,#8C,#83,#89
POKE #19B0,#86,#89,#84,#20,#20,#20,#20,#20
POKE #19B8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #19C0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #19C8,#20,#20,#20,#20,#86,#88,#83,#89
POKE #19D0,#86,#89,#86,#89,#20,#20,#20,#20
POKE #19D8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #19E0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #19E8,#20,#20,#20,#8A,#88,#81,#8C,#83
POKE #19F0,#83,#8C,#82,#84,#89,#20,#20,#20
POKE #19F8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A00,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A08,#20,#20,#20,#85,#85,#86,#20,#20
POKE #1A10,#20,#20,#89,#82,#84,#85,#20,#20
POKE #1A18,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A20,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A28,#20,#20,#8A,#8E,#8C,#81,#86,#84
POKE #1A30,#20,#20,#86,#84,#85,#8A,#20,#20
POKE #1A38,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A40,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A48,#20,#20,#86,#89,#8C,#8D,#82,#20
POKE #1A50,#20,#88,#81,#85,#85,#8A,#20,#20
POKE #1A58,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A60,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A68,#20,#20,#8A,#89,#8C,#81,#20,#20
POKE #1A70,#20,#8A,#8A,#8A,#8A,#8A,#20,#20
POKE #1A78,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A80,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1A88,#20,#20,#8A,#8A,#8A,#89,#89,#89
POKE #1A90,#89,#89,#89,#8B,#8A,#82,#84,#20
POKE #1A98,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1AA0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1AA8,#20,#20,#85,#8A,#89,#89,#89,#89
POKE #1AB0,#89,#89,#89,#89,#8B,#20,#85,#20
POKE #1AB8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1AC0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1AC8,#20,#20,#85,#8D,#89,#89,#89,#89
POKE #1AD0,#89,#89,#89,#89,#89,#85,#85,#20
POKE #1AD8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1AE0,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1AE8,#20,#20,#85,#8D,#89,#89,#89,#89
POKE #1AF0,#89,#89,#89,#89,#89,#85,#85,#20
POKE #1AF8,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1B00,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1B08,#20,#8A,#8A,#20,#85,#8A,#20,#85
POKE #1B10,#20,#85,#8A,#20,#85,#8A,#8A,#20
POKE #1B18,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1B20,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1B28,#20,#20,#81,#8B,#81,#8A,#88,#81
POKE #1B30,#84,#89,#8A,#20,#8B,#81,#81,#20
POKE #1B38,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1B40,#20,#20,#20,#20,#20,#20,#20,#20
POKE #1B48,#20,#20,#20,#20,#83,#83,#81,#83
POKE #1B50,#83,#81,#83,#83,#81,#20,#20,#20
POKE #1B58,#20,#20,#20,#20,#20,#20,#20,#20
10 'ｱﾏﾋﾞｴ
20 CLS
30 COPY #9A0,#19A0,448
40 IF !INKEY() CONT
50 CLSMixJuice ダウンロード ?"MJ GET kidspod.club/mj/970
MicJack ダウンロード ?"MJ SPW 30 → ?"MJ GKP 970
IchigoJam 関連で他に公開されているアマビエ
IchigoJam 関連では他に次のアマビエが公開されています。
-
AmabieDakeペンダント | PCN
IchigoDake のアマビエ形状。DakeCap＋ネックストラップ付です。
初期状態では目が光るプログラムが入っていて、胸にぶらさげて目を光らせて疫病退散できます。
IchigoJam は 株式会社jig.jp の登録商標です。
IchigoLatte は 株式会社ナチュラルスタイル の登録商標です。
イチゴジャム レシピ では jig.jp・B Inc.・na-s.jp (株式会社ナチュラルスタイル)
の確認・了承を得て商標・公式ロゴを使用しています。
イチゴジャム レシピ では jig.jp・B Inc.・na-s.jp (株式会社ナチュラルスタイル)
の確認・了承を得て商標・公式ロゴを使用しています。
IchigoJam is a registered trademark in Japan of the jig.jp co., ltd.
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.
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 は 栃木県立栃木工業高等学校 の商標です。
SkyBerryJAM is a registered trademark in Japan
managed by Tochigi Technical High School (Tochiko)
managed by Tochigi Technical High School (Tochiko)
and SkyBerryJAM is a trademark in Japan by Tochiko.
IchigoKamuy は 株式会社syushu の登録商標です。
IchigoKamuy is a registered trademark in Japan of the syushu Inc.
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・
イチゴジャム レシピ は jig.jp・B Inc.・na-s.jp・
PCN (一般社団法人プログラミングクラブネットワーク) 運営の公式サイトではありません。
IchigoJam Recipe (イチゴジャム レシピ) is a site operated by an individual.
IchigoJam Recipe (イチゴジャム レシピ) is NOT an official website
by jig.jp, B Inc., na-s.jp and PCN (Program Club Network).
IchigoJam Recipe (イチゴジャム レシピ) is NOT an official website
by jig.jp, B Inc., na-s.jp and PCN (Program Club Network).
本サイトのライセンス明記がない画像・テキストは
クリエイティブ・コモンズ 表示 4.0 国際 ライセンス
クリエイティブ・コモンズ 表示 4.0 国際 ライセンス
で提供しています
(シェアボタン、PanCake 公式ロゴ、MSX フォント、
(シェアボタン、PanCake 公式ロゴ、MSX フォント、
Nyan Cat、電子工作マガジン・マイコンBASICマガシン画像、
プチコン画像、KDDI・Jimdo フッダを除く)
This site image and text license: CC BY 4.0
(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)
(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)