吾爱破解 - 52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步,快速开始

查看: 5344|回复: 16
收起左侧

[易语言 原创] 【原创源码】某手视频去水印解析 易语言纯源码 没有使用模块

[复制链接]
ofo 发表于 2020-4-17 18:23
本帖最后由 ofo 于 2020-4-18 20:15 编辑

某手视频去水印解析 易语言纯源码 没有使用模块的写法
如下图
QQ图片20200417181453.png

.版本 2
.支持库 EThread
.支持库 dp1
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
启动线程 (&解析, , )
.子程序 解析
.局部变量 http, 对象
.局部变量 Location, 文本型
.局部变量 mp4, 文本型
CoInitialize (0)
http.CreateObject (“WinHttp.WinHttpRequest.5.1”, )
http.RunMethod (“open”, “GET”, Text1.context, 假)
' http.SetProperty (“Option”, 6, 0)
http.RunMethod (“SetRequestHeader”, “Cookie”, “did=web_” + 取数据摘要 (ToBin (rnd (1, 50))))
http.RunMethod (“SetRequestHeader”, “User-Agent”, “Mozilla/5.0 (iPhone; CPU iPhone OS 13_2_3 like Mac OS X) AppleWebKit/605.1.15 (KHTML, like Gecko) Version/13.0.3 Mobile/15E148 Safari/604.1”)
http.RunMethod (“send”, )
' Location = rightxm (http.文本方法 (“GetAllResponseHeaders”, ), “Location: ”, chr (13) + chr (10), , ))
mp4 = rightxm (http.GetProperty (“ResponseText”, ).取文本 (), “srcNoMark":"”, “"},"user":”)
http.Clear ()
Text2.context = mp4
.子程序 rightxm, 文本型
.参数 srt, 文本型
.参数 ft, 文本型
.参数 bt, 文本型
.局部变量 fi, 整数型
.局部变量 bi, 整数型
fi = InStr (srt, ft, , 假)
fi = fi + len (ft)
bi = InStr (srt, bt, fi, 假)
return (mid (srt, fi, bi - fi))

附python源码对比

[Python] 纯文本查看 复制代码
import requests
import random
import string

def http(url):
    did = ''.join(random.sample(string.ascii_lowercase + string.digits, 32))
    refere = {
        'Cookie': 'did=web_' + did,
        'User-Agent': "Mozilla/5.0 (iPhone; CPU iPhone OS 13_2_3 like Mac OS X) AppleWebKit/605.1.15 (KHTML, like Gecko) Version/13.0.3 Mobile/15E148 Safari/604.1",
    }
    html = requests.get(url, headers=refere, allow_redirects=True)
    mp4 = html.text.split("srcNoMark":"")[1].split(""},"user")[0]
    return mp4
url = "https://v.kuaishou.com/s/zeKwaYfN"
result = http(url)
print(result)


另发,发现python对中文变量支持还是蛮好的,皮皮虾去水解析 中文变量测试

[Python] 纯文本查看 复制代码
import requests
import json

def 根据id解析(id):
  try:
    协议头= {
        'User-Agent': "Mozilla/5.0 (iPhone; CPU iPhone OS 13_2_3 like Mac OS X) AppleWebKit/605.1.15 (KHTML, like Gecko) Version/13.0.3 Mobile/15E148 Safari/604.1",
    }
    url = 'https://is.snssdk.com/bds/cell/detail/?cell_type=1&aid=1319&app_name=super&cell_id=' + id
    html文本 = requests.get(url,headers=协议头, allow_redirects=False)
    json对象 = json.loads(html文本.text)
    mp4链接 = json对象['data']['data']['item']['origin_video_download']['url_list'][0]['url']
  except:
    return '解析出错'
  else:
    return mp4链接

视频id = '6757615695728482574'
输出文本型 = 根据id解析(视频id)
print(输出文本型)




免费评分

参与人数 6吾爱币 +8 热心值 +6 收起 理由
微笑着走过 + 2 + 1 老哥 M4S格式60fps音视频文件下载合并 能发下新的 下载链接吗
毒瘤 + 1 热心回复!
pwp + 3 + 1 这是我见过最好的python源码
hssl1019 + 1 + 1 我很赞同!
app740520 + 1 + 1 谢谢@Thanks!
1062624546 + 1 + 1 我很赞同!

查看全部评分

本帖被以下淘专辑推荐:

发帖前要善用论坛搜索功能,那里可能会有你要找的答案或者已经有人发布过相同内容了,请勿重复发帖。

 楼主| ofo 发表于 2021-2-8 12:53
微笑着走过 发表于 2021-2-6 14:49
老哥 M4S格式60fps音视频文件下载合并 能发下新的 下载链接吗

https://3adz.lanzoui.com/iAmgnlgon9i
 楼主| ofo 发表于 2020-4-17 18:29
wr20060926 发表于 2020-4-17 18:28
我是小白的原因吗?易语言,中文编程?代码全是英文?

不用模块的话,大部分还是英文的
wr20060926 发表于 2020-4-17 18:28
我是小白的原因吗?易语言,中文编程?代码全是英文?
wr20060926 发表于 2020-4-17 18:37
ofo 发表于 2020-4-17 18:29
不用模块的话,大部分还是英文的

哦~,谢谢解答
app740520 发表于 2020-4-17 18:44
我直说了,那英文没看懂
xinsuren 发表于 2020-4-17 19:16
你就不能打包一下源码吗?
枫叶荻花 发表于 2020-4-17 20:02
现在类似软件较多,不过依然欢迎多个选择
pwp 发表于 2020-4-17 22:07
这分明就是python源码,发错版块了吧?
 楼主| ofo 发表于 2020-4-18 20:06
pwp 发表于 2020-4-17 22:07
这分明就是python源码,发错版块了吧?

python和易语言都有呀
l劉l 发表于 2020-4-19 15:07
ofo 发表于 2020-4-18 20:06
python和易语言都有呀

大佬,你这是解析出来的比较随机啊,视频不固定
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则

返回列表

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-11-25 18:17

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表