取elonmusk推特最新推文源码

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕

GetTwitter ()

.子程序 GetTwitter
.局部变量 cookie, 文本型, , "0"
.局部变量 ua, 文本型
.局部变量 token, 文本型
.局部变量 cookies, 文本型
.局部变量 文本, 文本型
.局部变量 Json, 类_json
.局部变量 成员数, 整数型
.局部变量 时间, 文本型
.局部变量 内容, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 月份, 文本型
.局部变量 日期, 文本型
.局部变量 时分秒, 文本型
.局部变量 年, 文本型

网页_访问 (“http://mobile.twitter.com/”, , , , , #useragent, ua, 真, , , , , )
文本_取中间_批量 (ua, “et-cookie: ”, “Max-Age”, cookie, , , , , , , )
cookies ＝ cookie [1] ＋ cookie [2]
token ＝ 文本_取出中间文本 (编码_Utf8到Ansi (网页_访问 (“https://api.twitter.com/1.1/guest/activate.json”, 1, , cookies, , #authorization, , , , , , , )), “:” ＋ #引号, #引号, , )
文本 ＝ 编码_Utf8到Ansi (网页_访问 (“https://twitter.com/i/api/graphql/VFKEUw-6LUwwZtrnSuX_PA/UserTweets?variables=%7B%22userId%22%3A%2244196397%22%2C%22count%22%3A20%2C%22withHighlightedLabel%22%3Atrue%2C%22withTweetQuoteCount%22%3Atrue%2C%22includePromotedContent%22%3Atrue%2C%22withTweetResult%22%3Afalse%2C%22withUserResults%22%3Afalse%2C%22withVoice%22%3Afalse%2C%22withNonLegacyCard%22%3Atrue%2C%22withBirdwatchPivots%22%3Afalse%7D”, , , cookies, , #authorization ＋ #换行符 ＋ #useragent ＋ #换行符 ＋ “x-guest-token: ” ＋ token, , , , , , , ))
Json.解析 (文本, )
内容 ＝ Json.取通用属性 (“data.user.result.timeline.timeline.instructions[0].entries[0].content.itemContent.tweet.legacy.full_text”, )
时间 ＝ Json.取通用属性 (“data.user.result.timeline.timeline.instructions[0].entries[0].content.itemContent.tweet.legacy.created_at”, )

时间 ＝ 文本_替换 (时间, , , , “:”, “ ”, “+”, “ ”, , , , , , )
数组 ＝ 分割文本 (时间, “ ”, )
年 ＝ 数组 [9]
月份 ＝ 数组 [2]
日期 ＝ 数组 [3]
.判断开始 (月份 ＝ “Jan”)
    月份 ＝ “01”
.判断 (月份 ＝ “Feb”)
    月份 ＝ “02”
.判断 (月份 ＝ “Mar”)
    月份 ＝ “03”
.判断 (月份 ＝ “Apr”)
    月份 ＝ “04”
.判断 (月份 ＝ “May”)
    月份 ＝ “05”
.判断 (月份 ＝ “Jun”)
    月份 ＝ “06”
.判断 (月份 ＝ “Jul”)
    月份 ＝ “07”
.判断 (月份 ＝ “Aug”)
    月份 ＝ “08”
.判断 (月份 ＝ “Sep”)
    月份 ＝ “09”
.判断 (月份 ＝ “Oct”)
    月份 ＝ “10”
.判断 (月份 ＝ “Nov”)
    月份 ＝ “11”
.默认
    月份 ＝ “12”
.判断结束
时分秒 ＝ 到文本 (到整数 (数组 [4]) ＋ 8) ＋ “:” ＋ 数组 [5] ＋ “:” ＋ 数组 [6]
调试输出 (年 ＋ “年” ＋ 月份 ＋ “月” ＋ 日期 ＋ “日 ” ＋ 时分秒, 内容)

@616