冒险家可以试试，脚本非常简单，设置内容根据需要调整。
1，1024*768分辨率 800*600窗口模式 无须调整窗口位置
2，读疲倦后脚本自动结束
3，读到图后自动打开露天市场
欢迎共同探讨，谢绝灌水
-------- 以下内容请另存为 自动读图.txt --------
#这是按键精灵生成的脚本源文件
#在理解各条命令的基础上，您可以修改这个文件的内容
#您修改的结果将会在普通视图上有所反映
//1-地理学的书，2-考古学的书，3-宗教学的书，4-生物学的书，5-财宝鉴定的书，6-美术书
//快捷键设置F9-露天市场
//
UserVar AutoBookSet=0 全部领域设置
UserVar BookSet=6 读书领域设置
UserVar ReadTimesSet=40 连续读书次数设置
VBS Dim NPC_Find
//主脚本开始
Plugin hwn=Window.GetKeyFocusWnd()
If AutoBookSet = 1
BookSet = 1
EndIf
For ReadTimesSet
Gosub 开始读书
Gosub 选择领域读书
Delay 1500
PosX = 15
PosY = 548
Gosub 坐标转换
IfColor PosX PosY FFAA80 0
PosX = 21
PosY = 561
Gosub 坐标转换
IfColor PosX PosY FFAA80 0
PosX = 27
PosY = 549
Gosub 坐标转换
IfColor PosX PosY FFAA80 0
PosX = 38
PosY = 561
Gosub 坐标转换
IfColor PosX PosY FFAA80 0
KeyPress 120 1
Goto 脚本结束
EndIf
EndIf
EndIf
EndIf
PosX = 12
PosY = 561
Gosub 坐标转换
IfColor PosX PosY FFAA80 0
PosX = 33
PosY = 561
Gosub 坐标转换
IfColor PosX PosY FFAA80 0
PosX = 44
PosY = 561
Gosub 坐标转换
IfColor PosX PosY FFAA80 0
PosX = 57
PosY = 561
Gosub 坐标转换
IfColor PosX PosY FFAA80 0
Goto 脚本结束
EndIf
EndIf
EndIf
EndIf
If AutoBookSet = 1
BookSet = BookSet + 1
If BookSet > 6
BookSet = 1
EndIf
EndIf
EndFor
Rem 脚本结束
Beep
EndScript
//主脚本结束
//坐标转换(参数PosX,PosY)
Sub 坐标转换
Plugin winRect=Window.GetClientRect(hwn)
winPoint = Split(winRect, "|", -1, 1)
AbsX = CInt(winPoint(0)) + PosX
AbsY = CInt(winPoint(1)) + PosY
PosX = AbsX
PosY = AbsY
Return 坐标转换
//移动鼠标到指定点(以窗口为准参数PosX,PosY相对坐标)
Sub 移动鼠标
Plugin winRect=Window.GetClientRect(hwn)
winPoint = Split(winRect, "|", -1, 1)
AbsX = CInt(winPoint(0)) + PosX
AbsY = CInt(winPoint(1)) + PosY
MoveTo AbsX AbsY
PosX = AbsX
PosY = AbsY
Delay 500
Return 移动鼠标
//找学者
Sub 找学者
NPC_Find = 0
KeyDown 27 1
Delay 1000
For 10
KeyPress 9 1
Delay 500
PosX = 628
PosY = 333
Gosub 坐标转换
IfColor PosX PosY ffffff 0
PosX = 640
PosY = 333
Gosub 坐标转换
IfColor PosX PosY ffffff 0
PosX = 645
PosY = 330
Gosub 坐标转换
IfColor PosX PosY ffffff 0
PosX = 656
PosY = 333
Gosub 坐标转换
IfColor PosX PosY ffffff 0
NPC_Find = 1
KeyPress 13 1
Delay 1000
Goto 找学者结束
EndIf
EndIf
EndIf
EndIf
EndFor
Rem 找学者结束
KeyUp 27 1
Return 找学者
//开始读书
Sub 开始读书
PosX = 645
PosY = 360
Gosub 移动鼠标
IfColor PosX PosY 323845 0
LeftClick 1
Delay 500
Goto 开始读书结束
EndIf
Gosub 找学者
If NPC_Find = 0
Beep
Beep
Goto 脚本结束
EndIf
For 10
PosX = 645
PosY = 360
Gosub 移动鼠标
IfColor PosX PosY 323845 0
LeftClick 1
Delay 500
Goto 开始读书结束
EndIf
Delay 500
EndFor
Rem 开始读书结束
Return 开始读书
//选择领域读书
Sub 选择领域读书
For 10
PosX = 557
PosY = 263
Gosub 坐标转换
IfColor PosX PosY FFFFFF 0
Goto 选择读书
EndIf
Delay 500
EndFor
Rem 选择读书
PosX = 178 + BookSet * 56
PosY = 183
Gosub 坐标转换
IfColor PosX PosY B3B3B3 0
PosX = 178 + BookSet * 56 + 24
PosY = 183 + 24
Gosub 移动鼠标
LeftDoubleClick 1
Else
If BookSet = 1
PosX = 178 + BookSet * 56 + 24
PosY = 183 + 24
Gosub 移动鼠标
LeftDoubleClick 1
EndIf
EndIf
Return 选择领域读书
打印HodakDu的半自动读图脚本