Enjoy programming more!
Kidspod is a post site which supports young programmers.
First step to join us.
Register as a member
For members

2021/09/23 18:22:21

MixJuice GET URL : kidspod.club/mj/2094

IchigoJam オープニング

IchigoJam officially logo - CC BY IchigoJam https://ichigojam.net/ Licensed by jig.jp

IchigoJamのオープニングです。
これをプログラムの0番に保存すると、IchigoJamの起動時にこの画面が表示されるようになります。
画面に表示されている1.4.3などはバージョンによって変わります。
この画面でEnterを押すと、IchigoJamが使用できます。
ボタンを押しながら電源を入れると、ピピッと鳴ってLRUN1が実行されます。
IchigoJam BASIC RPiにも対応しているはずです。

IchigoJam webでの動物コードは、
「キツネ」「オオカミ」「モモンガ」
です。IchigoJam webの象のマークから読み込んでください。

  • 1
  • 2
  • 1
  • 2

SOURCE CODE

' IchigoJam officially logo - CC BY IchigoJam http://ichigojam.net/ Licensed by jig.jp

10 @ARUN:'OPENING
20 IF BTN() BEEP:WAIT6:BEEP:LRUN1
30 CLS:POKE#A27,133,0,0,133,0,129,0,0,0,0,0,133:POKE#A47,133,135,129,135,133,133,135,133,135,133,0,133,135,133,139,139,139
40 POKE#A67,129,131,129,129,129,129,131,133,131,129,131,129,131,131,130,130,130:POKE#A87,131,131,131,131,131,129,131,129,131,131,131,131,131,131,131,131,131
50 LET[0],VER()/10000,VER()/1000%10,VER()/100%10
60 IF VER(1)=1 LC5,13:?"IchigoJam BASIC",[0];".";[1];".";[2]:LC11,14:?"by jig.jp":GOTO 90
70 LC4,13:?"IchigoJam BASIC",[0];".";[1];".";[2];"RPi"
80 LC13,14:?"jig.jp":LC7,15:?"forked by na-s.jp"
90 LC10,23:?"START:Enter";
100 IF INKEY()!=10 GOTO100
110 BEEP:CLS:?"IchigoJam BASIC",[0];".";[1];".";[2];
120 IF VER(1)=1 ?" by jig.jp"
130 ?"RPi jig.jp":?"forked by na-s.jp"
140 CLV:NEW

COMMENT

Kidspod運営チーム
Kidspod運営チーム2021/10/01 16:37:45

おお、かっこいい画面! しっかりロゴが出ると、それだけでもプログラミング熱が上がります。