Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;PROGRAM ECHUJE NA OBRAZOVKU STLACENY KLAVES
- ;NEPRACUJE S DATAMI,PRETO NEMA DEKLAROVANY DATOVY SEGMENT
- NAME ECHO ;PSEUDOINSTRUKCIA NA POMENOVANIE TOHOTO PROGRAMU-MODULU
- ZAS SEGMENT STACK
- DW 64 DUP(?)
- ZAS ENDS
- ;-------
- DATA SEGMENT
- STRING DB 'SRDIECKO$D'
- DATA ENDS
- ;-------
- CODE SEGMENT
- ASSUME CS:CODE,DS:DATA, SS:ZAS
- START: ; NAVESTIE PRVEJ INSTRUKCIE
- MOV AH,1 ;ZIADOST O VSTUP ZNAKU Z KLAVESNICE SLUZBOU CISLO 1
- INT 21H ;PRERUSENIE Z KLAVESNICE PRE VSTUP ZNAKU
- CMP AL,13 ;BOL STLACENY ENTER?
- JZ KONIEC ;AK ANO, SKONCI PROGRAM - VRAT SA DO MSDOS
- MOV DL,AL ;ULOZ NACITANY ZNAK DO REGISTRA DL
- MOV AH,2 ;ZIADOST O VYSTUP ZNAKU NA OBRAZOVKU SLUZBOU CISLO 2
- INT 21H ;USKUTOCNENIE VYSTUPU NA OBRAZOVKU
- MOV DL,3
- MOV AH,2
- INT 21H
- JMP START ;CITAJ DALSI ZNAK Z KLAVESNICE
- KONIEC:
- MOV AH,4CH ;FUNKCIA NA UKONCENIE PROGRAMU A KOREKTNY
- INT 21H ; NAVRAT DO MS-DOS
- CODE ENDS
- END START ;PROGRAM BUDE SPUSTENY OD NAVESTIA START
- ; ULOHY:
- ;1. PRIRADTE CISELNEMU KODU KLAVESY ENTER SYMBOLICKE MENO ENT
- ; (POZRITE NG,PSEUDOINSTRUKCIE,EQU)
- ;2. DEFINUJTE V DATOVOM SEGMENTE PREMENNU ENTR S OBSAHOM 13
- ; (DATA SEGMENT, DB, PLNENIE REGISTRA DS - POZRITE PRIKLADY
- ; V J:\TASM )
- ;3. VYPISTE IBA RAZ NA OBRAZOVKU STLACENY KLAVES T.J. BEZ ECHA
- ; ( NAPR. MIESTO SLUZBY 1 PRI INT 21H POUZITE INU VHODNU SLUZBU -
- ; POZRITE J:\THELP RESP. ABSHELP)
- ;4. PREPISTE PROGRAM Z BODKOVEHO ZAPISU DO ZAKLADNEHO JEDNODUCHEHO ZAPISU
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement