sample\hspext\fxinfo.hsp » Plain Format
#include "hspext.as" sdim drvatr,20,8 drvatr="不明","なし","リムーバブル","ハードディスク","ネットワーク","CD-ROM","RAM" repeat 7 vol="":fsys="" dfree=0:typ=0:ser=0 drv=cnt+1 drvstr="@":poke drvstr,0,64+drv mes drvstr+"ドライブの詳細:" fxinfo typ,drv,8 if stat : goto *chkskip mes "ドライブのタイプ="+drvatr.typ if typ=5 : goto *chkgo if typ!3 : goto *chkskip *chkgo fxinfo vol,drv,16 if stat : goto *chkskip fxinfo fsys,drv,17 fxinfo ser,drv,18 fxinfo dfree,drv,0 mes "ドライブの空き容量="+dfree+"("+fsys+")" mes "ボリュームラベル="+vol+"("+ser+")" *chkskip mes "---------------------------------" loop stop