DIRMAKE - [ファイル操作] |
||||||
… ディレクトリの作成
DIRMAKE ディレクトリ名
ディレクトリ名: 文字列
ディレクトリ(フォルダ)を作成します。
ディレクトリ名をメモリの場所(F0:、C1:など)から指定(絶対指定)した場合は、指定したディレクトリを直接作成します。
ディレクトリ名のみ指定(相対指定)した場合は、現在のディレクトリ以下にそのディレクトリが作成されます。
SETDIRECTORY、GETDIRECTORY、DIRSEARCH
※このサンプルは、SDカードとCFカードの両方を使用していて、CFに C1:\944BASIC\ ディレクトリがある場合に実行できます。また、サンプルを実行すると SD に C2:\9B_BAK\ というディレクトリが作成され、.BASファイルがコピーされます。また、バッテリ残量が低い場合は実行できません。
REM 944BASIC 'DIRSEARCH/MAKE'
IF GETBATTERY<=3 THEN MESSAGE 'LOW BATTERY':END
PRINT 'C1:\944BASIC\の.BASファイルをバックアップします。バックアップ先ディレクトリの入力:'
LOCATE 2,6: D='C2:\9B_BAK\'
INPUT D,16,3
DIM A(512): DIRSEARCH D,A
IF GETREADCNT=0 THEN DIRMAKE D
FILESEARCH 'C1:\944BASIC\*.BAS',A
C=GETREADCNT-1
IF C=-1 THEN MESSAGE 'NO FILE':END
FOR I=0 TO C
C0=STRCAT('C1:\944BASIC\',A(I))
C1=STRCAT(D,A(I)): FILECOPY C0,C1
LOCATE 9,8: PRINT I;: PRINT '/';: PRINT C: LOCATE 9,9: PRINT A(I);
NEXT I
MESSAGE 'バックアップ終了'
DIRMAKE - [ファイル操作] |