10進 -> ASCII変換
このFP命令は、実行条件ENがTRUEのとき、sによって指定された10進文字をASCIIコードに変換します。n_Charsは変換するバイト数を指定します。結果はd_Startで指定したエリアに格納されます。
ASCII HEXコードと10進数の対応表
10進数 |
ASCII HEXコード |
---|---|
SPACE+-0123456789 | 16#20 16#2B 16#2D 16#30 16#31 16#32 16#33 16#34 16#35 16#36 16#37 16#38 16#39 |
入力
入力値
バイト数
出力
結果を格納するデータエリアの先頭アドレスサイズはn_Bits * 2 ワード
インデックス修飾時にエリアを超えたとき
n_Charsで指定したバイト数が、d_Startで指定したエリアを超えるとき
変換結果がd_Startで指定したデータエリアを超えるとき
変換した結果のバイト数が、n_Charsで指定したバイト数よりも大きいとき
インデックス修飾時にエリアを超えたとき
n_Charsで指定したバイト数が、d_Startで指定したエリアを超えるとき
変換結果がd_Startで指定したデータエリアを超えるとき
変換した結果のバイト数が、n_Charsで指定したバイト数よりも大きいとき
オフセット |
10進データ |
Decimal figure |
オフセット |
変換ASCIIコード |
Dec. equivalent |
|||
s |
0 |
16#FF9C |
65436 |
Þ |
d_Start |
0 |
16#3620 |
6 |
n_Chars |
0 |
16#0006 |
1 |
16#3435 |
45 |
|||
2 |
16#3633 |
63 |
オフセット |
10進データ |
Decimal figure |
オフセット |
変換ASCIIコード |
Dec. equivalent |
|||
s |
0 |
16#FF9C |
-100 |
Þ |
d_Start |
0 |
16#2020 |
|
n_Chars |
0 |
16#0006 |
1 |
16#312D |
1 - |
|||
2 |
16#3030 |
00 |
オフセット |
10進データ |
Decimal figure |
オフセット |
変換ASCIIコード |
Dec. equivalent |
|||
s |
0 |
16#FF9C |
4294967196 |
Þ |
d_Start |
0 |
16#3234 |
24 |
1 |
16#FFFF |
1 |
16#3439 |
49 |
||||
n_Chars |
0 |
16#000A |
2 |
16#3639 |
69 |
|||
3 |
16#3137 |
17 |
||||||
4 |
16#3639 |
69 |
オフセット |
10進データ |
Decimal figure |
オフセット |
変換ASCIIコード |
Dec. equivalent |
|||
s |
0 |
16#FF9C |
-100 |
Þ |
d_Start |
0 |
16#2020 |
0 |
1 |
16#FFFF |
1 |
16#2020 |
0 |
||||
n_Chars |
0 |
16#000A |
2 |
16#2020 |
0 |
|||
3 |
16#312D |
1 - |
||||||
4 |
16#3030 |
00 |
POUヘッダには、このプログラムで使用するすべての入力変数と出力変数を宣言します。 POUヘッダは全プログラム言語で使用できます。
VAR
bStart: BOOL:=FALSE;
iInput: INT:=82;
awResult: ARRAY [0..2] OF WORD:=[3(0)];
END_VAR
変数bStartがTRUEにセットされると、このファンクションが実行されます。
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 8 ;
NETWORK_BODY
B(B_COMMENT,,After conversion: ø^awResult[0]=16#2020ø^awResult[1]=16#3238ø^awResult[2] is not written,24,1,39,5,);
B(B_CONTACT,,bStart,4,4,6,6,R);
B(B_F,FP_DEC_TO_ASCII!,,12,3,22,8,,?DEN?D@'s'?Dn_Chars?AENO?Cd_Start);
B(B_VARIN,,iInput,10,5,12,7,);
B(B_VAROUT,,awResult[0],22,5,24,7,);
B(B_VARIN,,4,10,6,12,8,);
L(1,0,1,8);
L(1,5,4,5);
L(6,5,12,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
if (DF(bStart)) then
FP_DEC_TO_ASCII(s := iInput, n_Chars := 4,
d_Start => awResult[0]);
(* After conversion:
awResult[0]=16#2020
awResult[1]=16#3238
awResult[2] is not written *)
end_if;