[ alexa @ 07.04.2001. 12:18 ] @
;ispisuje ascii kod karaktera
;program zbog razumljivosti nije optimizovan
;coded by aLeXa

jmp main
unos db 0d,0a, 'Unesi karakter:$'

main:
mov ah,09h ;funkcija int-a 21 za ispis stringa
mov dx,offset unos ;adresa stringa koji treba da se ispise
int 21h ;poziv prekida
mov ah,00h ;funkcija int-a 16 za prijem znaka sa tastature
int 16h ; AH=scan code, AL=ascii code
cmp ax,011bh ;if ax == <Esc>
je kraj ;kraj programa
int 29h ;ispis znaka iz AL na ekranu
call ispis ;ispisuje ascii kod

kraj: ;procedura za zavrsetak programa
int 20h

ispis: ;ispisi prvu cifru - x100
mov ah,00h ;ah=0
mov bl,64h ;bl=100
div bl ;ax/bl= AL=rezultat, AH=ostatak
push ax ;stavi ax na stek
add al,30h ;saberi sa '0'
int 29h

d_cifra: ;ispisi drugu cifru - x10
pop ax ;uzmi sa steka u ax
mov al,ah ;al=ah
mov ah,00h ;ah=0
mov bl,0ah ;bl=10
div bl ;ax/bl= AL=rezultat, AH=ostatak
push ax ;stavi ax na stek
add al,30h ;al=al+'0'
int 29h ;ispisi iz al na ekran

t_cifra: ;ispisi trecu cifru - x1
pop ax ;uzmi sa steka u ax
mov al,ah ;al=ah
mov ah,00h ;ah=0
add al,30h ;al+'0'
int 29h ;ispisi iz AL na ekran
jmp main ;skoci na main



[Ovu poruku je menjao alexa dana 04-11-2001 u 05:39 AM GMT]
[ @ 10.04.2001. 02:14 ] @
Ej ako si ti normalan majke mi...
Kako si to pisao program ccccccc
bezveze
ni od kakve koristi sada nije
pre cu napisati novi nego ovaj kontati na ovaj nacin
[ alexa @ 11.04.2001. 06:40 ] @
Kritika prihvacena
[ Mikky @ 11.04.2001. 21:36 ] @
heh stvarno kod je uradjen u tkz. spagete stilu
ko razume shvatice
i pored opsirnih komentara neki ce tesko razumeti
mozda bi bilo bolje da koristis call instrukciju nego da jmp na jedan deo pa posle opet jmp tamo odakle si dosao