BASIC プログラム EEPROM 一覧表示
「あれ? この EEPROM、BASIC で使ってたかな???」
そういう時にこのプログラムを使って下さい。
BASIC の FILES 同等に一覧を表示します。
2019年4月19日より
IchigoCake BASIC EEPROM 版を加えています。
ms . で実行すると「files>」と表示するので、
表示させたい最終プログラム番号を入力して下さい。
IchigoJam BASIC 1.1 以降で FILES 番号 の
番号 と同じ指定が可能です。
省略可能です。
省略または 0 の場合は 1024k EEPROM になります。
EEPROM のサイズ別に次のプログラム番号になります。
IchigoJam BASIC EEPROM の場合
IchigoCake BASIC EEPROM の場合
プログラム番号 100 より順番に 1 行目を表示していきます。
1 画面おきに「more>」を表示します。Enter(return)で続きを表示します。Esc で中断です。
全て表示した時はプログラムが終了し、lash のプロンプトになっています。
BASIC の カタカナ は IchigoLatte では ひらがな になります。キャラクターも一部異なります。
IchigoJam BASIC 0.9.3〜0.9.9-RC9 では EEPROM の保存状態が異なるため、結果が異なります。
(FILES は 1.0.0 で対応されています)
//FILES IchigoJam BASIC
var k,a,p=100,r,d=0,b=0,h=0,l;
var m=0;
log("files>");
k=input();
if(k==0)
{
k=227;
}
while(p<=k)
{
a=0x50+b*0x04;
l=3;
log(p," ");
while(l<30)
{
i2cw(a,h,l);
i2cr(a,r);
if((l==3)*(r==255))
{
break;
}
if((r==0)+(r==10))
{
break;
}
log(chr(r));
l=l+1;
}
log("\n");
p=p+1;
d=d+1024;
l=d%256;
h=(d/256)%65536;
b=d/65536;
m=m+1;
if(m==23)
{
log("more>");
m=input();
m=0;
}
}
MixJuice・MicJack ダウンロード
lash>echo MJ GET 15lt.eu.org/filesjam.js> uart;cat uart > .
//FILES IchigoCake BASIC
var k,a,p=100,r,d=0,b=0,h=0,l;
var m=0;
log("files>");
k=input();
if(k==0)
{
k=131;
}
while(p<=k)
{
a=0x50+b*0x04;
l=3;
log(p," ");
while(l<30)
{
i2cw(a,h,l);
i2cr(a,r);
if((l==3)*(r==255))
{
break;
}
if((r==0)+(r==10))
{
break;
}
log(chr(r));
l=l+1;
}
log("\n");
p=p+1;
d=d+4096;
l=d%256;
h=(d/256)%65536;
b=d/65536;
m=m+1;
if(m==23)
{
log("more>");
m=input();
m=0;
}
}
MixJuice・MicJack ダウンロード
lash>echo MJ GET 15lt.eu.org/filescake.js> uart;cat uart >
.
SkyBerryJAM は 栃木県立栃木工業高等学校 が管理する登録商標であり、
SkyBerryJAM は 栃木県立栃木工業高等学校 の商標です。
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.