You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
340 lines
12 KiB
Plaintext
340 lines
12 KiB
Plaintext
|
|
DisplayMainGUI:
|
|
|
|
;---GUI Variables---
|
|
;------------------------------------------------
|
|
GuiHeight = 800
|
|
GuiWidth = 1366
|
|
GuiFontSize = 10
|
|
|
|
ButtonHeights := 30
|
|
|
|
MarginSpace := 10
|
|
MarginSpaceDoubled := MarginSpace * 2
|
|
MarginSpaceTripled := MarginSpace * 3
|
|
|
|
EditBoxWidths := (GuiWidth / 100) * 60
|
|
EditBoxHalfWidths := (EditBoxWidths / 2) - (MarginSpace / 2)
|
|
OdyseeURLSlugEditWidth := (EditBoxHalfWidths / 4) * 3
|
|
|
|
PodcastNumberTextXPos := EditBoxHalfWidths + OdyseeURLSlugEditWidth + (MarginSpace * 3)
|
|
PodcastNumberEditWidth := (EditBoxHalfWidths / 4) - MarginSpace
|
|
|
|
EditBoxOneFourthWidth := (EditBoxWidths / 4 )
|
|
EditBoxThreeFourthsWidth := (EditBoxWidths / 4 ) * 3
|
|
|
|
|
|
ColumnOneHalfWidthXPos := EditBoxHalfWidths + MarginSpaceDoubled
|
|
|
|
EditBoxThirdsWidths := (EditBoxWidths / 3) - (MarginSpace / 2)
|
|
OdyseeURLSlugXPos := EditBoxHalfWidths + (MarginSpace * 2)
|
|
|
|
EditBoxFourthWidths := (EditBoxWidths / 4) - (MarginSpace - 2)
|
|
VideoTagsTextXPos := EditBoxHalfWidths + (MarginSpace * 2)
|
|
|
|
; EditBoxHalfWidthsWithMargin := (EditBoxWidths / 2)
|
|
DescriptionCharCountXPos := EditBoxWidths - 40
|
|
|
|
PageTwoXStartPos := EditBoxWidths + 50
|
|
|
|
CopyButtonWidths := 150
|
|
ResultEditBoxXPos := CopyButtonWidths + MarginSpace + 5
|
|
ResultEditBoxWidths := EditBoxWidths - CopyButtonWidths
|
|
|
|
ResultEditBoxHalfWidths := (ResultEditBoxWidths / 2) - (MarginSpace /2)
|
|
ResultLBRYURLEditBoxWidthPieces := (ResultEditBoxWidths / 4)
|
|
ResultLBRYURLEditBoxWidths := ResultLBRYURLEditBoxWidthPieces * 3
|
|
|
|
ResultEditBoxThirdsWidths := (ResultEditBoxWidths / 3) - (MarginSpace /3)
|
|
|
|
|
|
ResultLBRYThumbEditBoxWidth := ResultLBRYURLEditBoxWidthPieces - 5
|
|
|
|
ErrorLogEditBoxXPos := ResultEditBoxWidths + CopyButtonWidths + 30
|
|
ErrorLogEditBoxHeight := GuiHeight - (MarginSpace * 20) - (ButtonHeights * 2)
|
|
ErrorLogEditBoxWidth := GuiWidth - ErrorLogEditBoxXPos - (MarginSpace * 12)
|
|
|
|
|
|
ButtonWidths := 150
|
|
ButtonXPos := GuiWidth - ButtonWidths - 15
|
|
|
|
SubmitButtonYLocation := GuiHeight - 50
|
|
SubmitButtonXLocation := GuiWidth - 90
|
|
CancelButtonXLocation := GuiWidth - 180
|
|
|
|
EditBoxHeight := 25
|
|
ThumbnailPreviewWidth := 300
|
|
PageTwoGroupBoxWidth := ThumbnailPreviewWidth + 20
|
|
|
|
; Size of Description Edit Box and the location of the checkboxes underneath them
|
|
VideoDescriptionEditBoxHeight = 100
|
|
CheckboxesStartYPos := 630
|
|
|
|
FilePathEditBoxWidths := EditBoxWidths - MarginSpace - 70
|
|
SelectFileButtonWidths := 30
|
|
|
|
ButtonStartYPos := CheckboxesStartYPos + 10
|
|
MarginSquared := MarginSpace * 2
|
|
|
|
if(DevMode){
|
|
MainButtonHeight := 30
|
|
SecondaryButtonHeights := 30
|
|
|
|
}
|
|
else, {
|
|
MainButtonHeight := 30
|
|
SecondaryButtonHeights := 35
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; -------------------------------GUI-------------------------------
|
|
|
|
Gui, Font, s%GuiFontSize%
|
|
Gui, Margin, %MarginSpace%, %MarginSpace%
|
|
|
|
; Video Title
|
|
Gui, Font, Bold
|
|
Gui, Add, Text,, Show Title
|
|
Gui, Add, Text, x%ColumnOneHalfWidthXPos% yp+0,Odysee URL Slug
|
|
Gui, Add, Text, x%PodcastNumberTextXPos% yp+0,Podcast #
|
|
|
|
|
|
Gui, Font, Normal
|
|
Gui, Add, Edit, y+5 x%MarginSpace% w%EditBoxHalfWidths% h%EditBoxHeight% gUpdateVars vVideoTitle, %VideoTitle%
|
|
Gui, Add, Edit, yp+0 x+%Marginspace% w%OdyseeURLSlugEditWidth% h%EditBoxHeight% gUpdateVars vLBRYURLSlug, %LBRYURLSlug%
|
|
Gui, Add, Edit, yp+0 x+%Marginspace% w%PodcastNumberEditWidth% h%EditBoxHeight% gUpdateVars vPodcastNumber, %PodcastNumber%
|
|
|
|
; LBRY URL
|
|
Gui, Font, Bold
|
|
Gui, Add, Text, x%Marginspace%,Video Tags (Comma Seperated)
|
|
Gui, Add, Text,x%ColumnOneHalfWidthXPos% yp+0,Podcast Tags (Comma Seperated)
|
|
|
|
Gui, Font, Normal
|
|
Gui, Add, Edit, x%Marginspace% Y+5 w%EditBoxHalfWidths% h%EditBoxHeight% gUpdateVars vVideoTags, %VideoTags%
|
|
Gui, Add, Edit, yp+0 x+%Marginspace% w%EditBoxHalfWidths% h%EditBoxHeight% gUpdateVars vPodcastTags, %PodcastTags%
|
|
|
|
|
|
; Video Description
|
|
Gui, Font, Bold
|
|
|
|
if(NoOriginalVideoDescription)
|
|
Gui, Add, Text,cRed y+%Marginspace% x%Marginspace%,Video Description
|
|
else,
|
|
Gui, Add, Text,y+%Marginspace% x%Marginspace%,Video Description:
|
|
|
|
|
|
if(TestingMode)
|
|
Gui, Add, Text,cRed yp+0 xp+150 ,TESTING MODE
|
|
|
|
if(DevMode)
|
|
Gui, Add, Text,cRed yp+0 xp+150 ,DEV MODE
|
|
|
|
Gui, Font, Normal
|
|
Gui, Add, Edit,x%Marginspace% y+2 w%EditBoxWidths% h%VideoDescriptionEditBoxHeight% vVideoDescription gSubmitDescription,%VideoDescription%
|
|
gui, font, s8
|
|
Gui, font, Bold
|
|
if(DescriptionCharCount > 3000){
|
|
Gui, Add, Edit,cRed w50 h20 x%DescriptionCharCountXPos% y+1 vDescriptionCharCount, %DescriptionCharCount%
|
|
}
|
|
else,
|
|
Gui, Add, Edit, w50 h20 x%DescriptionCharCountXPos% y+1 vDescriptionCharCount, %DescriptionCharCount%
|
|
Gui, Font, Normal
|
|
Gui, Add,Text, yp+3 xp-310, (Platform Char. Limits: DM+Bitchute = 3K, Odysee,Brighteon = 5K)
|
|
Gui, Font, s%GuiFontSize%
|
|
Gui, font, Bold
|
|
Gui, Add, GroupBox,r8.5 x%MarginSpace% yp+10 w%EditBoxWidths% Center, Filepaths
|
|
|
|
; Video Filepath
|
|
Gui, Font, Bold
|
|
Gui, Add, Text,xp+5 yp+15,Video Filepath
|
|
Gui, Font, Normal
|
|
Gui, Add, Edit, x%MarginSquared% y+2 w%FilePathEditBoxWidths% h%EditBoxHeight% gUpdateVars vVideoFilepath,%VideoFilepath%
|
|
Gui, Add, Button, x+5 yp+0 h%EditBoxHeight% gSelectVideoFilepath, Select
|
|
|
|
; Video Thumbnail Filepath
|
|
Gui, Font, Bold
|
|
if(NoOriginalVideoThumbFilepath)
|
|
Gui, Add, Text, x%MarginSquared% CRed y+15,Video Thumbnail Filepath
|
|
else,
|
|
Gui, Add, Text,y+15 x%MarginSquared% ,Video Thumbnail Filepath
|
|
Gui, Font, Normal
|
|
Gui, Add, Edit, x%MarginSquared% y+2 w%FilePathEditBoxWidths% h%EditBoxHeight% gUpdateVars vVideoThumbFilepath,%VideoThumbFilepath%
|
|
Gui, Add, Button, x+5 yp+0 h%EditBoxHeight% gSelectVideoThumbFilepath, Select
|
|
; WAV Audio File Filepath
|
|
Gui, Font, Bold
|
|
if(WavAudioFilepath = "")
|
|
Gui, Add, Text,cRed x%MarginSquared% y+15,WAV Filepath
|
|
else, { ; change text depending on if WAV or FLAC file
|
|
if(InStr(WavFilepath, ".flac"))
|
|
Gui, Add, Text,x%MarginSquared% y+15,FLAC Filepath
|
|
else,
|
|
Gui, Add, Text,x%MarginSquared% y+15,WAV Filepath
|
|
}
|
|
Gui, Font, Normal
|
|
Gui, Add, Edit, x%MarginSquared% y+2 w%FilePathEditBoxWidths% h%EditBoxHeight% gUpdateVars vWavAudioFilepath,%WavAudioFilepath%
|
|
Gui, Add, Button, x+5 yp+0 h%EditBoxHeight% gSelectWAVFilepath, Select
|
|
|
|
Gui, Font, Bold
|
|
if(MP3AudioFilepath = "")
|
|
Gui, Add, Text,cRed x%MarginSquared% y+15,Podcast MP3 Filepath
|
|
else,
|
|
Gui, Add, Text,x%MarginSquared% y+15,Podcast MP3 Filepath
|
|
Gui, Font, Normal
|
|
Gui, Add, Edit, x%MarginSquared% y+2 w%FilePathEditBoxWidths% h%EditBoxHeight% gUpdateVars vMP3AudioFilepath,%MP3AudioFilepath%
|
|
Gui, Add, Button, x+5 yp+0 h%EditBoxHeight% gSelectMP3Filepath, Select
|
|
|
|
|
|
; Submit Button
|
|
Gui, Font, s%GuiFontSize%
|
|
gui, Font, Bold
|
|
|
|
; if(DevMode)
|
|
; Gui, Add, Button, x%MarginSpace% w%EditBoxHalfWidths% y+25 h%MainButtonHeight% gCancelPost hwndIcon, Close
|
|
; else,
|
|
|
|
|
|
; Script Update Button
|
|
if(UpdateAvailable){
|
|
Gui, Add, Button, w%EditBoxHalfWidths% x%MarginSpace% gUpdateScript vUpdateAvailable h%SecondaryButtonHeights% center,Uploader Update Available!
|
|
; GuiButtonIcon(Icon, "shell32.dll", 278, "s20 a1 r2")
|
|
}
|
|
else, {
|
|
Gui, Add, Button, w%EditBoxHalfWidths% x%MarginSpace% gUpdateScript vUpdateAvailable h%SecondaryButtonHeights% center,Uploader Up-to-Date
|
|
; Gui, Add, Button, w%EditBoxHalfWidths% x+%Marginspace% vUpdateAvailable hwndIcon, Script is Up-to-Date
|
|
; GuiButtonIcon(Icon, "shell32.dll", 239, "s20 a1 r2")
|
|
|
|
}
|
|
; Gui, Font, s20
|
|
; Gui, Font, Bold
|
|
Gui, Add, Button, x+%MarginSpace% w%EditBoxHalfWidths% h%SecondaryButtonHeights% gStartScript, UPLOAD
|
|
|
|
|
|
Gui, Font, s%GuiFontSize%
|
|
|
|
; Chrome Update Button
|
|
if(ChromeUpdateAvailable){
|
|
Gui, Add, Button, x%MarginSpace% w%EditBoxHalfWidths% y+%Marginspace% h%SecondaryButtonHeights% vChromeUpdateAvailable gUpdateChrome center,Chrome Update Available!
|
|
}
|
|
else, {
|
|
Gui, Add, Button, x%MarginSpace% w%EditBoxHalfWidths% y+%Marginspace% h%SecondaryButtonHeights% vChromeUpdateAvailable gUpdateChrome center,Chrome Up-to-Date
|
|
|
|
}
|
|
; Gui, Add, Button, x%MarginSpace% w%EditBoxHalfWidths% y+25 h%MainButtonHeight% gCancelPost hwndIcon, Exit
|
|
; GuiButtonIcon(Icon, "imageres.dll",208, "s20 a1 r2")
|
|
|
|
|
|
|
|
if(DevMode)
|
|
Gui, Add, Button, x+%MarginSpace% yp+0 w%EditBoxFourthWidths% h%SecondaryButtonHeights% gDisplayResults, View Results
|
|
else,
|
|
Gui, Add, Button, x+%MarginSpace% yp+0 w%EditBoxFourthWidths% h%SecondaryButtonHeights% gDisplayResults, View Results
|
|
|
|
Gui, Add, Button, w%EditBoxFourthWidths% x+%Marginspace% h%SecondaryButtonHeights% gOpenProjectFolder, Open Project Folder
|
|
|
|
|
|
if(DevMode){
|
|
Gui, Add, Button, x%MarginSpace% w%EditBoxFourthWidths% h30 y+5 h%SecondaryButtonHeights% gOpenErrorLog, Open ErrorLog
|
|
Gui, Add, Button, x+%MarginSpace% w%EditBoxFourthWidths% h30 h%SecondaryButtonHeights% gClearVideoLinks, Clear VideoLinks
|
|
|
|
}
|
|
|
|
|
|
|
|
; -------------------------------Page 2 Side of Main GUI Window-------------------------------
|
|
LineSplitXPosition := PageTwoXStartPos - ( MarginSpace * 2)
|
|
gui, add, text, x%LineSplitXPosition% y20 h500 0x11 ; 0x11 is a "line" ; refer to here: https://autohotkey.com/board/topic/50910-draw-line-gui/
|
|
; Thumbnail Preview
|
|
Gui, Font, Normal
|
|
gui, Font, s4
|
|
; Miscellaneous Settings
|
|
DevModToggleButton := PageTwoXStartPos + 160
|
|
Gui, Add, Button, x%DevModToggleButton% y5 w50 h10 gToggleDevMode,DevMode
|
|
Gui, Add, Button, x+5 y5 w50 h10 gToggleTestingMode, Testing Mode
|
|
Gui, Add, Button, x+5 y5 w50 h10 gOpenGiteaPage, Gitea
|
|
|
|
Gui, Font, s%GuiFontSize%
|
|
Gui, Font, Bold
|
|
|
|
; Settings Section
|
|
Gui, Add, GroupBox,r5 y+0 x%PageTwoXStartPos% w%PageTwoGroupBoxWidth%,Settings
|
|
Gui, Add, Checkbox, xp+10 yp+20 vAutoUpdateCheck gUpdateVars Checked%AutoUpdateCheckCheckStatus%, Auto Update Check
|
|
Gui, Add, Checkbox, vShowTooltipProgress Checked%ShowTooltipProgressCheckStatus% gUpdateVars,Show Tooltip Progress
|
|
Gui, Add, Checkbox, vKillLBRYAfterUpload Checked%KillLBRYAfterUploadCheckStatus%, Kill LBRY After Uploading
|
|
Gui, Add, Checkbox, vAutoLogin gUpdateVars Checked%AutoLoginCheckStatus%, Try to Login Automatically
|
|
Gui, Add, Checkbox, vPingOnCompletion gUpdateVars Checked%PingOnCompletionCheckStatus%, Discord Ping Upon Completion
|
|
|
|
|
|
GroupBoxCheckboxPos := PageTwoXStartPos + MarginSpace
|
|
|
|
; -------------------------------PLATFORMS-------------------------------
|
|
Gui, Add, GroupBox,r6 y+%MarginSpaceTripled% x%PageTwoXStartPos% w%PageTwoGroupBoxWidth%, Platforms
|
|
|
|
; Msgbox % "LocalsURL: " LocalsURL
|
|
; if(VideoFileSizeInMB < 1792)
|
|
; Gui, Add, Checkbox, x+%MarginSpaceDoubled% vFacebook Checked%FacebookCheckStatus%, Facebook
|
|
|
|
Gui, Add, Checkbox, xp+10 yp+25 vBitChute Checked%BitChuteCheckStatus% gUpdateVars, BitChute
|
|
|
|
|
|
if(LocalsURL = "LocalsUploadStartedNeedToGrabURL"){
|
|
; msgbox, checking grab url
|
|
Gui, Add, Checkbox, x+%MarginSpaceTripled% yp+0 vLocalsGrabURL Checked%LocalsCheckStatus% gUpdateVars, Locals (Grab URL)
|
|
LocalsGrabURL := 1
|
|
Locals := 0
|
|
}
|
|
else, {
|
|
; msgbox, checking locals
|
|
Gui, Add, Checkbox, x+%MarginSpaceTripled% yp+0 vLocals Checked%LocalsCheckStatus% gUpdateVars, Locals
|
|
LocalsGrabURL := 0
|
|
Locals := 1
|
|
}
|
|
|
|
Gui, Add, Checkbox, x%GroupBoxCheckboxPos% y+%MarginSpace% vOdyseeVideo Checked%OdyseeVideoCheckStatus% gUpdateVars, Odysee Video
|
|
|
|
if(VideoFileSizeInMB < 50)
|
|
Gui, Add, Checkbox, vTelegram x+%MarginSpaceTripled% yp+0 Checked%TelegramCheckStatus% gUpdateVars, Telegram (>50 MB)
|
|
|
|
|
|
; Gui, Add, Checkbox, x+%MarginSpace% vOdyseeVideoThumb Checked%OdyseeVideoThumbCheckStatus%,Thumbnail
|
|
Gui, Add, Checkbox, x%GroupBoxCheckboxPos% y+%MarginSpace% vOdyseeAudio Checked%OdyseeAudioCheckStatus% gUpdateVars, Odysee Audio
|
|
; Gui, Add, Checkbox, x+%MarginSpace% vOdyseeAudioThumb Checked%OdyseeAudioThumbCheckStatus%, Thumbnail
|
|
|
|
Gui, Add, Checkbox, x%GroupBoxCheckboxPos% y+%MarginSpace% vRumble Checked%RumbleCheckStatus% gUpdateVars, Rumble
|
|
|
|
if(VideoTotalBitrate > 300000)
|
|
Gui, Add, Checkbox, vBrighteon y+%MarginSpace% Checked%BrighteonCheckStatus% gUpdateVars, Brighteon
|
|
else,{
|
|
Gui, Add, Checkbox, cRed vBrighteon y+%MarginSpace% Checked0 gUpdateVars, Brighteon (Bitrate Below 300kbps)
|
|
}
|
|
|
|
Gui, Add, Checkbox, vDailyMotion y+%MarginSpace% Checked%DailyMotionCheckStatus% gUpdateVars, DailyMotion
|
|
; Gui, Add, Checkbox, vStreamanity Checked%StreamanityCheckStatus%, Streamanity
|
|
|
|
; Gui, Font, s12
|
|
gui, Font, Bold
|
|
Gui, Add, GroupBox, r6.5 y+%MarginSpaceTripled% vImageThumbnail x%PageTwoXStartPos% w%PageTwoGroupBoxWidth%,Thumbnail
|
|
gui, Font, Normal
|
|
Gui, Add, Picture, xp+10 yp+20 w%ThumbnailPreviewWidth% h-1, %VideoThumbFilepath%
|
|
|
|
|
|
gui, Font, Normal
|
|
gui, font, s7
|
|
Gui, Add, StatusBar,Center, Total Videos Uploaded: %TotalVideosUploaded% | Total Clicks Saved: %MouseClicksSaved%
|
|
|
|
|
|
; Show GUI to the user
|
|
Gui, +Resize +MaximizeBox
|
|
|
|
if(XPosition and YPosition)
|
|
Gui, Show, x%XPosition% y%YPosition%, %FullScriptName% - Upload Settings - %BodyTextFilePath%
|
|
else,
|
|
Gui, Show,, %FullScriptName% - Upload Settings - %BodyTextFilePath%
|
|
|
|
ControlFocus, Edit4, %FullScriptName%
|
|
ToolTip
|
|
|
|
Return |