バナー(電光掲示板)
福野さんのブログ記事を見たのです。
ちりめんx電子工作 +ITで広がる「ものづくりのまち鯖江」 | 福野泰介の一日一創
ここで IchigoDot という簡易電光掲示板が
紹介されているのですが、それを見て
「これを IchigoJam の画面でも！」
とピンときまして、形にしてみました。
0.9.7 で採用されたコマンド SCROLL により、
上以外に下左右へのスクロールも
容易に行えるようになったので、これが実現できました。
とはいっても配列を [100] までフルに使い、
容量もギリギリまで使っている大作です。
IchigoJam BASIC RPi は処理速度がはやいため
スクロールもはやくなります。次の 1 行を加えて下さい。
305 WAIT 5IchigoJam BASIC 0.9.9〜
5 'ﾊﾞﾅｰ (ﾃﾞﾝｼｹｲｼﾞﾊﾞﾝ)
10 CLS:CLV
20 LET [0],12291,12291,16383,16383
30 LET [4],12291,12291,0,0
40 LET [8],4032,4032,12336,12336
50 LET [12],12336,12336,12336,12336
60 LET [16],3264,3264,0,0
70 LET [20],16383,16383,192,192
80 LET [24],48,48,48,48
90 LET [28],16320,16320,0,0
100 LET [32],48,48,16371,16371
110 LET [36],0,0,960,960
120 LET [40],-13264,-13264,-13264,-13264
130 LET [44],-13264,-13264,16368,16368
140 LET [48],0,0,4032,4032
150 LET [52],12336,12336,12336,12336
160 LET [56],12336,12336,4032,4032
170 LET [60],0,0,3072,3072
180 LET [64],12288,12288,12291,12291
190 LET [68],4095,4095,3,3
200 LET [72],3072,3072,13104,13104
210 LET [76],13104,13104,13104,13104
220 LET [80],16320,16320,0,0
230 LET [84],16368,16368,48,48
240 LET [88],16368,16368,48,48
250 LET [92],16320,16320,0,0
260 LET [96],0,0,0,0,0
270 LET D,0:LET B,0
280 LC 31,4+B:? CHR$([D]&1);
290 LET [D],[D]>>1
300 LET B,B+1:IF B<>16 GOTO 280
310 SCROLL 3:LET B,0
320 LET D,D+1:IF D<>101 GOTO 280
330 LET D,0:GOTO 20MixJuice ダウンロード ?"MJ GET kidspod.club/mj/589
MicJack ダウンロード ?"MJ GKP 589
IchigoJam BASIC 0.9.7・0.9.8
10 CLS
20 LET [0],12291,12291,16383,16383
30 LET [4],12291,12291,0,0
40 LET [8],4032,4032,12336,12336
50 LET [12],12336,12336,12336,12336
60 LET [16],3264,3264,0,0
70 LET [20],16383,16383,192,192
80 LET [24],48,48,48,48
90 LET [28],16320,16320,0,0
100 LET [32],48,48,16371,16371
110 LET [36],0,0,960,960
120 LET [40],-13264,-13264,-13264,-13264
130 LET [44],-13264,-13264,16368,16368
140 LET [48],0,0,4032,4032
150 LET [52],12336,12336,12336,12336
160 LET [56],12336,12336,4032,4032
170 LET [60],0,0,3072,3072
180 LET [64],12288,12288,12291,12291
190 LET [68],4095,4095,3,3
200 LET [72],3072,3072,13104,13104
210 LET [76],13104,13104,13104,13104
220 LET [80],16320,16320,0,0
230 LET [84],16368,16368,48,48
240 LET [88],16368,16368,48,48
250 LET [92],16320,16320,0,0
260 LET [96],0,0,0,0,0
270 LET D,0:LET B,0
280 LC 35,7+B:? CHR$([D]&1);
290 LET [D],[D]>>1
300 LET B,B+1:IF B<>16 GOTO 280
310 SCROLL 3:LET B,0
320 LET D,D+1:IF D<>101 GOTO 280
330 LET D,0:GOTO 20解説
作りは IchigoJam ロゴ にスクロールを加えて、長くしたもの。
配列のデータは ynomura（Nomura Yukinori さん）版。縦1列で1個の配列を使用しています。
■ 部分にある下に記載している数字の合計が配列の値となります。一番下はマイナスになっている事にご注意下さい。
最近のバージョンでは16進数表記でも有効です。
IchigoJam 公式ロゴ版
IchigoJam 公式ロゴバージョンも作成しています。
IchigoJam の販売を行っている店舗や
IchigoJam でイベントを行う場合に
IchigoJam のデモとしてご活用下さい。
IchigoJam 公式ロゴは 2015年8月 より
CC BY ライセンス扱いにする事を
福野さんが公言しています。
これを受け、イチゴジャム レシピ 内でも
通常のプログラム同様に公開を行いました。
ai.Jam・ai.shuttle.jam・ai.jam.pi ロゴ版を aitendo、
IchigoJam EX ロゴ版を クガデン へ
それぞれ製作・提供しています。
店頭のデモとして見られるかもしれません。
IchigoJam BASIC 0.9.9〜
1 'ﾊﾞﾅｰ (ﾃﾞﾝｼｹｲｼﾞﾊﾞﾝ) ｺｳｼｷﾛｺﾞ
10 CLS:CLV
20 LET [0],26622,26622,24576
30 LET [3],24576,26592,26592
40 LET [6],26208,26208,26208
50 LET [9],26208,24576,24576
60 LET [12],26622,26622,24672
70 LET [15],24672,26592,26592
80 LET [18],24576,24576,26598
90 LET [21],26598,0,0
100 LET [24],26592,26592,26208
110 LET [27],26208,32736,32736
120 LET [30],0,0,26592
130 LET [33],26592,26208,26208
140 LET [36],26592,26592,24576
150 LET [39],24576,26112,26112
160 LET [42],26112,26112,26622
170 LET [45],26622,24576,24576
180 LET [48],26592,26592,26208
190 LET [51],26208,26592,26592
200 LET [54],26112,26112,24672
210 LET [57],24672,26592,26592
220 LET [60],24672,24672,26592
230 LET [63],26592,24672,24672
240 LET [66],26592,26592
270 LET D,0:LET B,0
280 LC 31,4+B:? CHR$([D]&1);
290 LET [D],[D]>>1
300 LET B,B+1:IF B<>16 GOTO 280
310 SCROLL 3:LET B,0
320 LET D,D+1:IF D<>101 GOTO 280
330 LET D,0:GOTO 20MixJuice ダウンロード ?"MJ GET 15J.IN/590
MicJack ダウンロード ?"MJ GKP 590
IchigoJam BASIC 0.9.7〜0.9.8
10 CLS
20 LET [0],26622,26622,24576
30 LET [3],24576,26592,26592
40 LET [6],26208,26208,26208
50 LET [9],26208,24576,24576
60 LET [12],26622,26622,24672
70 LET [15],24672,26592,26592
80 LET [18],24576,24576,26598
90 LET [21],26598,0,0
100 LET [24],26592,26592,26208
110 LET [27],26208,32736,32736
120 LET [30],0,0,26592
130 LET [33],26592,26208,26208
140 LET [36],26592,26592,24576
150 LET [39],24576,26112,26112
160 LET [42],26112,26112,26622
170 LET [45],26622,24576,24576
180 LET [48],26592,26592,26208
190 LET [51],26208,26592,26592
200 LET [54],26112,26112,24672
210 LET [57],24672,26592,26592
220 LET [60],24672,24672,26592
230 LET [63],26592,24672,24672
240 LET [66],26592,26592
270 LET D,0:LET B,0
280 LC 35,7+B:? CHR$([D]&1);
290 LET [D],[D]>>1
300 LET B,B+1:IF B<>16 GOTO 280
310 SCROLL 3:LET B,0
320 LET D,D+1:IF D<>101 GOTO 280
330 LET D,0:GOTO 20
イチゴジャム レシピ では 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)