ClrGraph
ViewWindow 1, 127, 0, 1, 63, 0
"https://raw.githubusercontent.com/leofarhi/3ForAll/master/video1.txt" -> Str 1
Prog "~STR.L"
StrRepl(Str 1, "-", "&ascii_^;1") -> Str 1
StrJoin("&vlc:&URL:", Str 1) -> Str 1
Send(Str 1, 5)
Prog "RECIVE"

1 -> Q
While 1
    Q -> A
    Prog "IntStr"
    StrJoin("&vlc:&PIC:", Str 1) -> Str 2
    Send(Str 2, 5)
    Prog "RECIVE"
    1 -> I
    _ClrVram
    Text 1, 1, Q
    While StrLen(Str ) > I + 8
        
        Try Exp(StrMid(Str r, I, 2)) -> N
        Exp(StrMid(Str r, I + 2, 3)) -> S
        Exp(StrMid(Str r, I + 5, 3)) -> T
        _Line S, N, T, N
        Except 1
        TryEnd
        _DispVram
        I + 8 -> I
    WhileEnd
    _DispVram
    Q + 1 -> Q
WhileEnd

{1, 6} -> Dim Mat r
'#Str r
OpenComport38k, 5, 0
Receive38k Str r
CloseComport38k
{1, Exp(Str r)} -> Dim Mat r
'#Str r
Send("&S:", 5)
OpenComport38k, 5, 0
Receive38k Str r
CloseComport38k
Return

from bs4 import BeautifulSoup
import urllib3
import requests
import socket
import serial
import time
import sys
import os
O=False
for i in range(400):
    if O:
        break
    try:
        arduino=serial.Serial("/COM"+str(i),timeout=1,baudrate=9600)#port de l'arduino à régler en fonction de celui que vous utilisez
        O=True
    except:
        ""
print("connecté: /COM",i)
try:
    # Python2
    from urllib2 import urlopen
except ImportError:
    # Python3
    from urllib.request import urlopen
def web(url):
    http = urllib3.PoolManager()
    #print(url)

    try:
            response = requests.get(url)
            map_html = BeautifulSoup(response.content, "html.parser")
            map_html=str(map_html)
            map_html=map_html.replace("</string>","")
            map_html=map_html.replace("é","é")
    except:
            map_html = (urlopen(url).read()).decode()
    return str(map_html)
def sep(texte):
    lst2=["\n","\r","\t"]
    #texte=texte.split("<body")[1]
    a=texte.split(">")
    del a[0]
    b=[]
    for i in a:
        d=i.split("<")[0]
        if d!="":
            if not d in lst2:
                b.append(d)
        
    return b
def uni(lst):
    a=""
    for i in lst:
        a=a+i
    return a
def read():
    b=str(arduino.readline().decode('latin-1'))
    b=b.replace("\x00","")
    b=b.replace("^1","-")
    b=b.replace("https:/w","https://w")
    b=b.replace("¹","/")
    return b
def write(txt):
    arduino.write(str("000000"[:6-len(str(len(str(txt))))]+str(len(str(txt)))).encode())
    b=0
    while True:
        a=read()
        if a!="":
            break
        if b>3:
            break
        b=b+1
    time.sleep(0.5)
    arduino.write(str(txt).encode())

while True:
    a=read()
    if a!="" and "&" in a:
        a=a.split("&")
        del a[0]
        c=""
        for i in a:
            c=c+"&"+i
        a=c
        if "&vlc:" in a:
            print(a)
            a=a.replace("&vlc:","")
            if "&URL:"in a:
                a=a.replace("&URL:","")
                b=web(a)
                b=b.split("@")
                time.sleep(1)
                write("ok")
                print("ok")
            if "&PIC:"in a:
                a=a.replace("&PIC:","")
                a=int(a)
                print(len(b[a]))
                write(b[a])
            a=""

#il y a des parties du code inutile (se sont des restes des anciennes versions)
import cv2
import os
from PIL import Image
import pylab as pl
import matplotlib.cm as cm
import numpy as np
#import ImageEnhance
#import ImageFilter
  
# Read the video from specified path
cam = cv2.VideoCapture("vidéo.mp4")
  
try:
      
    # creating a folder named data
    if not os.path.exists('data'):
        os.makedirs('data')
    os.makedirs('dataf')
  
# if not created then raise error
except OSError:
    print ('Error: Creating directory of data')
  
# frame
currentframe = 0
def contour(newImg):
    #newImg = cv2.split(newImg)[0]
    newImg = cv2.Laplacian(newImg, cv2.CV_8U, ksize = 5)
    newImg = cv2.split(newImg)[0]
    #newImg = cv2.Canny(newImg, 300, 400)
    return newImg
def gray(im):
    im =Image.fromarray(im)
    im_grey = im.convert('L') # convert the image to *greyscale*
    im= im.convert('1')
    im_array = np.array(im_grey)
    #pl.imshow(im_array, cmap=cm.Greys_r)
    return im_array
def bitam(bitmap):
    # Split the three channels
    
    bitmap = np.dot((bitmap > 128).astype(float),255)
    im = Image.fromarray(bitmap.astype(np.uint8))
    return im
def arraylst(img):
    a=np.array(frame)
    c=a.tolist()
    for ind,i in enumerate(c):
        for ind2,o in enumerate(i):
            if o==255:
                (c[ind])[ind2]=1
    return c
def save_file(lst,name):
    with open(name+'.txt','a') as fic:
        fic.write(str(lst))


def create_line(lst):
    a=""
    t=False
    z=[]
    for ind,i in enumerate(lst):
        for ind2,o in enumerate(i):
            if o==1:
                if t==False:
                    z=[]
                    t=True
                    z.append("0"[:2-len(str(ind))]+str(ind))
                    z.append("00"[:3-len(str(ind2))]+str(ind2))
            else:
                if t:
                    t=False
                    z.append("00"[:3-len(str(ind2))]+str(ind2))
                    a=a+z[0]+z[1]+z[2]
                    z=[]
        if t:
            t=False
            z.append("00"[:3-len(str(ind2))]+str(ind2))
            a=a+z[0]+z[1]+z[2]
            z=[]
    a=a+"@"
    return a
with open('img.txt','w') as fic:
    ""
f=0
g=0
def vérif_file(name):
    try:
        with open(name+'.txt','r') as fic:
            a=fic.read()
    except:
        a=""
    return len(a)
while(True):
      
    # reading from frame
    ret,frame = cam.read()
  
    if ret:
        # if video is still left continue creating images
        name = './data/frame' + str(currentframe) + '.bmp'
        namef = './dataf/pic' + str(g)
        print ('Creating...' + name)
        width = 127#int(frame.shape[1] * scale_percent / 100)
        height = 63#int(frame.shape[0] * scale_percent / 100)
        dim = (width, height)
        # resize image
        frame = cv2.resize(frame, dim, interpolation = cv2.INTER_AREA)
        frame=contour(frame)
        frame=gray(frame)
        frame=bitam(frame)
        frame=np.array(frame)
        # writing the extracted images
        
        #cv2.imwrite(name, frame)
        w=create_line(arraylst(frame))
        if vérif_file(namef)+len(w)>9000:
            g+=1
        save_file(w,"img")
        f+=1
        # increasing counter so that it will
        # show how many frames are created
        currentframe += 3
    else:
        break
  
# Release all space and windows once done
cam.release()
cv2.destroyAllWindows()