Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 1. 50x100 pixeles kitöltött téglalap grafikusan
- mov ax,13h
- int 10h
- mov ax,0A000h
- mov ds,ax
- mov bx,320
- mov cx,50
- ciklus1:
- MOV AX,CX
- mul bx
- mov di,ax
- mov dx,50
- mov ax,0f0fh ;fehérszín
- ciklus2:
- mov [di],ax
- inc di
- inc di
- dec dx
- jnz ciklus2
- loop ciklus1
- xor ax,ax
- int 16h
- mov ax,3h
- int 10h ; visszatérés karakteres módba
- 2. 5x7-es téglalap karakteresen ciklussal karakterkiírással
- 3. karakterbekérés esc-ig
- kiírni, hogy MGH, MSH nem betű, csak angol ABC vagy kis és nagy betűkre
- 4. kérjen be egy maximum 5 jegyű számot és írja ki a számnak megfelelő két ascii karaktert
- xor ax,ax
- push ax
- xor di,di
- ciklus:
- xor ax,ax
- int 16h
- cmp al,27
- je vege
- inc di
- mov cl,al
- sub cl,'0'
- xor ch,ch ; cx-ben a beolvasott szamjegy
- mov ah,2
- mov dl,al
- int 21h
- pop ax
- mul bx
- add ax,cx
- push ax
- cmp di,5
- jl ciklus
- vege:
- pop cx
- mov dl,ch
- mov ah,2
- int 21h
- mov dl,cl
- int 21h
- 5. fordítsa meg a stringet a memóriában és írja ki a képernyőre.
- mov di, offset szoveg
- mov si, offset szoveg
- add si, 15 ;szoveg hossza
- ciklus:
- mov al,[di]
- mov ah,[si]
- mov [si], al
- mov [di], ah
- inc di
- dec si
- cmp di,si
- jl ciklus
- mov dx, offset szoveg
- mov ah,9
- int 21h
- ;==========================================================================
- ;Név:
- ;Neptun kód:
- ;Dátum:
- ;
- ;==========================================================================
- Code Segment
- assume CS:Code, DS:Data, SS:Stack
- Start:
- mov ax, Code
- mov DS, AX
- mov ax,3
- int 10h
- ;==========================================================================
- ;1. feledat:
- ;5x7-es téglalap karakteresen ciklussal karakterkiírással
- ;
- ;ooooooo
- ;o o
- ;o o
- ;o o
- ;ooooooo
- ;
- ;==========================================================================
- mov dx, offset feladat1
- mov ah,9
- int 21h
- ;**************************************************************************
- ;Ide írja a megfelelő programrészt!
- mov dl,10
- mov ah,02h
- int 21h
- mov dl,13
- mov ah,02h
- int 21h
- mov dl,'o'
- mov ah,2
- mov cx, 7
- f1_cikluselsosor:
- int 21h
- loop f1_cikluselsosor
- xor bx,bx
- mov cx,3
- f1_fociklus:
- mov bx,cx; kimentjük a ciklusváltozót
- mov dl,10
- mov ah,02h
- int 21h
- mov dl,13
- mov ah,02h
- int 21h ; sortores
- mov dl,'o'
- int 21h
- mov cx, 5
- mov dl, ' '
- f1_belsociklus:
- int 21h
- loop f1_belsociklus
- mov dl,'o'
- int 21h
- mov cx,bx
- dec cx
- jnz f1_fociklus
- ;loop f1_fociklus
- mov dl,10
- mov ah,02h
- int 21h
- mov dl,13
- mov ah,02h
- int 21h ; sortores
- mov cx, 7
- mov dl,'o'
- f1_ciklusutolsosor:
- int 21h
- loop f1_ciklusutolsosor
- ;Eddig
- ;**************************************************************************
- xor ax,ax
- int 16h
- ;==========================================================================
- ;2. feledat:
- ;karakterbekérés esc-ig
- ;kiírni, hogy MGH, MSH nem betű, csak angol ABC vagy kis és nagy betűkre
- ;==========================================================================
- mov ah, 02h
- mov bh, 0
- mov dl, 0 ;DL:X koordinata
- mov dh, 15 ;DH:Y koordinata
- int 10h
- mov dx, offset feladat2
- mov ah, 9
- int 21h
- bevitel1:
- mov ah, 02h
- mov bh, 0
- mov dl,0 ;DL:X koordinata
- mov dh,17 ;DH:Y koordinata
- int 10h
- xor ah,ah
- int 16h
- cmp al,27
- jz Feladat2_Vege
- ;**************************************************************************
- ;Ide írja a megfelelő programrészt!
- cmp al, 'a'
- je maganhangzo
- cmp al,'e'
- je maganhangzo
- cmp al,'i'
- je maganhangzo
- cmp al,'u'
- je maganhangzo
- cmp al,'o'
- je maganhangzo
- cmp al, 98
- jl nembetu
- cmp al, 122
- jg nembetu
- mov dx, offset uzenetmassalhangzo
- mov ah,9
- int 21h
- jmp bevitel1
- maganhangzo:
- mov dx, offset uzenetmaganhangzo
- mov ah,9
- int 21h
- jmp bevitel1
- nembetu:
- mov dx, offset uzenetnembetu
- mov ah,9
- int 21h
- jmp bevitel1
- ;Eddig
- ;**************************************************************************
- Feladat2_Vege:
- ;==========================================================================
- ;3. feledat:
- ;Karakteres üzemmódban írja ki a képernyőre SI értékét bináris formában!
- ;(Használja a balra rotáló (RCL) utasítást, amely a Carry bitet állítja!)
- ;==========================================================================
- mov ah, 02h
- mov bh, 0
- mov dl,0 ;DL:X koordinata
- mov dh,19 ;DH:Y koordinata
- int 10h
- mov dx, offset feladat3
- mov ah,9
- int 21h
- mov ah, 02h
- mov bh, 0
- mov dl,0 ;DL:X koordinata
- mov dh,21 ;DH:Y koordinata
- int 10h
- mov si, 682
- ;**************************************************************************
- ;Ide írja a megfelelő programrészt!
- ;Eddig
- ;**************************************************************************
- xor ax,ax
- int 16h
- mov ax,3
- int 10h
- ;==========================================================================
- ;5. feledat:
- ;Karakteres üzemmódban írja ki a "Indul a görög aludni!" uzenetet!
- ;string megforditas
- ;==========================================================================
- mov dx, offset feladat6
- mov ah,9
- int 21h
- mov ah, 02h
- mov bh, 0
- mov dl,0 ;DL:X koordinata
- mov dh,2 ;DH:Y koordinata
- int 10h
- ;**************************************************************************
- ;Ide írja a megfelelő programrészt!
- mov dl,10
- mov ah,02h
- int 21h
- mov dl,13
- mov ah,02h
- mov si, offset uzenet5+20
- mov cx, 21
- f5_ciklus:
- mov dl, [si]
- mov ah,02h
- int 21h
- dec si
- dec cx
- jnz f5_ciklus
- ;Eddig
- ;**************************************************************************
- xor ax,ax
- int 16h
- ;==========================================================================
- ;6. feledat:
- ;Számítsa ki a "muvelet1" sztringben megadott osztást.
- ;A két szájegyet elválasztó "/" szimbólumot nem kell feldolgozni!
- ;A osztás eredményét és maradékát decimális formában írja ki!
- ;==========================================================================
- mov ah, 02h
- mov bh, 0
- mov dl,0 ;DL:X koordinata
- mov dh,4 ;DH:Y koordinata
- int 10h
- mov dx, offset feladat5
- mov ah,9
- int 21h
- mov ah, 02h
- mov bh, 0
- mov dl,0 ;DL:X koordinata
- mov dh,6 ;DH:Y koordinata
- int 10h
- ;**************************************************************************
- ;Ide írja a megfelelő programrészt!
- ;Eddig
- ;**************************************************************************
- xor ax,ax
- int 16h
- Program_Vege:
- mov ax, 4c00h
- int 21h
- uzenetmaganhangzo db "Maganhangzo lett leutve! $"
- uzenetmassalhangzo db "Massalhangzo lett leutve! $"
- uzenetnembetu db "Nem angol ABC betu lett leutve!$"
- uzenet5 db "!indula gorog a ludnI"
- muvelet1 db "8/5"
- feladat1 db "Elso feladat: 5x7-es teglalap karakteresen$"
- feladat2 db "Masodik feladat: MGH, MSH vagy nem betu (ESC=kilepes)$"
- feladat3 db "Harmadik feladat: 50x100 pixeles teglalap grafikusan.$"
- feladat5 db "Otodik feladat: max 5 jegyu szamot bekerni.$"
- feladat6 db "Hatodik feladat: string megforditas.$"
- Code Ends
- Data Segment
- Data Ends
- Stack Segment
- Stack Ends
- End Start
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement