「Vle-write-float」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{BCAD_LISP}} ; 構文 : (vle-read-float ''fptr'' ''value'' ) ; 機能 : ファイルから「float(浮動小数)32ビット」を読み込む(C++の「float」…」)
 
編集の要約なし
11行目: 11行目:
:* fptr: (open <filename> "rb") で開いたファイルディスクリプタ
:* fptr: (open <filename> "rb") で開いたファイルディスクリプタ
:* value : ファイルに書き込む浮動小数点(32ビット範囲)
:* value : ファイルに書き込む浮動小数点(32ビット範囲)


; 戻り値
; 戻り値

2023年1月10日 (火) 07:52時点における版

構文
(vle-read-float fptr value )


機能
ファイルから「float(浮動小数)32ビット」を読み込む(C++の「float」型と同じ)。


引数
  • fptr: (open <filename> "rb") で開いたファイルディスクリプタ
  • value : ファイルに書き込む浮動小数点(32ビット範囲)


戻り値
成功した場合は 浮動小数点値、そうでない場合は NIL


サンプル
; テキストで 012あ を書き出す
(setq fptr (open "c:\\temp\\bwtest.txt" "wb"))
(vle-write-float fptr 48)
(vle-write-float fptr 49)
(vle-write-float fptr 50)
(vle-write-float fptr 12354)
(close fptr)
(setq fptr (open "c:\\temp\\bwtest.txt" "rb"))
(setq str "")
(while (setq b (vle-read-float fptr))
  (setq str (strcat str (chr b)))
)
(close fptr)
!str
"012あ"


関連事項