Chciałbym aby ktoś mi pomógł napisać program. Wszystkie rady, wskazówki, triki inne pomoce mile widziane. Ów program ma na wstępie prosić o liczbę z zakresu od 0 do 255 (Liczba nie może być większa, ani nie mniejsza. Ani nie może to być litera lub inny znak). <<<Czyli już tu trzeba zrobić jakieś zabezpieczenia.
Po wpisaniu np. 10 ma on wyświetlić, że wartość hex to A, wartość oct 12, a bin 1010. I tak ma zrobić z każdą cyfrą jaką wpiszę z przedziału od 0 do 255. Ale do tej zmiany między systemami chcę wykorzystać operatora przesunięcia, a nie dzielenia!
0
0
50zl, a temat powinien byc w dziale praca
0
Na tym forum zasada jest taka: albo pokaz, co sam zrobiles, albo plac.
0
@Goenitz ale w czym jest problem? Bo że chcesz napisać ten program, to fajnie. Czego w takim razie nie umiesz? Wczytać znaku z konsoli?
mov ah, 01h
int 21h
Sprawdzić czy znak jest cyfrą?
cmp al, '9'
jb mniejszeod9
jmp blad
//
mniejszeod9:
cmp al, '0'
jb blad
jmp cyfra
Nie umiesz przeliczyć wczytanych znaków na liczbę? Wystarczy mnożyć sobie przez 10 i dodawać.
Nie umiesz przeliczyć liczby dziesiętnej na inny system? Google...
0
Chce to zrobić z operatorem przesunięcia, a nie dzielenia. Na chwilę obecną chciałem zamienić liczbę z przedziału od 0 do 255 na bin. Jak już poznam jak to zrobić, to wezmę się za hex i oct.
mov bl, Liczba_Dec ; tu zostanie wpisana liczba z przedziału od 0 do 255.
Wyswietl_Bin:
shr bl, 1
mov dl, cf ;podobno we fladze cf zapisuje się jeden bit z przesunięcia i chce go wypisać, dlatego do dl
mov ah, 02h
int 21h
test bl, FFh
jnz Wyswietl_Bin
Czytałem, że opcja Test działa podobno jak And, tylko nie zapisuje wyniku i poza flagami nic nie zmienia. Dlatego zastosowałem ją do sprawdzenia czy wartość w bl (co ma 8 bitów) to zero. Ale nie wiem, bo coś nie działa, bo podstawiałem za Liczba_Dec różne wartości. Ale coś tak czuje, że i tak jak by zadziałało to by nie wypisało od końca tych zero jedynek jak ja to widzę na tym przykładzie:
Weźmy np. liczbę 25dec:
25 shr o 1 = 12 reszty 1
12 shr o 1 = 6 reszty 0
6 shr o 1 = 3 reszty 0
3 shr o 1 = 1 reszty 1
1 shr o 1 = 0 reszty 1*
25dec = *11001bin
Reszta to ten ucięty bit co po przesunięciu idzie do flagi.
0
ALgorytm specjalnie pod asembler na zamiane na binarny:
- Liczba >> 1
- zmienna++
- wynik na stos
- czy liczba==0 ?
- nie -> goto 1
- zmienna--
- ze stosu do X
- wypisz X
- czy zmienna == 0 ?
- nie -> goto 4
Tak mniej więcej powinno Ci pomóc
0
Dzięki abc za algorytm. Tylko, że coś nie działa. Pewnie to ja coś źle robię. Proszę więc o pomoc. Oto kod:
.model tiny
.386
.data
.stack 100h
.code
mov ax, @data
mov ds, ax
mov bl, zmienna_dec ; za tą zmienną podstawiałem różne wartosci, czy to 10 czy coś innego i tak nie działa.
Bin:
shr bl, 1
push cf
inc cl ; nie użyłem zmiennej a połówki rejestru do zwiększania i potem na jej podstawie obrotów do wypisywania.
cmp bl,0
jnz Bin
Wyswietl_Bin:
pop dl
mov ah, 02h
int 21h
dec cl
cmp cl,0 ;nie działa też test cl, FFh
jnz Wyswietl_Bin
mov ah, 4Ch
int 21h
end
0
-
Zmień model pamięci na .small i podczas linkowania usuń parametr /t albo będziesz musiał trochę pozmieniać kod (deklarujesz model pamięci charakterystyczny dla pliku com a piszesz jak dla execa)
-
Pierwszy raz widzę CF w kodzie asm :D
Powinno być coś takiego(jeżeli koniecznie chcesz na CF to robić):
and dl,0
shr bl,1
jnc pisz ;skok jeżeli CF=0
pisz1:
inc dl
pisz:
add dl,30h ;Kod ASCII na cyfry to 30h-39h czyli jak masz w rejestrze 1 musisz do niego dodać 30h żeby w konsoli wyświetliło ci 1
Myślę że chyba lepiej by było jak byś trzymał liczbę w górnej części rejestru czyli
mov bh,liczba
shr bx,1/3/4(binarnie/ósemkowo/szesnastkowo)
shr bl,8-1/3/4
mov [esi],bl ; W bl będziesz mieć to co przedtem w CF
and bl,0 ;zerujemy bl dla kolejnego przebiegu
-
Kody ASCII na cyfry to 30h-39h a litery A-F to 41h-46h (czyli jak w rejestrze masz 0-9 to dodajesz 30h a jak 10-15(A-F) to 37h żeby wyświetlić poprawny znak w konsoli).
-
Robisz tak:
Pobierasz 3kody znaków XYZ,
Badasz czy 2F<X/Y/Z<3A (żeby nie zmieniać nic w kodzie szaloma - zjadł equale w jumpach i drugi powinien być ja)
obierasz je z niepotrzebnych 3jek
zapisujesz jako np ax = 100x+10y+z
Badasz czy ah = 0 (przedział 0-255)
Puszczasz przez ten swój algorytm
Robisz z cyfr znaki i wyswietlasz
Masz wszystko co powinieneś wiedzieć
0
Mam problem z wczytaniem liczby. Mógłby powiedzieć ktoś co jest z tym nie tak? Oto kod:
.Model tiny
.Stack 100h
.Data
bufor db 4
dlugosc db 0
cyfra db 0,0,0
podaj db "Podaj liczbe od 0 do 255","$"
error db "Zla wartosc. Podaj jeszcze raz liczbe","$"
.Code
Start:
mov dx, offset podaj
mov ah, 09h
int 21h
Pobieranie:
mov dx, offset bufor
mov ah, 0ah
int 21h
;======Sprawdzanie Liczby==========
cmp dlugosc,0
jz Pobieranie
Jeden znak:
cmp dlugosc,1
jne dwa
mov al, cyfra
mov cyfra+2,al
mov cyfra,'0'
mov cyfra+1,'0'
jmp Sprawdz_cyfre
dwa:
cmp dlugosc,2
mov al, cyfra+1
mov cyfra+2, al
mov al, cyfra
mov cyfra+2, al
mov cyfra,"0"
jmp Sprawdz_cyfre:
;===========Zla Liczba===========
blad:
mov dx, offset error
mov ah, 09h ;wyswietlenie informacji o blednej liczbie
int 21h
jmp Pobieranie
;===Sprawdzanie czy to sa liczby od 0 do 9=====
Sprawdz_cyfre:
cmp cyfra,'0'
jb blad
cmp cyfra,'9'
ja blad
cmp cyfra+1,'0'
jb blad
cmp cyfra+1, '9'
ja blad
cmp cyfra+2, '0'
jb blad:
cmp cyfra+2, '9'
ja blad:
;========Konwersja Cyfry=============
konwersja_cyfry:
mov ax, cyfra
mov bx,10
mul bx
add ax, cyfra+1
mul ax, bl
add ax, cyfra+2
mov ah, 4Ch
int 21h
end
Błędy kompilatora:
Assembling file: wczytaj.asm
Error wczytaj.asm(28) Illegal instruction
Error wczytaj.asm(44) Need expression
Error wczytaj.asm(70) Need expression
Error wczytaj.asm(73) Need expression
Error wczytaj.asm(77) Operand types do not match
Error wczytaj.asm(80) Operand types do not match
Error wczytaj.asm(81) Extra characters on line
Error wczytaj.asm(82) Operand types do not match
Error messages: 8
0
google translate sie klania... Masz napisane w których linijkach jest błąd...
masz śmieci na na końcu lini (dwukropki), etykiety nie mogą mieć spacji, mul jest jednoargumentowe, jak rejestr i operend mają różne rozmiary to w twoim przypadku używasz byte ptr.
Widze że tak średnio poprawiłeś kod - w ogóle to ci się uruchomiło i zakończyło prawidłowo chociaż raz?