MrCirdo

#!/usr/bin/env python3

"""
This code is based on https://blog.moulard.org/anssi-mooc-on-hacking/
The operation is very similar.

However it does not work with video :(
"""
from selenium import webdriver
import time

MrCirdo

from pathlib import Path

import requests
from bs4 import BeautifulSoup
from rich import print
from rich.progress import track

def get_number_of_scan(chapter: int) -> int:
    url = f"https://wwv.scan-1.com/black-clover/chapitre-{chapter}"
    html = requests.get(url).text

MrCirdo

Keybase proof

I hereby claim:

• I am mrcirdo on github.
• I am cirdo (https://keybase.io/cirdo) on keybase.
• I have a public key ASBxsePEOPOsDxTi7J1yMEJY0Zg8_OUjwvL-jGcC137JbAo

To claim this, I am signing this object:

MrCirdo

using terms from application "Messages"
	
	on active chat message received from theBuddy for theTextChat with theText
		decrypt(theText)
	end active chat message received
	
	on message sent theText with theTexte
		
	end message sent
	

MrCirdo

tell application "Safari"
	set urlOpenLoad to do JavaScript "var src = ''
for (var i = 0; i < document.getElementsByTagName('iframe').length; i++){
	if (document.getElementsByTagName('iframe')[i]['src'].indexOf('openload') != -1){
		src = document.getElementsByTagName('iframe')[i]['src'];
	}
}
" in first document
	if urlOpenLoad is "" or urlOpenLoad does not contain "http" then
		display alert "Il y'a pas vidéo openLoad sur cette page" as warning

MrCirdo

set folders to (choose file multiple selections allowed 1)

repeat with thePath in folders
	set thePathTerminal to quoted form of the POSIX path of thePath
	set command to "/Applications/VLC.app/Contents/MacOS/VLC -I dummy " & thePathTerminal & " --sout=\"#transcode{acodec=mp3,vcodec=dummy}:standard{access=file,mux=raw,dst=" & text 1 thru -2 of thePathTerminal & ".mp3'}\" vlc://quit"
	
	do shell script command
end repeat
display notification "Conversions terminées"

MrCirdo

set urlPage to ""
tell application "Safari"
	set urlPage to URL of front document
end tell

repeat while urlPage does not contain "http://www.keygenmusic.net/?page=team&teamname="
	set urlPage to text returned of (display dialog "Entrer l'url de la page: " default answer "")
end repeat

MrCirdo

--set urlVideo to text returned of (display dialog "Entrer l'url de la vidéo : " default answer "")
set urlVideo to ""
tell application "Safari"
	set urlVideo to URL of front document
end tell
if urlVideo is "" then
	set urlVideo to text returned of (display dialog "Entrer l'url de la vidéo: " default answer "")
end if
repeat while urlVideo does not contain "https://www.youtube.com/watch"
	set urlVideo to text returned of (display dialog "Entrer l'url de la vidéo: " default answer "")

MrCirdo

tell application "System Events"
	keystroke "a" using {command down}
	keystroke "c" using {command down}
	keystroke "a" using {command down}
	key code 51
	keystroke "v" using {command down}
end tell