ll_libload user, "user32.dll"
ll_getproc SystemParametersInfo, "SystemParametersInfoA", user
#module
#deffunc spi int, int, int, int
mref uiaction, 0 : mref uiparam, 1 : mref pvparam, 2 : mref fwinini, 3
prm = uiaction, uiparam, pvparam , fwinini
ll_callfunc prm, 4, SystemParametersInfo@
return
#deffunc getlowpowermode val
mref mode, 16
ll_getptr mode : ll_ret p
spi 0x0053, 0, p // SPI_GETLOWPOWERACTIVE
return
#deffunc getlowpowertime val, int
mref time, 16 : mref mflg, 1
ll_getptr time : ll_ret p
spi 0x004F, 0, p // SPI_GETLOWPOWERTIMEOUT
if mflg : time = time / 60
return
#global
sdim msg, 8, 2
msg = "ません", "ます"
getlowpowermode flg
pos 10, 10 : mes "省エネモードは使用でき" + msg.flg
getlowpowertime minute, 1 // 分単位で取得
pos 10, 30 : mes "モニタの電源を" + minute + "分後に切ります"
stop
|