property kSyncPair : {{"ニュー速VIP+:F", "ニュー速VIP+"}, {"ニュー速VIP:F", "ニュー速VIP"}}
property kSmartBoards : missing value
on getMainBrowser()
tell application "BathyScaphe"
repeat with theWindow in (windows whose id is not (-1) and visible is true)
if class of document of theWindow is browser then
return window id (id of theWindow)
end if
end repeat
end tell
return missing value
end getMainBrowser
on getSupportBrowser()
tell application "BathyScaphe"
repeat with theWindow in (windows whose id is not (-1) and miniaturized is true)
if class of document of theWindow is browser then
return window id (id of theWindow)
end if
end repeat
tell application "BathyScaphe" to activate
delay 1
set frontWindowID to id of front window
tell application "System Events"
set modifierkeys to {command down}
tell process "BathyScaphe" to if (count of (windows whose value of attribute "AXFullScreen" is true)) > 0 then set modifierkeys to {command down, option down}
keystroke "n" using modifierkeys
end tell
repeat while (id of front window) is frontWindowID
delay 0.2
end repeat
set theWindow to front window
set miniaturized of theWindow to true
return theWindow
end tell
end getSupportBrowser
set mainBrowser to getMainBrowser()
if mainBrowser is missing value then return
if kSmartBoards is missing value then
set kSmartBoards to {}
repeat with theItem in kSyncPair
set end of kSmartBoards to first item of theItem
end repeat
end if
tell application "BathyScaphe"
set curretBoardName to threads list board name of document of mainBrowser
if curretBoardName is in kSmartBoards then
repeat with theItem in kSyncPair
if first item of theItem is curretBoardName then
set supportBrowser to me's getSupportBrowser()
if threads list board name of document of supportBrowser is second item of theItem then
reload list document of supportBrowser
else
set threads list board name of document of supportBrowser to second item of theItem
if not onlineMode then reload list document of supportBrowser
end if
exit repeat
end if
end repeat
end if
reload list document of mainBrowser
end tell
0965名称未設定 (ワッチョイW 7535-SYNW)2020/05/07(木) 22:57:05.17ID:tFBROZLT0
てすつ
0966名称未設定(ジパング)2020/05/07(木) 22:58:03.10ID:tFBROZLT0
てすつ
0976名称未設定2020/05/16(土) 05:38:10.28ID:684o9gzk0
0978名称未設定2020/05/17(日) 12:54:04.27ID:eqTmRVKO0
🐱
10011001Over 1000Thread
このスレッドは1000を超えました。
新しいスレッドを立ててください。
life time: 2151日 12時間 14分 43秒