| SwissMicros DM-15
|
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |

| Caractéristiques | Quelques tests | Lien avec le PC | Exemple de transfert |
|
Capable de tout ceci:
|
![]() Voici les informations affichées avec la séquence ON+E. Une DM15, avec le FirmwareV14 et l'option M80 (128 registres au lieu de 63) La machine tourne à 12MHz et la pile délivre encore 2.777 Volts. |
| Programme | Temps HP-15C | Temps DM15 12MHz | Temps DM15 48MHz |
f LBL A 1000 STO 0 f LBL 0 DSG 0 GTO 0 RTN |
320 sec à vérifier |
55 sec | 13 sec |
| Programme | Temps HP-15C | Temps DM15 12MHz | Temps DM15 48MHz |
f LBL A f x! RTN f FIX 4 1 ENTER 2 f Integ A |
??? | 8.5 sec | 2 sec |




| On se lance avec le fameux test d'Hebdogiciel consistant, à partir de 2, à prendre 20 fois la racine carrée puis à élever 20 fois le résultat au carré. On le tape sous l'émulateur, vous remarquerez que les fonctions sont toutes directement accessibles à la souris sans taper "f" ni "g" avant. |
f LBL A .01901 ; compteur de 0 à 19 de 1 en 1 STO 0 STO 1 2 ; valeur de départ LBL 0 ; boucle 20 fois sur la racine carrée SQR ISG 0 GTO 0 LBL 1 ; boucle 20 fois sur le carré. X^2 ISG 1 GTO 1 RTN |
Un clic droit sur l'émulateur vous ouvre le menu. Choisissez DM-15/Ecrire. ![]() |
Dans notre cas il s'agit du programme. Pour envoyer les registres, il faut absolument qu'émulateur et DM-15 aient la même partition entre registres et programme! ![]() |
le transfert commence. C'est normalement très rapide et en peu de secondes vous devriez avoir le message ci-dessous. Pour sortir du mode SERIAL CONSOLE, appuyez simplement sur ON de la calculatrice. ![]() |
la possibilité d'enregistrer le programme en ajoutant des commentaires détaillant l'utilisation des labels et des registres. Voici ci-contre le fichier résultant pour le programme test d'Hebdogiciel. |
# --------------------------------------------
# HEWLETT·PACKARD 15C Simulator program
# Created with version 3.2.00
# --------------------------------------------
#T:Test HEBDOGICIEL
#D:f A
#L-1:main program
#L0:20 SQRT loop
#L1:20 x² loop
#R0:1st loop counter
#R1:2nd loop counter
# --------------------------------------------
000 { }
001 { 42 21 11 } f LBL A
002 { 48 } .
003 { 0 } 0
004 { 1 } 1
005 { 9 } 9
006 { 0 } 0
007 { 1 } 1
008 { 44 0 } STO 0
009 { 44 1 } STO 1
010 { 2 } 2
011 { 42 21 0 } f LBL 0
012 { 11 } ?x?
013 { 42 6 0 } f ISG 0
014 { 22 0 } GTO 0
015 { 42 21 1 } f LBL 1
016 { 43 11 } g x²
017 { 42 6 1 } f ISG 1
018 { 22 1 } GTO 1
019 { 43 32 } g RTN
# -------------------------------------------- |
Test HEBDOGICIELDescriptionf A -> renvoit une valeur proche de 2.(returns a value close to 2). Program resourcesLabels
Storage Registers
|
Program
|