【HSP3】富士通 FMV-BIBLO LOOX T70J(2004年発売) の液晶の輝度を変えるサンプルコード | Codetter（こーどったー）

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
#include "kernel32.as"
#define FILE_SHARE_READ 0x00000001
#define FILE_SHARE_WRITE 0x00000002
#define GENERIC_READ 0x80000000
#define GENERIC_WRITE 0x40000000
#define IOCTL_VIDEO_QUERY_SUPPORTED_BRIGHTNESS 0x00230494
#define IOCTL_VIDEO_QUERY_DISPLAY_BRIGHTNESS 0x00230498
#define IOCTL_VIDEO_SET_DISPLAY_BRIGHTNESS 0x0023049C
    title "FMV(BIBLO/LIFEBOOK) FUJ02B1 LCD BRIGHTNESS "
    //デバイスのオープン(FUJ02B1)
    val="\\\\?\\acpi#fuj02b1#4&32d50c2&0#{92c94020-da95-11d1-9135-00000e6982c2}"
    CreateFile val,GENERIC_READ|GENERIC_WRITE,FILE_SHARE_READ|FILE_SHARE_WRITE,0,3,0,0
    if stat=-1:dialog
    hlcd=stat
    // バックライトが何段階に調光可能か調べる
    buf=0:br=0
    DeviceIoControl hlcd,0x00220200,varptr(buf),4,varptr(buf),4,varptr(br),0
    l=""
    repeat buf
        l+=""+cnt+"\n"
    loop
    // 現在の状態
    buf=0:br=0
    DeviceIoControl hlcd,0x00220204,varptr(buf),4,varptr(buf),4,varptr(br),0
    buf=0:br=0
    DeviceIoControl hlcd,0x00220204,varptr(buf),4,varptr(buf),4,varptr(br),0
    s = buf
    combox s,,l
    button "変更",*set
    button "更新",*ref
    
stop
*set
    // レベル７に指定
    buf=s:br=0
    DeviceIoControl hlcd,0x00220208,varptr(buf),4,varptr(buf),4,varptr(br),0
    // 上の動作の確定コマンド？
    buf=0:br=0
    DeviceIoControl hlcd,0x0022023c,varptr(buf),4,varptr(buf),4,varptr(br),0
stop
*ref
    // 現在の状態
    buf=0:br=0
    DeviceIoControl hlcd,0x00220204,varptr(buf),4,varptr(buf),4,varptr(br),0
    buf=0:br=0
    DeviceIoControl hlcd,0x00220204,varptr(buf),4,varptr(buf),4,varptr(br),0
    s = buf
    objprm 0,s
stop
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX