#module
#uselib "user32.dll"
#cfunc GetSystemMetrics "GetSystemMetrics" int
#defcfunc getwinsinf int prm1
SysNo=prm1 : if (SysNo<=0)|(SysNo>79) : SysNo=0
ret=GetSystemMetrics(Sysno)
return ret
#global
mes "下の値がセーフモードなら1、それ以外の場合は0が代入される。"
mes getwinsinf(67)
stop