PostToTelegram: ;------------------------------------------------ CurrentSocialMediaPosting := "Telegram" Message = Posting Video Links to Telegram SaveOrPostProgress(Message:=Message,PostType:="Tooltip,ErrorLoggingTextFile,DiscordErrorLogging") IniRead, TelegramBotToken, %SettingsIniFilepath%, SocialMediaPoster, TelegramBotToken, %A_Space% IniRead, TelegramBotChatID, %SettingsIniFilepath%, SocialMediaPoster, TelegramBotChatID, %A_Space% LineBreakChar = `%0A ; Used for Telegram API if(TelegramBotToken = "" Or TelegramBotChatID =""){ Message = TelegramBotToken or TelegramBotChatID is missing from %SettingsIniFilepath%. `nPlease input them and click the button again. msgbox, 4096, Error!, %Message% SaveOrPostProgress(Message:=Message,PostType:="Tooltip,ErrorLoggingTextFile,ErrorSummaryVar,DiscordErrorLogging") ; Msgbox, 4096, Error!, TelegramBotToken or TelegramBotChatID is missing from %SettingsIniFilepath%. `nPlease input them and rerun the script. Return } /* ; If description is longer than 2k chars, then API will error out. goto section that will allow user to edit video description to shorten it for posting if(StrLen(SocialMediaDescription) > 2000 AND VideoDescriptionForVideosChannel = ""){ goto, CreateDescriptionForVideosPosting } */ /* if(SocialMediaDescription = ""){ CreateDescriptionForSocialMedia() } if(SocialMediaDescription > 1000){ ; Telegram has a 1024 char media caption capacity SocialMediaDescription := SubStr(SocialMediaDescription, 1, 500) } */ ; @todo: split telegram message into multiple posts SubmitDescriptionForTelegramVideosChannel: TelegramVideoTitle := ASCIISTRReplace(VideoTitle) TelegramVideoTitle := "*" . TelegramVideoTitle . "*" TelegramBodymessage := ASCIISTRReplace(VideoDescription) LineBreakChar = `%0A ; Used for API if(BitChuteURL != "") VideoLinks .= "[BitChute](" . BitChuteURL . ") \| " if(BrighteonURL != "") VideoLinks .= "[Brighteon](" . BrighteonURL . ") \| " if(OdyseeVideoURL != "") VideoLinks .= "[Odysee](" . OdyseeVideoURL . ") \| " if(OdyseeAudioURL != "") VideoLinks .= "[Odysee \(Audio\)](" . OdyseeAudioURL . ") \| " if(RumbleURL != "") VideoLinks .= "[Rumble](" . RumbleURL . ") \| " if(DailyMotionURL != "") VideoLinks .= "[DailyMotion](" . DailyMotionURL . ") \| " /*if(PodcastTranscriptURL != "") VideoLinks .= "[Video Transcript](" . PodcastTranscriptURL . ") \| " */ if(PodcastNumber != "") VideoLinks .= "[FDRPodcasts](" . "https://fdrpodcasts.com/" . PodcastNumber . ") \| " TelegramMessage := TelegramVideoTitle . "`n" . TelegramBodymessage . "`n" . VideoLinks StrLenOfMessageAndVideoLinks := StrLen(TelegramVideoTitle) + StrLen(TelegramBodymessage) + StrLen(VideoLinks) ; DevModeMsgBox(StrLenOfMessageAndVideoLinks) ; If Length of Title, Video Links and Message is less than 1024 characters: ; ------------------------------------------------ if(StrLenOfMessageAndVideoLinks < 1024) { Status := SendTelegramPhoto(TelegramBotToken, TelegramBotChatID, VideoThumbFilepath, caption := TelegramMessage ) ; you could add more options; compare the Telegram API docs ; Output returned data to ErrorLog File Message = API Response:`n%Status% SaveOrPostProgress(Message:=Message,PostType:=",ErrorLoggingTextFile") if(InStr(Status, "error_code")){ Message = Telegram Post Failed due to an API Issue. Error was saved to ErrorLogging file. Please send it to Yuriy. SaveOrPostProgress(Message:=Message,PostType:="Tooltip,ErrorLoggingTextFile,ErrorSummaryVar,DiscordErrorLogging") ; SaveOrPostProgress(Message:=Status,PostType:=",ErrorLoggingTextFile") Message = Telegram Error: %Status% SaveOrPostProgress(Message:=Message,PostType:="Tooltip,ErrorLoggingTextFile,ErrorSummaryVar,DiscordErrorLogging") ToolTip Return } } ; If Title, Links and Message are longer than 1024, but less than 4096, split into 2 pieces: sendphoto and sendmessage ; ------------------------------------------------ if(StrLenOfMessageAndVideoLinks < 4096){ ; Photo and Video Title go into SendPhoto TelegramVideoTitle := TelegramVideoTitle . "`n" . VideoLinks Status := SendTelegramPhoto(TelegramBotToken, TelegramBotChatID, VideoThumbFilepath, caption := TelegramVideoTitle ) ; you could add more options; compare the Telegram API docs ; Output returned data to ErrorLog File Message = API Response:`n%Status% SaveOrPostProgress(Message:=Message,PostType:=",ErrorLoggingTextFile") ; Video Description goes into TelegramMessage Status := SendTelegramMessage(TelegramBotToken, TelegramBotChatID, text := TelegramBodymessage) ; Output returned data to ErrorLog File Message = API Response:`n%Status% SaveOrPostProgress(Message:=Message,PostType:=",ErrorLoggingTextFile") } else, { ; If Title, links and message are longer than 4096 chars, we need to split them into multiple messages ; ------------------------------------------------ TelegramVideoTitle := TelegramVideoTitle . "`n" . VideoLinks Status := SendTelegramPhoto(TelegramBotToken, TelegramBotChatID, VideoThumbFilepath, caption := TelegramVideoTitle ) ; you could add more options; compare the Telegram API docs ; Split the Description into 4096 character chunks while preserving sentences ; Used 4095 because a ". " has to be put in at the end of the chunk. VideoDescriptionChunks := SplitStringWithSentences(TelegramBodymessage, 4094) ; go through array and post each chunk as new message Loop % VideoDescriptionChunks.Length(){ ; ArrayItem := ARRAY[A_Index] Description := VideoDescriptionChunks[A_Index] Status := SendTelegramMessage(TelegramBotToken, TelegramBotChatID, text := Description) ; Output returned data to ErrorLog File Message = API Response:`n%Status% SaveOrPostProgress(Message:=Message,PostType:=",ErrorLoggingTextFile") ; Clipboard := Description ; msgbox % Description } } ; SaveOrPostProgress(Message:="Video Links posted to #Videos Successfully.",PostType:="Tooltip,ErrorLoggingTextFile") Message = Video Links Posted to Telegram Successfully SaveOrPostProgress(Message:=Message,PostType:="Tooltip,ErrorLoggingTextFile") GuiControl,, PostToTelegramButton, Telegram - Posted Successfully ; sleep, 2000 ToolTip CurrentSite := Return ; -------------------------------/Telegram-------------------------------