|
|
|
@ -139,6 +139,7 @@ IniRead, TelegramBotChatID, %SettingsIniFilepath%, SocialMediaPoster, TelegramBo
|
|
|
|
|
IniRead, DiscordErrorLoggingWebhookBotURL, %SettingsIniFilepath%, SocialMediaPoster, DiscordErrorLoggingWebhookBotURL, %A_Space%
|
|
|
|
|
IniRead, DiscordParlerWebhookURL, %SettingsIniFilepath%, SocialMediaPoster, DiscordParlerWebhookURL, %A_Space%
|
|
|
|
|
IniRead, ChromeFilepath, %SettingsIniFilepath%, SocialMediaPoster, ChromeFilepath, %A_Space%
|
|
|
|
|
IniRead, ConfirmBeforeSubmit, %SettingsIniFilepath%, %ScriptSettingsSection%, ConfirmBeforeSubmit, 1
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
@ -280,10 +281,6 @@ if(StrLen(ErrorLoggingDirectory) > 5 and !InStr(ErrorLoggingDirectory, ".exe")){
|
|
|
|
|
; Append bitchute url to bottom of description
|
|
|
|
|
PostBody := PostBody . "`n`n" . PodcastURL . VideoURL
|
|
|
|
|
|
|
|
|
|
; Msgbox % "PostTitle: " PostTitle
|
|
|
|
|
; Msgbox % "PostBody: " PostBody
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Discord := 0
|
|
|
|
|
Telegram := 0
|
|
|
|
|
}
|
|
|
|
@ -314,12 +311,7 @@ if(StrLen(ErrorLoggingDirectory) > 5 and !InStr(ErrorLoggingDirectory, ".exe")){
|
|
|
|
|
(Locals != "")?(LocalsCheckStatus := 0) : (LocalsCheckStatus := 1)
|
|
|
|
|
(LinkedIN != "")?(LinkedINCheckStatus := 0) : (LinkedINCheckStatus := 1)
|
|
|
|
|
(Twetch != "")?(TwetchCheckStatus := 0) : (TwetchCheckStatus := 0)
|
|
|
|
|
; (ThinkSpot != "")?(ThinkSpotCheckStatus := 0) : (ThinkSpotCheckStatus := 0)
|
|
|
|
|
; (Flote != "")?(FloteCheckStatus := 0) : (FloteCheckStatus := 0)
|
|
|
|
|
; (Pintrest != "")?(PintrestCheckStatus := 0) : (PintrestCheckStatus := 1)
|
|
|
|
|
; (Parler != "")?(ParlerCheckStatus := 0) : (ParlerCheckStatus := 0)
|
|
|
|
|
(PocketNet != "")?(PocketNetCheckStatus := 0) : (PocketNetCheckStatus := 1)
|
|
|
|
|
; (Tumblr != "")?(TumblrCheckStatus := 0) : (TumblrCheckStatus := 1)
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
@ -335,7 +327,6 @@ if(TestingMode){ ; Easy testing for Yuriy
|
|
|
|
|
LinkedINCheckStatus := 0
|
|
|
|
|
MeWeCheckStatus := 0
|
|
|
|
|
TwetchCheckStatus := 0
|
|
|
|
|
; ThinkSpotCheckStatus := 0
|
|
|
|
|
PocketNetCheckStatus := 0
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
@ -391,21 +382,25 @@ if(DevMode){
|
|
|
|
|
|
|
|
|
|
Gui, Font, s%GUINormalFontSize%
|
|
|
|
|
Gui, Font, Bold
|
|
|
|
|
Gui, Add, Text, x%Marginspace% y+5 w%EditBoxWidth%, Post Title
|
|
|
|
|
Gui, Add, Text, x%Marginspace% y+5, Post Title
|
|
|
|
|
Gui, Font, s8
|
|
|
|
|
Gui, Font, Normal
|
|
|
|
|
Gui, Font, s8
|
|
|
|
|
Gui, Add, Checkbox, xp+120 yp+10 vBoldTitleWAPI Checked%BoldTitleCheckStatus% gUpdateVars,Bold Title on Discord/Telegram
|
|
|
|
|
Gui, Add, Checkbox, xp+220 yp+0 vNewLineBetweenTitle Checked%SpaceBetweenTitleBodyCheckStatus% gUpdateVars,Blank Line Between Title+Body
|
|
|
|
|
Gui, Add, Button, x+%MarginSpace% gPasteClipboardToEditBox vPasteClipboardToSMPTitle, Paste Clipboard
|
|
|
|
|
Gui, Add, Checkbox, xp+120 vBoldTitleWAPI Checked%BoldTitleCheckStatus% gUpdateVars,Bold Title on Discord/Telegram
|
|
|
|
|
Gui, Add, Checkbox, xp+220 vNewLineBetweenTitle Checked%SpaceBetweenTitleBodyCheckStatus% gUpdateVars,Blank Line Between Title+Body
|
|
|
|
|
Gui, Font, Normal
|
|
|
|
|
Gui, Font, s%GUINormalFontSize%
|
|
|
|
|
Gui, Add, Edit, x%MarginSpace% y+3 w%EditBoxWidth% vPostTitle gUpdateCharCount h75, %PostTitle%
|
|
|
|
|
Gui, Add, Edit, x%MarginSpace% y+%marginspace% w%EditBoxWidth% vPostTitle gUpdateCharCount h50, %PostTitle%
|
|
|
|
|
|
|
|
|
|
Gui, Font, Bold
|
|
|
|
|
Gui, Add, Text,w%EditBoxWidth%, Post Body
|
|
|
|
|
Gui, Add, Text,, Post Body
|
|
|
|
|
Gui, Font, Normal
|
|
|
|
|
|
|
|
|
|
Gui, Font, s8
|
|
|
|
|
Gui, Add, Button, x+%MarginSpace% gPasteClipboardToEditBox vPasteClipboardToSMPBody, Paste Clipboard
|
|
|
|
|
|
|
|
|
|
Gui, Font, s%GUINormalFontSize%
|
|
|
|
|
Gui, Add, Edit, x%MarginSpace% y+2 w%EditBoxWidth% h150 vPostBody gUpdateCharCount, %PostBody%
|
|
|
|
|
Gui, Add, Edit, x%MarginSpace% y+2 w%EditBoxWidth% h200 vPostBody gUpdateCharCount, %PostBody%
|
|
|
|
|
|
|
|
|
|
; Gui, font, color, cblack
|
|
|
|
|
|
|
|
|
@ -475,19 +470,15 @@ Gui, Add, GroupBox,r4 x%PlatformsGroupBoxXLocation% y20 w300, Settings
|
|
|
|
|
Gui, Font, s11
|
|
|
|
|
Gui, Font, Normal
|
|
|
|
|
Gui, Add, Checkbox, xp+10 yp+25 vAutoUpdateCheck Checked%AutoUpdateCheckCheckStatus% gUpdateVars, Auto Update Check
|
|
|
|
|
Gui, Add, Checkbox, vReuseTabs Checked%ReuseTabsCheckStatus% gUpdateVars, Try to Re-Use Tabs
|
|
|
|
|
; Gui, Add, Checkbox, vNewChromeWindow Checked%AutoUpdateCheckCheckStatus% gUpdateVars, Create New Chrome Window (WIP)
|
|
|
|
|
; Gui, Add, Checkbox, vReuseTabs Checked%ReuseTabsCheckStatus% gUpdateVars, Try to Re-Use Tabs
|
|
|
|
|
Gui, Add, Checkbox,vShowTooltipProgress Checked%ShowTooltipProgressCheckStatus% gUpdateVars, Show Tooltip of Progress
|
|
|
|
|
; Gui, Add, Checkbox, vAutoUpdateCheck Checked%AutoUpdateCheckCheckStatus% gUpdateVars, Auto Update Check
|
|
|
|
|
Gui, Add, Checkbox, vSaveTagsBetweenPosts Checked%SaveTagsBetweenPostsCheckStatus% gUpdateVars, Save Tags Between Posts
|
|
|
|
|
Gui, Add, Checkbox, vPauseBetweenPosts Checked%PauseBetweenPostsCheckCheckStatus% gUpdateVars, Pause Briefly Between Posts
|
|
|
|
|
Gui, Add, Checkbox, vConfirmBeforeSubmit checked%ConfirmBeforeSubmit%, Confirm Before Submit
|
|
|
|
|
|
|
|
|
|
; Gui, Add, Checkbox, vPauseBetweenPosts Checked%PauseBetweenPostsCheckCheckStatus% gUpdateVars, Pause Briefly Between Posts
|
|
|
|
|
; Gui, Add, Checkbox, vAutoRestartChromeDebug Checked%PauseBetweenPostsCheckCheckStatus% gUpdateVars, Auto Restart Chrome in Debug Mode
|
|
|
|
|
Gui, Font, s%GUINormalFontSize%
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Gui, Font, Bold
|
|
|
|
|
Gui, Add, GroupBox,r6.4 x%PlatformsGroupBoxXLocation% y210 w300, Platforms
|
|
|
|
|
Gui, Font, Normal
|
|
|
|
@ -530,7 +521,8 @@ gui, font, normal
|
|
|
|
|
Gui, Add, StatusBar,, Total Posts Posted: %TotalPostsPosted% | Total Run Time: %TotalRunTime% Seconds |
|
|
|
|
|
|
|
|
|
|
; easier to just let the gui size be as needed instead of trying to recalculate the size each time an element is added
|
|
|
|
|
Gui, Show, x%XPosition% y%YPosition% ,%FullScriptName% ; , w%GuiWidth%, %ScriptName%
|
|
|
|
|
; Gui, Show, x%XPosition% y%YPosition% ,%FullScriptName% ; , w%GuiWidth%, %ScriptName%
|
|
|
|
|
Gui, Show, ,%FullScriptName% ; , w%GuiWidth%, %ScriptName%
|
|
|
|
|
ControlFocus, Edit1, %FullScriptName%
|
|
|
|
|
|
|
|
|
|
|
|
|
|
@ -564,6 +556,9 @@ Return
|
|
|
|
|
|
|
|
|
|
;---Misc GoSubs---
|
|
|
|
|
;------------------------------------------------
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
SaveAsTemplate:
|
|
|
|
|
TemplateDirectory = %A_ScriptDir%\Lib\Templates
|
|
|
|
|
if(!FileExist(TemplateDirectory)){
|
|
|
|
@ -713,19 +708,12 @@ UpdateCharCount:
|
|
|
|
|
Gui, Submit, NoHide
|
|
|
|
|
Count := StrLen(PostBody)
|
|
|
|
|
|
|
|
|
|
/*if(Count > 256){
|
|
|
|
|
GuiControl,, Twetch, 0
|
|
|
|
|
|
|
|
|
|
}
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
GuiControl,, CharCount, %Count%
|
|
|
|
|
Return
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
TryFailedAgain:
|
|
|
|
|
; msgbox %ErrorLoggingDirectory%
|
|
|
|
|
run, %A_ScriptFullPath% "LastPost"
|
|
|
|
|
ExitApp
|
|
|
|
|
; Return
|
|
|
|
@ -751,16 +739,8 @@ Return
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
PostPost:
|
|
|
|
|
|
|
|
|
|
WinGetPos, XPosition, YPosition, , , A
|
|
|
|
|
IniWrite, %XPosition%, %SettingsIniFilepath%, %ScriptSettingsSection%, XPosition
|
|
|
|
|
IniWrite, %YPosition%, %SettingsIniFilepath%, %ScriptSettingsSection%, YPosition
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Gui, Submit
|
|
|
|
|
|
|
|
|
|
; Msgbox % "PostTags: " PostTags
|
|
|
|
|
|
|
|
|
|
if(InStr(PostTags, "http")){
|
|
|
|
|
Message = Post Tags contain "http". Please edit and remove the url and try again.
|
|
|
|
|
Msgbox, 4096, Error, %Message%
|
|
|
|
@ -792,6 +772,11 @@ if(InStr(ErrorLoggingDirectory, "\Templates\") OR ErrorLoggingDirectory = "" OR
|
|
|
|
|
} ;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; Save Script Settings to File
|
|
|
|
|
; ------------------------------------------------
|
|
|
|
|
WinGetPos, XPosition, YPosition, , , A
|
|
|
|
|
IniWrite, %XPosition%, %SettingsIniFilepath%, %ScriptSettingsSection%, XPosition
|
|
|
|
|
IniWrite, %YPosition%, %SettingsIniFilepath%, %ScriptSettingsSection%, YPosition
|
|
|
|
|
|
|
|
|
|
IniWrite, %BoldTitleWAPI%, %SettingsIniFilepath%, SocialMediaPoster, BoldTitleWAPI
|
|
|
|
|
IniWrite, %NewLineBetweenTitle%, %SettingsIniFilepath%, SocialMediaPoster, NewLineBetweenTitle
|
|
|
|
@ -802,6 +787,9 @@ IniWrite, %SaveTagsBetweenPosts%, %SettingsIniFilepath%, SocialMediaPoster, Save
|
|
|
|
|
IniWrite, %PauseBetweenPosts%, %SettingsIniFilepath%, SocialMediaPoster, PauseBetweenPosts
|
|
|
|
|
IniWrite, %ErrorLoggingDirectory%, %SettingsIniFilepath%, %ScriptSettingsSection%, LastPost
|
|
|
|
|
|
|
|
|
|
IniWrite, %ConfirmBeforeSubmit%, %SettingsIniFilepath%, %ScriptSettingsSection%, ConfirmBeforeSubmit
|
|
|
|
|
|
|
|
|
|
; Used by Post Scheduler, filepath changes between script updates
|
|
|
|
|
IniWrite, %A_ScriptFullPath%, %SettingsIniFilepath%, Filepaths, SocialMediaPosterFilepath
|
|
|
|
|
|
|
|
|
|
|
|
|
|
@ -1221,3 +1209,6 @@ Return
|
|
|
|
|
; Misc Functions
|
|
|
|
|
;------------------------------------------------
|
|
|
|
|
#include %A_ScriptDir%\Modules\Miscellaneous-Functions.ahk
|
|
|
|
|
|
|
|
|
|
; used by update checker and paste from clipboard
|
|
|
|
|
#include %A_ScriptDir%\Lib\Freedomain-Posters-Shared-Functions\Shared-GoTos.ahk
|
|
|
|
|