|
|
按照你的思路改了个AHK，速度有点慢 怎么改进啊~~
国服查价器Code.zip
(2.92 KB, 下载次数: 682)
- #NoEnv
- #NoTrayIcon
- #SingleInstance Force
- #include SJson.ahk
- ;#include GetWidthUnitCount.ahk 字符串表 显示优化 未完成
- SetWorkingDir %A_ScriptDir%
- CoordMode, ToolTip, Screen
- CoordMode, mouse, Screen
- global Version
- global Ready := false
- global CheckBoard := ""
- ;global League := "S9赛季"
- Gui Add, Text, x16 y16 w40 h23 +0x200, 赛季
- Gui Add, ComboBox,vLeague x64 y16 w100, S9赛季
- GuiControl,Choose,League,1
- Gui Add, Button,gStart x16 y48 w149 h39, OK
- Gui Show, w175 h97, ToolTip
- Return
- ^space::
- GuiEscape:
- GuiClose:
- ExitApp
- ; End of the GUI section
- #if Ready
- #IfWinActive Path of Exile
- ~^C::
- if Clipboard != CheckBoard
- settimer,Main,100
- Tooltip, Loading
- return
- #IfWinActive
- #if
- Main:
- FindTradeInfo(Clipboard)
- settimer,Main,off
- return
- ~Space::
- RemoveToolTip:
- ToolTip
- settimer,RemoveToolTip,off
- return
- Start()
- {
- if CheckLeague()
- {
- Ready := false
- MsgBox,版本号错误
- return
- }
- Ready := true
- Clipboard := ""
- Gui,hide
- return
- }
- ;版本检测，懒得写-----
- CheckLeague()
- {
- return false
- }
- ;获取name和type
- GetNameAndType(Clip)
- {
- if InStr(Clip, "稀 有 度:") != 1
- {
- mItem := {ItemName:false,ItemType:false}
- return mItem
- }
- ClipArray := StrSplit(Clip, "`n", "`r")
- try:
- if RegExMatch(ClipArray[3],"---")
- mItem := {ItemName:false,ItemType:ClipArray[2]}
- else
- mItem := {ItemName:ClipArray[2],ItemType:ClipArray[3]}
- return mItem
- catch: ;return bugmsg懒得写------
- return
- }
- ;抓取Trade信息
- FindTradeInfo(Clip)
- {
- GuiControlGet, League
- mItem := GetNameAndType(clip)
- MouseGetPos, Px,Py
-
-
- if mItem.ItemType = false
- {
- msgbox, 复制错误
- return
- }
- data := {"query":{"status":{"option":"any"} ,"stats":[{"type":"and","filters":[]}]},"filters":{"trade_filters":{"filters":{"indexed":{"option":"1day"}},"disabled":False}},"sort":{"price":"asc"}}
- if mItem.ItemName != false
- data.query.name := mItem.ItemName
- data.query.type := mItem.ItemType
-
- body := Json(data)
- url = https://poe.game.qq.com/api/trade/search/%League%
- CP := ComObjCreate("WinHttp.WinHttpRequest.5.1")
- CP.Open("POST", url)
- CP.SetRequestHeader("Content-Type", "application/json")
- CP.Send(body)
- result := json(CP.responsetext)
- itemid := result.id
- itemlist := result.result
-
- url := "https://poe.game.qq.com/api/trade/fetch/"
- maxCount := 10
- step := floor(itemlist.length()/maxCount) + 1
- maxcount := maxCount -1
- loop , %maxCount%
- {
- index := A_index * step
- listtemp := itemlist[index]
- url= %url%%listtemp%,
- }
- url := Rtrim(url, ",")
- url = %url%?query=%itemid%
- RT := ComObjCreate("WinHttp.WinHttpRequest.5.1")
- RT.Open("GET",url)
- RT.Send()
- RTresult := json(RT.responsetext)
- infolist := RTresult.result
- tmpString := ""
- MaxWidth := 0
- tmpString = 装备名称：
- if mItem.ItemName != false
- {
- ItemName := mItem.ItemName
- tmpString= %tmpString%%ItemName%-
- }
- ItemType := mItem.ItemType
- tmpString= %tmpString%%ItemType%`n
- ItemUnit := result.total
- tmpString = %tmpString%设备总数：%ItemUnit%`n
-
-
- for info in infolist
- {
- idmsg := infolist[A_index].listing.account.lastCharacterName
- pricemsg := process_dict(infolist[A_index].listing)
- Ttip =ID: %idmsg%|| 价格: %pricemsg%
- tmpString = %tmpString%`n%Ttip%
- }
- tooltip,%tmpString%,%px%,%py%
- settimer, RemoveToolTip, 15000
- return
- }
- Process_dict(s)
- {
- if s.price != "null"
- {
- single_price := s.price.amount
- unit := s.price.currency
- price_info = %single_price% %unit%
- return price_info
- }
- return "无定价"
- }
|
|
[复制链接]
发表于 2019-11-19 21:57:27
赞(
楼主
这是让预估价格的
