Messages

1

1. ročník / Re: Fyzika

« on: 22.06.2011, 15:57:52 »

a kde vlastne je to vyhodnotenie ? a o ktorej ? mi to nejak uniklo

2

1. ročník / Re: ASSEMBLER i8080 / 8086 zadania + HELPDESK :)

« on: 20.03.2011, 19:35:58 »

Ahoj, potreboval by som poradiť. V zadaní mám počítať slová, ktoré obsahujú veľké a zároveň malé písmená. Riešil som to tak, že som v slove spočítal veľke a malé písmená, teraz neviem ako mam zistiť, či sú obidve hodnoty väčšie ako nula.

priklad : mas velke pismena spocitane v H, a v L male:

mov a,h       ; do A das hodnotu z H
cpi 0            ; porovnas A s 0
jz nedobreslovo ; ak A == 0, ti to skoci na "nedobreslovo"
mov a,l           ; podobne s L...
cpi 0

jz nedobreslovo

; tu sa dostanes, ak aj H aj L su ine od 0
jmp  dakde_prec

nedobreslovo:
;tu sa dostanes ak jedna z H alebo L su 0ve.

prepac ale mam to nejako takto a k vhodnym slovam mi to pripocitava vsetky slova mozes mi prosim ta este pomoct ?



org 1000

dcx sp       

lxi h,text     
call putstr

lxi h,text1     
call putstr

lxi d,vlozeny   
call getline

lxi b,vlozeny

mvi d,0     
mvi e,0       
push psw     
jmp velke_pismna

char:
mvi d,0       
mvi e,0       
velke_pismna:         
ldax b       
inx b
cpi 10       
jz koniec_nacitania       
cpi 32         
jz pocet_slov     
cpi 'A'       
jc pismena     
cpi 'Z' + 1     
jnc pismena
inr e       
jmp velke_pismna

pismena:
cpi 'a'       
jc velke_pismna     
cpi 'z' + 1     
jnc velke_pismna
inr d       
jmp velke_pismna

mov a,d     
cpi 0           
jz nedobreslovo
mov a,c         
cpi 0
jz nedobreslovo


jmp  pocet_slov

nedobreslovo:
hlt


pocet_slov: 

pop psw     
inr a       
push psw         
jmp char

koniec_nacitania:   
pop psw
inr a       
push psw
jmp prevod

prevod:     
pop psw
mov h,a
ani 15     
push psw
cpi 10       
jc prevod1
pop psw         
mov b,a
mvi a,7         
add b       
push psw

prevod1:     
mov a,h
rrc       
rrc
rrc
rrc
ani 15       
push psw
cpi 10       
jc vypis       
pop psw
mov b,a
mvi a,7
add b         
push psw

vypis:     
lxi h,text2
call putstr

pop psw
adi '0'
call putchar     

pop psw
adi '0'
call putchar     

call newline
hlt

3

1. ročník / Re: ASSEMBLER i8080 / 8086 zadania + HELPDESK :)

« on: 19.03.2011, 19:05:32 »

Ahoj, potreboval by som poradiť. V zadaní mám počítať slová, ktoré obsahujú veľké a zároveň malé písmená. Riešil som to tak, že som v slove spočítal veľke a malé písmená, teraz neviem ako mam zistiť, či sú obidve hodnoty väčšie ako nula.