MPC2000 Reference Manual

【コマンド】

【文字列】

【使い方】

FORMAT

FORMAT   " DatB=[s00.000]"
FORMAT   "D=S00000"

【書式】

【機能】

FORMAT Strng

STR$()の展開様式を定義する。

【解説】

STR$()は、FORMATコマンドで定義されていない限り、標準整数様式で文字列展開します。
STR$(1234) ->" 1234" STR$(-1234) ->"-1234"

FORMATコマンドでは15文字の範囲で出力フォーマットを決定できます。

FORMAT " DatA=[S 0.000]" --> DatA=[- 8.000]
FORMAT " DatB=[s00.000]" --> DatB=[+02.000]

フォーマットで指定した文字列のスペースか0のところに右つめで数値がはいります。
Sは符号で、ラージSでは、正の場合スペース、
スモールsでは、正の場合に+符号が与えられます。Sもsもつけないと、符号は付加されません。


FORMAT "0000年00月00日"       /* 文字列書式設定
DT$=HEX$(DATE(0))             /* 年月日文字列取得
FORMAT "00時00分00秒"         /* 文字列書式設定
TM$=HEX$(TIME(0))             /* 時分秒文字列取得
PR "(1)" DT$ TM$              /* 表示

*RUN結果
(1) 2007年11月07日 12時34分00秒

--------------------
・数値文字列変換例
FORMATで文字列の書式を設定して変換サブルーチンをコールしています。

  v1=123 : v2=-123    /* 数値変数
  FORMAT "000"        /* 符号無し 3桁
  GOSUB *num2str 1
  FORMAT "0000"       /* 符号無し 4桁
  GOSUB *num2str 2
  FORMAT "000.0"      /* 符号無し少数点以下1桁
  GOSUB *num2str 3
  FORMAT "s000"       /* +-符号有り
  GOSUB *num2str 4
  FORMAT "S000"       /* -符号有り、+はスペース
  GOSUB *num2str 5
  FORMAT ""           /* 初期値に戻す
  GOSUB *num2str 6
  END
*num2str
_VAR n_
  ds1$=STR$(v1)       /* 数値→DEC文字列
  ds2$=STR$(v2)
  hs$=HEX$(v1)        /* 数値→HEX文字列
  PR n_ ":" ds1$ ds2$ hs$   /* 表示
  RETURN

実行結果
RUN
 1 : 123 123 07B
 2 : 0123 0123 007B
 3 : 012.3 012.3 007.B
 4 : +123 -123 {07B
 5 :  123 -123 {07B
 6 : 123 -123 0000007B
#

[LASTMODIFY]2017-04-24 13:07:15

[CREATEDATE]2007-09-12 19:48:55

MPC2000 Reference Manual -R5.11-