Page 1 sur 1

[TSX47] Impression programme sous TSX47

Posté : 15 juil. 2022, 20:49
par kedeb
Bonjour,

Je souhaite imprimer mon programme que j'ai réussi à extraire de l'émulateur ( via disquette ). mon problème vient du fichier que je récupère, c'est un fichier .DOC et quand je l'ouvre je vois des caractères spéciaux et non pas les lignes ou les contacts du programme.
mais si je passe par une très vieille version de Word ( sur une vieille console :lol: ) j'arrive à l'ouvrir en codage MS DOS et je l'ai nickel, mais ça me fait faire énormément de manipulation j'aimerais savoir si il y a une manière plus récente et rapide dans la conversion de ce fichier ou l'impression même :)

cordialement,

Re: [TSX47] Impression programme sous TSX47

Posté : 15 juil. 2022, 21:26
par MiGaNuTs
Notepad++

Ensuite le bon jeu de caractères est quelquepart par la.
2022-07-15 21_25_15-Greenshot.png

Re: [TSX47] Impression programme sous TSX47

Posté : 16 juil. 2022, 15:02
par kedeb
j'ai bien installé notepad++ et j'ai trouvé le bon encodage c'est OEM 863 : français.

as tu une astuce pour pouvoir bien le mettre en page pour l'impression car si je l'imprime dans cette état, tout s'imprime à la suite sans respecter mes numéro de page et je me retrouve avec des morceaux de programme sur deux page différentes pour le même label.

Re: [TSX47] Impression programme sous TSX47

Posté : 16 juil. 2022, 16:49
par itasoft
Slts,
Le renommer *.TXT l’ouvrir avec WordPad type document texte MS-DOS (.txt)
Ça doit reconduire la mise en page

Re: [TSX47] Impression programme sous TSX47

Posté : 19 juil. 2022, 00:31
par kedeb
bonsoir,

alors j'ai bien réussi à le convertir avec notepad++ et l'ouvrir avec wordpad mais je dois faire la mise en page de la toutes les pages du programmes, en sachant que pour celui que je veux imprimer j'ai 250 pages, ça reste long et fastidieux.
sur une ancienne console de l'atelier, si on ouvre le .doc avec un microsoft word ( je ne sais pas quel année ) il convertie et rien qu'en réglant sur la première page ça se reproduit sur toutes les autres sans aucun problème.

cordialement,

Re: [TSX47] Impression programme sous TSX47

Posté : 19 juil. 2022, 01:30
par itasoft
slts, il ne faut pas le passer par notepad++ mais:
renommer le fichier d'origine .DOC en .TXT l’ouvrir avec WordPad type document texte MS-DOS (.txt)
Ça doit reconduire la mise en page

Re: [TSX47] Impression programme sous TSX47

Posté : 19 juil. 2022, 22:56
par kedeb
slts,

quand je passe que par Wordpad pour la conversion en txt type MS-DOS, j'ai toujours mes caractères spéciaux il ne les convertie pas.

je garde au final le même document juste les caractères spéciaux qui change.

cordialement,

Re: [TSX47] Impression programme sous TSX47

Posté : 19 juil. 2022, 23:06
par itasoft
slts,
c'est pas possible, m'envoyer par mail le fichier .DOC d'origine pour faire un test.
itasoft@free.fr

Re: [TSX47] Impression programme sous TSX47

Posté : 20 juil. 2022, 12:05
par JC87
Bonjour,

Avec un MS Word récent je n'ai plus de problème mais à une époque ou je bossais dans une boutique qui n'avait pas les licences Microsoft j'utilisais Libre office avec la police MS line Draw en taille 9 et les listings sortaient impeccables. Cette police peut s'installer à part si elle n'est pas présente sur le PC.

JC

Re: [TSX47] Impression programme sous TSX47

Posté : 20 juil. 2022, 12:58
par itasoft
Slts,
Le pb est que dans tous les cas, ya pas la pagination pour l'impression sur papier, reste que la solution de l’ouvrir sous Word puis avec une macro qui va mettre les saut de pages au bon endroit et enregistrer sous type Document Word
Procedure :
-Avec Word Ouvrir le fichier d’origine généré sous XTEL bocaux.doc
-Utiliser le codage Arabe (DOS)
-Faire Fichiers/Mise en page Haut=1,5 CM Bas=1,5 CM
-Créer et Exécuter la macro ci dessous
Sub Macro1()
Dim pa As Paragraph
For Each pa In ActiveDocument.Paragraphs
If InStr(pa.Range.Text, "Telemecanique") > 0 Then pa.Range.InsertBreak Type:=wdPageBreak
Next pa
End Sub

-Visualiser le résultat avec l'aperçu
-Enregistrer sous bocaux_word.doc Type de fichier Document Word (*.doc)