[Thomson] Nouveaux livres scannés

Les bouquins, les scans, les pdf ou les liens qui vont bien... ici c'est la bibliothèque.

Modérateurs : Papy.G, fneck, Carl

Répondre
Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 28 sept. 2014 22:37

La configuration lors de l'examen...
10.jpg
10.jpg (449.04 Kio) Vu 2203 fois

Avatar du membre
6502man
Messages : 9845
Enregistré le : 12 avr. 2007 22:46
Localisation : VAR
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par 6502man » 29 sept. 2014 11:02

Excellent, Merci Carl :D

Ca me rappelle des souvenirs les épreuves d'algorithmes :roll:
Phil.

www.6502man.com

To bit or not to bit.
1 or 0.

Daniel
Messages : 12253
Enregistré le : 01 mai 2007 18:30
Localisation : Vaucluse
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Daniel » 29 sept. 2014 12:12

Si j'ai bien compris, leur disquette DOS originale était défectueuse :mrgreen:
Ils auraient quand même pu fournir une copie propre pour l'examen :!:
Daniel
L'obstacle augmente mon ardeur.

Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 29 sept. 2014 12:18

Daniel, c'était pour corser l'épreuve.... :roll:

Carl

Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 05 oct. 2014 23:06

Daniel, voir lien dans ta boite mail vers 250 Mo de scans brutes... :roll:

Carl

Daniel
Messages : 12253
Enregistré le : 01 mai 2007 18:30
Localisation : Vaucluse
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Daniel » 07 oct. 2014 11:40

Bientôt en ligne à la page Documentation du site dcmoto.

La lecture me rappelle de bons souvenirs, quand je donnais des cours d'analyse numérique au CNAM d'Avignon. Le programme était presque le même, mais un peu simplifié. Les travaux pratiques étaient en turbo-pascal sur IBM PC/XT double disquette, dans une salle informatique de l'université d'Avignon. Mieux que l'X et ses TO7/70 en Basic :wink:

Je préparais les exercices à la maison sur MO5. Ce livre m'aurait été bien utile. Il ne contient pas 102 programmes, mais la qualité compense la quantité :wink:
Daniel
L'obstacle augmente mon ardeur.

Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 07 oct. 2014 13:34

X versus Arts et métiers..... :wink:

Daniel, la page 16 est dans ta boite ...

Carl

Daniel
Messages : 12253
Enregistré le : 01 mai 2007 18:30
Localisation : Vaucluse
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Daniel » 07 oct. 2014 18:08

.
Applications Informatiques - Ecole Polytechnique, 1986 (scans de Carl)

Site http://dcmoto.free.fr , page Documentation, section Littérature, tout en bas de la page
Document de 191 pages - 6,9 Mo. Nécessite le plugin DjVu pour consultation en ligne ou téléchargement.

Une bible de l'analyse numérique, avec une cinquantaine de programmes pour TO7/70, preuve que le calcul scientifique n'est pas réservé aux super-calculateurs. Merci à Carl pour cette trouvaille exceptionnelle et pour le temps passé à scanner les 191 pages 8)
applications-informatiques.png
applications-informatiques.png (20.69 Kio) Vu 2112 fois
Image

[Edit]
Essai d'OCR sur le premier programme, ce n'est pas très concluant. Dommage que les listings soient imprimés en italique.
Remarquez qu'ils utilisent les instructions Basic supplémentaires du DOS (ils avaient un lecteur de disquette).

Code : Tout sélectionner

20'x 
30 ' 
40'x x 
100 ' I=----- ........ -- .............. -I 
120 ' = ..................... - ..... = 
130 DEFINT D,,I-N 
140 SCREEN 0,6,1: ELS 
150 INPUT"Degre naxm" ;DM 
160 IF DM(O THEN COSLIB 1000: COTO 150 
170 D_rM 
PCtD) ,C(DE) ,YSt2) ,Z$(2) 
180 PR_ThrT'" _rnprnrtte (O/h') ?" 
l go COSUB 4000: IM=F 
200 IF I THEN OPEN" 0" 1 "LPRT, " ' PRINT# 
, C/-/R.$ t 2 7  "7" 
210 L 
220 BOJ(F(72,8)-  245,31 ), -2 
230 BOX(72,S)-(247,31) 
240 LOCATE 10,2: COLOR O, 1: 
PRIYT" Po t omm rat onnas" 
250 LOCATE 0,5: COLOR O, 
2tO PRINT"Oparaton ( +-x ):"; 
270 O$=INKEY 
280 IR 05??"," OR OS>"-" OR 05="" 
THEN 270 
290 PRINT 05: PRINT 
300 A$="A" : GOSUB 2000: GOSUB 5000: 
PRINT: GOSUB 3000 
???3?G???????¦$10 DA=DC: ROB I=O TO D 
330 NEXT I 
340 A$="B": COSUB 2000: OSUB 5000: 
PINT : OOSUB 3000 
$50 DB--DC: ROB I=O TO D 
30 RE(I) =PC[ I): B(I) =OC[ I) 
370 NEXT I 
$S0 ON ASC(05)-41 OOSUB 800,500,700,700 
390 GOSUB 5000 
400 Z$="C = A "+05+" B": OOSUB $400 
410 Z$= " " : OSUB $400 
420 AS=" ": OOSUB 3000 
430 PRINT"O'n, recoce (O/N) ?" 
440 COSUB 4000 
450 IF F THEN 210 
460 END 
500' I=------- ................. -----=I 
510'I 
520' = ...................... -------= 
530 F=I 
540 DC=O: D=DA: IR DB)DA THEN D=DB 
550 FOR I=O TO D 
590 NEXT I 
600 RETURN 
700 ' I= ...... - .... ----- ............. =I 
710'I I Sou. t??rcto I I 
720 
730 F=-I 
740 007"0 540 
800 : I= .... - ....... - .............. =I 
' =-------- ..... - ............ '-=I 
830 OOSUB 2200 
840 DC=D.4+DB 
850 BOB I=O 7'0 DC 
860 NOR J=O TO I 
870 P=PA(J) *RE[ I-l) 
880 O=QAf J)xQB(I-I) 
890 PC(I)=PC(I)Q+PQC(I) 
900 .C{I)=C(I) 
910 NEXT 
920 NEXT I 
930 RETURN 
1000 ' I= ............................ =I 
1010 ' I Rernontee de charCot I 
1020 
1030 PLAY"DO" 
1040 PRINT CHR$( 11 ) ;SPACES(39) 
1050 PRINT CHR$( 11 ); 
1060 RETURN 
2000 ' 
2010 ' 
2020 ' I= ............................ = 
2030 OOEUB 2200 
2040 BRINT" Dee de "; AS  : INPUT DC 
2050 IN DCO OR DC>D OR (D+DC)D ND 
$=" B" ND 05=" " ) THEN OOSUB 1000: 
OOTO 2040 
200 NOR I=DC TO 0 STEP-1 
2070 PRINT ,45; ~ {" ' I; ")" ' 
2080 INPUT 
2090 g=INSTN{ ES, "/" ) 
ZlO0 IP  
3)) ELSE PC[I)=VAL($): C[I)=I 
2110 IR (PC(I)=O AND I=DC) OR 
OR INT(PC( I ) ) <PC(I ) OR INT(QC(I ) ) 
(QC(I) THEN SOSUB 1000: GOTO 2070 
2120 NEXT I 
Z 1 $0 RETURN 
2200 ROE I=O TO DJ 
2210 PC[I)=O: 
2220 NEXT I 
$000' I= .......................... =I 
$020 '  .................... = 
$050 Z$[O)=" " Z$()=Z$.[O) 
3040 FOR I=DC TO 0 STEP-1 
3050 K=2: ROE J=O TO 2 
300 Y$ ( ] ) =SPACES ( 36 ) 
3070 NEXT J 
3080 P=ABS( PC[ I) ): =ABS[ C( I ) ) 
3090 IF P=O THEN 3290 
3100 IF I(DC OR PC(I)(O THEN t, fID$[Y$(1 
) ,K, 1 ) =CHE$[ 44-SCN[ PC(I ) ) .): K=4 
3110 P$=STR$iP) : L=LENiP$) 
3120 IF ),1 THEN 3150 
3130 IR P.> 1 OR I=0 THEN 'IID$[Y$( 1 ) ,K-I 
, L' =P$: K=K+L 
$140 COTO 3210 
3150 $=STES[.) : 
3160 N=L: IF I/l)L THEN 
3170 JID$(Y$(O) ,K+N/2-L/2-1 ,t)=P$ 
3180 JID$iY$[2) ,K+N/2-M/2-1 ,J)=$ 
3190 JID$[Y$(1) ,K,N-1)=STBINO$(N-1,45) 
3200 K=K+N 
3210 IF I=O THEN K=K-2: COTO 3250 
3220 JID$(Y$.[ 1 ) ,K, 1 )="X" 
3230 IF I=1 THEN 3250 
3240 JID$(Y$(O) ,K,LEN[STR$(I) ) )=STR$(I 
): K=K+LEN[STE$( I ) )-I 
3250 IF K+LEN(Z$(O) ) >40 THEN COSUB 
3300 
360 FOR I=O TO 2 
3270 Z$(J)=Z$(JI+LERT$(Y$[J) ,K) 
3280 NEXT J 
3290 NEXT I 
3300 FOR J=O TO 2GOSU B 
3310 Z$=Z$( J) : 3400 
3320 ZS( J)="s, 
3330 NEXT 
3340 Z$= s, s, COSUB 3400: GOSUB 3400 
3350 RETURN 
3400 PRINT Z$;: IF LEN(Z$) ('40 THEN PRINT 
3410 IF I THEN PRINT# 1 , Z$ 
3420 RBTURN 
4000'I= ............................ =I 
o,o, 
ou Non 
4020 ' - - .... = 
4O30 F=O 
4040 I $= INKEY$ 
4050 IF I.$="0" THEN F=l : RETURN 
400 IF I $= " N"'THEN RETURN 
4070 GOTO 4040 
5000 ' I= ..................... =I 
5020 ' = ..................... = 
SO30 FOR I=O TO DC 
5040 
5050 IF P THB,?? OOSUB 5100 
5060 PC(I)=P: CfI)=O 
5070 NBXT I 
5080 RETURN 
5100 A=ABE(P): B= 
5110 IF A(B THBNSWAP A,B 
5120 A=A-BxINT(4/B): 
5130 IF B THBN 5120 
5140 P=P/A: 
5150 RETURN 
Daniel
L'obstacle augmente mon ardeur.

Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 07 oct. 2014 22:52

Daniel, j'ai encore quelques livres à numériser pour ton site...mais il me faudra du temps :roll:
Numérisation_20141007 (400).jpg
Numérisation_20141007 (400).jpg (183.06 Kio) Vu 2092 fois
Numérisation_20141007 (401).jpg
Numérisation_20141007 (401).jpg (188.39 Kio) Vu 2092 fois
Numérisation_20141007 (402).jpg
Numérisation_20141007 (402).jpg (157.88 Kio) Vu 2092 fois
Numérisation_20141007 (404).jpg
Numérisation_20141007 (404).jpg (165.98 Kio) Vu 2091 fois
Numérisation_20141007 (405).jpg
Numérisation_20141007 (405).jpg (207.16 Kio) Vu 2091 fois

Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 07 oct. 2014 23:04

La lecture me rappelle de bons souvenirs
Daniel, il y a peut être encore des bons souvenirs avec ce bouquin (mais pas de programme T07-70)

édition original en 1982 (USA)
édition Française en 1983 (celle que j'ai)
Numérisation_20141007 (208).jpg
Numérisation_20141007 (208).jpg (149.37 Kio) Vu 2088 fois

Daniel
Messages : 12253
Enregistré le : 01 mai 2007 18:30
Localisation : Vaucluse
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Daniel » 08 oct. 2014 09:53

Carl, ta bibliothèque est inépuisable 8)
J'ai le livre "Logiciels Nathan Ecoles" en version TO8/TO9/TO9+ : http://dcmoto.free.fr/programmes/logici ... es_doc.zip
Il n'y a peut-être pas beaucoup de différences avec ta version, il suffirait peut-être de scanner uniquement les pages spécifiques au nanoréseau.

Image
Image
Daniel
L'obstacle augmente mon ardeur.

Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 08 oct. 2014 10:17

le guide du MO5E, peux tu me confirmer que tu n'as que la version Allemande ?
moi, c'est la version Française
Carl

Daniel
Messages : 12253
Enregistré le : 01 mai 2007 18:30
Localisation : Vaucluse
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Daniel » 08 oct. 2014 11:46

Non, je n'ai pas la version française du guide du MO5E. Tous les guides Thomson que je possède sont sur le site dcmoto.
Daniel
L'obstacle augmente mon ardeur.

Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 17 oct. 2014 09:14

Viennent d'arriver sur mes étagères...encore de la numérisation à faire... :wink:
001.gif
001.gif (170.86 Kio) Vu 2010 fois
002.gif
002.gif (108.8 Kio) Vu 2010 fois
Carl

Avatar du membre
Carl
Modérateur
Messages : 10907
Enregistré le : 08 avr. 2007 13:21
Localisation : http://www.doledujura.fr
Contact :

Re: [Thomson] Nouveaux livres scannés

Message par Carl » 01 nov. 2014 18:09

Daniel, voici le n°1 - Run 01.7z - 49 Mo
cover320_Run01.jpg
cover320_Run01.jpg (161.2 Kio) Vu 1944 fois
https://www.cloud.sfr.fr/?shareObject=f ... 27d30eb129

Carl

Répondre