// #runtime "hsp3_64"
#module
#uselib "kernel32"
#func GetNativeSystemInfo "GetNativeSystemInfo" var
#defcfunc IsWindows64Bit
// 64bit版HSPランタイムでも動くように多めに確保
dim system_info, 12
GetNativeSystemInfo system_info
is64 = 0
switch system_info.0
case 6 // IA64
case 9 // AMD64(Intel64)
case 12 // ARM64
is64 = 1
swbreak
swend
return is64
#global
//
if IsWindows64Bit() : mes "64bit" : else : mes "32bit"