L'Ordinateur Individuel n°47 avril 1983
L'Ordinateur Individuel n°47 avril 1983
  • Prix facial : 20 F

  • Parution : n°47 de avril 1983

  • Périodicité : mensuel

  • Editeur : Groupe Tests

  • Format : (202 x 281) mm

  • Nombre de pages : 262

  • Taille du fichier PDF : 243 Mo

  • Dans ce numéro : intelligence artificielle, robotique, insertion des handicapés... un assistant efficace.

  • Prix de vente (PDF) : gratuit

Dans ce numéro...
< Pages précédentes
Pages : 232 - 233  |  Aller à la page   OK
Pages suivantes >
232 233
HP 7 5 C L'ORDINATEUR PORTABLE DE HEINLETT-PACKARD PUISSANT AUTONOME LÉGER i Tlei12\0,9.19'82 13:59:49 **\\Cia,) i_Fie I, tm apS r (, ! Y Lai Laj [61 ['l ta Co_) çrq(q.e 4_0 1_0 J1.1 H r s ; 1L f] J't Léger (740 g) et esthétique, le HP- 75C possède autant de puissance que tout autre ordinateur de table. Alimenté par batteries, le HP- 75C permet une utilisation sur le terrain pour le calcul et la saisie de données. Il est le coeur d'un système portatif, compact, grâce à sa mémoire de masse, son imprimante et son logiciel fonctionnant sur batteries. En laboratoire ou en bureau, il devient le centre d'un système d'informatique personnelle totalement intégré ou un contrôleur d'appareils. Grâce à sa mémoire permanente de 16K octets (avec possibilité d'extension jusqu'à 24K octets), vous pouvez résoudre des équations complexes, collecter et transférer des données, Iate,e175C‘ écrire des programmes en langage BASIC, stocker des informations et y accéder à l'aide de l'organisation de nombreux types de fichiers, enregistrer des rendez-vous et déclencher des alarmes. Ses logiciels couvrent la plupart des domaines spécifiques aux ingénieurs, aux scientifiques et aux gestionnaires. Le HP-75C peut être également adapté aux besoins plus particuliers ; en effet, il est possible de développer et de personnaliser son propre logiciel et de réaffecter des labels de touches du clavier au moyen d'une grille de personnalisation. Le HP-75C possède le nouveau standard d'interface HP-IL connectable avec les périphériques existants déjà de la gamme HP-41. Je désire recevoir une documentation sur le 1-1P-75C Nom Prénom Adresse Code postal Ville Bon à découper à retourner à : La Règle à Calcul 65/67 bd St-Germain 75005 Paris 65/67 bd St-Germain 75005 Paris Tél. 325.68.88 Télex ETRAV 220064 F/1303 RAC l'Ordinateur Individuel 232 n'47 Avnl 83 Réf érence 214 du service-lecteurs (page 69)
De la saisie rapide... Il faut bien avouer que la saisie des programmes en langage machine est longue et fastidieuse... Voici, pour y remédier, un programme écrit en Applesoft, baptisé ENTREE PLM (programme langage machine) ; il contient aussi en ligne 100 une routine de conversion décimal-hexadécimal en langage machine. Le mode d'emploi est très simple et ne nécessite aucune notion de programmation en assembleur. Une liste en langage machine ou en assembleur peut se diviser en trois colonnes :. la première contient les adresses la seconde le code hexadécimal du programme la troisième le même programme, mais en assembleur. On ne s'occupera que de la première adresse et des chiffres de la seconde colonne. La première chose à faire est d'entrer l'adresse de départ du programme en assembleur. Elle peut être en hexadécimal (et précédée de $) ou en décimal (voir figure 1). Puis, il suffira de taper les codes hexadécimaux à la Fig. 1 : programme en assembleur et zones d'action de PLM. P, 20 F5 E6 JSR $E6F5 0100— 8E OC 03 STX 11030C 0303— 20 F5 E6 JAR 1E6E5 0306— BE 08 03 STX 40300 0309— 1 4C 0E 03 JMP $030E 030C— 00 ARK 0300— 00 ARK 030E— AD 30 CO LDA $C030 0311— 88 DEY 0312— DO 05 ONE $0319 0314— CE OD 03 DEC $0300 0317— FO 09 DEO $0322 0319— CA DRU 0318— DO F5 ONE $0311 031C— AE OC 03 LDX $0300 031F— 4C 0E 03 JMP 5030E 0322— 60 RTS 0323— — OÙ BRK 0324— 0') ARK 0325— 00 81121 n'47 Avnl 83 suite, sans espaces ni RE- TURN. Pour sauver le programme, il faut taper deux fois RETURN. ENTREE PLM vous demandera son nom et le sauvera automatiquement, calculant les adresses. Si RETURN est tapé comme nom de programme, il ne sera pas sauvé. Vous pouvez à tout moment vérifier votre travail en tapant deux fois sur CTRL-L. Vous taperez alors l'adresse à partir de laquelle vous voulez la liste (mêmes remarques que pour l'adresse de départ). Si vous apercevez une erreur, vous pourrez revenir à l'adresse de l'erreur grâce à la flèche Une fois cette faute corrigée, vous pourrez retourner où vous en étiez grâce à l'autre flèche. On remarquera certaines variables, dont : A$, B$ : les deux caractères de l'octet entré ; A, B : valeurs de A$ et B$ ; T$ : adresse de départ rentrée par l'utilisateur (décimal ou hexadécimal) ; AD : même adresse mais en décimal ; T : adresse à POKEr ; AL : adresse, en décimal, de la partie de mémoire à lister ; X1, X2 : servent à sauver AD et T lors du calcul de AL. Comment utiliser le programme ? D'abord quelques explications sur le fonctionnement de « ENTREE PLM ». On peut remarquer, en ligne 100, quatorze points d'exclamation (qu'il faut absolument taper). C'est l'emplacement futur de la routine de conversion décimalhexadécimal. Cette routine est implantée en mémoire automatiquement, grâce aux lignes 670 et 680 qui ne servent d'ailleurs qu'à cela et qui sont détruites après. Voici cette routine décomposée. 80B : JSR $DD67 éva- 233 Programme ENTREE PLM IFINTEE PAR AIRY A1.101,E, (VU UNLMM bUIU A.1 P.11 19 110 REM tt ENTREE DE L'ADRESSE $$ 120 REM.4 IDECIMAL OU HEXAS tt 130 HOME s INPUT "ADRESSE DE DEPART —> "{Tt, GOSUB 430 140 REM 4. CONVERSION DEC—HEX 5. 150 REM a* & ENTREE DE L'OCTET $4 160 REM te EN HEXADÉCIMAL tt 170 CALL 2059(T) : PRINT.—"ss GET At. PRINT Alise GET ON, PRINT OS. 180 REM let A1,610."A" A.F. I tt 190 REM 0* 0A.10,08.11 tt 200 A. ASC (At) — 5518 ASC (At) — 55 210 REM.5 SI At OU Bi. —>tt 220 REM.1 RETOUR EN ARRIEREO* 230 IF A — 4/OR D — 47 THEN T T — Io PRINT x VTAB PEEK (37) — 1 GOTO 170 240 REM 511 SI At OU 08. —> tt 250 REM 11. AVANCE D'UN OCTETS ; 260 IF A — 34 OR B — 34 THEN T T I. PRINT I GOTO 170 270 REM *5 SI AS OU Bt.CTRL—L se 200 REM &m..XXXXL EN MONITEUR tt 290 REM it (LIGNE N.610) tt 300 IF A — 41 OR B — 43 THEN 610 310 REM tt AS OU Bt.CHIFFRE *0 320 REM t$ A.VALCAIN.A.VAL(B111 110 330 PRINT I IF A < 10 THEN A. A. 7 340 IF B < IQ THEN B. D 7 350 REMt. SI A.1 OU At.RETURN 5. 360 REM 5. SAUVETAGE DU PROS. I* 370 REM $0 (LIGNE N.540) 50 380 IF At. CHAS 113) OR B$ CHRt 1131 THEN HOME GOTO 540 390 REM $5 POKE ASB$ A *5 400 REM $$ L'ADRESSE T, *I 410 REM te RECOMMENCE $0 420 A. A 5 16 As POKE TAIT T 1, GOTO 170 430 IF LEFTN IT$,I) < >.t" THEN AD. VAL ITS/sT 801 RETURN 440 REM tt CONVERSION HEU—DEC 5* 450 REM II* DE L'ADRESSE Tt 1111 460 T$ NIDS (Tli,2) 470 Tt. "000" Tt 480 T$ (T11.4) 490 FOR J 1 TO 4,8(J). ARC C MIDIS C71,3,111— 55 500 IF A(J) < 10 THON A(J) A(3) 7 510 NEXT 520 AD. 256 * (811) 0 16 A(2)) (8131 * 16 A14)/1T ADs RETURN 530 REM 4$ SAUVETAGE DU PROG. II 540 PORE 216.0, HOME. INPUT "NOM DU PROGRAMME I "sAtt IF At < > THEN PRINT CHRIS 14)ESAVE"At",A"AD.,L.T — AD 545 END 550 ROME I VTAB 121 GOTO 170 560 REM 80 XXXXL DU MONITEUR *5 570 REM 8* SAUVEGARDE VARIABLES *8 580 REM 0* POUR POUVOIR PRENDRE 1.0 590 REM tt LA MEME ROUTINE OUE tt 600 REM $11 POUR L'ADRESSE. $11 610 PRINT s INPUT'LISTE A PARTIR DE QUELLE ADRESSE, "011111. AD1X2 Ts GOSUB 430NAL AD.AD XIIT. X2 620 REM $0 58.0CTET POIDS FAIBLE it 630 REM tt 59.0CTET POIDS FORT 54 640 REM 0* —418.ADRESSE ROUTINE *5 650 PRINT, POPE 58,AL — 256 5 INT CAL/256) : POKE 59, INT (AL/256)1 CALL — 418 660 PRINT s PRINT I GOTO 170 670 At "80As 20 67 DD 20 52 E7 86 50 AS 51 20 41 F9 60 N D9C6G. 680 FOR A. 1 TO LEN (Al), POKE 511 A, ASC I MIPS (81148,1). 128, NEXT PORE 72,0, CALL — 1441 DEL 670,680 AVANT OE SAUVER LE PROGRAMME. TAPEZ.'RUN 6cs 'luation de la formule pointée par TXTPTR ; * et rangement de la valeur dans FAC ; 80E : JSR $E752 * met FAC en deux octets et le range dans LINNUM ($50- $51) ; 811 : LDX $50 e charge X avec la valeur haute de l'adresse ; 1313 : LDA $51 * charge A'vec la valeur basse de I adresse ; 1 ; 15 : JSR $F941 * affiche I, ? s registres AX ; E 18 : RTS * retour au Basic. CALL 2059 (T) affiche T en quatre chiffres hexadécimaux. La ligne 650 permet de lister une partie de la mé-moire en utilisant une routine de l'AUTOSTART ROM. Cette routine est celle dont on se sert lorsqu'on fait en MONITOR : xxxxL (où xxxx = nombre hexadécimal). Cette routine se trouve en — 4 18 (= $FESE) et l'adresse doit se situer en 58 et 59 (= $ 3A et $38). Si le programme se « plante » et que vous ne voyez pas d'erreurs de frappe, vous avez sûrement oublié de taper RUN 670 avant de le sauver. Pour vous entraîner et voir s'il y a des fautes, vous pouvez taper l'exemple inclus (figure 2 ci-dessous). Fig. 2 : programme test. I FOR T. 2 TO RND (11 X 13 E s CALL 765,T, RND (11 * 2s NEXT s GOTO 1 En tapant également la ligne de programme Basic imprimée sur la même page, votre Apple 2 devrait se transformer en merle et siffloter gaiement. André Airy L'Ordinewrineduel



Autres parutions de ce magazine  voir tous les numéros


Liens vers cette page
Couverture seule :


Couverture avec texte parution au-dessus :


Couverture avec texte parution en dessous :


L'Ordinateur Individuel numéro 47 avril 1983 Page 1L'Ordinateur Individuel numéro 47 avril 1983 Page 2-3L'Ordinateur Individuel numéro 47 avril 1983 Page 4-5L'Ordinateur Individuel numéro 47 avril 1983 Page 6-7L'Ordinateur Individuel numéro 47 avril 1983 Page 8-9L'Ordinateur Individuel numéro 47 avril 1983 Page 10-11L'Ordinateur Individuel numéro 47 avril 1983 Page 12-13L'Ordinateur Individuel numéro 47 avril 1983 Page 14-15L'Ordinateur Individuel numéro 47 avril 1983 Page 16-17L'Ordinateur Individuel numéro 47 avril 1983 Page 18-19L'Ordinateur Individuel numéro 47 avril 1983 Page 20-21L'Ordinateur Individuel numéro 47 avril 1983 Page 22-23L'Ordinateur Individuel numéro 47 avril 1983 Page 24-25L'Ordinateur Individuel numéro 47 avril 1983 Page 26-27L'Ordinateur Individuel numéro 47 avril 1983 Page 28-29L'Ordinateur Individuel numéro 47 avril 1983 Page 30-31L'Ordinateur Individuel numéro 47 avril 1983 Page 32-33L'Ordinateur Individuel numéro 47 avril 1983 Page 34-35L'Ordinateur Individuel numéro 47 avril 1983 Page 36-37L'Ordinateur Individuel numéro 47 avril 1983 Page 38-39L'Ordinateur Individuel numéro 47 avril 1983 Page 40-41L'Ordinateur Individuel numéro 47 avril 1983 Page 42-43L'Ordinateur Individuel numéro 47 avril 1983 Page 44-45L'Ordinateur Individuel numéro 47 avril 1983 Page 46-47L'Ordinateur Individuel numéro 47 avril 1983 Page 48-49L'Ordinateur Individuel numéro 47 avril 1983 Page 50-51L'Ordinateur Individuel numéro 47 avril 1983 Page 52-53L'Ordinateur Individuel numéro 47 avril 1983 Page 54-55L'Ordinateur Individuel numéro 47 avril 1983 Page 56-57L'Ordinateur Individuel numéro 47 avril 1983 Page 58-59L'Ordinateur Individuel numéro 47 avril 1983 Page 60-61L'Ordinateur Individuel numéro 47 avril 1983 Page 62-63L'Ordinateur Individuel numéro 47 avril 1983 Page 64-65L'Ordinateur Individuel numéro 47 avril 1983 Page 66-67L'Ordinateur Individuel numéro 47 avril 1983 Page 68-69L'Ordinateur Individuel numéro 47 avril 1983 Page 70-71L'Ordinateur Individuel numéro 47 avril 1983 Page 72-73L'Ordinateur Individuel numéro 47 avril 1983 Page 74-75L'Ordinateur Individuel numéro 47 avril 1983 Page 76-77L'Ordinateur Individuel numéro 47 avril 1983 Page 78-79L'Ordinateur Individuel numéro 47 avril 1983 Page 80-81L'Ordinateur Individuel numéro 47 avril 1983 Page 82-83L'Ordinateur Individuel numéro 47 avril 1983 Page 84-85L'Ordinateur Individuel numéro 47 avril 1983 Page 86-87L'Ordinateur Individuel numéro 47 avril 1983 Page 88-89L'Ordinateur Individuel numéro 47 avril 1983 Page 90-91L'Ordinateur Individuel numéro 47 avril 1983 Page 92-93L'Ordinateur Individuel numéro 47 avril 1983 Page 94-95L'Ordinateur Individuel numéro 47 avril 1983 Page 96-97L'Ordinateur Individuel numéro 47 avril 1983 Page 98-99L'Ordinateur Individuel numéro 47 avril 1983 Page 100-101L'Ordinateur Individuel numéro 47 avril 1983 Page 102-103L'Ordinateur Individuel numéro 47 avril 1983 Page 104-105L'Ordinateur Individuel numéro 47 avril 1983 Page 106-107L'Ordinateur Individuel numéro 47 avril 1983 Page 108-109L'Ordinateur Individuel numéro 47 avril 1983 Page 110-111L'Ordinateur Individuel numéro 47 avril 1983 Page 112-113L'Ordinateur Individuel numéro 47 avril 1983 Page 114-115L'Ordinateur Individuel numéro 47 avril 1983 Page 116-117L'Ordinateur Individuel numéro 47 avril 1983 Page 118-119L'Ordinateur Individuel numéro 47 avril 1983 Page 120-121L'Ordinateur Individuel numéro 47 avril 1983 Page 122-123L'Ordinateur Individuel numéro 47 avril 1983 Page 124-125L'Ordinateur Individuel numéro 47 avril 1983 Page 126-127L'Ordinateur Individuel numéro 47 avril 1983 Page 128-129L'Ordinateur Individuel numéro 47 avril 1983 Page 130-131L'Ordinateur Individuel numéro 47 avril 1983 Page 132-133L'Ordinateur Individuel numéro 47 avril 1983 Page 134-135L'Ordinateur Individuel numéro 47 avril 1983 Page 136-137L'Ordinateur Individuel numéro 47 avril 1983 Page 138-139L'Ordinateur Individuel numéro 47 avril 1983 Page 140-141L'Ordinateur Individuel numéro 47 avril 1983 Page 142-143L'Ordinateur Individuel numéro 47 avril 1983 Page 144-145L'Ordinateur Individuel numéro 47 avril 1983 Page 146-147L'Ordinateur Individuel numéro 47 avril 1983 Page 148-149L'Ordinateur Individuel numéro 47 avril 1983 Page 150-151L'Ordinateur Individuel numéro 47 avril 1983 Page 152-153L'Ordinateur Individuel numéro 47 avril 1983 Page 154-155L'Ordinateur Individuel numéro 47 avril 1983 Page 156-157L'Ordinateur Individuel numéro 47 avril 1983 Page 158-159L'Ordinateur Individuel numéro 47 avril 1983 Page 160-161L'Ordinateur Individuel numéro 47 avril 1983 Page 162-163L'Ordinateur Individuel numéro 47 avril 1983 Page 164-165L'Ordinateur Individuel numéro 47 avril 1983 Page 166-167L'Ordinateur Individuel numéro 47 avril 1983 Page 168-169L'Ordinateur Individuel numéro 47 avril 1983 Page 170-171L'Ordinateur Individuel numéro 47 avril 1983 Page 172-173L'Ordinateur Individuel numéro 47 avril 1983 Page 174-175L'Ordinateur Individuel numéro 47 avril 1983 Page 176-177L'Ordinateur Individuel numéro 47 avril 1983 Page 178-179L'Ordinateur Individuel numéro 47 avril 1983 Page 180-181L'Ordinateur Individuel numéro 47 avril 1983 Page 182-183L'Ordinateur Individuel numéro 47 avril 1983 Page 184-185L'Ordinateur Individuel numéro 47 avril 1983 Page 186-187L'Ordinateur Individuel numéro 47 avril 1983 Page 188-189L'Ordinateur Individuel numéro 47 avril 1983 Page 190-191L'Ordinateur Individuel numéro 47 avril 1983 Page 192-193L'Ordinateur Individuel numéro 47 avril 1983 Page 194-195L'Ordinateur Individuel numéro 47 avril 1983 Page 196-197L'Ordinateur Individuel numéro 47 avril 1983 Page 198-199L'Ordinateur Individuel numéro 47 avril 1983 Page 200-201L'Ordinateur Individuel numéro 47 avril 1983 Page 202-203L'Ordinateur Individuel numéro 47 avril 1983 Page 204-205L'Ordinateur Individuel numéro 47 avril 1983 Page 206-207L'Ordinateur Individuel numéro 47 avril 1983 Page 208-209L'Ordinateur Individuel numéro 47 avril 1983 Page 210-211L'Ordinateur Individuel numéro 47 avril 1983 Page 212-213L'Ordinateur Individuel numéro 47 avril 1983 Page 214-215L'Ordinateur Individuel numéro 47 avril 1983 Page 216-217L'Ordinateur Individuel numéro 47 avril 1983 Page 218-219L'Ordinateur Individuel numéro 47 avril 1983 Page 220-221L'Ordinateur Individuel numéro 47 avril 1983 Page 222-223L'Ordinateur Individuel numéro 47 avril 1983 Page 224-225L'Ordinateur Individuel numéro 47 avril 1983 Page 226-227L'Ordinateur Individuel numéro 47 avril 1983 Page 228-229L'Ordinateur Individuel numéro 47 avril 1983 Page 230-231L'Ordinateur Individuel numéro 47 avril 1983 Page 232-233L'Ordinateur Individuel numéro 47 avril 1983 Page 234-235L'Ordinateur Individuel numéro 47 avril 1983 Page 236-237L'Ordinateur Individuel numéro 47 avril 1983 Page 238-239L'Ordinateur Individuel numéro 47 avril 1983 Page 240-241L'Ordinateur Individuel numéro 47 avril 1983 Page 242-243L'Ordinateur Individuel numéro 47 avril 1983 Page 244-245L'Ordinateur Individuel numéro 47 avril 1983 Page 246-247L'Ordinateur Individuel numéro 47 avril 1983 Page 248-249L'Ordinateur Individuel numéro 47 avril 1983 Page 250-251L'Ordinateur Individuel numéro 47 avril 1983 Page 252-253L'Ordinateur Individuel numéro 47 avril 1983 Page 254-255L'Ordinateur Individuel numéro 47 avril 1983 Page 256-257L'Ordinateur Individuel numéro 47 avril 1983 Page 258-259L'Ordinateur Individuel numéro 47 avril 1983 Page 260-261L'Ordinateur Individuel numéro 47 avril 1983 Page 262