J'ai trouvé plusieurs sites qui peuvent faire l'inverse comme ici: http://blog.ukegeeks.com/easily-form...ordpro-format/
mais moi, je voudrais l'inverse.
Comment faire ?
Merci d'avance
import sys file_name = sys.argv[1] file = open(file_name) for ligne in file.readlines(): chord_mode = False chord_n = 0 chord_line = " " lyric_line = " " for c in ligne: if c == "[": chord_mode = True elif c == "]": chord_mode = False elif chord_mode: chord_n += 1 chord_line += c else: if chord_n>0: chord_n -= 1 else: chord_line += " " lyric_line += c print(chord_line) print(lyric_line)
Function open_file as string Dim file_dialog as Object GlobalScope.BasicLibraries.LoadLibrary("Tools") file_dialog = CreateUnoService("com.sun.star.ui.dialogs.FilePicker") open_status = file_dialog.Execute() If open_status = 1 Then file_path = file_dialog.Files(0) open_file = file_path End If file_dialog.Dispose() end function Sub Main f1 = open_file f2 = f1 + "_converted.txt" open f1 for input as #1 open f2 for output as #2 dim TextLine as String Do While Not EOF(1) Line Input #1, TextLine chord_mode = False chord_n = 0 chord_line = "" lyric_line = "" For i=1 to len(TextLine): c = mid(TextLine,i,1) if c = "[" then chord_mode = True else if c = "]" then chord_mode = False else if chord_mode then chord_n = chord_n+1 chord_line = chord_line + c else if chord_n>0 then chord_n = chord_n-1 else chord_line = chord_line + " " end if lyric_line = lyric_line + c end if end if end if Next i print #2, chord_line print #2, lyric_line loop close #1 close #2 End Sub
Nous collectons des données personnelles sur notre site, à travers l'utilisation des cookies ainsi que d'autres technologies, pour vous fournir nos services, des publicités personnalisées et pour analyser le trafic. Nous pouvons être amené à partager certaines informations avec les partenaires publicitaires et d'analyse. Pour plus de détails, veuillez consulter la politique de confidentialité.
En cliquant sur « J'accepte » ci-dessous, vous acceptez notre politique de confidentialité ainsi que la collecte de données personnelles et l'utilisation de cookies comme décrit. Vous reconnaissez aussi que ce forum peut être hébergé en dehors de votre pays de résidence et que vous consentez à la collecte, le stockage et l'utilisation de vos données dans le pays où ce forum est hébergé.
Commentaire