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の象のマークから読み込んでください。
' 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