discord chat = https discord.com/channels/762139358001889340/762139358001889342 Broken Link for safety
This program lets you save your fave shows then at a click of a button the correct streaming service will launch in chrome directly to the shows page. You can also set reminders of upcoming season release that can text or email you the day of letting you know what new show has a release.
Can also contrall music services like pandora and soundcloud
Let me know what you think as its still pretty new and has work to be done. I have a small list in the program of stuff I still plan to add or improve on.
ver 3 beta
Right now im sharing from my google drive. If anyone knows a better way please let me know?
https drive.google.com/file/d/1qdAnrORW50K5InrPebBl0SuJpbCkyvci/view?usp=sharing Broken Link for safety just add :// after https
Will be adding music streaming services in the next week!
Code: Select all
;=========================================================================================
;Glossary
;=========================================================================================
;Set Up #aaa111
;Main GUI #aaa222
;Goto fav buttons #aaa333
;Settings #aaa444
;Settings save #aaa555
;Settings Clear all #aaa666
;Grab Calendar info and add #aaa777
;Upcoming list #aaa888
;manuel enter shows gui #aaa999
;Send email/text new show #bbb111
;Up coming settings #bbb222
;Go to Watch togather site #bbb333
;Release and upcoming history #bbb444
;Donate GUI #bbb555
;Close out of program #bbb666
;-----------MUSIC-------------------------------------
;Music contrals gui #bbb777
;Music dropdown #bbb888
;Music settings #bbb999
;Music settings save #ccc111
;Music settings cancel #ccc222
;Survey gui #ccc333
;=========================================================================================
;Set Up #aaa111
;=========================================================================================
StringCaseSense, Off
SetTitleMatchMode, 2
savepath= C:\Users\%A_UserName%\Documents\StreamRight\StreamRight.ini
savepathcoming= C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
settimer, checkfortodayreleases, 3600000 ;Checks every hour for new shows
Menu, Tray, NoStandard
Menu, Tray, Add , Music Controller, musiccontraller
Menu, Tray, Add , Open StreamRight, maingui
Menu, Tray, Add , Close Tool, Exitall
; create first time profile
IfExist, C:\Users\%A_UserName%\Documents\StreamRight\StreamRight.ini
{
goto maingui
}
Else
{
FileCreateDir, C:\Users\%A_UserName%\Documents\StreamRight
FileAppend, , C:\Users\%A_UserName%\Documents\StreamRight\StreamRight.ini
FileAppend, , C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
UrlDownloadToFile, https wonderfulengineering.com /wp-content/uploads/2014/10/simple-wallpaper.png, Broken Link for safety C:\Users\%A_UserName%\Documents\StreamRight\streamrightbackground.png
goto cleardatanow
Return
}
;=========================================================================================
;Main GUI #aaa222
;=========================================================================================
maingui:
; user info
IniRead, user1, %savepath%, mainaccountholder, user1
IniRead, user2, %savepath%, mainaccountholder, user2
IniRead, user3, %savepath%, mainaccountholder, user3
;last user
if lastuserset =
{
IniRead, lastuserset, %savepath%, lastuser, lastuserset
If lastuserset = %user1%
{
currentuserdropdown = %user1%
goto setcurrentuser
}
If lastuserset = %user2%
{
currentuserdropdown = %user2%
goto setcurrentuser
}
If lastuserset = %user3%
{
currentuserdropdown = %user3%
goto setcurrentuser
}
}
Gui, Destroy
Gui, Add, Picture, x0 y0 w509 h314 , C:\Users\%A_UserName%\Documents\StreamRight\streamrightbackground.png
Gui, Add, DropDownList, x152 y19 w140 h150 vcurrentuserdropdown, %user1%|%user2%|%user3%
Gui, Add, Button, x312 y19 w60 h20 gsetcurrentuser, Load
Gui, Add, Button, x22 y69 w100 h30 grundisney, Disney+
Gui, Add, Button, x142 y69 w100 h30 grunhulu, Hulu
Gui, Add, Button, x262 y69 w100 h30 grunnetflix, Netflix
Gui, Add, Button, x382 y69 w100 h30 grunprime, Prime
Gui, Add, GroupBox, x12 y119 w480 h140 , Favs
Gui, Add, Button, x22 y139 w100 h30 gfav1button, %fav1maingui%
Gui, Add, Button, x142 y139 w100 h30 gfav2button, %fav2maingui%
Gui, Add, Button, x262 y139 w100 h30 gfav3button, %fav3maingui%
Gui, Add, Button, x382 y139 w100 h30 gfav4button, %fav4maingui%
Gui, Add, Button, x22 y179 w100 h30 gfav5button, %fav5maingui%
Gui, Add, Button, x142 y179 w100 h30 gfav6button, %fav6maingui%
Gui, Add, Button, x262 y179 w100 h30 gfav7button, %fav7maingui%
Gui, Add, Button, x382 y179 w100 h30 gfav8button, %fav8maingui%
Gui, Add, Button, x22 y219 w100 h30 gfav9button, %fav9maingui%
Gui, Add, Button, x142 y219 w100 h30 gfav10button, %fav10maingui%
Gui, Add, Button, x262 y219 w100 h30 gfav11button, %fav11maingui%
Gui, Add, Button, x382 y219 w100 h30 gfav12button, %fav12maingui%
Gui, Add, Button, x12 y9 w60 h20 gsettingsgui, Settings
Gui, Add, Button, x22 y269 w100 h30 gupcominglist, UpComing
Gui, Add, Button, x142 y269 w100 h30 gWatchtogather, Watch Togather
Gui, Add, Button, x262 y269 w100 h30 gmusiccontraller, Music Controller
Gui, Add, Button, x382 y269 w100 h30 greleasehistory, Release History
Gui, Show, h314 w509, Welcome
Return
rundisney:
Run chrome.exe "https rb.gy /mvinmc" Broken Link for safety
Return
runhulu:
Run chrome.exe "https www.hulu.com /hub/home" Broken Link for safety
Return
runnetflix:
Run chrome.exe "https www.netflix.com /" Broken Link for safety
Return
runprime:
Run chrome.exe "https rb.gy /idyuia" Broken Link for safety
Return
setcurrentuser:
gui, submit
If currentuserdropdown = %user1%
{
gui, destroy
Iniread, user1fav1, %savepath%, user1favs, user1fav1
fav1maingui=%user1fav1%
Iniread, user1fav2, %savepath%, user1favs, user1fav2
fav2maingui=%user1fav2%
Iniread, user1fav3, %savepath%, user1favs, user1fav3
fav3maingui=%user1fav3%
Iniread, user1fav4, %savepath%, user1favs, user1fav4
fav4maingui=%user1fav4%
Iniread, user1fav5, %savepath%, user1favs, user1fav5
fav5maingui=%user1fav5%
Iniread, user1fav6, %savepath%, user1favs, user1fav6
fav6maingui=%user1fav6%
Iniread, user1fav7, %savepath%, user1favs, user1fav7
fav7maingui=%user1fav7%
Iniread, user1fav8, %savepath%, user1favs, user1fav8
fav8maingui=%user1fav8%
Iniread, user1fav9, %savepath%, user1favs, user1fav9
fav9maingui=%user1fav9%
Iniread, user1fav10, %savepath%, user1favs, user1fav10
fav10maingui=%user1fav10%
Iniread, user1fav11, %savepath%, user1favs, user1fav11
fav11maingui=%user1fav11%
Iniread, user1fav12, %savepath%, user1favs, user1fav12
fav12maingui=%user1fav12%
IniRead, user1ser1, %savepath%, user1favs, user1ser1
IniRead, user1ser2, %savepath%, user1favs, user1ser2
IniRead, user1ser3, %savepath%, user1favs, user1ser3
IniRead, user1ser4, %savepath%, user1favs, user1ser4
IniRead, user1ser5, %savepath%, user1favs, user1ser5
IniRead, user1ser6, %savepath%, user1favs, user1ser6
IniRead, user1ser7, %savepath%, user1favs, user1ser7
IniRead, user1ser8, %savepath%, user1favs, user1ser8
IniRead, user1ser9, %savepath%, user1favs, user1ser9
IniRead, user1ser10, %savepath%, user1favs, user1ser10
IniRead, user1ser11, %savepath%, user1favs, user1ser11
IniRead, user1ser12, %savepath%, user1favs, user1ser12
IniWrite, %user1%, %savepath%, lastuser, lastuserset
goto maingui
}
If currentuserdropdown = %user2%
{
gui, destroy
Iniread, user2fav1, %savepath%, user2favs, user2fav1
fav1maingui=%user2fav1%
Iniread, user2fav2, %savepath%, user2favs, user2fav2
fav2maingui=%user2fav2%
Iniread, user2fav3, %savepath%, user2favs, user2fav3
fav3maingui=%user2fav3%
Iniread, user2fav4, %savepath%, user2favs, user2fav4
fav4maingui=%user2fav4%
Iniread, user2fav5, %savepath%, user2favs, user2fav5
fav5maingui=%user2fav5%
Iniread, user2fav6, %savepath%, user2favs, user2fav6
fav6maingui=%user2fav6%
Iniread, user2fav7, %savepath%, user2favs, user2fav7
fav7maingui=%user2fav7%
Iniread, user2fav8, %savepath%, user2favs, user2fav8
fav8maingui=%user2fav8%
Iniread, user2fav9, %savepath%, user2favs, user2fav9
fav9maingui=%user2fav9%
Iniread, user2fav10, %savepath%, user2favs, user2fav10
fav10maingui=%user2fav10%
Iniread, user2fav11, %savepath%, user2favs, user2fav11
fav11maingui=%user2fav11%
Iniread, user2fav12, %savepath%, user2favs, user2fav12
fav12maingui=%user2fav12%
IniRead, user2ser1, %savepath%, user2favs, user2ser1
IniRead, user2ser2, %savepath%, user2favs, user2ser2
IniRead, user2ser3, %savepath%, user2favs, user2ser3
IniRead, user2ser4, %savepath%, user2favs, user2ser4
IniRead, user2ser5, %savepath%, user2favs, user2ser5
IniRead, user2ser6, %savepath%, user2favs, user2ser6
IniRead, user2ser7, %savepath%, user2favs, user2ser7
IniRead, user2ser8, %savepath%, user2favs, user2ser8
IniRead, user2ser9, %savepath%, user2favs, user2ser9
IniRead, user2ser10, %savepath%, user2favs, user2ser10
IniRead, user2ser11, %savepath%, user2favs, user2ser11
IniRead, user2ser12, %savepath%, user2favs, user2ser12
IniWrite, %user2%, %savepath%, lastuser, lastuserset
goto maingui
}
If currentuserdropdown = %user3%
{
gui, destroy
Iniread, user3fav1, %savepath%, user3favs, user3fav1
fav1maingui=%user3fav1%
Iniread, user3fav2, %savepath%, user3favs, user3fav2
fav2maingui=%user3fav2%
Iniread, user3fav3, %savepath%, user3favs, user3fav3
fav3maingui=%user3fav3%
Iniread, user3fav4, %savepath%, user3favs, user3fav4
fav4maingui=%user3fav4%
Iniread, user3fav5, %savepath%, user3favs, user3fav5
fav5maingui=%user3fav5%
Iniread, user3fav6, %savepath%, user3favs, user3fav6
fav6maingui=%user3fav6%
Iniread, user3fav7, %savepath%, user3favs, user3fav7
fav7maingui=%user3fav7%
Iniread, user3fav8, %savepath%, user3favs, user3fav8
fav8maingui=%user3fav8%
Iniread, user3fav9, %savepath%, user3favs, user3fav9
fav9maingui=%user3fav9%
Iniread, user3fav10, %savepath%, user3favs, user3fav10
fav10maingui=%user3fav10%
Iniread, user3fav11, %savepath%, user3favs, user3fav11
fav11maingui=%user3fav11%
Iniread, user3fav12, %savepath%, user3favs, user3fav12
fav12maingui=%user3fav12%
IniRead, user3ser1, %savepath%, user3favs, user3ser1
IniRead, user3ser2, %savepath%, user3favs, user3ser2
IniRead, user3ser3, %savepath%, user3favs, user3ser3
IniRead, user3ser4, %savepath%, user3favs, user3ser4
IniRead, user3ser5, %savepath%, user3favs, user3ser5
IniRead, user3ser6, %savepath%, user3favs, user3ser6
IniRead, user3ser7, %savepath%, user3favs, user3ser7
IniRead, user3ser8, %savepath%, user3favs, user3ser8
IniRead, user3ser9, %savepath%, user3favs, user3ser9
IniRead, user3ser10, %savepath%, user3favs, user3ser10
IniRead, user3ser11, %savepath%, user3favs, user3ser11
IniRead, user3ser12, %savepath%, user3favs, user3ser12
IniWrite, %user3%, %savepath%, lastuser, lastuserset
goto maingui
}
;=========================================================================================
;Goto fav buttons #aaa333
;========================================================================================
fav1button:
If fav1maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1 ;focus on chrome is already open
If Not WinExist("ahk_exe chrome.exe") ;open chrome is closed
{
Run, chrome.exe
goto chromeopen1
}
Loop 10
{
Send, ^{Tab} ;tab and look for already open streaming services
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w ;close tab
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen1:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser1%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser1%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser1%
Return
}
fav2button:
If fav2maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen2
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen2:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser2%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser2%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser2%
Return
}
fav3button:
If fav3maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen3
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen3:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser3%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser3%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser3%
Return
}
fav4button:
If fav4maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen4
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen4:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser4%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser4%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser4%
Return
}
fav5button:
If fav5maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen5
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen5:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser5%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser5%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser5%
Return
}
fav6button:
If fav6maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen6
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen6:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser6%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser6%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser6%
Return
}
fav7button:
If fav7maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen7
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen7:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser7%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser7%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser7%
Return
}
fav8button:
If fav8maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen8
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen8:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser8%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser8%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser8%
Return
}
fav9button:
If fav9maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen9
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen9:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser9%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser9%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser9%
Return
}
fav10button:
If fav10maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen10
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen10:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser10%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser10%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser10%
Return
}
fav11button:
If fav11maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen11
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen11:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser11%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser11%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser11%
Return
}
fav12button:
If fav12maingui =
{
Return
}
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Run, chrome.exe
goto chromeopen12
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Netflix,Hulu,Disney,prime
{
send ^w
break
}
}
WinActivate, ahk_class Chrome_WidgetWin_1
chromeopen12:
If currentuserdropdown = %user1%
{
Run chrome.exe %user1ser12%
Return
}
If currentuserdropdown = %user2%
{
Run chrome.exe %user2ser12%
Return
}
If currentuserdropdown = %user3%
{
Run chrome.exe %user3ser12%
Return
}
Return
;=========================================================================================
;Settings #aaa444
;=========================================================================================
settingsgui:
Gui, Destroy
;user 1 dropdown load
IniRead, user1ser1, %savepath%, user1favs, user1ser1
IniRead, user1ser2, %savepath%, user1favs, user1ser2
IniRead, user1ser3, %savepath%, user1favs, user1ser3
IniRead, user1ser4, %savepath%, user1favs, user1ser4
IniRead, user1ser5, %savepath%, user1favs, user1ser5
IniRead, user1ser6, %savepath%, user1favs, user1ser6
IniRead, user1ser7, %savepath%, user1favs, user1ser7
IniRead, user1ser8, %savepath%, user1favs, user1ser8
IniRead, user1ser9, %savepath%, user1favs, user1ser9
IniRead, user1ser10, %savepath%, user1favs, user1ser10
IniRead, user1ser11, %savepath%, user1favs, user1ser11
IniRead, user1ser12, %savepath%, user1favs, user1ser12
;user 2 dropdown load
IniRead, user2ser1, %savepath%, user2favs, user2ser1
IniRead, user2ser2, %savepath%, user2favs, user2ser2
IniRead, user2ser3, %savepath%, user2favs, user2ser3
IniRead, user2ser4, %savepath%, user2favs, user2ser4
IniRead, user2ser5, %savepath%, user2favs, user2ser5
IniRead, user2ser6, %savepath%, user2favs, user2ser6
IniRead, user2ser7, %savepath%, user2favs, user2ser7
IniRead, user2ser8, %savepath%, user2favs, user2ser8
IniRead, user2ser9, %savepath%, user2favs, user2ser9
IniRead, user2ser10, %savepath%, user2favs, user2ser10
IniRead, user2ser11, %savepath%, user2favs, user2ser11
IniRead, user2ser12, %savepath%, user2favs, user2ser12
;user 3 dropdown load
IniRead, user3ser1, %savepath%, user3favs, user3ser1
IniRead, user3ser2, %savepath%, user3favs, user3ser2
IniRead, user3ser3, %savepath%, user3favs, user3ser3
IniRead, user3ser4, %savepath%, user3favs, user3ser4
IniRead, user3ser5, %savepath%, user3favs, user3ser5
IniRead, user3ser6, %savepath%, user3favs, user3ser6
IniRead, user3ser7, %savepath%, user3favs, user3ser7
IniRead, user3ser8, %savepath%, user3favs, user3ser8
IniRead, user3ser9, %savepath%, user3favs, user3ser9
IniRead, user3ser10, %savepath%, user3favs, user3ser10
IniRead, user3ser11, %savepath%, user3favs, user3ser11
IniRead, user3ser12, %savepath%, user3favs, user3ser12
;user 1 fav show name load
Iniread, user1fav1, %savepath%, user1favs, user1fav1
Iniread, user1fav2, %savepath%, user1favs, user1fav2
Iniread, user1fav3, %savepath%, user1favs, user1fav3
Iniread, user1fav4, %savepath%, user1favs, user1fav4
Iniread, user1fav5, %savepath%, user1favs, user1fav5
Iniread, user1fav6, %savepath%, user1favs, user1fav6
Iniread, user1fav7, %savepath%, user1favs, user1fav7
Iniread, user1fav8, %savepath%, user1favs, user1fav8
Iniread, user1fav9, %savepath%, user1favs, user1fav9
Iniread, user1fav10, %savepath%, user1favs, user1fav10
Iniread, user1fav11, %savepath%, user1favs, user1fav11
Iniread, user1fav12, %savepath%, user1favs, user1fav12
;user 2 fav show name load
Iniread, user2fav1, %savepath%, user2favs, user2fav1
Iniread, user2fav2, %savepath%, user2favs, user2fav2
Iniread, user2fav3, %savepath%, user2favs, user2fav3
Iniread, user2fav4, %savepath%, user2favs, user2fav4
Iniread, user2fav5, %savepath%, user2favs, user2fav5
Iniread, user2fav6, %savepath%, user2favs, user2fav6
Iniread, user2fav7, %savepath%, user2favs, user2fav7
Iniread, user2fav8, %savepath%, user2favs, user2fav8
Iniread, user2fav9, %savepath%, user2favs, user2fav9
Iniread, user2fav10, %savepath%, user2favs, user2fav10
Iniread, user2fav11, %savepath%, user2favs, user2fav11
Iniread, user2fav12, %savepath%, user2favs, user2fav12
;user 3 fav show name load
Iniread, user3fav1, %savepath%, user3favs, user3fav1
Iniread, user3fav2, %savepath%, user3favs, user3fav2
Iniread, user3fav3, %savepath%, user3favs, user3fav3
Iniread, user3fav4, %savepath%, user3favs, user3fav4
Iniread, user3fav5, %savepath%, user3favs, user3fav5
Iniread, user3fav6, %savepath%, user3favs, user3fav6
Iniread, user3fav7, %savepath%, user3favs, user3fav7
Iniread, user3fav8, %savepath%, user3favs, user3fav8
Iniread, user3fav9, %savepath%, user3favs, user3fav9
Iniread, user3fav10, %savepath%, user3favs, user3fav10
Iniread, user3fav11, %savepath%, user3favs, user3fav11
Iniread, user3fav12, %savepath%, user3favs, user3fav12
Gui, Add, GroupBox, x12 y9 w270 h560 , User 1
Gui, Add, Text, x22 y29 w120 h20 , Main Name
Gui, Add, Edit, x22 y49 w120 h20 vuser1, %user1%
Gui, Add, Text, x22 y79 w120 h20 , Fav 1
Gui, Add, Edit, x22 y99 w120 h20 vuser1fav1, %user1fav1%
Gui, Add, Edit, x22 y119 w120 h20 vuser1ser1, %user1ser1%
Gui, Add, Text, x22 y149 w120 h20 , Fav 2
Gui, Add, Edit, x22 y169 w120 h20 vuser1fav2, %user1fav2%
Gui, Add, Edit, x22 y189 w120 h20 vuser1ser2, %user1ser2%
Gui, Add, Text, x22 y219 w120 h20 , Fav 3
Gui, Add, Edit, x22 y239 w120 h20 vuser1fav3, %user1fav3%
Gui, Add, Edit, x22 y259 w120 h20 vuser1ser3, %user1ser3%
Gui, Add, Text, x22 y289 w120 h20 , Fav 4
Gui, Add, Edit, x22 y309 w120 h20 vuser1fav4, %user1fav4%
Gui, Add, Edit, x22 y329 w120 h20 vuser1ser4, %user1ser4%
Gui, Add, Text, x22 y359 w120 h20 , Fav 5
Gui, Add, Edit, x22 y379 w120 h20 vuser1fav5, %user1fav5%
Gui, Add, Edit, x22 y399 w120 h20 vuser1ser5, %user1ser5%
Gui, Add, Text, x22 y429 w120 h20 , Fav 6
Gui, Add, Edit, x22 y449 w120 h20 vuser1fav6, %user1fav6%
Gui, Add, Edit, x22 y469 w120 h20 vuser1ser6, %user1ser6%
Gui, Add, Text, x22 y499 w120 h20 , Fav 7
Gui, Add, Edit, x22 y519 w120 h20 vuser1fav7, %user1fav7%
Gui, Add, Edit, x22 y539 w120 h20 vuser1ser7, %user1ser7%
Gui, Add, Text, x152 y79 w120 h20 , Fav 8
Gui, Add, Edit, x152 y99 w120 h20 vuser1fav8, %user1fav8%
Gui, Add, Edit, x152 y119 w120 h20 vuser1ser8, %user1ser8%
Gui, Add, Text, x152 y149 w120 h20 , Fav 9
Gui, Add, Edit, x152 y169 w120 h20 vuser1fav9, %user1fav9%
Gui, Add, Edit, x152 y189 w120 h20 vuser1ser9, %user1ser9%
Gui, Add, Text, x152 y219 w120 h20 , Fav 10
Gui, Add, Edit, x152 y239 w120 h20 vuser1fav10, %user1fav10%
Gui, Add, Edit, x152 y259 w120 h20 vuser1ser10, %user1ser10%
Gui, Add, Text, x152 y289 w120 h20 , Fav 11
Gui, Add, Edit, x152 y309 w120 h20 vuser1fav11, %user1fav11%
Gui, Add, Edit, x152 y329 w120 h20 vuser1ser11, %user1ser11%
Gui, Add, Text, x152 y359 w120 h20 , Fav 12
Gui, Add, Edit, x152 y379 w120 h20 vuser1fav12, %user1fav12%
Gui, Add, Edit, x152 y399 w120 h20 vuser1ser12, %user1fav12%
Gui, Add, GroupBox, x292 y9 w270 h560 , User 2
Gui, Add, Text, x302 y29 w120 h20 , Main Name
Gui, Add, Edit, x302 y49 w120 h20 vuser2, %user2%
Gui, Add, Text, x302 y79 w120 h20 , Fav 1
Gui, Add, Edit, x302 y99 w120 h20 vuser2fav1, %user2fav1%
Gui, Add, Edit, x302 y119 w120 h20 vuser2ser1, %user2ser1%
Gui, Add, Text, x302 y149 w120 h20 , Fav 2
Gui, Add, Edit, x302 y169 w120 h20 vuser2fav2, %user2fav2%
Gui, Add, Edit, x302 y189 w120 h20 vuser2ser2, %user2ser2%
Gui, Add, Text, x302 y219 w120 h20 , Fav 3
Gui, Add, Edit, x302 y239 w120 h20 vuser2fav3, %user2fav3%
Gui, Add, Edit, x302 y259 w120 h20 vuser2ser3, %user2ser3%
Gui, Add, Text, x302 y289 w120 h20 , Fav 4
Gui, Add, Edit, x302 y309 w120 h20 vuser2fav4, %user2fav4%
Gui, Add, Edit, x302 y329 w120 h20 vuser2ser4, %user2ser4%
Gui, Add, Text, x302 y359 w120 h20 , Fav 5
Gui, Add, Edit, x302 y379 w120 h20 vuser2fav5, %user2fav5%
Gui, Add, Edit, x302 y399 w120 h20 vuser2ser5, %user2ser5%
Gui, Add, Text, x302 y429 w120 h20 , Fav 6
Gui, Add, Edit, x302 y449 w120 h20 vuser2fav6, %user2fav6%
Gui, Add, Edit, x302 y469 w120 h20 vuser2ser6, %user2ser6%
Gui, Add, Text, x302 y499 w120 h20 , Fav 7
Gui, Add, Edit, x302 y519 w120 h20 vuser2fav7, %user2fav7%
Gui, Add, Edit, x302 y539 w120 h20 vuser2ser7, %user2ser7%
Gui, Add, Text, x432 y79 w120 h20 , Fav 8
Gui, Add, Edit, x432 y99 w120 h20 vuser2fav8, %user2fav8%
Gui, Add, Edit, x432 y119 w120 h20 vuser2ser8, %user2ser8%
Gui, Add, Text, x432 y149 w120 h20 , Fav 9
Gui, Add, Edit, x432 y169 w120 h20 vuser2fav9, %user2fav9%
Gui, Add, Edit, x432 y189 w120 h20 vuser2ser9, %user2ser9%
Gui, Add, Text, x432 y219 w120 h20 , Fav 10
Gui, Add, Edit, x432 y239 w120 h20 vuser2fav10, %user2fav10%
Gui, Add, Edit, x432 y259 w120 h20 vuser2ser10, %user2ser10%
Gui, Add, Text, x432 y289 w120 h20 , Fav 11
Gui, Add, Edit, x432 y309 w120 h20 vuser2fav11, %user2fav11%
Gui, Add, Edit, x432 y329 w120 h20 vuser2ser11, %user2ser11%
Gui, Add, Text, x432 y359 w120 h20 , Fav 12
Gui, Add, Edit, x432 y379 w120 h20 vuser2fav12, %user2fav12%
Gui, Add, Edit, x432 y399 w120 h20 vuser2ser12, %user2fav12%
Gui, Add, GroupBox, x572 y9 w270 h560 , User 3
Gui, Add, Text, x582 y29 w120 h20 , Main Name
Gui, Add, Edit, x582 y49 w120 h20 vuser3, %user3%
Gui, Add, Text, x582 y79 w120 h20 , Fav 1
Gui, Add, Edit, x582 y99 w120 h20 vuser3fav1, %user3fav1%
Gui, Add, Edit, x582 y119 w120 h20 vuser3ser1, %user3ser1%
Gui, Add, Text, x582 y149 w120 h20 , Fav 2
Gui, Add, Edit, x582 y169 w120 h20 vuser3fav2, %user3fav2%
Gui, Add, Edit, x582 y189 w120 h20 vuser3ser2, %user3ser2%
Gui, Add, Text, x582 y219 w120 h20 , Fav 3
Gui, Add, Edit, x582 y239 w120 h20 vuser3fav3, %user3fav3%
Gui, Add, Edit, x582 y259 w120 h20 vuser3ser3, %user3ser3%
Gui, Add, Text, x582 y289 w120 h20 , Fav 4
Gui, Add, Edit, x582 y309 w120 h20 vuser3fav4, %user3fav4%
Gui, Add, Edit, x582 y329 w120 h20 vuser3ser4, %user3ser4%
Gui, Add, Text, x582 y359 w120 h20 , Fav 5
Gui, Add, Edit, x582 y379 w120 h20 vuser3fav5, %user3fav5%
Gui, Add, Edit, x582 y399 w120 h20 vuser3ser5, %user3ser5%
Gui, Add, Text, x582 y429 w120 h20 , Fav 6
Gui, Add, Edit, x582 y449 w120 h20 vuser3fav6, %user3fav6%
Gui, Add, Edit, x582 y469 w120 h20 vuser3ser6, %user3ser6%
Gui, Add, Text, x582 y499 w120 h20 , Fav 7
Gui, Add, Edit, x582 y519 w120 h20 vuser3fav7, %user3fav7%
Gui, Add, Edit, x582 y539 w120 h20 vuser3ser7, %user3ser7%
Gui, Add, Text, x712 y79 w120 h20 , Fav 8
Gui, Add, Edit, x712 y99 w120 h20 vuser3fav8, %user3fav8%
Gui, Add, Edit, x712 y119 w120 h20 vuser3ser8, %user3ser8%
Gui, Add, Text, x712 y149 w120 h20 , Fav 9
Gui, Add, Edit, x712 y169 w120 h20 vuser3fav9, %user3fav9%
Gui, Add, Edit, x712 y189 w120 h20 vuser3ser9, %user3ser9%
Gui, Add, Text, x712 y219 w120 h20 , Fav 10
Gui, Add, Edit, x712 y239 w120 h20 vuser3fav10, %user3fav10%
Gui, Add, Edit, x712 y259 w120 h20 vuser3ser10, %user3ser10%
Gui, Add, Text, x712 y289 w120 h20 , Fav 11
Gui, Add, Edit, x712 y309 w120 h20 vuser3fav11, %user3fav11%
Gui, Add, Edit, x712 y329 w120 h20 vuser3ser11, %user3ser11%
Gui, Add, Text, x712 y359 w120 h20 , Fav 12
Gui, Add, Edit, x712 y379 w120 h20 vuser3fav12, %user1fav12%
Gui, Add, Edit, x712 y399 w120 h20 vuser3ser12, %user1fav12%
Gui, Add, Button, x182 y589 w100 h30 gsettingssave, Save
Gui, Add, Button, x382 y589 w100 h30 gmaingui, Cancel
Gui, Add, Button, x572 y589 w100 h30 gcleatallsettings, Clear All Data
Gui, Add, Text, x372 y649 w120 h20 , Fav 1
Gui, Add, GroupBox, x362 y629 w140 h90 , Example
Gui, Add, Edit, x372 y669 w120 h20 , Show Name
Gui, Add, Edit, x372 y689 w120 h20 , Show URL
Gui, Show, h731 w863, Settings
Return
;=========================================================================================
;Settings save #aaa555
;=========================================================================================
settingssave:
Gui, Submit
;usernames save user 1
IniWrite, %user1%, %savepath%, mainaccountholder, user1
;usernames save user 2
IniWrite, %user2%, %savepath%, mainaccountholder, user2
;usernames save user 3
IniWrite, %user3%, %savepath%, mainaccountholder, user3
;User 1 Save Fav
IniWrite, %user1fav1%, %savepath%, user1favs, user1fav1
IniWrite, %user1ser1%, %savepath%, user1favs, user1ser1
IniWrite, %user1fav2%, %savepath%, user1favs, user1fav2
IniWrite, %user1ser2%, %savepath%, user1favs, user1ser2
IniWrite, %user1fav3%, %savepath%, user1favs, user1fav3
IniWrite, %user1ser3%, %savepath%, user1favs, user1ser3
IniWrite, %user1fav4%, %savepath%, user1favs, user1fav4
IniWrite, %user1ser4%, %savepath%, user1favs, user1ser4
IniWrite, %user1fav5%, %savepath%, user1favs, user1fav5
IniWrite, %user1ser5%, %savepath%, user1favs, user1ser5
IniWrite, %user1fav6%, %savepath%, user1favs, user1fav6
IniWrite, %user1ser6%, %savepath%, user1favs, user1ser6
IniWrite, %user1fav7%, %savepath%, user1favs, user1fav7
IniWrite, %user1ser7%, %savepath%, user1favs, user1ser7
IniWrite, %user1fav8%, %savepath%, user1favs, user1fav8
IniWrite, %user1ser8%, %savepath%, user1favs, user1ser8
IniWrite, %user1fav9%, %savepath%, user1favs, user1fav9
IniWrite, %user1ser9%, %savepath%, user1favs, user1ser9
IniWrite, %user1fav10%, %savepath%, user1favs, user1fav10
IniWrite, %user1ser10%, %savepath%, user1favs, user1ser10
IniWrite, %user1fav11%, %savepath%, user1favs, user1fav11
IniWrite, %user1ser11%, %savepath%, user1favs, user1ser11
IniWrite, %user1fav12%, %savepath%, user1favs, user1fav12
IniWrite, %user1ser12%, %savepath%, user1favs, user1ser12
;User 2 Save Fav
IniWrite, %user2fav1%, %savepath%, user2favs, user2fav1
IniWrite, %user2ser1%, %savepath%, user2favs, user2ser1
IniWrite, %user2fav2%, %savepath%, user2favs, user2fav2
IniWrite, %user2ser2%, %savepath%, user2favs, user2ser2
IniWrite, %user2fav3%, %savepath%, user2favs, user2fav3
IniWrite, %user2ser3%, %savepath%, user2favs, user2ser3
IniWrite, %user2fav4%, %savepath%, user2favs, user2fav4
IniWrite, %user2ser4%, %savepath%, user2favs, user2ser4
IniWrite, %user2fav5%, %savepath%, user2favs, user2fav5
IniWrite, %user2ser5%, %savepath%, user2favs, user2ser5
IniWrite, %user2fav6%, %savepath%, user2favs, user2fav6
IniWrite, %user2ser6%, %savepath%, user2favs, user2ser6
IniWrite, %user2fav7%, %savepath%, user2favs, user2fav7
IniWrite, %user2ser7%, %savepath%, user2favs, user2ser7
IniWrite, %user2fav8%, %savepath%, user2favs, user2fav8
IniWrite, %user2ser8%, %savepath%, user2favs, user2ser8
IniWrite, %user2fav9%, %savepath%, user2favs, user2fav9
IniWrite, %user2ser9%, %savepath%, user2favs, user2ser9
IniWrite, %user2fav10%, %savepath%, user2favs, user2fav10
IniWrite, %user2ser10%, %savepath%, user2favs, user2ser10
IniWrite, %user2fav11%, %savepath%, user2favs, user2fav11
IniWrite, %user2ser11%, %savepath%, user2favs, user2ser11
IniWrite, %user2fav12%, %savepath%, user2favs, user2fav12
IniWrite, %user2ser12%, %savepath%, user2favs, user2ser12
;User 3 Save Fav
IniWrite, %user3fav1%, %savepath%, user3favs, user3fav1
IniWrite, %user3ser1%, %savepath%, user3favs, user3ser1
IniWrite, %user3fav2%, %savepath%, user3favs, user3fav2
IniWrite, %user3ser2%, %savepath%, user3favs, user3ser2
IniWrite, %user3fav3%, %savepath%, user3favs, user3fav3
IniWrite, %user3ser3%, %savepath%, user3favs, user3ser3
IniWrite, %user3fav4%, %savepath%, user3favs, user3fav4
IniWrite, %user3ser4%, %savepath%, user3favs, user3ser4
IniWrite, %user3fav5%, %savepath%, user3favs, user3fav5
IniWrite, %user3ser5%, %savepath%, user3favs, user3ser5
IniWrite, %user3fav6%, %savepath%, user3favs, user3fav6
IniWrite, %user3ser6%, %savepath%, user3favs, user3ser6
IniWrite, %user3fav7%, %savepath%, user3favs, user3fav7
IniWrite, %user3ser7%, %savepath%, user3favs, user3ser7
IniWrite, %user3fav8%, %savepath%, user3favs, user3fav8
IniWrite, %user3ser8%, %savepath%, user3favs, user3ser8
IniWrite, %user3fav9%, %savepath%, user3favs, user3fav9
IniWrite, %user3ser9%, %savepath%, user3favs, user3ser9
IniWrite, %user3fav10%, %savepath%, user3favs, user3fav10
IniWrite, %user3ser10%, %savepath%, user3favs, user3ser10
IniWrite, %user3fav11%, %savepath%, user3favs, user3fav11
IniWrite, %user3ser11%, %savepath%, user3favs, user3ser11
IniWrite, %user3fav12%, %savepath%, user3favs, user2fav12
IniWrite, %user3ser12%, %savepath%, user3favs, user2ser12
goto maingui
Return
;=========================================================================================
;Settings Clear all #aaa666
;=========================================================================================
cleatallsettings:
MsgBox, 4,, This will clear all date. ALL!
IfMsgBox Yes
{
goto cleardatanow
}
IfMsgBox No
{
Return
}
cleardatanow:
gui, destroy
;usernames delete user 1
blank=
IniWrite, %blank%, %savepath%, mainaccountholder, user1
;usernames delete user 2
IniWrite, %blank%, %savepath%, mainaccountholder, user2
;usernames delete user 3
IniWrite, %blank%, %savepath%, mainaccountholder, user3
;user 1 delete user fav
IniWrite, %blank%, %savepath%, user1favs, user1fav1
IniWrite, %blank%, %savepath%, user1favs, user1fav2
IniWrite, %blank%, %savepath%, user1favs, user1fav3
IniWrite, %blank%, %savepath%, user1favs, user1fav4
IniWrite, %blank%, %savepath%, user1favs, user1fav5
IniWrite, %blank%, %savepath%, user1favs, user1fav6
IniWrite, %blank%, %savepath%, user1favs, user1fav7
IniWrite, %blank%, %savepath%, user1favs, user1fav8
IniWrite, %blank%, %savepath%, user1favs, user1fav9
IniWrite, %blank%, %savepath%, user1favs, user1fav10
IniWrite, %blank%, %savepath%, user1favs, user1fav11
IniWrite, %blank%, %savepath%, user1favs, user1fav12
IniWrite, %blank%, %savepath%, user1favs, user1ser1
IniWrite, %blank%, %savepath%, user1favs, user1ser2
IniWrite, %blank%, %savepath%, user1favs, user1ser3
IniWrite, %blank%, %savepath%, user1favs, user1ser4
IniWrite, %blank%, %savepath%, user1favs, user1ser5
IniWrite, %blank%, %savepath%, user1favs, user1ser6
IniWrite, %blank%, %savepath%, user1favs, user1ser7
IniWrite, %blank%, %savepath%, user1favs, user1ser8
IniWrite, %blank%, %savepath%, user1favs, user1ser9
IniWrite, %blank%, %savepath%, user1favs, user1ser10
IniWrite, %blank%, %savepath%, user1favs, user1ser11
IniWrite, %blank%, %savepath%, user1favs, user1ser12
;user 2 delete user fav
IniWrite, %blank%, %savepath%, user2favs, user2fav1
IniWrite, %blank%, %savepath%, user2favs, user2fav2
IniWrite, %blank%, %savepath%, user2favs, user2fav3
IniWrite, %blank%, %savepath%, user2favs, user2fav4
IniWrite, %blank%, %savepath%, user2favs, user2fav5
IniWrite, %blank%, %savepath%, user2favs, user2fav6
IniWrite, %blank%, %savepath%, user2favs, user2fav7
IniWrite, %blank%, %savepath%, user2favs, user2fav8
IniWrite, %blank%, %savepath%, user2favs, user2fav9
IniWrite, %blank%, %savepath%, user2favs, user2fav10
IniWrite, %blank%, %savepath%, user2favs, user2fav11
IniWrite, %blank%, %savepath%, user2favs, user2fav12
IniWrite, %blank%, %savepath%, user2favs, user2ser1
IniWrite, %blank%, %savepath%, user2favs, user2ser2
IniWrite, %blank%, %savepath%, user2favs, user2ser3
IniWrite, %blank%, %savepath%, user2favs, user2ser4
IniWrite, %blank%, %savepath%, user2favs, user2ser5
IniWrite, %blank%, %savepath%, user2favs, user2ser6
IniWrite, %blank%, %savepath%, user2favs, user2ser7
IniWrite, %blank%, %savepath%, user2favs, user2ser8
IniWrite, %blank%, %savepath%, user2favs, user2ser9
IniWrite, %blank%, %savepath%, user2favs, user2ser10
IniWrite, %blank%, %savepath%, user2favs, user2ser11
IniWrite, %blank%, %savepath%, user2favs, user2ser12
;user 3 delete user fav
IniWrite, %blank%, %savepath%, user3favs, user3fav1
IniWrite, %blank%, %savepath%, user3favs, user3fav2
IniWrite, %blank%, %savepath%, user3favs, user3fav3
IniWrite, %blank%, %savepath%, user3favs, user3fav4
IniWrite, %blank%, %savepath%, user3favs, user3fav5
IniWrite, %blank%, %savepath%, user3favs, user3fav6
IniWrite, %blank%, %savepath%, user3favs, user3fav7
IniWrite, %blank%, %savepath%, user3favs, user3fav8
IniWrite, %blank%, %savepath%, user3favs, user3fav9
IniWrite, %blank%, %savepath%, user3favs, user3fav10
IniWrite, %blank%, %savepath%, user3favs, user3fav11
IniWrite, %blank%, %savepath%, user3favs, user3fav12
IniWrite, %blank%, %savepath%, user3favs, user3ser1
IniWrite, %blank%, %savepath%, user3favs, user3ser2
IniWrite, %blank%, %savepath%, user3favs, user3ser3
IniWrite, %blank%, %savepath%, user3favs, user3ser4
IniWrite, %blank%, %savepath%, user3favs, user3ser5
IniWrite, %blank%, %savepath%, user3favs, user3ser6
IniWrite, %blank%, %savepath%, user3favs, user3ser7
IniWrite, %blank%, %savepath%, user3favs, user3ser8
IniWrite, %blank%, %savepath%, user3favs, user3ser9
IniWrite, %blank%, %savepath%, user3favs, user3ser10
IniWrite, %blank%, %savepath%, user3favs, user3ser11
IniWrite, %blank%, %savepath%, user3favs, user3ser12
IniWrite, %blank%, %savepath%, Musicfavsuser1, musicfav1name
IniWrite, %blank%, %savepath%, Musicfavsuser1, musicfav2name
IniWrite, %blank%, %savepath%, Musicfavsuser1, musicfav3name
IniWrite, %blank%, %savepath%, Musicfavsuser1, musicfav4name
IniWrite, %blank%, %savepath%, Musicfavsuser1URL, musicfav1url
IniWrite, %blank%, %savepath%, Musicfavsuser1URL, musicfav2url
IniWrite, %blank%, %savepath%, Musicfavsuser1URL, musicfav3url
IniWrite, %blank%, %savepath%, Musicfavsuser1URL, musicfav4url
IniWrite, %blank%, %savepath%, Musicfavsuser2, musicfav1name
IniWrite, %blank%, %savepath%, Musicfavsuser2, musicfav2name
IniWrite, %blank%, %savepath%, Musicfavsuser2, musicfav3name
IniWrite, %blank%, %savepath%, Musicfavsuser2, musicfav4name
IniWrite, %blank%, %savepath%, Musicfavsuser2URL, musicfav1url
IniWrite, %blank%, %savepath%, Musicfavsuser2URL, musicfav2url
IniWrite, %blank%, %savepath%, Musicfavsuser2URL, musicfav3url
IniWrite, %blank%, %savepath%, Musicfavsuser2URL, musicfav4url
IniWrite, %blank%, %savepath%, Musicfavsuser3, musicfav1name
IniWrite, %blank%, %savepath%, Musicfavsuser3, musicfav2name
IniWrite, %blank%, %savepath%, Musicfavsuser3, musicfav3name
IniWrite, %blank%, %savepath%, Musicfavsuser3, musicfav4name
IniWrite, %blank%, %savepath%, Musicfavsuser3URL, musicfav1url
IniWrite, %blank%, %savepath%, Musicfavsuser3URL, musicfav2url
IniWrite, %blank%, %savepath%, Musicfavsuser3URL, musicfav3url
IniWrite, %blank%, %savepath%, Musicfavsuser3URL, musicfav4url
IniWrite, No, %savepath%, upcomingdelete, deleteafteralert
IniWrite, %blank%, %savepath%, upcomingdelete, typeofalertsetting
IniWrite, %blank%, %savepath%, upcomingdelete, sendtoemailcellsave
IniWrite, %blank%, %savepath%, upcomingdelete, myprovider
IniWrite, %blank%, %savepath%, upcomingdelete, emailusername
IniWrite, %blank%, %savepath%, upcomingdelete, emailPW
Reload
Return
;=========================================================================================
;Grab Calendar info and add #aaa777
;=========================================================================================
f11::
WinActivate, ahk_class Chrome_WidgetWin_1
Send ^a
Send ^c
StringSplit, String_array, clipboard, `r
StringSplit, date_array, String_array17, on
FileRead, showsaved, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
StringReplace, date_array8, date_array8, EDT,, All
StringReplace, date_array8, date_array8, January, 01, All
StringReplace, date_array8, date_array8, February, 02, All
StringReplace, date_array8, date_array8, March, 03, All
StringReplace, date_array8, date_array8, April, 04, All
StringReplace, date_array8, date_array8, May, 05, All
StringReplace, date_array8, date_array8, June, 06, All
StringReplace, date_array8, date_array8, July, 07, All
StringReplace, date_array8, date_array8, August, 08, All
StringReplace, date_array8, date_array8, September, 09, All
StringReplace, date_array8, date_array8, October, 10, All
StringReplace, date_array8, date_array8, November, 11, All
StringReplace, date_array8, date_array8, December, 12, All
comma=,
StringReplace, date_array8, date_array8, %comma%,, All
showsaved=%String_array16% +%date_array8%
FileAppend, %showsaved%, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
Return
;=========================================================================================
;Upcoming list #aaa888
;=========================================================================================
upcominglist:
loopcount=0
Loop 100{
loopcount++
Column%loopcount%=
}
Gui, Destroy
Gui, Add, Picture, x0 y0 w329 h685 , C:\Users\%A_UserName%\Documents\StreamRight\streamrightbackground.png
Gui, Add, Button, x12 y9 w100 h30 gopennetflixmedia, Browse Releases
Gui, Add, ListView, x12 y49 w300 h590 vFileContents gGuiContextMenu, Shows|Date
Gui, Add, Button, x212 y9 w100 h30 gmaingui, Cancel
Gui, Add, Button, x132 y9 w60 h30 gupcomingsettings, Settings
Gui, Add, Button, x12 y649 w300 h30 gmanuelenterupcoming, Enter New Upcoming reminder.
Gui, Show, h685 w329, Up Coming Releases
Loop, Read, %savepathcoming%
{
StringSplit, Column, A_LoopReadLine, +
LV_Add("Icon",Column1, Column2)
}
LV_ModifyCol()
LV_ModifyCol(2, "Sort")
Menu,Menu1,Add,Delete,Deleteupcoming
Return
GuiContextMenu:
Menu,Menu1,Show
Return
Deleteupcoming:
GuiControlGet, focused, FocusV ; get focused control
If focused != FileContents ; if focused control isn't the listview...
Return ; then return
row := LV_GetNext(0, "Focused") ; get focused row number
LV_GetText(text1, row, 1) ; get text of focused row and column 1
LV_GetText(text2, row, 2) ; get text of focused row and column 2
MsgBox, 4,, Do you want to remove %text1% on %text2% From your list?
IfMsgBox Yes
{
gui, submit, nohide
FileRead, showsaved, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
FileDelete, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
StringReplace, showsaved, showsaved,%text1%, , All
StringReplace, showsaved, showsaved,%text2%, , All
StringReplace, showsaved, showsaved,+`r, , All
StringReplace, showsaved, showsaved,`n, , All
FileAppend, %showsaved%, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
goto upcominglist
}
IfMsgBox No
{
Return
}
Return
opennetflixmedia:
Msgbox, Once you find a show to add press F11
Run chrome.exe "https media.netflix.com /en/" Broken Link for safety
Return
;=========================================================================================
;manuel enter shows gui #aaa999
;=========================================================================================
manuelenterupcoming:
Gui, Destroy
Gui, Add, GroupBox, x12 y9 w260 h50 , Show Name
Gui, Add, Edit, x22 y29 w240 h20 vmanshowname,
Gui, Add, GroupBox, x12 y69 w260 h50 , Release Date
Gui, Add, DateTime, x22 y89 w240 h20 vmanreleasedate,
Gui, Add, Button, x22 y129 w100 h20 gmansave, Save
Gui, Add, Button, x162 y129 w100 h20 gupcominglist, Cancel
Gui, Show, h160 w286, Enter Upcoming Show
Return
mansave:
Gui, Submit
FormatTime, manreleasedate2, %manreleasedate%, MM dd yyyy
FileRead, showsaved, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
comma=,
StringReplace, manreleasedate2, manreleasedate2, %comma%,, All
showsaved=%manshowname% +%manreleasedate2% 3:00 AM
FileAppend, `n%showsaved%, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
goto upcominglist
Return
;=========================================================================================
;Send email or text of new show release based off timer at start #bbb111
;=========================================================================================
checkfortodayreleases:
loopcount=0
FormatTime, CurrentDateTime,, MM dd yyyy
Loop, read, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
{
Loop, parse, A_LoopReadLine, `r
{
If A_LoopReadLine contains %CurrentDateTime%
{
nameofshow=%A_LoopReadLine%
Goto Sendmessageout
}
}
}
Return
Sendmessageout:
Iniread, deleteafteralert, %savepath%, upcomingdelete, deleteafteralert
Iniread, typeofalertsetting, %savepath%, upcomingdelete, typeofalertsetting
Iniread, sendtoemailcellsave, %savepath%, upcomingdelete, sendtoemailcellsave
Iniread, myprovider, %savepath%, upcomingdelete, myprovider
Iniread, emailusername, %savepath%, upcomingdelete, emailusername
Iniread, emailPW, %savepath%, upcomingdelete, emailPW
If sendtoemailcellsave =
{
Return
}
If myprovider = AT&T
{
[email protected]
}
If myprovider = Boost Mobile
{
[email protected]
}
If myprovider = Cricket
{
[email protected]
}
If myprovider = Metro PCS
{
[email protected]
}
If myprovider = Sprint
{
[email protected]
}
If myprovider = T-Mobile
{
[email protected]
}
If myprovider = Tracfone
{
emailending=mmst5.tracfone.com
}
If myprovider = Verizon
{
[email protected]
}
If myprovider = Virgin Mobile
{
[email protected]
}
If typeofalertsetting = Computer
{
StringSplit, word_array, nameofshow, +
Msgbox, %word_array1% Is out today!
If deleteafteralert = Yes
{
FileRead, showsaved, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
FileDelete, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
StringReplace, showsaved, showsaved,%word_array1%, , All
StringReplace, showsaved, showsaved,%word_array2%, , All
StringReplace, showsaved, showsaved,+`r, , All
StringReplace, showsaved, showsaved,`n, , All
FileAppend, %showsaved%, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
}
Return
}
StringSplit, word_array, nameofshow, +,
pmsg := ComObjCreate("CDO.Message")
pmsg.From := """StreamRight"" <[email protected]>"
fullemail=%sendtoemailcellsave%%emailending%
pmsg.To := fullemail
pmsg.Subject := "---New Release Today---"
word_arrayfull=%word_array1% Is out today!
pmsg.TextBody := word_arrayfull
fields := Object()
fields.smtpserver := "smtp.gmail.com" ; specify your SMTP server
fields.smtpserverport := 465 ; 25
fields.smtpusessl := True ; False
fields.sendusing := 2 ; cdoSendUsingPort
fields.smtpauthenticate := 1 ; cdoBasic
fields.sendusername := emailusername
fields.sendpassword := emailPW
fields.smtpconnectiontimeout := 60
schema := "http schemas.microsoft.com /cdo/configuration/" Broken Link for safety
pfld := pmsg.Configuration.Fields
For field,value in fields
pfld.Item(schema . field) := value
pfld.Update()
Loop, Parse, sAttach, |, %A_Space%%A_Tab%
pmsg.AddAttachment(A_LoopField)
pmsg.Send()
If deleteafteralert = Yes
{
FileRead, showsaved, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
FileDelete, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
StringReplace, showsaved, showsaved,%word_array1%, , All
StringReplace, showsaved, showsaved,%word_array2%, , All
StringReplace, showsaved, showsaved,+`r, , All
StringReplace, showsaved, showsaved,`n, , All
FileAppend, %showsaved%, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
}
Return
;=========================================================================================
;Up coming settings #bbb222
;=========================================================================================
upcomingsettings:
Iniread, deleteafteralert, %savepath%, upcomingdelete, deleteafteralert
Iniread, typeofalertsetting, %savepath%, upcomingdelete, typeofalertsetting
Iniread, sendtoemailcellsave, %savepath%, upcomingdelete, sendtoemailcellsave
Iniread, myprovider, %savepath%, upcomingdelete, myprovider
Iniread, emailusername, %savepath%, upcomingdelete, emailusername
Iniread, emailPW, %savepath%, upcomingdelete, emailPW
;dropdown send how
If typeofalertsetting = Phone
{
typedrop1 = Choose1
}
If typeofalertsetting = Email
{
typedrop1 = Choose2
}
If typeofalertsetting = Computer
{
typedrop1 = Choose3
}
;dropdown provider
If myprovider = AT&T
{
typedrop2 = Choose1
}
If myprovider = Boost Mobile
{
typedrop2 = Choose2
}
If myprovider = Cricket
{
typedrop2 = Choose3
}
If myprovider = Metro PCS
{
typedrop2 = Choose4
}
If myprovider = Sprint
{
typedrop2 = Choose5
}
If myprovider = T-Mobile
{
typedrop2 = Choose6
}
If myprovider = Tracfone
{
typedrop2 = Choose7
}
If myprovider = Verizon
{
typedrop2 = Choose8
}
If myprovider = Virgin Mobile
{
typedrop2 = Choose9
}
;dropdown delete after message sent
If deleteafteralert = Yes
{
Checkedyes = Checked
}
If deleteafteralert = No
{
Checkedno = Checked
}
gui, destroy
Gui, Add, GroupBox, x12 y9 w450 h120 , Alerts Settings
Gui, Add, DropDownList, x22 y49 w110 h150 vtypeofalertsetting %typedrop1%, Phone|Email|Computer
Gui, Add, Text, x22 y29 w110 h20 , How to receive
Gui, Add, Text, x172 y29 w120 h20 , Delete After notice sent
Gui, Add, Radio, x182 y49 w50 h20 vRadioGroupyes %Checkedyes%, Yes
Gui, Add, Radio, x242 y49 w50 h20 vRadioGroupno %Checkedno%, No
Gui, Add, Text, x22 y239 w430 h60 , As long as program is running a check for release dates will happen every 24 hours based on your saved list. Once an alert is sent out you can have the show deleted from your list or manually do it from the list when read. The first time you get an alert you may have recive an email asking if you want to alow this program access to send.
Gui, Add, Text, x22 y79 w170 h20 , Email or cell # you want to send to
Gui, Add, Edit, x22 y99 w170 h20 vsendtoemailcellsave, %sendtoemailcellsave%
Gui, Add, DropDownList, x312 y49 w130 h150 vmyprovider %typedrop2% , AT&T|Boost Mobile|Cricket|Metro PCS|Sprint|T-Mobile|Tracfone|Verizon|Virgin Mobile
Gui, Add, Text, x312 y29 w110 h20 , Phone Provider
Gui, Add, GroupBox, x12 y129 w450 h100 , Gmail Log in
Gui, Add, Text, x22 y149 w350 h20 , This info is stored locally and can not be share outside of your computer.
Gui, Add, Text, x72 y179 w110 h20 , Gmail Username
Gui, Add, Edit, x32 y199 w170 h20 vemailusername, %emailusername%
Gui, Add, Text, x312 y179 w110 h20 , Gmail Password
Gui, Add, Edit, x262 y199 w170 h20 Password vemailPW, %emailPW%
Gui, Add, Button, x182 y299 w100 h30 gSaveupcomingsettings, Save
Gui, Show, h341 w479, Upcoming Settings
Return
Saveupcomingsettings:
Gui, Submit
if RadioGroupyes = 1
{
deleteafteralert=Yes
}
if RadioGroupno = 1
{
deleteafteralert=No
}
IniWrite, %deleteafteralert%, %savepath%, upcomingdelete, deleteafteralert
IniWrite, %typeofalertsetting%, %savepath%, upcomingdelete, typeofalertsetting
IniWrite, %sendtoemailcellsave%, %savepath%, upcomingdelete, sendtoemailcellsave
IniWrite, %myprovider%, %savepath%, upcomingdelete, myprovider
IniWrite, %emailusername%, %savepath%, upcomingdelete, emailusername
IniWrite, %emailPW%, %savepath%, upcomingdelete, emailPW
msgbox, If using upcoming text messaging standard rates may apply.
goto upcominglist
Return
;=========================================================================================
;Go to Watch togather site #bbb333
;=========================================================================================
Watchtogather:
Run, chrome.exe "https w2g.tv /" Broken Link for safety
Return
;=========================================================================================
;Release and upcoming history #bbb444
;=========================================================================================
Releasehistory:
updateinfo=
(
9/18/2020 Beta v1
Well pretty much everything is new since this is the first release.
For any ideas or bugs please press the Email Support button below
to copy the email address to clipboard
---------------------------------------------------------------------
9/29/2020 Beta v2
Cleaner Settings GUI / Smaller
blank fav buttons will no longer open chrome
fixed manuel adding show bug
added GUI background
---------------------------------------------------------------------
10/01/2020 Beta v3
Music added
Survey added
Bug fixes
-----------Planned-----------
- Add more streaming services
- Lang. support
- World domination
- Recurring show reminders
)
Gui, 2:destroy
Gui, 2:Add, Edit, x12 y9 w450 h330 , %updateinfo%
Gui, 2:Add, Button, x15 y349 w100 h20 gtakeasurvey, Survey
Gui, 2:Add, Button, x182 y349 w100 h20 gcopysupportemail, Email Support
Gui, 2:Add, Button, x362 y349 w100 h20 gfundmetoday, Donate
Gui, 2:Show, h385 w479, Updates
send {right}
Return
copysupportemail:
[email protected]
Return
;=========================================================================================
;Donate GUI #bbb555
;=========================================================================================
fundmetoday:
Gui, 3:Add, Text, x12 y9 w450 h40 , Anything you could help with is awesome as I work a full time job and work on this on the little free time I have. I would love to see this project grow with more features and your help would go a long way! Thank you streamers
Gui, 3:Add, Button, x172 y59 w100 h30 ggofundmeplease, GoFundMe
Gui, 3:Show, h103 w479, Help me out!
Return
gofundmeplease:
Gui, 3:destroy
Run, chrome.exe "gf.me/u/y2rasb"
Return
;=========================================================================================
;Close out of program #bbb666
;=========================================================================================
Exitall:
ExitApp
;=========================================================================================
;Music contrals gui #bbb777
;=========================================================================================
musiccontraller:
If currentuserdropdown = %user1%
{
Iniread, musicfav1name, %savepath%, Musicfavsuser1, musicfav1name
Iniread, musicfav2name, %savepath%, Musicfavsuser1, musicfav2name
Iniread, musicfav3name, %savepath%, Musicfavsuser1, musicfav3name
Iniread, musicfav4name, %savepath%, Musicfavsuser1, musicfav4name
Iniread, musicfav1url, %savepath%, Musicfavsuser1URL, musicfav1url
Iniread, musicfav1ur2, %savepath%, Musicfavsuser1URL, musicfav2url
Iniread, musicfav1ur3, %savepath%, Musicfavsuser1URL, musicfav3url
Iniread, musicfav1ur4, %savepath%, Musicfavsuser1URL, musicfav4url
}
If currentuserdropdown = %user2%
{
Iniread, musicfav1name, %savepath%, Musicfavsuser2, musicfav1name
Iniread, musicfav2name, %savepath%, Musicfavsuser2, musicfav2name
Iniread, musicfav3name, %savepath%, Musicfavsuser2, musicfav3name
Iniread, musicfav4name, %savepath%, Musicfavsuser2, musicfav4name
Iniread, musicfav1url, %savepath%, Musicfavsuser2URL, musicfav1url
Iniread, musicfav1ur2, %savepath%, Musicfavsuser2URL, musicfav2url
Iniread, musicfav1ur3, %savepath%, Musicfavsuser2URL, musicfav3url
Iniread, musicfav1ur4, %savepath%, Musicfavsuser2URL, musicfav4url
}
If currentuserdropdown = %user3%
{
Iniread, musicfav1name, %savepath%, Musicfavsuser3, musicfav1name
Iniread, musicfav2name, %savepath%, Musicfavsuser3, musicfav2name
Iniread, musicfav3name, %savepath%, Musicfavsuser3, musicfav3name
Iniread, musicfav4name, %savepath%, Musicfavsuser3, musicfav4name
Iniread, musicfav1url, %savepath%, Musicfavsuser3URL, musicfav1url
Iniread, musicfav1ur2, %savepath%, Musicfavsuser3URL, musicfav2url
Iniread, musicfav1ur3, %savepath%, Musicfavsuser3URL, musicfav3url
Iniread, musicfav1ur4, %savepath%, Musicfavsuser3URL, musicfav4url
}
gui, 4:Destroy
Gui, 4:+AlwaysOnTop
Gui, 4:Add, Button, x2 y-1 w30 h40 gmusicback, <<
Gui, 4:Add, Button, x42 y-1 w40 h40 gmusicplaypause, ll / >
Gui, 4:Add, Button, x92 y-1 w30 h40 gmusicnext, >>
Gui, 4:Add, Button, x382 y-1 w40 h40 gmusicsettings, Set.
Gui, 4:Add, Button, x142 y-1 w80 h20 gmusicpandora, Pandora
Gui, 4:Add, Button, x142 y19 w80 h20 gmusicsoundcloud, Soundcloud
Gui, 4:Add, Button, x222 y-1 w80 h20 gmusicfav1, %musicfav1name%
Gui, 4:Add, Button, x222 y19 w80 h20 gmusicfav2, %musicfav2name%
Gui, 4:Add, Button, x302 y-1 w80 h20 gmusicfav3, %musicfav3name%
Gui, 4:Add, Button, x302 y19 w80 h20 gmusicfav4, %musicfav4name%
Gui, 4:Show, h40 w427, Music Controller
Return
;go to last song
musicback:
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
If WinExist("Pandora")
{
Return
}
Send {Media_Prev}
Return
;pause or play song
musicplaypause:
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
Send {Media_Play_Pause}
Return
;goto next song
musicnext:
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
Loop 10
If WinExist("Pandora")
{
WinActivate, ahk_class Chrome_WidgetWin_1
Loop 10{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Pandora
{
send {right}
Send {Alt down}
Send {tab}
Sleep 100
IfWinNotActive, ahk_exe chrome.exe
{
Send {tab}
Send {Alt up}
Return
}
Return
}
}
}
Send {Media_Next}
Return
;=========================================================================================
;Music dropdown #bbb888
;=========================================================================================
;open new tab with service pick
musicpandora:
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Pandora
{
Send ^w
break
}
If CurrentWindowTitle contains Soundcloud
{
Send ^w
break
}
}
Run, chrome.exe "https www.pandora.com /" Broken Link for safety
Return
musicsoundcloud:
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Pandora
{
Send ^w
break
}
If CurrentWindowTitle contains Soundcloud
{
Send ^w
break
}
}
Run, chrome.exe "https soundcloud.com /discover" Broken Link for safety
Return
musicfav1:
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Pandora
{
Send ^w
break
}
If CurrentWindowTitle contains Soundcloud
{
Send ^w
break
}
}
Run, chrome.exe %musicfav1url%
Return
musicfav2:
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Pandora
{
Send ^w
break
}
If CurrentWindowTitle contains Soundcloud
{
Send ^w
break
}
}
Run, chrome.exe %musicfav2url%
Return
musicfav3:
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Pandora
{
Send ^w
break
}
If CurrentWindowTitle contains Soundcloud
{
Send ^w
break
}
}
Run, chrome.exe %musicfav1ur3%
Return
musicfav4:
WinActivate, ahk_class Chrome_WidgetWin_1
If Not WinExist("ahk_exe chrome.exe")
{
Return
}
Loop 10
{
Send, ^{Tab}
Sleep, 50
WinGetTitle, CurrentWindowTitle, ahk_class Chrome_WidgetWin_1
If CurrentWindowTitle contains Pandora
{
Send ^w
break
}
If CurrentWindowTitle contains Soundcloud
{
Send ^w
break
}
}
Run, chrome.exe %musicfav1ur4%
Return
;=========================================================================================
;Music settings #bbb999
;=========================================================================================
musicsettings:
Gui, 5:destroy
Gui, 5:Add, Text, x12 y9 w90 h20 , Music Fav 1
Gui, 5:Add, Edit, x12 y29 w90 h20 vmusicfav1name, %musicfav1name%
Gui, 5:Add, Edit, x12 y49 w90 h20 vmusicfav1url, %musicfav1url%
Gui, 5:Add, Text, x112 y9 w90 h20 , Music Fav 2
Gui, 5:Add, Edit, x112 y29 w90 h20 vmusicfav2name, %musicfav2name%
Gui, 5:Add, Edit, x112 y49 w90 h20 vmusicfav2url, %musicfav2url%
Gui, 5:Add, Text, x212 y9 w90 h20 , Music Fav 3
Gui, 5:Add, Edit, x212 y29 w90 h20 vmusicfav3name, %musicfav3name%
Gui, 5:Add, Edit, x212 y49 w90 h20 vmusicfav3url, %musicfav3url%
Gui, 5:Add, Text, x312 y9 w90 h20 , Music Fav 4
Gui, 5:Add, Edit, x312 y29 w90 h20 vmusicfav4name, %musicfav4name%
Gui, 5:Add, Edit, x312 y49 w90 h20 vmusicfav4url, %musicfav4url%
Gui, 5:Add, Button, x112 y79 w90 h30 gmusicsettingssave, Save
Gui, 5:Add, Button, x212 y79 w90 h30 gmuscisettingscancel, Cancel
Gui, 5:Add, Text, x422 y19 w90 h20 , Music Fav 1
Gui, 5:Add, Edit, x422 y39 w90 h20 , Station Name
Gui, 5:Add, Edit, x422 y59 w90 h20 , Station URL
Gui, 5:Add, GroupBox, x412 y-1 w110 h90 , Example
Gui, 5:Show, h123 w542, Music Settings
Return
;=========================================================================================
;Music settings save #ccc111
;=========================================================================================
musicsettingssave:
Gui, 5:Submit
If currentuserdropdown = %user1%
{
IniWrite, %musicfav1name%, %savepath%, Musicfavsuser1, musicfav1name
IniWrite, %musicfav2name%, %savepath%, Musicfavsuser1, musicfav2name
IniWrite, %musicfav3name%, %savepath%, Musicfavsuser1, musicfav3name
IniWrite, %musicfav4name%, %savepath%, Musicfavsuser1, musicfav4name
IniWrite, %musicfav1url%, %savepath%, Musicfavsuser1URL, musicfav1url
IniWrite, %musicfav1ur2%, %savepath%, Musicfavsuser1URL, musicfav2url
IniWrite, %musicfav1ur3%, %savepath%, Musicfavsuser1URL, musicfav3url
IniWrite, %musicfav1ur4%, %savepath%, Musicfavsuser1URL, musicfav4url
goto musiccontraller
}
If currentuserdropdown = %user2%
{
IniWrite, %musicfav1name%, %savepath%, Musicfavsuser2, musicfav1name
IniWrite, %musicfav2name%, %savepath%, Musicfavsuser2, musicfav2name
IniWrite, %musicfav3name%, %savepath%, Musicfavsuser2, musicfav3name
IniWrite, %musicfav4name%, %savepath%, Musicfavsuser2, musicfav4name
IniWrite, %musicfav1url%, %savepath%, Musicfavsuser2URL, musicfav1url
IniWrite, %musicfav1ur2%, %savepath%, Musicfavsuser2URL, musicfav2url
IniWrite, %musicfav1ur3%, %savepath%, Musicfavsuser2URL, musicfav3url
IniWrite, %musicfav1ur4%, %savepath%, Musicfavsuser2URL, musicfav4url
goto musiccontraller
}
If currentuserdropdown = %user3%
{
IniWrite, %musicfav1name%, %savepath%, Musicfavsuser3, musicfav1name
IniWrite, %musicfav2name%, %savepath%, Musicfavsuser3, musicfav2name
IniWrite, %musicfav3name%, %savepath%, Musicfavsuser3, musicfav3name
IniWrite, %musicfav4name%, %savepath%, Musicfavsuser3, musicfav4name
IniWrite, %musicfav1url%, %savepath%, Musicfavsuser1URL, musicfav1url
IniWrite, %musicfav1ur2%, %savepath%, Musicfavsuser2URL, musicfav2url
IniWrite, %musicfav1ur3%, %savepath%, Musicfavsuser3URL, musicfav3url
IniWrite, %musicfav1ur4%, %savepath%, Musicfavsuser4URL, musicfav4url
goto musiccontraller
}
Return
;=========================================================================================
;Music settings cancel #ccc222
;=========================================================================================
muscisettingscancel:
Gui, 5:Destroy
Return
;=========================================================================================
;Survey gui #ccc333
;=========================================================================================
takeasurvey:
Gui, 6:destroy
Gui, 6:Add, Text, x12 y9 w170 h20 , How many users use this program?
Gui, 6:Add, CheckBox, x202 y-11 w30 h60 vsurc1, 1
Gui, 6:Add, CheckBox, x252 y-1 w50 h40 vsurc2, 2
Gui, 6:Add, CheckBox, x302 y-1 w50 h40 vsurc3, 3
Gui, 6:Add, Text, x12 y59 w170 h20 , Do you use the music section?
Gui, 6:Add, CheckBox, x202 y49 w40 h30 vsuryes, Yes
Gui, 6:Add, CheckBox, x252 y49 w80 h30 vsurno, No
Gui, 6:Add, Text, x12 y109 w250 h20 , How many favs do you have for TV/Movies?
Gui, 6:Add, Edit, x252 y109 w50 h20 vsurtv,
Gui, 6:Add, Text, x12 y159 w250 h20 , How many favs do you have for Music?
Gui, 6:Add, Edit, x252 y159 w50 h20 vsurmusic,
Gui, 6:Add, Text, x12 y199 w280 h20 , Any other comments/Ideas/Bugs?
Gui, 6:Add, Edit, x12 y219 w310 h80 vsurcomments,
Gui, 6:Add, Button, x62 y309 w100 h30 gsursend, Send
Gui, 6:Add, Button, x182 y309 w100 h30 gsurnotnow, Not Now
Gui, 6:Show, x783 y318 h356 w340, Survey
Return
surnotnow:
Gui, 6:destroy
Return
sursend:
IniWrite, %emailPW%, %savepath%, upcomingdelete, emailPW
If emailPW =
{
Msgbox, Looks like you have not set up an email. Please goto the upcoming settings to add.
Return
}
Gui, 6:Submit
suremailinfo=
(
How many users use this program? = %surc1% %surc2% %surc3%
Do you use the music section? = %suryes% %surno%
How many favs do you have for TV/Movies? = %surtv%
How many favs do you have for Music? = %surmusic%
Any other comments/Ideas/Bugs?
%surcomments%
)
Iniread, deleteafteralert, %savepath%, upcomingdelete, deleteafteralert
Iniread, typeofalertsetting, %savepath%, upcomingdelete, typeofalertsetting
Iniread, sendtoemailcellsave, %savepath%, upcomingdelete, sendtoemailcellsave
Iniread, myprovider, %savepath%, upcomingdelete, myprovider
Iniread, emailusername, %savepath%, upcomingdelete, emailusername
If sendtoemailcellsave =
{
Return
}
If myprovider = AT&T
{
[email protected]
}
If myprovider = Boost Mobile
{
[email protected]
}
If myprovider = Cricket
{
[email protected]
}
If myprovider = Metro PCS
{
[email protected]
}
If myprovider = Sprint
{
[email protected]
}
If myprovider = T-Mobile
{
[email protected]
}
If myprovider = Tracfone
{
emailending=mmst5.tracfone.com
}
If myprovider = Verizon
{
[email protected]
}
If myprovider = Virgin Mobile
{
[email protected]
}
If typeofalertsetting = Computer
{
StringSplit, word_array, nameofshow, +
Msgbox, %word_array1% Is out today!
If deleteafteralert = Yes
{
FileRead, showsaved, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
FileDelete, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
StringReplace, showsaved, showsaved,%word_array1%, , All
StringReplace, showsaved, showsaved,%word_array2%, , All
StringReplace, showsaved, showsaved,+`r, , All
StringReplace, showsaved, showsaved,`n, , All
FileAppend, %showsaved%, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
}
Return
}
StringSplit, word_array, nameofshow, +,
pmsg := ComObjCreate("CDO.Message")
pmsg.From := """StreamRight"" <[email protected]>"
[email protected]
pmsg.To := fullemail
pmsg.Subject := "---Survey Sent---"
pmsg.TextBody := suremailinfo
fields := Object()
fields.smtpserver := "smtp.gmail.com" ; specify your SMTP server
fields.smtpserverport := 465 ; 25
fields.smtpusessl := True ; False
fields.sendusing := 2 ; cdoSendUsingPort
fields.smtpauthenticate := 1 ; cdoBasic
fields.sendusername := emailusername
fields.sendpassword := emailPW
fields.smtpconnectiontimeout := 60
schema := "http schemas.microsoft.com /cdo/configuration/" Broken Link for safety
pfld := pmsg.Configuration.Fields
For field,value in fields
pfld.Item(schema . field) := value
pfld.Update()
Loop, Parse, sAttach, |, %A_Space%%A_Tab%
pmsg.AddAttachment(A_LoopField)
pmsg.Send()
If deleteafteralert = Yes
{
FileRead, showsaved, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
FileDelete, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
StringReplace, showsaved, showsaved,%word_array1%, , All
StringReplace, showsaved, showsaved,%word_array2%, , All
StringReplace, showsaved, showsaved,+`r, , All
StringReplace, showsaved, showsaved,`n, , All
FileAppend, %showsaved%, C:\Users\%A_UserName%\Documents\StreamRight\StreamRightupcoming.txt
}
Return