Accueil > Réalisations > Publications > Ouvrages > Ouvrage sur la HP28 c/s > Voyage au centre de la HP28 c/s : lire le livre en ligne
Voyage au centre de la HP28 c/s : lire le livre en ligne
mardi 27 juin 2006, par
Si vous ne voulez pas télécharger l’ensemble de l’ouvrage, vous pouvez le lire en ligne ici...
Si vous désirez une version papier, un « reprint » est disponible via Amazon !
 |
 |
 |
 |
 |
Interfaces d'entrées / sorties |
||||
![(c) Courbis www.courbis.fr Page 130 3] PROGRAMME D'EMISSION SUR APPLE (B1 est a` re'gler. C'est la longueur d'e'mission d'un bit long, si la sensibilite'de la machine est suffisamment bonne pour de'tecter la diffe'rence entre les longs et les courts, vous pouvez remplacer la boucle en 230 par unecommande plus courte en exe'cution: E=0 (par exemple)). EMIAPPLE 5 B1=1 10 HOME: PRINT '28 LINK': print'(C) S.LALANDE & P.COURBIS' 15 PRINT 'EMSSION HP' 20 PRINT: PRINT 25 PRINT: PRINT '(* POUR CATALOG)' 30 INPUT 'NOM = ';N$ 35 IF N$='*' THEN PRINT CHR$(4)'CATALOG': GOTO 25 40 PRINT CHR$(4)'BLOAD';N$ 45 AD= 32 * 256 50 L=PEEK(AD)*100+PEEK(AD+1)*1600+PEEK(AD+2)+PEEK(AD+3)*16 55 PRINT 'LONGUEUR TOTALE = ';L 60 LE=2*L 65 PRINT 'DEMAREZ LE PROGRAMME `IN' SUR L'HP...' 70 PRINT 'PRESS A KEY TO START';: GET A$ 75 L=4: GOSUB 100 80 WAIT -16287,128 85 L=LE: GOSUB 100 90 GOTO 500 100 FOR X=0 TO L/2-1 110 T= PEEK(AD+2*X): GOSUB 200 120 T= PEEK(AD+2*X+1): GOSUB 200 130 NEXT 140 RETURN 200 FOR I=3 TO 0 STEP -1 210 W= INT( T / 2^I ): T= T - W * 2^I 220 IF W=0 THEN POKE -16295,0: POKE -16296,0: GOTO 240 230 POKE -16295,0: FOR E=1 TO B1: NEXT: POKE -16296,0 240 NEXT 250 RETURN 500 PRINT: PRINT 'THE END!' 510 PRINT 'ENCORE ? (O/N) ';: GET A$ 520 IF A$<>'N' THEN GOTO 10 530 END V28 #3 (C) 2001 www.courbis.com 8/03/2001, 12:45130](/Book/Voyage28/133.gif)
|
||||
|
|
|
|
|
Tous droits réservés
Permalien
Messages
1. traduction anglaise de Voyage au centre de la HP28 c/s, 14 décembre 2017, 16:57, par Mike Pouchak
Bonjour Paul Corbis,
Je suis intéressé à obtenir une traduction anglaise de
« Voyage au centre de la HP28 c / s »
Connaissez-vous des travaux dans ce domaine ?
Connaissez-vous d’autres versions en anglais ?
Je pourrais être enclin à produire une traduction très limitée de sujets clés tels que l’index et la table des matières pour aider à ma compréhension à des fins privées.
Merci,
Mike Pouchak
Minnesota, USA
1. traduction anglaise de Voyage au centre de la HP28 c/s, 14 décembre 2017, 20:14, par Paul Courbis
Just sent you an email ;-)