Vle-write-uint16

提供:GizmoLabs - だいたい CAD LISP なサイト
2023年1月7日 (土) 08:09時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{BCAD_LISP}} ; 構文 : (vle-write-uint16 ''fptr'' ''value'') ; 機能 : 「符号なし16ビット整数」をファイルに書き込む(C++の「短整数/ uint1…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(vle-write-uint16 fptr value)


機能
「符号なし16ビット整数」をファイルに書き込む(C++の「短整数/ uint16」型と同じ)。


引数
  • fptr: (open <filename> "wb") で開いたファイルディスクリプタ
  • value : ファイルに書き込むLISP整数値(16ビット範囲)


戻り値
成功した場合は valut値、そうでない場合は NIL


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


; テキストで ABC を書き出す
(setq fptr (open "c:\\temp\\bwtest.txt" "wb"))
(vle-write-uint16 fptr 65)
(vle-write-uint16 fptr 66)
(vle-write-uint16 fptr 67)
(close fptr)


関連事項