1.- Contar números del 1 a 16 y mostrarlos por pantalla.
#SimuProc 1.4.3.0 cla sta 090 cln eap inc 090 lda 090 cmp 091 jne 002 hlt #091 10000
Ejecución
del
ejercicio
en
simuproc.
Códigos: 1.- Calculo de Área de una Circunferencia. msg "ingrese ahora el diámetro de su circunferencia" in ax1 ! se ingresa el alor de diámetro stf #1$ ! gurda en esa posición de memoria los números ingresados ldf #1$ ! guarda en posición ax y %x los numero ingresados
dif #&# ! stf #'# ! ldf #'# ! mulf #'# ! stf #1) ! ldf #1) ! mulf #$#! stf #1 ! out 1ax ! hlt !
diide el numero de '( %its guarda en esa posición la diisión carga en ax y %n el nro contenido multiplica el resultado de la diisión por dos guarda en esa posición el resultado de la multiplicación carga en ax y %x los números contenidos multiplica el resultado por la posición *ue guarda el +, guarda en esa posición el resultado de la multiplicación muestra el área o resultado final termina el programa
#&# #1##############! ################! #$# #1#######1##1###! 1111#1#111####1#!
numero de '( %its parte uno parte dos numero de '( %its parte uno parte dos
(.- +romediar una cantidad de números. /imu+roc 1.&.'.# msg "ingrese la cantidad de números a promediar"! ldt ! el número es guardado en ax sta #)$! el numero tam%i0n se guarda en la posición de memoria #)$ mo cx#)$! la posición #)$ es moida a cx cla! asigna # ala aria%le ax msg ",ngresar un umero" ! mensa2e para ingresar números a promediar ldt! el numero ingresado se guarda automáticamente en ax add #3#! a*ui se suma a ax el número de la posición indicada sta #3#! guarda el contenido de ax en la dirección indicada loop ##$! el %ucle le resta uno a cx y si es distinto de # uele a la posición di #)$! se diide x por la posición msg "+romedio es" ! se imprimirá el promedio eap ! comando *ue imprime ax hlt ! 4inali5a el programa
PROGRAAS !O" S$PRO! PROGRAA %$& OR'&"A (R&S "$&ROS )Pro*rama para ordenar tres n+meros msg 1 ingrese tres numeros de numeros msg 2 ordena de mayor a menor msg 3 ordena de menor a mayor msg 4 SALIR ldt cmp 51 jme 60
jeq 0 cmp 52 jeq !0 cmp 53 jeq 100 cmp 54 jeq 62 "lt #50 0 1 10 11 100 101 #60 msg ingrese solo los numeros del men$ jmp 0 msg %S&' &%R(I)* "lt #0 mo+ c,-53 . se est/ inicialiando el contador mo+ c,-50 . se est/ inicialiando el contador ldt st 56. A,mem ,7 inc , loop 2 jmp 0 #!0 mo+ c,-52 lda 56. 56A, cmp 5 jma !6 jme !8 jeq !8 mo+ 58-56 mo+ 56-5 mo+ 5-58 lda 5 cmp 5! jma !% jme 81 jeq 81 mo+ 58-5 mo+ 5-5! mo+ 5!-58 loop !1 mo+ c,-53 mo+ ,-52 ld 56. mem ,7A, eap dec ,
loop 84 jmp 0 #100 mo+ c,-53 mo+ ,-50 ld 56. mem ,7A, eap inc , loop 102 jmp 0 S$A '& 'OS "$&ROS ,1- orma/ L&9 introducir numero.:se almacena en A;< sta 10. :lo que "ay en A; manda ala direccion 10< L&9 introducir otro numero.:se almacena en A;< A99 10. :A;lo que "ay en A; el otro dato direccion 10< jo 20. :salto condicional saltar si "ay desordamiento< %A= el resultado es.:muestra el nue+o +alor de A;< >L&. #20 msg numero muy grande introdusca otro. jmp 02. :salto incondicional< S$A '& 'OS "$&ROS ,2- orma/ #Simu=roc 1?4?3?0 (S@ S(A 9% 9'S )(%R'S ldt I)&R'9BCA %L =RI(%R )(%R' sta 10 ldt I)&R'9BCA %L S%@)9' )(%R' add 10 jo 20 . saltar si "ay desordamiento eap %L R%SL&A9' %SD "lt #20 msg %L )E(%R' %S (F @RA)9% jmp 02 OP&RA!O"&S AR((!AS ldt introduca un numero sta 10 ldt introduca otro numero sta 20 mo+ a,-10 add 20 eap suma esD mo+ a,-10 su 20 eap resta esD mo+ a,-10 mul 20
eap multiplicacion esD mo+ a,-10 di+ 20 eap di+isiGn esD "lt OP&RA!O"&S AR((!AS !O" &" (S@ %S&% =R'@&RA(A R%ALIA LAS '=%RACI')%S (S@ =R%SI')% )' =ARA I)&R'9CIR HAL'R%S (S@ =R%SI')% 9'S =ARA SALIR L9& C(= 102 (A 110 %J 112 C(= 101 %J 114 (% 0 >L& #100 0 1 10 11 100 101 #110 (S@ )(%R' )' HALI9' (= 0 (S@ A9I'S >L& ldt introdusca un numero sta 10 ldt introdusca otro numero sta 20 (S@ %LIA )A '=%RACI') (S@ =R%SI')% )' =ARA S(AR (S@ =R%SI')% 9'S =ARA R%S&AR (S@ =R%SI')% &R%S =ARA (L&I=LICAR (S@ =R%SI')% CA&R' =ARA 9IHI9IR (S@ =R%SI')% CI)C' =ARA H'LH%R AL (%) =RI)CI=AL L9& C(= 105 (A 110 %J 200 C(= 101 %J 201 C(= 102 %J 205 C(= 103 %J 208
C(= 104 %J 209 #200 (= 0 mo+ a,-10 add 20 eap suma esD (= 11! mo+ a,-10 su 20 eap resta esD (= 11! mo+ a,-10 mul 20 eap multipli esD (= 11! mo+ a,-10 di+ 20 eap di+i esD "lt OP&RA!O"&S !O" A(R!&S (S@ =R%SI')% )' =ARA I)&R'9CIR 9A&'S (S@ =R%SI')% 9'S =ARA S(AR (S@ =R%SI')% &R%S =ARA R%S&AR (S@ =R%SI')% CA&R' =ARA (L&I=LICAR L9& C(= 21 (% 25 %J 30 C(= 22 %J 60 C(= 23 %J 80 >L&
#20 0 1 10 11 101 #25 (S@ S'L' )(%R'S 9%L (%) (= 0 #30 (S@ 9A&'S =RI(%RA (A&RIB L9&
S&A 100 L9& S&A 101 L9& S&A 102 L9& S&A 103 L9& S&A 104 L9& S&A 105 L9& S&A 106 L9& S&A 10 L9& S&A 10! (S@ 9A&'S S%@)9A (A&RIB L9& S&A 108 L9& S&A 10A L9& S&A 10 L9& S&A 10C L9& S&A 109 L9& S&A 10% L9& S&A 10K L9& S&A 110 L9& S&A 111 (= 0 >L&
#60 L9A 100 A99 108 %A= S&A 120 L9A 101 A99 10A %A= S&A 121 L9A 102 A99 10 %A=
S&A 122 L9A 103 A99 10C %A= S&A 123 L9A 104 A99 109 %A= S&A 124 L9A 105 A99 10% %A= S&A 125 L9A 106 A99 10K %A= S&A 126 L9A 10 A99 110 %A= S&A 12 L9A 10! A99 111 %A= S&A 12! (= 0 >L& #80 L9A 100 S 108 %A= S&A 120 L9A 101 S 10A %A= S&A 121 L9A 102 S 10 %A= S&A 122 L9A 103 S 10C %A= S&A 123 L9A 104 S 109 %A= S&A 124 L9A 105 S 10% %A= S&A 125
L9A 106 S 10K %A= S&A 126 L9A 10 S 110 %A= S&A 12 L9A 10! S 111 %A= S&A 12! (= 0 >L& OP&RA!O"&S !O" PO"OOS #Simu=roc 1?4?3?0 . operaciones de polinomios de grado 2 msg Introduca el primer polinomio mo+ a,-50 mo+ ,-50 ldt st 60 inc , loop 3 msg Introduca el segundo polinomio mo+ c,-53 mo+ ,-50 ldt st 63 loop 0A msg JuM desea "acerN msg 1Osumar msg 2Orestar msg 3Omultiplicar msg 4Odi+idir #50 0 1 10 11 100 101 #60 )' L' =9% >AC%R L' 9%(AS &&R!!O '& 1- &A&" PAR!A #Simu=roc 1?4?3?0 msg PPPP)'&ASPPPPPPPPPPPPPPP
msg P 1?O Introducir )otas P msg P 2?O +er )otas P msg P 3?O Salir P msg PPPPPPPPPPPPPPPPPPPPPPPP ldt C(= 21 (% 25 %J 30 C(= 22 %J 40 C(= 23 %J 2% >L& #20 0 1 10 11 #25 (S@ S'L' )(%R'S 9%L (%) (= 0 #2! (S@ S'L' )'&A (%)'R A CAR%)&A =&S (= 30 #2A (S@ S'L' )'&A (%)'R A CAR%)&A =&S (= 34 #2C (S@ S'L' )'&A (%)'R A H%I)&% =&S (= 3! #2% (S@ A9I'S >L& #30 L9& )'&A =RI(%R =ARCIAL C(= 200 (A 2! S&A 80 L9& )'&A '=&A&IH' C(= 200 (A 2A S&A 81 L9& )'&A AC& ACA9 C(= 201 (A 2C S&A 82 (= 0 #40 L9A 80 C(= 81 (% 60 (A 65
%J 65 #50 L9A 83 C(= 202 (% 0 (A 8 %J 8 #60 L9A 81 A99 82 S&A 83 (= 50 #65 L9A 80 A99 81 9IH 100 A99 82 S&A 83 (= 50 #0 (S@ &&%)%S J% SACAR C'(' (I)I(' L9A 202 S 83 %A= (S@ ='R J% & )'&A %S L9A 80 %A= >L& #8 (S@ A=R'A9' L9A 83 %A= >L&
#100 10 #200 101000 10100 110011
;Ecuación de 2do Grado MSG 'Programa Ecuación de 2do Grado' ;MSG 'Introduzca el valor de "a"' LDT 'Introduzca el valor de "a"' ;Leo el Valor de ! MV #$% ;Gra&o el numero en la dir # #( ;MSG 'Introduzca el Valor de "&"' LDT 'Introduzca el valor de "&"' ;Leo el valor de (!
MV #)$% ;Gra&o el numero en la dir #) #D ;MSG 'Introduzca el Valor de "c"' LDT 'Introduzca el valor de "c"' ;Leo el valor de )! MV #E$% ;Gra&o el numero en la dir #E #* +MP ,MSG '.&' MV %$/ EP / ;d!&0&.#1-0a0c MV #)$% ML #) S( 3# ML # ML #E MV %$/+MP ,/ MV %$/MSG 'd!' EP /)MP // +M 3- ;d e4 maor a +E5 3- ;d e4 igual a +MP 6- ;4i & e4 menor a - 4alta a la 7o4 6;Inicializo la4 con4tante4 8 2 en IEEE 9/# :/--8888888------- ;Inicializo el umero 8 en la dir <- <8 ----------------8-------------- ;numero 2 en la dir <2 << ---------------88-8:3; %8!=.&>S5?=&@@AaA21MV %$/ ;.& DD 8-- ;raiz de & DIV # DIV /3 MV 3$% ; %2!=.&.S5?=&@@AaA21MV %$/ ;.& S( 8-DIV # DIV /3 MV 3D$% +MP 82-
:6;%2!4Br=.d@AaA2 MV %$/) ;.d ;LD* 88- ;?aiz de .d DIV # DIV /3 MV 3D$% ;%8!.&A-A2 MV %$/ ;.& DIV # DIV /3 MV 3$% +MP 82-
:,- ; .& MV %$// MSG 'egando &' S( #) MV /$% EP / +MP -) :,/ ; .d MV %$// MSG 'egando d' S( /MV /) T 8$% +MP 83 : 82;Mo4trar dato4 en Pantall MSG 'El valor de %8 e4C' MV %$3 EP '%!' MSG 'El valor de %2 e4C' MV %$3D EP '%2' LT ;P?G?M DE MES MSG 'ME P?I)IPL' MSG 'E4cri&a 8C 7ara Introducir dato4' MSG 'E4cri&a 2C 7ara 4alir' LDT 'Introdu4ca 8 2' )MP #+E5 /- ;)MP? SI ES ! )MP #8 +E5 <<
+MP MSG 'ME SE)D?I' MSG '5ue 7era4ión Buiere realizarCF' MSG '8C SM?' MSG '2C ?EST?' MSG '
+MP , MSG '*I' LT :#8 888 8-8-8 88:/LDT 'Introdu4ca el P?IME? nmeroC' MV
+MP 3:/; ME? 5E ( MV %$28 )MP 2+ME #+MP 3:3; ( ME? 5E ) MV %$22 )MP 28 +ME ,+MP 8/ :8/ MV %$2EP '' MV %$28 EP '(' MV %$22 EP ')' +MP -D :6MV %$2MV 2/$% MV %$28 MV 2-$% MV %$2/ MV 28$% +MP #:,MV %$28 MV 2/$% MV %$22 MV 28$% MV %$2/ MV 22$% +MP -6
