|
【USE】 |
PTR$
|
ptr_=a$
ptr_=ptr_+10
k$=PTR$(5) |
| 【FORMAT】 |
【FUNCTION】 |
PTR$(m)
|
|
| 【EXPLANATION】 |
|
|
|
1)
FORMAT "" /* 文字列書式設定クリア
TT$=HEX$(TIME(0)) /* 時分秒取得
ptr_=TT$ /* 文字列の位置を取得
ptr_=ptr_+2 /* ポインタ再設定
HH$=PTR$(2) /* ポインタの位置から2文字切り出し
ptr_=ptr_+2
MM$=PTR$(2)
ptr_=ptr_+2
SS$=PTR$(2)
CL$=HH$+":"+MM$+":"+SS$ /* 文字列連結
PR "(1)" TT$ "->" CL$ /* TT$:元の文字列 CL$:合成後の文字列
#RUN
(1) 00123400 -> 12:34:00
#
2)
C41$="Mx+9.7042e+002 My+6.3210e+002"
' Serching the space position
a_=C41$
l_=LEN(C41$)
SERCH C41$ " "
b_=ptr_
'b_ is the space position.
a_=ptr_-a_
ptr_=C41$
C1$=PTR$(a_)
ptr_=b_
C2$=PTR$(l_-a_)
PRINT C1$
PRINT C2$
#RUN
Mx+9.7042e+002
My+6.3210e+002
# |
|
|
[LASTMODIFY]2012-03-16 16:00:45 |
[CREATEDATE]2007-10-30 00:00:40 |
|
|
|
|